67 lines
1.9 KiB
C
67 lines
1.9 KiB
C
|
/****************************************************************
|
||
|
|
Copyright 1990 by AT&T Bell Laboratories and Bellcore.
|
||
|
|
|
||
|
|
Permission to use, copy, modify, and distribute this software
|
||
|
|
and its documentation for any purpose and without fee is hereby
|
||
|
|
granted, provided that the above copyright notice appear in all
|
||
|
|
copies and that both that the copyright notice and this
|
||
|
|
permission notice and warranty disclaimer appear in supporting
|
||
|
|
documentation, and that the names of AT&T Bell Laboratories or
|
||
|
|
Bellcore or any of their entities not be used in advertising or
|
||
|
|
publicity pertaining to distribution of the software without
|
||
|
|
specific, written prior permission.
|
||
|
|
|
||
|
|
AT&T and Bellcore disclaim all warranties with regard to this
|
||
|
|
software, including all implied warranties of merchantability
|
||
|
|
and fitness. In no event shall AT&T or Bellcore be liable for
|
||
|
|
any special, indirect or consequential damages or any damages
|
||
|
|
whatsoever resulting from loss of use, data or profits, whether
|
||
|
|
in an action of contract, negligence or other tortious action,
|
||
|
|
arising out of or in connection with the use or performance of
|
||
|
|
this software.
|
||
|
|
****************************************************************/
|
||
|
|
|
||
|
|
/* This is for the benefit of people whose systems don't provide
|
||
|
|
* memset, memcpy, and memcmp. If yours is such a system, adjust
|
||
|
|
* the makefile by adding memset.o to the "OBJECTS =" assignment.
|
||
|
|
* WARNING: the memcpy below is adequate for f2c, but is not a
|
||
|
|
* general memcpy routine (which must correctly handle overlapping
|
||
|
|
* fields).
|
||
|
|
*/
|
||
|
|
|
||
|
|
int
|
||
|
|
memcmp(s1, s2, n)
|
||
|
|
register char *s1, *s2;
|
||
|
|
int n;
|
||
|
|
{
|
||
|
|
register char *se;
|
||
|
|
|
||
|
|
for(se = s1 + n; s1 < se; s1++, s2++)
|
||
|
|
if (*s1 != *s2)
|
||
|
|
return *s1 - *s2;
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
char *
|
||
|
|
memcpy(s1, s2, n)
|
||
|
|
register char *s1, *s2;
|
||
|
|
int n;
|
||
|
|
{
|
||
|
|
register char *s0 = s1, *se = s1 + n;
|
||
|
|
|
||
|
|
while(s1 < se)
|
||
|
|
*s1++ = *s2++;
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
memset(s, c, n)
|
||
|
|
register char *s;
|
||
|
|
register int c;
|
||
|
|
int n;
|
||
|
|
{
|
||
|
|
register char *se = s + n;
|
||
|
|
|
||
|
|
while(s < se)
|
||
|
|
*s++ = c;
|
||
|
|
}
|