|
|
BSD 4.3reno
\File{grind5b\-3b.c},{08:54},{Jun 29 1988}
\L{\LB{...}}
\L{\LB{}}
\L{\LB{\Proc{if} \K{if} ((sz = is2saddr (argv[1], NULLCP, is)) == NULLSA)}}
\L{\LB{}\Tab{8}{error (\S{}\"address translation failed\"\SE{});}}
\L{\LB{ (\K{void}) bzero ((\K{char} *) sf, \K{sizeof} *sf);}}
\L{\LB{}}
\L{\LB{ settings = 0;}}
\L{\LB{\K{\#define}}\Tab{8}{dotoken(requires,shift,bit,type) \!}}
\L{\LB{\{ \!}}
\L{\LB{ \K{if} (requirements \& requires) \!}}
\L{\LB{}\Tab{8}{settings \|= ST\_INIT\_VALUE \<\< shift; \!}}
\L{\LB{\}}}
\L{\LB{ dotokens ();}}
\L{\LB{\K{\#undef}}\Tab{8}{dotoken}}
\L{\LB{}}
\L{\LB{ \K{if} (SConnRequest (sf, NULLSA, sz, requirements, settings, SERIAL\_NONE,}}
\L{\LB{}\Tab{8}{ NULLCP, 0, NULLQOS, sc, si) == NOTOK)}}
\L{\LB{}\Tab{8}{error (\S{}\"S\-CONNECT.REQUEST: \%s\"\SE{}, SErrString (sa \-\> sa\_reason));}}
\L{\LB{\Proc{if} \K{if} (sc \-\> sc\_result != SC\_ACCEPT)}}
\L{\LB{}\Tab{8}{error (\S{}\"connection rejected by sink[\%s]: \%s\"\SE{},}}
\L{\LB{}\Tab{16}{ SErrString (sa \-\> sa\_reason),}}
\L{\LB{}\Tab{16}{ SErrString (sc \-\> sc\_result));}\Tab{56}{}}
\L{\LB{}}
\L{\LB{ sd = sc \-\> sc\_sd;}}
\L{\LB{ requirements = sc \-\> sc\_requirements;}}
\L{\LB{}}
\L{\LB{\K{\#define} dotoken(requires,shift,bit,type) \!}}
\L{\LB{\{ \!}}
\L{\LB{ \K{if} (requirements \& requires) \!}}
\L{\LB{}\Tab{8}{\K{if} ((sc \-\> sc\_settings \& (ST\_MASK \<\< shift)) == ST\_INIT\_VALUE) \!}}
\L{\LB{}\Tab{8}{ owned \|= bit; \!}}
\L{\LB{\}}}
\L{\LB{}\Tab{8}{dotokens ();}}
\L{\LB{\K{\#undef}}\Tab{8}{dotoken}}
\L{\LB{}}
\L{\LB{...}}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.