/* Some of this isn't my code - 99.9 of the percent that isn't, isn't used */

#include <memory.h>
#include <ctype.h>
#include <string.h>
#include <time.h>
#include <stdio.h>
#include <malloc.h>
#include <stdlib.h>
#include "mud.h"
/* strtoint() converts the given string to an integer. */
int 
strtoint (char *string)
{
  int k = 0;
  sscanf (string, "%d", &k);
  return k;
}

bool 
affect_worn (CHAR_DATA * ch, int bit)
{
    return FALSE;
}

int 
words (char *s)
{
  int count;
  count = 0;
  while (*s != '\0')
    {
      if (isalpha (*s) || isdigit (*s))
	{
	  while (isalpha (*s) || isdigit (*s))
	    s++;
	  count++;
	}
      else
	{
	  while (!isalpha (*s))
	    {
	      if (*s == '\0')
		break;
	      s++;
	    }
	}
    }
  return count;
}


char *
word (int wd, char *s)
{
  int current = 0;
  while (*s != '\0' && current < wd)
    {
      if (*s != ' ')
	{
	  current++;
	  while (*s != ' ')
	    s++;
	}
      else
	{
	  while (*s == ' ')
	    s++;
	  if (*s == '\0')
	    break;
	}
    }
  return s;
}


/* first() will return the first word in string s
   * (different in one argy in the way that it recognizes \n's)
 */
char *
first (char *s)
{
  static char tmp[4096];
  char *new;
  new = tmp;
  while (!isalpha (*s) && !isdigit (*s) && *s)
    s++;
  while ((isalpha (*s) || isdigit (*s)) && *s)
    *new++ = *s++;
  *new = '\0';
  return tmp;
}

/* strsub() will replace all occurences of old with new in string s
 */
bool 
strsub (char *s, char *old, char *new)
{
  char *ptr;
  static char tptr[5000];
  int plen, rlen;
  strcpy (tptr, s);
  ptr = s;
  plen = strlen (old);
  rlen = strlen (new);
  if ((ptr = strstr (s, old)) == NULL)
    return FALSE;
  strcpy (tptr, ptr + plen);
  while (rlen--)
    *ptr++ = *new++;
  strcpy (ptr, tptr);
  return TRUE;
}