aboutsummaryrefslogtreecommitdiff
path: root/nx-X11/lib/misc
diff options
context:
space:
mode:
Diffstat (limited to 'nx-X11/lib/misc')
-rw-r--r--nx-X11/lib/misc/snprintf.c714
-rw-r--r--nx-X11/lib/misc/snprintf.h35
2 files changed, 0 insertions, 749 deletions
diff --git a/nx-X11/lib/misc/snprintf.c b/nx-X11/lib/misc/snprintf.c
deleted file mode 100644
index 6e9e2816f..000000000
--- a/nx-X11/lib/misc/snprintf.c
+++ /dev/null
@@ -1,714 +0,0 @@
-/*
- * This version of snprintf() and vsnprintf() is based on Sprint from
- * SIO by Panagiotis Tsirigotis, as included with xidentd-2.2.1.
- *
- * The modifications were made by The XFree86 Project, Inc and are
- * Copyright 1999 by The XFree86 Project, Inc. These modifications
- * consist of removing the support for writing to file streams,
- * renaming some functions, ansification, and making some adjustments
- * to achieve the semantics for snprintf and vsnprintf() as described
- * in the relevant man page for FreeBSD 2.2.8.
- *
- *
- * The original version carries the following notice:
- *
- * (c) Copyright 1992, 1993 by Panagiotis Tsirigotis
- *
- * The author (Panagiotis Tsirigotis) grants permission to use, copy,
- * and distribute this software and its documentation for any purpose
- * and without fee, provided that a) the above copyright notice extant in
- * files in this distribution is not removed from files included in any
- * redistribution, and b) this file is also included in any redistribution.
- *
- * Modifications to this software may be distributed, either by distributing
- * the modified software or by distributing patches to the original software,
- * under the following additional terms:
- *
- * 1. The version number will be modified as follows:
- * a. The first 3 components of the version number
- * (i.e. <number>.<number>.<number>) will remain unchanged.
- * b. A new component will be appended to the version number to indicate
- * the modification level. The form of this component is up to the
- * author of the modifications.
- *
- * 2. The author of the modifications will include his/her name by appending
- * it along with the new version number to this file and will be
- * responsible for any wrong behavior of the modified software.
- *
- * The author makes no representations about the suitability of this
- * software for any purpose. It is provided "as is" without any express
- * or implied warranty.
- *
- * Changes and modifications for:
- *
- * xinetd Version 2.1.4-bsdi
- * xinetd Version 2.1.4-freebsd
- * xinetd Version 2.1.4-linux
- *
- * are
- *
- * (c) Copyright 1995 by Charles Murcko
- * All Rights Reserved
- */
-
-/* $XFree86$ */
-
-
-/*
- * Assumption: systems that don't have snprintf and vsnprintf do have
- * ecvt, fcvt and gcvt.
- */
-
-/* From: Id: sprint.c,v 1.5 1995/09/10 18:35:09 chuck Exp */
-
-#include <ctype.h>
-#include <stdlib.h>
-#include <stdarg.h>
-#include <string.h>
-#include <sys/types.h>
-
-#ifndef SCOPE
-#define SCOPE /**/
-#endif
-
-#ifndef WIDE_INT
-#define WIDE_INT long
-#endif
-
-typedef WIDE_INT wide_int;
-typedef unsigned WIDE_INT u_wide_int;
-typedef int bool_int;
-
-#ifndef FALSE
-#define FALSE 0
-#define TRUE 1
-#endif
-
-#define NUL '\0'
-
-#define S_NULL "(null)"
-#define S_NULL_LEN 6
-
-#define FLOAT_DIGITS 6
-#define EXPONENT_LENGTH 10
-
-typedef enum { NO = 0, YES = 1 } boolean_e ;
-
-/*
- * NUM_BUF_SIZE is the size of the buffer used for arithmetic conversions
- *
- * XXX: this is a magic number; do not decrease it
- */
-#define NUM_BUF_SIZE 512
-
-/*
- * The INS_CHAR macro inserts a character in the buffer.
- * It uses the char pointers sp and bep:
- * sp points to the next available character in the buffer
- * bep points to the end-of-buffer
- * While using this macro, note that the nextb pointer is NOT updated.
- *
- * Excess characters are discarded if the string overflows.
- *
- * NOTE: Evaluation of the c argument should not have any side-effects
- */
-#define INS_CHAR( c, sp, bep, cc ) \
- { \
- if ( sp != NULL && sp < bep ) \
- *sp++ = c ; \
- cc++ ; \
- }
-
-#define NUM( c ) ( c - '0' )
-
-#define STR_TO_DEC( str, num ) \
- num = NUM( *str++ ) ; \
- while ( isdigit( *str ) ) { \
- num *= 10 ; \
- num += NUM( *str++ ) ; \
- }
-
-/*
- * This macro does zero padding so that the precision
- * requirement is satisfied. The padding is done by
- * adding '0's to the left of the string that is going
- * to be printed.
- */
-#define FIX_PRECISION( adjust, precision, s, s_len ) \
- if ( adjust ) \
- while ( s_len < precision ) { \
- *--s = '0' ; \
- s_len++ ; \
- }
-
-/*
- * Macro that does padding. The padding is done by printing
- * the character ch.
- */
-#define PAD( width, len, ch ) \
- do { \
- INS_CHAR( ch, sp, bep, cc ) ; \
- width-- ; \
- } while ( width > len )
-
-/*
- * Prefix the character ch to the string str
- * Increase length
- * Set the has_prefix flag
- */
-#define PREFIX( str, length, ch ) \
- *--str = ch ; length++ ; has_prefix = YES
-
-static char *conv_10(wide_int num, bool_int is_unsigned,
- bool_int * is_negative, char *buf_end, int *len);
-SCOPE int vsnprintf(char *str, size_t size, const char *fmt, va_list ap);
-
-/*
- * snprintf is based on SIO's Sprint.
- *
- * Sprint is the equivalent of printf for SIO.
- * It returns the # of chars written
- * Assumptions:
- * - all floating point arguments are passed as doubles
- */
-SCOPE int
-snprintf(char *str, size_t size, const char *fmt, ...)
-{
- int cc;
- va_list ap;
-
- va_start(ap, fmt);
- cc = vsnprintf(str, size, fmt, ap);
- va_end(ap);
- return cc;
-}
-
-/*
- * Convert a floating point number to a string formats 'f', 'e' or 'E'.
- * The result is placed in buf, and len denotes the length of the string
- * The sign is returned in the is_negative argument (and is not placed
- * in buf). Always add decimal point if add_dp is YES.
- */
-static char *
-conv_fp(char format, double num, boolean_e add_dp, int precision,
- bool_int *is_negative, char buf[], int *len)
-{
- char *s = buf;
- char *p;
- int decimal_point;
-
- if (format == 'f')
- p = fcvt(num, precision, &decimal_point, is_negative);
- else /* either e or E format */
- p = ecvt(num, precision + 1, &decimal_point, is_negative);
-
- /*
- * Check for Infinity and NaN
- */
- if (isalpha(*p)) {
- *len = strlen(strcpy(buf, p));
- *is_negative = FALSE;
- return (buf);
- }
- if (format == 'f')
- if (decimal_point <= 0) {
- *s++ = '0';
- if (precision > 0) {
- *s++ = '.';
- while (decimal_point++ < 0)
- *s++ = '0';
- } else if (add_dp)
- *s++ = '.';
- } else {
- while (decimal_point-- > 0)
- *s++ = *p++;
- if (precision > 0 || add_dp)
- *s++ = '.';
- } else {
- *s++ = *p++;
- if (precision > 0 || add_dp)
- *s++ = '.';
- }
-
- /*
- * copy the rest of p, the NUL is NOT copied
- */
- while (*p)
- *s++ = *p++;
-
- if (format != 'f') {
- char temp[EXPONENT_LENGTH]; /* for exponent conversion */
- int t_len;
- bool_int exponent_is_negative;
-
- *s++ = format; /* either e or E */
- decimal_point--;
- if (decimal_point != 0) {
- p = conv_10((wide_int) decimal_point, FALSE, &exponent_is_negative,
- &temp[EXPONENT_LENGTH], &t_len);
- *s++ = exponent_is_negative ? '-' : '+';
-
- /*
- * Make sure the exponent has at least 2 digits
- */
- if (t_len == 1)
- *s++ = '0';
- while (t_len--)
- *s++ = *p++;
- } else {
- *s++ = '+';
- *s++ = '0';
- *s++ = '0';
- }
- }
- *len = s - buf;
- return (buf);
-}
-
-/*
- * Convert num to a base X number where X is a power of 2. nbits determines X.
- * For example, if nbits is 3, we do base 8 conversion
- * Return value:
- * a pointer to a string containing the number
- *
- * The caller provides a buffer for the string: that is the buf_end argument
- * which is a pointer to the END of the buffer + 1 (i.e. if the buffer
- * is declared as buf[ 100 ], buf_end should be &buf[ 100 ])
- */
-static char *
-conv_p2(u_wide_int num, int nbits, char format, char *buf_end, int *len)
-{
- int mask = (1 << nbits) - 1;
- char *p = buf_end;
- static char low_digits[] = "0123456789abcdef";
- static char upper_digits[] = "0123456789ABCDEF";
- char *digits = (format == 'X') ? upper_digits : low_digits;
-
- do {
- *--p = digits[num & mask];
- num >>= nbits;
- }
- while (num);
-
- *len = buf_end - p;
- return (p);
-}
-
-/*
- * Convert num to its decimal format.
- * Return value:
- * - a pointer to a string containing the number (no sign)
- * - len contains the length of the string
- * - is_negative is set to TRUE or FALSE depending on the sign
- * of the number (always set to FALSE if is_unsigned is TRUE)
- *
- * The caller provides a buffer for the string: that is the buf_end argument
- * which is a pointer to the END of the buffer + 1 (i.e. if the buffer
- * is declared as buf[ 100 ], buf_end should be &buf[ 100 ])
- */
-static char *
-conv_10(wide_int num, bool_int is_unsigned, bool_int *is_negative,
- char *buf_end, int *len)
-{
- char *p = buf_end;
- u_wide_int magnitude;
-
- if (is_unsigned) {
- magnitude = (u_wide_int) num;
- *is_negative = FALSE;
- } else {
- *is_negative = (num < 0);
-
- /*
- * On a 2's complement machine, negating the most negative integer
- * results in a number that cannot be represented as a signed integer.
- * Here is what we do to obtain the number's magnitude:
- * a. add 1 to the number
- * b. negate it (becomes positive)
- * c. convert it to unsigned
- * d. add 1
- */
- if (*is_negative) {
- wide_int t = num + 1;
-
- magnitude = ((u_wide_int) - t) + 1;
- } else
- magnitude = (u_wide_int) num;
- }
-
- /*
- * We use a do-while loop so that we write at least 1 digit
- */
- do {
- register u_wide_int new_magnitude = magnitude / 10;
-
- *--p = magnitude - new_magnitude * 10 + '0';
- magnitude = new_magnitude;
- }
- while (magnitude);
-
- *len = buf_end - p;
- return (p);
-}
-
-/*
- * Do format conversion.
- */
-SCOPE int
-#if (defined(__UNIXWARE__) || defined(__OPENSERVER)) && !defined(__GNUC__)
-vsnprintf(char *str, size_t size, const char *fmt, _VA_LIST ap)
-#else
-vsnprintf(char *str, size_t size, const char *fmt, va_list ap)
-#endif
-{
- char *sp;
- char *bep;
- int cc = 0;
- int i;
-
- char *s;
- char *q;
- int s_len;
-
- int min_width;
- int precision;
- enum {
- LEFT, RIGHT
- } adjust;
- char pad_char;
- char prefix_char;
-
- double fp_num;
- wide_int i_num;
- u_wide_int ui_num;
-
- char num_buf[NUM_BUF_SIZE];
- char char_buf[2]; /* for printing %% and %<unknown> */
-
- /*
- * Flag variables
- */
- boolean_e is_long;
- boolean_e alternate_form;
- boolean_e print_sign;
- boolean_e print_blank;
- boolean_e adjust_precision;
- boolean_e adjust_width;
- bool_int is_negative;
-
- if (size == 0 && str != NULL)
- return 0;
-
- sp = str;
- bep = str + size - 1;
-
- while (*fmt) {
- if (*fmt != '%') {
- INS_CHAR(*fmt, sp, bep, cc);
- } else {
- /*
- * Default variable settings
- */
- adjust = RIGHT;
- alternate_form = print_sign = print_blank = NO;
- pad_char = ' ';
- prefix_char = NUL;
-
- fmt++;
-
- /*
- * Try to avoid checking for flags, width or precision
- */
- if (isascii(*fmt) && !islower(*fmt)) {
- /*
- * Recognize flags: -, #, BLANK, +
- */
- for (;; fmt++) {
- if (*fmt == '-')
- adjust = LEFT;
- else if (*fmt == '+')
- print_sign = YES;
- else if (*fmt == '#')
- alternate_form = YES;
- else if (*fmt == ' ')
- print_blank = YES;
- else if (*fmt == '0')
- pad_char = '0';
- else
- break;
- }
-
- /*
- * Check if a width was specified
- */
- if (isdigit(*fmt)) {
- STR_TO_DEC(fmt, min_width);
- adjust_width = YES;
- } else if (*fmt == '*') {
- min_width = va_arg(ap, int);
-
- fmt++;
- adjust_width = YES;
- if (min_width < 0) {
- adjust = LEFT;
- min_width = -min_width;
- }
- } else
- adjust_width = NO;
-
- /*
- * Check if a precision was specified
- *
- * XXX: an unreasonable amount of precision may be specified
- * resulting in overflow of num_buf. Currently we
- * ignore this possibility.
- */
- if (*fmt == '.') {
- adjust_precision = YES;
- fmt++;
- if (isdigit(*fmt)) {
- STR_TO_DEC(fmt, precision);
- } else if (*fmt == '*') {
- precision = va_arg(ap, int);
-
- fmt++;
- if (precision < 0)
- precision = 0;
- } else
- precision = 0;
- } else
- adjust_precision = NO;
- } else
- adjust_precision = adjust_width = NO;
-
- /*
- * Modifier check
- */
- if (*fmt == 'l') {
- is_long = YES;
- fmt++;
- } else
- is_long = NO;
-
- /*
- * Argument extraction and printing.
- * First we determine the argument type.
- * Then, we convert the argument to a string.
- * On exit from the switch, s points to the string that
- * must be printed, s_len has the length of the string
- * The precision requirements, if any, are reflected in s_len.
- *
- * NOTE: pad_char may be set to '0' because of the 0 flag.
- * It is reset to ' ' by non-numeric formats
- */
- switch (*fmt) {
- case 'd':
- case 'i':
- case 'u':
- if (is_long)
- i_num = va_arg(ap, wide_int);
- else
- i_num = (wide_int) va_arg(ap, int);
-
- s = conv_10(i_num, (*fmt) == 'u', &is_negative,
- &num_buf[NUM_BUF_SIZE], &s_len);
- FIX_PRECISION(adjust_precision, precision, s, s_len);
-
- if (*fmt != 'u') {
- if (is_negative)
- prefix_char = '-';
- else if (print_sign)
- prefix_char = '+';
- else if (print_blank)
- prefix_char = ' ';
- }
- break;
-
- case 'o':
- if (is_long)
- ui_num = va_arg(ap, u_wide_int);
- else
- ui_num = (u_wide_int) va_arg(ap, unsigned int);
-
- s = conv_p2(ui_num, 3, *fmt,
- &num_buf[NUM_BUF_SIZE], &s_len);
- FIX_PRECISION(adjust_precision, precision, s, s_len);
- if (alternate_form && *s != '0') {
- *--s = '0';
- s_len++;
- }
- break;
-
- case 'x':
- case 'X':
- if (is_long)
- ui_num = (u_wide_int) va_arg(ap, u_wide_int);
- else
- ui_num = (u_wide_int) va_arg(ap, unsigned int);
-
- s = conv_p2(ui_num, 4, *fmt,
- &num_buf[NUM_BUF_SIZE], &s_len);
- FIX_PRECISION(adjust_precision, precision, s, s_len);
- if (alternate_form && i_num != 0) {
- *--s = *fmt; /* 'x' or 'X' */
- *--s = '0';
- s_len += 2;
- }
- break;
-
- case 's':
- s = va_arg(ap, char *);
-
- if (s != NULL) {
- s_len = strlen(s);
- if (adjust_precision && precision < s_len)
- s_len = precision;
- } else {
- s = S_NULL;
- s_len = S_NULL_LEN;
- }
- pad_char = ' ';
- break;
-
- case 'f':
- case 'e':
- case 'E':
- fp_num = va_arg(ap, double);
-
- s = conv_fp(*fmt, fp_num, alternate_form,
- (adjust_precision == NO) ? FLOAT_DIGITS : precision,
- &is_negative, &num_buf[1], &s_len);
- if (is_negative)
- prefix_char = '-';
- else if (print_sign)
- prefix_char = '+';
- else if (print_blank)
- prefix_char = ' ';
- break;
-
- case 'g':
- case 'G':
- if (adjust_precision == NO)
- precision = FLOAT_DIGITS;
- else if (precision == 0)
- precision = 1;
- /*
- * We use &num_buf[ 1 ], so that we have room for the sign
- */
- s = gcvt(va_arg(ap, double), precision, &num_buf[1]);
-
- if (*s == '-')
- prefix_char = *s++;
- else if (print_sign)
- prefix_char = '+';
- else if (print_blank)
- prefix_char = ' ';
-
- s_len = strlen(s);
-
- if (alternate_form && (q = strchr(s, '.')) == NULL)
- s[s_len++] = '.';
- if (*fmt == 'G' && (q = strchr(s, 'e')) != NULL)
- *q = 'E';
- break;
-
- case 'c':
- char_buf[0] = (char)(va_arg(ap, int));
-
- s = &char_buf[0];
- s_len = 1;
- pad_char = ' ';
- break;
-
- case '%':
- char_buf[0] = '%';
- s = &char_buf[0];
- s_len = 1;
- pad_char = ' ';
- break;
-
- case 'n':
- *(va_arg(ap, int *)) = cc;
-
- break;
-
- /*
- * If the pointer size is equal to the size of an unsigned
- * integer we convert the pointer to a hex number, otherwise
- * we print "%p" to indicate that we don't handle "%p".
- */
- case 'p':
- ui_num = (u_wide_int) va_arg(ap, void *);
-
- if (sizeof(void *) <= sizeof(u_wide_int))
- s = conv_p2(ui_num, 4, 'x',
- &num_buf[NUM_BUF_SIZE], &s_len);
-
- else {
- s = "%p";
- s_len = 2;
- }
- pad_char = ' ';
- break;
-
- case NUL:
- /*
- * The last character of the format string was %.
- * We ignore it.
- */
- continue;
-
- /*
- * The default case is for unrecognized %'s.
- * We print %<char> to help the user identify what
- * option is not understood.
- * This is also useful in case the user wants to pass
- * the output of __sio_converter to another function
- * that understands some other %<char> (like syslog).
- * Note that we can't point s inside fmt because the
- * unknown <char> could be preceded by width etc.
- */
- default:
- char_buf[0] = '%';
- char_buf[1] = *fmt;
- s = char_buf;
- s_len = 2;
- pad_char = ' ';
- break;
- }
-
- if (prefix_char != NUL) {
- *--s = prefix_char;
- s_len++;
- }
- if (adjust_width && adjust == RIGHT && min_width > s_len) {
- if (pad_char == '0' && prefix_char != NUL) {
- INS_CHAR(*s, sp, bep, cc)
- s++;
- s_len--;
- min_width--;
- }
- PAD(min_width, s_len, pad_char);
- }
- /*
- * Print the string s.
- */
- for (i = s_len; i != 0; i--) {
- INS_CHAR(*s, sp, bep, cc);
- s++;
- }
-
- if (adjust_width && adjust == LEFT && min_width > s_len)
- PAD(min_width, s_len, pad_char);
- }
- fmt++;
- }
- if (str != NULL) {
- if (cc < size)
- str[cc] = NUL;
- else
- str[size - 1] = NUL;
- }
- return cc;
-}
-
diff --git a/nx-X11/lib/misc/snprintf.h b/nx-X11/lib/misc/snprintf.h
deleted file mode 100644
index 481e67679..000000000
--- a/nx-X11/lib/misc/snprintf.h
+++ /dev/null
@@ -1,35 +0,0 @@
-/* $XFree86: xc/lib/misc/snprintf.h,v 3.1 1996/08/26 14:42:33 dawes Exp $ */
-
-#ifndef SNPRINTF_H
-#define SNPRINTF_H
-
-#ifdef HAS_SNPRINTF
-#ifdef LIBXT
-#define _XtSnprintf snprintf
-#define _XtVsnprintf vsnprintf
-#endif
-#ifdef LIBX11
-#define _XSnprintf snprintf
-#define _XVsnprintf vsnprintf
-#endif
-#else /* !HAS_SNPRINTF */
-
-#ifdef LIBXT
-#define snprintf _XtSnprintf
-#define vsnprintf _XtVsnprintf
-#endif
-#ifdef LIBX11
-#define snprintf _XSnprintf
-#define vsnprintf _XVsnprintf
-#endif
-
-extern int snprintf (char *str, size_t count, const char *fmt, ...);
-#if (defined(__UNIXWARE__) || defined(__OPENSERVER)) && !defined(__GNUC__)
-extern int vsnprintf (char *str, size_t count, const char *fmt, _VA_LIST arg);
-#else
-extern int vsnprintf (char *str, size_t count, const char *fmt, va_list arg);
-#endif
-
-#endif /* HAS_SNPRINTF */
-
-#endif /* SNPRINTF_H */