jssprintf.c
上传用户:xiejiait
上传日期:2007-01-06
资源大小:881k
文件大小:1k
源码类别:

SCSI/ASPI

开发平台:

MultiPlatform

  1. /* @(#)jssprintf.c 1.13 99/08/30 Copyright 1985 J. Schilling */
  2. /*
  3.  * Copyright (c) 1985 J. Schilling
  4.  */
  5. /*
  6.  * This program is free software; you can redistribute it and/or modify
  7.  * it under the terms of the GNU General Public License as published by
  8.  * the Free Software Foundation; either version 2, or (at your option)
  9.  * any later version.
  10.  *
  11.  * This program is distributed in the hope that it will be useful,
  12.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.  * GNU General Public License for more details.
  15.  *
  16.  * You should have received a copy of the GNU General Public License
  17.  * along with this program; see the file COPYING.  If not, write to
  18.  * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  19.  */
  20. #include <mconfig.h>
  21. #include <vadefs.h>
  22. #include <standard.h>
  23. /*
  24.  * Do not include stdio.h, BSD systems define sprintf the wrong way!
  25.  */
  26. EXPORT int js_sprintf __PR((char *, const char *, ...));
  27. #ifdef PROTOTYPES
  28. static void _cput(char c, long ba)
  29. #else
  30. static void _cput(c, ba)
  31. char c;
  32. long ba;
  33. #endif
  34. {
  35. *(*(char **) ba)++ = c;
  36. }
  37. /* VARARGS2 */
  38. #ifdef PROTOTYPES
  39. int js_sprintf(char *buf, const char *form, ...)
  40. #else
  41. int js_sprintf(buf, form, va_alist)
  42. char *buf;
  43. char *form;
  44. va_dcl
  45. #endif
  46. {
  47. va_list args;
  48. int cnt;
  49. char *bp = buf;
  50. #ifdef PROTOTYPES
  51. va_start(args, form);
  52. #else
  53. va_start(args);
  54. #endif
  55. cnt = format(_cput, (long)&bp, form,  args);
  56. va_end(args);
  57. *bp = '';
  58. return (cnt);
  59. }