/* $Id: strio.c,v 1.4 2003-06-16 06:57:34 btb Exp $ */
/*
 * strio.c: string/file manipulation functions by Victor Rachels
 */

#ifdef HAVE_CONFIG_H
#include <conf.h>
#endif

#include <stdlib.h>

#include "cfile.h"
#include "strio.h"
//added on 9/16/98 by adb to add memory tracking for this module
#include "u_mem.h"
//end additions - adb

char* fsplitword(CFILE *f, char splitchar)
{
 int x,y,mem,memx;
 char *word,*buf;
  memx=1;
  mem=memx*256;
  word=(char *) d_malloc(sizeof(char) * mem);
  x=0;
  word[x] = cfgetc(f);
  while(word[x] != splitchar && !cfeof(f))
  {
     x++;
      if(x==mem)
       {
	buf=word;
	memx*=2;
	mem=memx*256;
	word=(char *) d_malloc(sizeof(char) * mem);
	 for(y=0;y<x;y++)
	  word[y]=buf[y];
	d_free(buf);
       }
     word[x] = cfgetc(f);
  }
  word[x]=0;
  return word;
}

char* splitword(char *s, char splitchar)
{
 int x,l,l2;
 char *word;

   for(l=0;s[l]!=0;l++);
   for(x=0;s[x]!=splitchar&&x<l;x++);
  l2=x;
  s[x]=0;
  word = (char *) d_malloc(sizeof(char) * (l2+1));
   for(x=0;x<=l2;x++)
    word[x]=s[x];

   if(l==l2)
    s[0]=0;
   else
    {
     while(x<=l)
      {
       s[x-l2-1]=s[x];
       x++;
      }
    }
  return word;
}