Removed unportable testing code.

This commit is contained in:
Werner Koch 2007-08-01 18:13:31 +00:00
parent 11573b09c4
commit cc25f43651
2 changed files with 83 additions and 135 deletions

View File

@ -1,3 +1,9 @@
2007-08-01 Werner Koch <wk@g10code.com>
* estream-printf.c (read_dummy_value): Removed as it is useless now.
(read_values): Remove check on !vaargs which is not anymore needed
and anyway not portable. Reported by Peter O'Gorman.
2007-07-16 Werner Koch <wk@g10code.com> 2007-07-16 Werner Koch <wk@g10code.com>
* estream.c (es_func_file_create): Clear NO_CLOSE flag. * estream.c (es_func_file_create): Clear NO_CLOSE flag.

View File

@ -644,56 +644,6 @@ parse_format (const char *format,
return -1; return -1;
} }
/* This function is used for testing to provide default arguments. */
static int
read_dummy_value (value_t *value, valtype_t vt)
{
switch (vt)
{
case VALTYPE_CHAR: value->a_char = 'a'; break;
case VALTYPE_CHAR_PTR: value->a_char_ptr = NULL; break;
case VALTYPE_SCHAR: value->a_schar = 'a'; break;
case VALTYPE_SCHAR_PTR: value->a_schar_ptr = NULL; break;
case VALTYPE_UCHAR: value->a_uchar = 'a'; break;
case VALTYPE_SHORT: value->a_short = -4711; break;
case VALTYPE_USHORT: value->a_ushort = 4711; break;
case VALTYPE_SHORT_PTR: value->a_short_ptr = NULL; break;
case VALTYPE_INT: value->a_int = 42; break;
case VALTYPE_INT_PTR: value->a_int_ptr = NULL; break;
case VALTYPE_UINT: value->a_uint = 65535; break;
case VALTYPE_LONG: value->a_long = 11071961; break;
case VALTYPE_ULONG: value->a_ulong = 19610711; break;
case VALTYPE_LONG_PTR: value->a_long_ptr = NULL; break;
#ifdef HAVE_LONG_LONG_INT
case VALTYPE_LONGLONG: value->a_longlong = 11223344; break;
case VALTYPE_ULONGLONG: value->a_ulonglong = 2233445566u; break;
case VALTYPE_LONGLONG_PTR: value->a_longlong_ptr = NULL; break;
#endif
case VALTYPE_DOUBLE: value->a_double = 3.1415926535; break;
#ifdef HAVE_LONG_DOUBLE
case VALTYPE_LONGDOUBLE: value->a_longdouble = 2.7; break;
#endif
case VALTYPE_STRING: value->a_string = "heart of gold"; break;
case VALTYPE_POINTER: value->a_void_ptr = (void*)0xdeadbeef; break;
#ifdef HAVE_INTMAX_T
case VALTYPE_INTMAX: value->a_intmax = 100; break;
case VALTYPE_INTMAX_PTR: value->a_intmax_ptr = NULL; break;
#endif
#ifdef HAVE_UINTMAX_T
case VALTYPE_UINTMAX: value->a_uintmax = 200; break;
#endif
case VALTYPE_SIZE: value->a_size = 65537; break;
case VALTYPE_SIZE_PTR: value->a_size_ptr = NULL; break;
#ifdef HAVE_PTRDIFF_T
case VALTYPE_PTRDIFF: value->a_ptrdiff = 2; break;
case VALTYPE_PTRDIFF_PTR: value->a_ptrdiff_ptr = NULL; break;
#endif
default: /* Unsupported type. */
return -1;
}
return 0;
}
/* This function reads all the values as specified by VALUETABLE into /* This function reads all the values as specified by VALUETABLE into
VALUETABLE. The values are expected in VAARGS. The function VALUETABLE. The values are expected in VAARGS. The function
@ -708,102 +658,94 @@ read_values (valueitem_t valuetable, size_t valuetable_len, va_list vaargs)
value_t *value = &valuetable[validx].value; value_t *value = &valuetable[validx].value;
valtype_t vt = valuetable[validx].vt; valtype_t vt = valuetable[validx].vt;
if (!vaargs) switch (vt)
{ {
if (read_dummy_value (value, vt)) case VALTYPE_CHAR: value->a_char = va_arg (vaargs, int); break;
return -1; case VALTYPE_CHAR_PTR:
} value->a_char_ptr = va_arg (vaargs, char *);
else break;
{ case VALTYPE_SCHAR: value->a_schar = va_arg (vaargs, int); break;
switch (vt) case VALTYPE_SCHAR_PTR:
{ value->a_schar_ptr = va_arg (vaargs, signed char *);
case VALTYPE_CHAR: value->a_char = va_arg (vaargs, int); break; break;
case VALTYPE_CHAR_PTR: case VALTYPE_UCHAR: value->a_uchar = va_arg (vaargs, int); break;
value->a_char_ptr = va_arg (vaargs, char *); case VALTYPE_SHORT: value->a_short = va_arg (vaargs, int); break;
break; case VALTYPE_USHORT: value->a_ushort = va_arg (vaargs, int); break;
case VALTYPE_SCHAR: value->a_schar = va_arg (vaargs, int); break; case VALTYPE_SHORT_PTR:
case VALTYPE_SCHAR_PTR: value->a_short_ptr = va_arg (vaargs, short *);
value->a_schar_ptr = va_arg (vaargs, signed char *); break;
break; case VALTYPE_INT:
case VALTYPE_UCHAR: value->a_uchar = va_arg (vaargs, int); break; value->a_int = va_arg (vaargs, int);
case VALTYPE_SHORT: value->a_short = va_arg (vaargs, int); break; break;
case VALTYPE_USHORT: value->a_ushort = va_arg (vaargs, int); break; case VALTYPE_INT_PTR:
case VALTYPE_SHORT_PTR: value->a_int_ptr = va_arg (vaargs, int *);
value->a_short_ptr = va_arg (vaargs, short *); break;
break; case VALTYPE_UINT:
case VALTYPE_INT: value->a_uint = va_arg (vaargs, unsigned int);
value->a_int = va_arg (vaargs, int); break;
break; case VALTYPE_LONG:
case VALTYPE_INT_PTR: value->a_long = va_arg (vaargs, long);
value->a_int_ptr = va_arg (vaargs, int *); break;
break; case VALTYPE_ULONG:
case VALTYPE_UINT: value->a_ulong = va_arg (vaargs, unsigned long);
value->a_uint = va_arg (vaargs, unsigned int); break;
break; case VALTYPE_LONG_PTR:
case VALTYPE_LONG: value->a_long_ptr = va_arg (vaargs, long *);
value->a_long = va_arg (vaargs, long); break;
break;
case VALTYPE_ULONG:
value->a_ulong = va_arg (vaargs, unsigned long);
break;
case VALTYPE_LONG_PTR:
value->a_long_ptr = va_arg (vaargs, long *);
break;
#ifdef HAVE_LONG_LONG_INT #ifdef HAVE_LONG_LONG_INT
case VALTYPE_LONGLONG: case VALTYPE_LONGLONG:
value->a_longlong = va_arg (vaargs, long long int); value->a_longlong = va_arg (vaargs, long long int);
break; break;
case VALTYPE_ULONGLONG: case VALTYPE_ULONGLONG:
value->a_ulonglong = va_arg (vaargs, unsigned long long int); value->a_ulonglong = va_arg (vaargs, unsigned long long int);
break; break;
case VALTYPE_LONGLONG_PTR: case VALTYPE_LONGLONG_PTR:
value->a_longlong_ptr = va_arg (vaargs, long long *); value->a_longlong_ptr = va_arg (vaargs, long long *);
break; break;
#endif #endif
case VALTYPE_DOUBLE: case VALTYPE_DOUBLE:
value->a_double = va_arg (vaargs, double); value->a_double = va_arg (vaargs, double);
break; break;
#ifdef HAVE_LONG_DOUBLE #ifdef HAVE_LONG_DOUBLE
case VALTYPE_LONGDOUBLE: case VALTYPE_LONGDOUBLE:
value->a_longdouble = va_arg (vaargs, long double); value->a_longdouble = va_arg (vaargs, long double);
break; break;
#endif #endif
case VALTYPE_STRING: case VALTYPE_STRING:
value->a_string = va_arg (vaargs, const char *); value->a_string = va_arg (vaargs, const char *);
break; break;
case VALTYPE_POINTER: case VALTYPE_POINTER:
value->a_void_ptr = va_arg (vaargs, void *); value->a_void_ptr = va_arg (vaargs, void *);
break; break;
#ifdef HAVE_INTMAX_T #ifdef HAVE_INTMAX_T
case VALTYPE_INTMAX: case VALTYPE_INTMAX:
value->a_intmax = va_arg (vaargs, intmax_t); value->a_intmax = va_arg (vaargs, intmax_t);
break; break;
case VALTYPE_INTMAX_PTR: case VALTYPE_INTMAX_PTR:
value->a_intmax_ptr = va_arg (vaargs, intmax_t *); value->a_intmax_ptr = va_arg (vaargs, intmax_t *);
break; break;
#endif #endif
#ifdef HAVE_UINTMAX_T #ifdef HAVE_UINTMAX_T
case VALTYPE_UINTMAX: case VALTYPE_UINTMAX:
value->a_uintmax = va_arg (vaargs, uintmax_t); value->a_uintmax = va_arg (vaargs, uintmax_t);
break; break;
#endif #endif
case VALTYPE_SIZE: case VALTYPE_SIZE:
value->a_size = va_arg (vaargs, size_t); value->a_size = va_arg (vaargs, size_t);
break; break;
case VALTYPE_SIZE_PTR: case VALTYPE_SIZE_PTR:
value->a_size_ptr = va_arg (vaargs, size_t *); value->a_size_ptr = va_arg (vaargs, size_t *);
break; break;
#ifdef HAVE_PTRDIFF_T #ifdef HAVE_PTRDIFF_T
case VALTYPE_PTRDIFF: case VALTYPE_PTRDIFF:
value->a_ptrdiff = va_arg (vaargs, ptrdiff_t); value->a_ptrdiff = va_arg (vaargs, ptrdiff_t);
break; break;
case VALTYPE_PTRDIFF_PTR: case VALTYPE_PTRDIFF_PTR:
value->a_ptrdiff_ptr = va_arg (vaargs, ptrdiff_t *); value->a_ptrdiff_ptr = va_arg (vaargs, ptrdiff_t *);
break; break;
#endif #endif
default: /* Unsupported type. */ default: /* Unsupported type. */
return -1; return -1;
}
} }
} }
return 0; return 0;