BSD 4 release

[unix-history] / usr / src / cmd / delivermail / util.c

# include <sysexits.h>
# include "useful.h"

static char     SccsId[] = "@(#)util.c  1.4     10/21/80";

/*
**  STRIPQUOTES -- Strip quotes & quote bits from a string.
**
**      Runs through a string and strips off unquoted quote
**      characters and quote bits.  This is done in place.
**
**      Parameters:
**              s -- the string to strip.
**
**      Returns:
**              none.
**
**      Side Effects:
**              none.
**
**      Called By:
**              deliver
*/

stripquotes(s)
       char *s;
{
       register char *p;
       register char *q;
       register char c;

       for (p = q = s; (c = *p++) != '\0'; )
       {
               if (c != '"')
                       *q++ = c & 0177;
       }
       *q = '\0';
}
\f/*
**  XALLOC -- Allocate memory and bitch wildly on failure.
**
**      THIS IS A CLUDGE.  This should be made to give a proper
**      error -- but after all, what can we do?
**
**      Parameters:
**              sz -- size of area to allocate.
**
**      Returns:
**              pointer to data region.
**
**      Side Effects:
**              Memory is allocated.
**
**      Called By:
**              lots of people.
*/

char *
xalloc(sz)
       register unsigned int sz;
{
       register char *p;
       extern char *malloc();

       p = malloc(sz);
       if (p == NULL)
       {
               syserr("Out of memory!!");
               exit(EX_UNAVAILABLE);
       }
       return (p);
}
\f/*
**  ANY -- Return TRUE if the character exists in the string.
**
**      Parameters:
**              c -- the character.
**              s -- the string
**                      (sounds like an avant garde script)
**
**      Returns:
**              TRUE -- if c could be found in s.
**              FALSE -- otherwise.
**
**      Side Effects:
**              none.
**
**      Called By:
**              prescan
*/

any(c, s)
       register char c;
       register char *s;
{
       register char c2;

       while ((c2 = *s++) != '\0')
               if (c2 == c)
                       return (TRUE);
       return (FALSE);
}