168 lines
4.5 KiB
C++
168 lines
4.5 KiB
C++
/*----------------------------------------------------------------------------
|
|
* File: RRCMCRT.C
|
|
* Product: RTP/RTCP implementation.
|
|
* Description: Provides Microsoft 'C' run-time support
|
|
*
|
|
* INTEL Corporation Proprietary Information
|
|
* This listing is supplied under the terms of a license agreement with
|
|
* Intel Corporation and may not be copied nor disclosed except in
|
|
* accordance with the terms of that agreement.
|
|
* Copyright (c) 1995 Intel Corporation.
|
|
*--------------------------------------------------------------------------*/
|
|
|
|
|
|
#include "rrcm.h"
|
|
|
|
|
|
/*---------------------------------------------------------------------------
|
|
/ Global Variables
|
|
/--------------------------------------------------------------------------*/
|
|
|
|
|
|
/*---------------------------------------------------------------------------
|
|
/ External Variables
|
|
/--------------------------------------------------------------------------*/
|
|
#ifdef _DEBUG
|
|
extern char debug_string[];
|
|
#endif
|
|
|
|
|
|
/*--------------------------------------------------------------------------
|
|
* Function : RRCMsrand
|
|
* Description: Seeds the random number generator with the int given.
|
|
* Adapted from the BASIC random number generator.
|
|
*
|
|
* WARNING: There is no per thread seed. All threads of the process are
|
|
* using the same seed.
|
|
*
|
|
* Input : seed: Seed
|
|
*
|
|
*
|
|
* Return: None
|
|
--------------------------------------------------------------------------*/
|
|
|
|
static long holdrand = 1L;
|
|
|
|
void RRCMsrand (unsigned int seed)
|
|
{
|
|
holdrand = (long)seed;
|
|
}
|
|
|
|
|
|
/*--------------------------------------------------------------------------
|
|
* Function : RRCMrand
|
|
* Description: Returns a pseudo-random number 0 through 32767.
|
|
*
|
|
* WARNING: There is no per thread number. All threads of the process
|
|
* share the random number
|
|
*
|
|
* Input : None
|
|
*
|
|
* Return: Pseudo-random number 0 through 32767.
|
|
--------------------------------------------------------------------------*/
|
|
int RRCMrand (void)
|
|
{
|
|
return(((holdrand = holdrand * 214013L + 2531011L) >> 16) & 0x7fff);
|
|
}
|
|
|
|
|
|
|
|
/***
|
|
*char *_itoa, *_ltoa, *_ultoa(val, buf, radix) - convert binary int to ASCII
|
|
* string
|
|
*
|
|
*Purpose:
|
|
* Converts an int to a character string.
|
|
*
|
|
*Entry:
|
|
* val - number to be converted (int, long or unsigned long)
|
|
* int radix - base to convert into
|
|
* char *buf - ptr to buffer to place result
|
|
*
|
|
*Exit:
|
|
* fills in space pointed to by buf with string result
|
|
* returns a pointer to this buffer
|
|
*
|
|
*Exceptions:
|
|
*
|
|
*******************************************************************************/
|
|
|
|
/* helper routine that does the main job. */
|
|
|
|
static void RRCMxtoa (unsigned long val,
|
|
char *buf,
|
|
unsigned radix,
|
|
int is_neg)
|
|
{
|
|
char *p; /* pointer to traverse string */
|
|
char *firstdig; /* pointer to first digit */
|
|
char temp; /* temp char */
|
|
unsigned digval; /* value of digit */
|
|
|
|
p = buf;
|
|
|
|
if (is_neg) {
|
|
/* negative, so output '-' and negate */
|
|
*p++ = '-';
|
|
val = (unsigned long)(-(long)val);
|
|
}
|
|
|
|
firstdig = p; /* save pointer to first digit */
|
|
|
|
do {
|
|
digval = (unsigned) (val % radix);
|
|
val /= radix; /* get next digit */
|
|
|
|
/* convert to ascii and store */
|
|
if (digval > 9)
|
|
*p++ = (char) (digval - 10 + 'a'); /* a letter */
|
|
else
|
|
*p++ = (char) (digval + '0'); /* a digit */
|
|
} while (val > 0);
|
|
|
|
/* We now have the digit of the number in the buffer, but in reverse
|
|
order. Thus we reverse them now. */
|
|
|
|
*p-- = '\0'; /* terminate string; p points to last digit */
|
|
|
|
do {
|
|
temp = *p;
|
|
*p = *firstdig;
|
|
*firstdig = temp; /* swap *p and *firstdig */
|
|
--p;
|
|
++firstdig; /* advance to next two digits */
|
|
} while (firstdig < p); /* repeat until halfway */
|
|
}
|
|
|
|
|
|
/* Actual functions just call conversion helper with neg flag set correctly,
|
|
and return pointer to buffer. */
|
|
|
|
char *RRCMitoa (int val, char *buf, int radix)
|
|
{
|
|
if (radix == 10 && val < 0)
|
|
RRCMxtoa((unsigned long)val, buf, radix, 1);
|
|
else
|
|
RRCMxtoa((unsigned long)(unsigned int)val, buf, radix, 0);
|
|
return buf;
|
|
}
|
|
|
|
|
|
char *RRCMltoa (long val, char *buf, int radix)
|
|
{
|
|
RRCMxtoa((unsigned long)val, buf, radix, (radix == 10 && val < 0));
|
|
return buf;
|
|
}
|
|
|
|
|
|
char *RRCMultoa (unsigned long val, char *buf, int radix)
|
|
{
|
|
RRCMxtoa(val, buf, radix, 0);
|
|
return buf;
|
|
}
|
|
|
|
|
|
|
|
// [EOF]
|
|
|