|
|
1.1 ! root 1: \File{grind5b\-3a.c},{22:23},{Jun 12 1988} ! 2: \L{\LB{\K{\#include} \<stdio.h\>}} ! 3: \L{\LB{\K{\#include} \<isode\/ssap.h\>}} ! 4: \L{\LB{\K{\#include} \<isode\/isoservent.h\>}} ! 5: \L{\LB{}} ! 6: \L{\LB{}} ! 7: \L{\LB{\K{static} \K{int} requirements = SR\_HALFDUPLEX \| SR\_NEGOTIATED;}} ! 8: \L{\LB{}} ! 9: \L{\LB{\K{static} \K{int} owned = 0;}} ! 10: \L{\LB{}} ! 11: \L{\LB{}} ! 12: \L{\LB{\C{}\/* ARGSUSED *\/\CE{}}} ! 13: \L{\LB{}} ! 14: \L{\LB{\Proc{main}main (argc, argv, envp)}} ! 15: \L{\LB{\K{int}}\Tab{8}{argc;}} ! 16: \L{\LB{\K{char} **argv,}} ! 17: \L{\LB{ **envp;}} ! 18: \L{\LB{\{}} ! 19: \L{\LB{ \K{int} sd,}} ! 20: \L{\LB{}\Tab{8}{ settings;}} ! 21: \L{\LB{ \K{char} buffer[BUFSIZ];}} ! 22: \L{\LB{ \K{register} \K{struct} SSAPaddr *sz;}} ! 23: \L{\LB{ \K{struct} SSAPref sfs;}} ! 24: \L{\LB{ \K{register} \K{struct} SSAPref *sf = \&sfs;}} ! 25: \L{\LB{ \K{struct} SSAPconnect scs;}} ! 26: \L{\LB{ \K{register} \K{struct} SSAPconnect *sc = \&scs;}} ! 27: \L{\LB{ \K{struct} SSAPrelease srs;}} ! 28: \L{\LB{ \K{register} \K{struct} SSAPrelease *sr = \&srs;}} ! 29: \L{\LB{ \K{struct} SSAPindication sis;}} ! 30: \L{\LB{ \K{register} \K{struct} SSAPindication *si = \&sis;}} ! 31: \L{\LB{ \K{register} \K{struct} SSAPabort *sa = \&si \-\> si\_abort;}} ! 32: \L{\LB{ \K{register} \K{struct} isoservent *is;}} ! 33: \L{\LB{}} ! 34: \L{\LB{ \K{if} ((is = getisoserventbyname (\S{}\"sink\"\SE{}, \S{}\"ssap\"\SE{})) == NULL)}} ! 35: \L{\LB{}\Tab{8}{error (\S{}\"ssap\/sink: unknown provider\/entity pair\"\SE{});}} ! 36: \L{\LB{ \K{if} (argc != 2)}} ! 37: \L{\LB{}\Tab{8}{error (\S{}\"usage: source \!\"host\!\"\"\SE{});}} ! 38: \L{\LB{}} ! 39: \L{\LB{...}}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.