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
/
hunt3.c
# include
"refer..c"
getq
(
v
)
char
*
v
[];
{
# define BSIZ 250
static char
buff
[
BSIZ
];
static int
eof
=
0
;
extern
char
*
sinput
;
char
*
p
;
int
c
,
n
=
0
,
las
=
0
;
if
(
eof
)
return
(-
1
);
p
=
buff
;
while
( (
c
= (
sinput
? *
sinput
++ :
getchar
()) ) >
0
)
{
if
(
c
==
'
\n
'
)
break
;
if
(
isalpha
(
c
) ||
isdigit
(
c
))
{
if
(
las
==
0
)
{
v
[
n
++] =
p
;
las
=
1
;
}
if
(
las
++ <=
6
)
*
p
++ =
c
;
}
else
{
if
(
las
>
0
)
*
p
++ =
0
;
las
=
0
;
}
}
*
p
=
0
;
assert
(
p
<
buff
+
BSIZ
);
if
(
sinput
==
0
&&
c
<=
0
)
eof
=
1
;
# if D1
fprintf
(
stderr
,
"no. keys %d
\n
"
,
n
);
for
(
c
=
0
;
c
<
n
;
c
++)
fprintf
(
stderr
,
"keys X%sX
\n
"
,
v
[
c
]);
# endif
return
(
n
);
}