Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

112 lines
1.9 KiB

//
// format.c
//
// simple minded printf replacement
//
// only supports %s and %d but it is *small*
//
#include <string.h>
#if defined(OS2)
#define INCL_NOCOMMON
#define INCL_DOSPROCESS
#define INCL_DOSSEMAPHORES
#define INCL_DOSFILEMGR
#define INCL_DOSERRORS
#define INCL_DOSMISC
#include <os2.h>
#else
#include <windows.h>
#endif
#include <dos.h>
#include "hungary.h"
#include "bsc.h"
#include "bscsup.h"
VOID static near pascal _ultoa(DWORD, LSZ);
VOID BSC_API
BSCFormat(LPCH lpchOut, LSZ lszFormat, va_list va)
// format to lpchOut as specified byh format
//
// this is a very simple minded formatter
{
LPCH lpch;
WORD i;
DWORD l;
lpch = lpchOut;
while (*lszFormat) {
if (*lszFormat == '%') {
switch (lszFormat[1]) {
case '%':
*lpch++ = '%';
break;
case 's':
strcpy(lpch, va_arg(va, LSZ));
lpch += strlen(lpch);
break;
case 'd':
i = va_arg(va, WORD);
_ultoa((DWORD)i, lpch);
lpch += strlen(lpch);
break;
case 'l':
l = va_arg(va, DWORD);
_ultoa(l, lpch);
lpch += strlen(lpch);
break;
default:
lpch[0] = '%';
lpch[1] = lszFormat[1];
lpch += 2;
break;
}
lszFormat += 2;
}
else
*lpch++ = *lszFormat++;
}
*lpch = 0;
}
VOID BSC_API
BSCSprintf(LPCH lpchOut, LSZ lszFormat, ...)
// sprintf replacement
//
{
va_list va;
va_start(va, lszFormat);
BSCFormat(lpchOut, lszFormat, va);
}
static DWORD pow10[8] = {
10L, 100L, 1000L, 10000L,
100000L , 1000000L, 10000000L, 100000000L
};
VOID static near pascal
_ultoa(DWORD dw, LSZ lsz)
{
int log;
for (log = 0; log < 8; log++)
if (dw < pow10[log])
break;
lsz[++log] = 0;
while (--log >= 0) {
lsz[log] = (char)(((int)(dw%10)) + '0');
dw/=10;
}
}