version 1.1, 2010/01/29 11:38:15
|
version 1.47, 2013/12/03 09:36:10
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.0.10 |
RPL/2 (R) version 4.1.17 |
Copyright (C) 1989-2010 Dr. BERTRAND Joël |
Copyright (C) 1989-2013 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 20
|
Line 20
|
*/ |
*/ |
|
|
|
|
#include <stdio.h> |
#include "rpl.h" |
#include <stdlib.h> |
|
#include <stdarg.h> |
|
#include <string.h> |
|
#include <strings.h> |
|
|
|
int |
int |
vasprintf(char **strp, const char *fmt, va_list ap) |
valsprintf(unsigned char **strp, const char *fmt, va_list ap) |
{ |
{ |
size_t bs; |
size_t bs; |
size_t s; |
size_t s; |
char *b = NULL; |
|
|
unsigned char *b = NULL; |
for(bs = 1024;; bs *= 2) |
|
{ |
va_list cap; |
if (b != NULL) |
|
{ |
|
free(b); |
|
} |
|
|
|
if ((b = malloc(sizeof(*b) * bs)) == NULL) |
for(bs = 1024;; bs *= 2) |
{ |
{ |
return -1; |
va_copy(cap, ap); |
|
|
|
if (b != NULL) |
|
{ |
|
free(b); |
|
} |
|
|
|
if ((b = malloc(sizeof(*b) * bs)) == NULL) |
|
{ |
|
return -1; |
|
} |
|
|
|
if (((int) (s = (size_t) vsnprintf(b, bs, fmt, cap))) < 0) |
|
{ |
|
free(b); |
|
return -1; |
|
} |
|
|
|
if (s < bs) |
|
{ |
|
break; |
|
} |
} |
} |
|
|
if (((int) (s = vsnprintf(b, bs, fmt, ap))) < 0) |
if (((*strp) = realloc(b, ((s = strlen(b)) + 1) * sizeof(*b))) == NULL) |
{ |
{ |
free(b); |
free(b); |
return -1; |
return -1; |
} |
} |
|
|
if (s < bs) |
return((int) s); |
{ |
|
break; |
|
} |
|
} |
|
|
|
if (((*strp) = realloc(b, ((s = strlen(b)) + 1) * sizeof(*b))) |
|
== NULL) |
|
{ |
|
free(b); |
|
return -1; |
|
} |
|
|
|
return s; |
|
} |
} |
|
|
|
|
int |
int |
asprintf(char **strp, const char *fmt, ...) |
alsprintf(unsigned char **strp, const char *fmt, ...) |
{ |
{ |
int done; |
int done; |
va_list arg; |
va_list arg; |
|
|
va_start(arg, fmt); |
va_start(arg, fmt); |
done = vasprintf(strp, fmt, arg); |
done = valsprintf(strp, fmt, arg); |
va_end(arg); |
va_end(arg); |
|
|
return(done); |
return(done); |
} |
} |
|
|
// vim: ts=4 |
// vim: ts=4 |