#include <string.h>

#include <string.h>
char *domalloc(unsigned long bytes);
void parsefields(char *str, char **fields, int *numfields, char delim, int max);

unsigned long _allocated = 0;

/* parsefields() changes delim and end of line into '\0' ,
putting the args into array of char pointers */

void
parsefields (char *str, char **fields, int *numfields, char delim, int max)
{
char *cp;

cp = index (str, '\r');
if (!cp) cp = index (str, '\n');
if (cp) *cp = 0;

if (strlen(str) < 1) {
*numfields = 0;
return;
}

fields[0] = str;
for (*numfields = 1; *numfields < max ; ) {
fields[*numfields] = index (fields[(*numfields)-1], delim);
if (fields[*numfields]) {
*(fields[*numfields]) = 0; /* wipe out delim */
fields[*numfields] += 1; /* move one char past delim */
(*numfields)++;
}
else
break;
}
}

char *
domalloc(unsigned long bytes)
{
char *cp;

if (bytes == 0)
bytes = 1;

cp = (char *) malloc(bytes);

_allocated += bytes;
if (!cp)
printf("Malloc failed to get %lu bytes.\n", bytes);
return cp;
}

/**************************************************************************/
/* Count # of occurences of char c in string str */
int
strcnt(char *str, char c)
{
register int cnt = 0;

while (*str)
if (*str++ == c)
cnt++;
return cnt;
}

/**************************************************************************/
/* tolower a string, returning the length of the string */
int strlower(char *str)
{
int cnt = 0;

while (*str) {
if (isupper(*str))
*str = tolower(*str);
str++, cnt++;
}
return cnt;
}

substi_char (char *istr, char *ostr, char ch_frm, char ch_to)
/* Convert ch_frm into ch_to where ever it occurs in istr, write
results in ostr */
{
char *cp;

strcpy (ostr, istr); /* copy istr to ostr */
for (cp = ostr; *cp; cp++) {
if (*cp == ch_frm)
*cp = ch_to;
}
}