/tags/rel-1-3-24/SWIG/Tools/WAD/Wad/io.c
C | 107 lines | 71 code | 8 blank | 28 comment | 12 complexity | 14e942147fa021935f6163aba7a7e00c MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0
- /* -----------------------------------------------------------------------------
- * io.c
- *
- * This file provides some I/O routines so that WAD can produce
- * debugging output without using buffered I/O.
- *
- * Author(s) : David Beazley (beazley@cs.uchicago.edu)
- *
- * Copyright (C) 2000. The University of Chicago.
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
- *
- * See the file COPYING for a complete copy of the LGPL.
- * ----------------------------------------------------------------------------- */
- #include "wad.h"
- #include <stdarg.h>
- static char cvs[] = "$Header$";
- /* Utility functions used to generate strings that are guaranteed not to
- rely upon malloc() and related functions */
- char *wad_format_hex(unsigned long u, int leading) {
- static char result[64];
- int i;
- char *c;
- c = &result[63];
- *c = 0;
- for (i = 0; i < (sizeof(unsigned long)*2); i++) {
- int d;
- d = (int) (u & 0xf);
- c--;
- if (d < 10) {
- *c = '0' + d;
- } else {
- *c = 'a' + (d-10);
- }
- if (!u && !leading) break;
- u = u >> 4;
- }
- return c;
- }
- char *wad_format_unsigned(unsigned long u, int width) {
- static char result[128];
- static char digits[] = "0123456789";
- char *c, *w;
- int count = 0;
- int i;
- c = &result[64];
- while (u) {
- int digit = u % 10;
- *(--c) = digits[digit];
- count++;
- u = u / 10;
- }
- if (!count) {
- *(--c) = '0';
- count++;
- }
- w = &result[64];
- for (i = count; i < width; i++) {
- *(w++) = ' ';
- }
- *w = 0;
- return c;
- }
- char *wad_format_signed(signed long s, int width) {
- static char result[128];
- unsigned long u;
- char *c = result;
- if (s < 0) {
- *(c++) = '-';
- width--;
- u = (unsigned long) (-s);
- if (u == 0) {
- u = (unsigned long) s;
- }
- } else {
- u = (unsigned long) s;
- }
- *c = 0;
- wad_strcat(result, wad_format_unsigned(u,width));
- return result;
- }
- void wad_printf(const char *fmt, ...) {
- va_list ap;
- va_start(ap, fmt);
- vfprintf(stderr,fmt,ap);
- va_end(ap);
- }