projects
/
unix-history
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
tags
|
clone url
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
BSD 3 development
[unix-history]
/
usr
/
src
/
cmd
/
refer
/
deliv2.c
# include
"stdio.h"
hash
(
s
)
char
*
s
;
{
int
c
,
n
;
for
(
n
=
0
;
c
= *
s
;
s
++)
n
+= (
c
*
n
+
c
<< (
n
%
4
));
return
(
n
>
0
?
n
: -
n
);
}
err
(
s
,
a
)
char
*
s
;
{
fprintf
(
stderr
,
"Error: "
);
fprintf
(
stderr
,
s
,
a
);
putc
(
'
\n
'
,
stderr
);
exit
(
1
);
}
prefix
(
t
,
s
)
char
*
t
, *
s
;
{
int
c
,
d
;
while
( (
c
= *
t
++) == *
s
++)
if
(
c
==
0
)
return
(
1
);
return
(
c
==
0
?
1
:
0
);
}
char
*
mindex
(
s
,
c
)
char
*
s
;
{
register
char
*
p
;
for
(
p
=
s
; *
p
;
p
++)
if
(*
p
==
c
)
return
(
p
);
return
(
0
);
}
zalloc
(
m
,
n
)
{
int
t
;
# if D1
fprintf
(
stderr
,
"calling calloc for %d*%d bytes
\n
"
,
m
,
n
);
# endif
t
=
calloc
(
m
,
n
);
# if D1
fprintf
(
stderr
,
"calloc returned %o
\n
"
,
t
);
# endif
return
(
t
);
}