#include "bbscdef.h"
#include <string.h>
#include <sys/types.h>
#include <sys/stat.h>

strfill(buf,fillchar,length)	/* fill a string with fillchar */
char	*buf;			/*  for length -1 */
int	fillchar,
	length;
	{
	while(--length)		/* really is length -1 */
		{
		*buf++ = fillchar;
		}
	*buf++ = '\0';		/* need room for this */
	}
#ifndef ATT3B1

substr(from,to,start,length)	/* moves chars from "from" to "to" */
char	*from, *to ;		/*  starting at "start" for */
	    			/*  "length" number of chars */
int	start, length ;		/* for beginning of string use 1, not 0 */
	{
	int	cnt;

	cnt = 0;

	while(--start)		/* adjust sending field pointer */
		{
		from++;		
		}

	while((cnt < length) && (*to++ = *from++))	/* do the moving */
		{
		cnt++;		
		}
	
	*to = '\0';

	}
#endif

#ifdef ATT3B1

substr(from,to,start,length)
char *from,*to;
int start,length;
{
   int cnt, i;

   cnt = 0;
   while(--start)
       from++;

   i=0;
   while(cnt < length)
      if (from[i] == NULL)
         break;
      else {
         to[i] = from[i];
         i++;
         cnt++;
     }

   to[i] = NULL;
}

#endif

itoa(str,n)		/* taken from float.c */
char *str;
	{
	sprintf(str,"%d",n) ;
	}
/*	end of function		*/

seek(fildes,posit,dummy) int fildes,posit,dummy ;
	{
long	pos;
	pos = posit * 128L ;
/*	return(lseek(fildes,posit << 7,0)) ;    */
	return(lseek(fildes,pos,0)) ;
	}
/*	end of function		*/
	
/*	end of program  	*/