Add GNU LGPL headers to all .c .C and .h files
[oweals/cde.git] / cde / programs / dtksh / ksh93 / src / lib / libast / sfio / sfprints.c
1 /*
2  * CDE - Common Desktop Environment
3  *
4  * Copyright (c) 1993-2012, The Open Group. All rights reserved.
5  *
6  * These libraries and programs are free software; you can
7  * redistribute them and/or modify them under the terms of the GNU
8  * Lesser General Public License as published by the Free Software
9  * Foundation; either version 2 of the License, or (at your option)
10  * any later version.
11  *
12  * These libraries and programs are distributed in the hope that
13  * they will be useful, but WITHOUT ANY WARRANTY; without even the
14  * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
15  * PURPOSE. See the GNU Lesser General Public License for more
16  * details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with these librararies and programs; if not, write
20  * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
21  * Floor, Boston, MA 02110-1301 USA
22  */
23 /* $XConsortium: sfprints.c /main/3 1995/11/01 18:33:30 rswiston $ */
24 /***************************************************************
25 *                                                              *
26 *                      AT&T - PROPRIETARY                      *
27 *                                                              *
28 *         THIS IS PROPRIETARY SOURCE CODE LICENSED BY          *
29 *                          AT&T CORP.                          *
30 *                                                              *
31 *                Copyright (c) 1995 AT&T Corp.                 *
32 *                     All Rights Reserved                      *
33 *                                                              *
34 *           This software is licensed by AT&T Corp.            *
35 *       under the terms and conditions of the license in       *
36 *       http://www.research.att.com/orgs/ssr/book/reuse        *
37 *                                                              *
38 *               This software was created by the               *
39 *           Software Engineering Research Department           *
40 *                    AT&T Bell Laboratories                    *
41 *                                                              *
42 *               For further information contact                *
43 *                     gsf@research.att.com                     *
44 *                                                              *
45 ***************************************************************/
46 #include        "sfhdr.h"
47
48 /*      Construct a string with the given format and data.
49 **      This function allocates space as necessary to store the string.
50 **      This avoids overflow problems typical with sprintf() in stdio.
51 **
52 **      Written by Kiem-Phong Vo (06/27/90)
53 */
54
55 #if __STD_C
56 char *sfprints(const char *form, ...)
57 #else
58 char *sfprints(va_alist)
59 va_dcl
60 #endif
61 {
62         va_list         args;
63         reg int         rv;
64         static Sfio_t   *f;
65
66 #if __STD_C
67         va_start(args,form);
68 #else
69         reg char        *form;
70         va_start(args);
71         form = va_arg(args,char*);
72 #endif
73
74         /* make a fake stream */
75         if(!f && !(f = sfnew(NIL(Sfio_t*),NIL(char*),-1,-1,SF_WRITE|SF_STRING)) )
76                 return NIL(char*);
77
78         sfseek(f,0L,0);
79         rv = sfvprintf(f,form,args);
80         va_end(args);
81
82         if(rv < 0 || sfputc(f,'\0') < 0)
83                 return NIL(char*);
84
85         _Sfi = (f->next - f->data) - 1;
86         return (char*)f->data;
87 }