#include "sfhdr.h"
#if __STD_C
int sfprintf(Sfio_t* f, const char* form, ...)
#else
int sfprintf(va_alist)
va_dcl
#endif
{
va_list args;
reg int rv;
#if __STD_C
va_start(args,form);
#else
reg Sfio_t* f;
reg char* form;
va_start(args);
f = va_arg(args,Sfio_t*);
form = va_arg(args,char*);
#endif
rv = sfvprintf(f,form,args);
va_end(args);
return rv;
}
#if __STD_C
ssize_t sfvsprintf(char* s, size_t n, const char* form, va_list args)
#else
ssize_t sfvsprintf(s, n, form, args)
char* s;
size_t n;
char* form;
va_list args;
#endif
{
Sfio_t *f;
ssize_t rv;
if(!(f = sfnew(NIL(Sfio_t*),NIL(char*),(size_t)SF_UNBOUND,
-1,SF_WRITE|SF_STRING)) )
return -1;
if((rv = sfvprintf(f,form,args)) >= 0 )
{ if(s && n > 0)
{ if((rv+1) >= n)
n--;
else
n = rv;
memcpy(s, f->data, n);
s[n] = 0;
}
_Sfi = rv;
}
sfclose(f);
return rv;
}
#if __STD_C
ssize_t sfsprintf(char* s, size_t n, const char* form, ...)
#else
ssize_t sfsprintf(va_alist)
va_dcl
#endif
{
va_list args;
ssize_t rv;
#if __STD_C
va_start(args,form);
#else
reg char* s;
reg size_t n;
reg char* form;
va_start(args);
s = va_arg(args,char*);
n = va_arg(args,size_t);
form = va_arg(args,char*);
#endif
rv = sfvsprintf(s,n,form,args);
va_end(args);
return rv;
}