|
|
1.1 ! root 1: \File{ryinit\-estab.c},{08:54},{Jun 29 1988} ! 2: \L{\LB{...}} ! 3: \L{\LB{}} ! 4: \L{\LB{\K{\#define}}\Tab{8}{myservice}\Tab{24}{\S{}\"servicestore\"\SE{}}} ! 5: \L{\LB{\K{\#define}}\Tab{8}{mycontext}\Tab{24}{\S{}\"local service\"\SE{}}} ! 6: \L{\LB{\K{\#define}}\Tab{8}{mypci}\Tab{24}{\S{}\"local service pci\"\SE{}}} ! 7: \L{\LB{}} ! 8: \L{\LB{...}} ! 9: \L{\LB{}} ! 10: \L{\LB{ \K{int}}\Tab{8}{ sd;}} ! 11: \L{\LB{ \K{struct} SSAPref sfs;}} ! 12: \L{\LB{ \K{register} \K{struct} SSAPref *sf;}} ! 13: \L{\LB{ \K{register} \K{struct} PSAPaddr *pa;}} ! 14: \L{\LB{ \K{struct} AcSAPconnect accs;}} ! 15: \L{\LB{ \K{register} \K{struct} AcSAPconnect *acc = \&accs;}} ! 16: \L{\LB{ \K{struct} AcSAPindication acis;}} ! 17: \L{\LB{ \K{register} \K{struct} AcSAPindication *aci = \&acis;}} ! 18: \L{\LB{ \K{register} \K{struct} AcSAPabort *aca = \&aci \-\> aci\_abort;}} ! 19: \L{\LB{ AEI}\Tab{8}{ aei;}} ! 20: \L{\LB{ OID}\Tab{8}{ ctx,}} ! 21: \L{\LB{}\Tab{8}{ pci;}} ! 22: \L{\LB{ \K{struct} PSAPctxlist pcs;}} ! 23: \L{\LB{ \K{register} \K{struct} PSAPctxlist *pc = \&pcs;}} ! 24: \L{\LB{ \K{struct} RoSAPindication rois;}} ! 25: \L{\LB{ \K{register} \K{struct} RoSAPindication *roi = \&rois;}} ! 26: \L{\LB{ \K{register} \K{struct} RoSAPpreject *rop = \&roi \-\> roi\_preject;}} ! 27: \L{\LB{}} ! 28: \L{\LB{\Proc{if} \K{if} ((aei = str2aei (argv[1], myservice)) == NULLAEI)}} ! 29: \L{\LB{}\Tab{8}{adios (NULLCP, \S{}\"\%s\-\%s: unknown application\-entity\"\SE{},}} ! 30: \L{\LB{}\Tab{16}{argv[1], myservice);}} ! 31: \L{\LB{\Proc{if} \K{if} ((pa = aei2addr (aei)) == NULLPA)}} ! 32: \L{\LB{}\Tab{8}{adios (NULLCP, \S{}\"address translation failed\"\SE{});}} ! 33: \L{\LB{}} ! 34: \L{\LB{\Proc{if} \K{if} ((ctx = ode2oid (mycontext)) == NULLOID)}} ! 35: \L{\LB{}\Tab{8}{adios (NULLCP, \S{}\"\%s: unknown object descriptor\"\SE{}, mycontext);}} ! 36: \L{\LB{\Proc{if} \K{if} ((ctx = oid\_cpy (ctx)) == NULLOID)}} ! 37: \L{\LB{}\Tab{8}{adios (NULLCP, \S{}\"out of memory\"\SE{});}} ! 38: \L{\LB{\Proc{if} \K{if} ((pci = ode2oid (mypci)) == NULLOID)}} ! 39: \L{\LB{}\Tab{8}{adios (NULLCP, \S{}\"\%s: unknown object descriptor\"\SE{}, mypci);}} ! 40: \L{\LB{\Proc{if} \K{if} ((pci = oid\_cpy (pci)) == NULLOID)}} ! 41: \L{\LB{}\Tab{8}{adios (NULLCP, \S{}\"out of memory\"\SE{});}} ! 42: \L{\LB{ pc \-\> pc\_nctx = 1;}} ! 43: \L{\LB{ pc \-\> pc\_ctx[0].pc\_id = 1;}} ! 44: \L{\LB{ pc \-\> pc\_ctx[0].pc\_asn = pci;}} ! 45: \L{\LB{ pc \-\> pc\_ctx[0].pc\_atn = NULLOID;}} ! 46: \L{\LB{}} ! 47: \L{\LB{\Proc{if} \K{if} ((sf = addr2ref (PLocalHostName ())) == NULL) \{}} ! 48: \L{\LB{}\Tab{8}{sf = \&sfs;}} ! 49: \L{\LB{}\Tab{8}{(\K{void}) bzero ((\K{char} *) sf, \K{sizeof} *sf);}} ! 50: \L{\LB{ \}}} ! 51: \ProcCont{if}\L{\LB{}} ! 52: \L{\LB{ \K{if} (AcAssocRequest (ctx, NULLAEI, aei, NULLPA, pa, pc, NULLOID,}} ! 53: \L{\LB{}\Tab{16}{0, ROS\_MYREQUIRE, SERIAL\_NONE, 0, sf, NULLPEP, 0, NULLQOS,}} ! 54: \L{\LB{}\Tab{16}{acc, aci)}} ! 55: \L{\LB{}\Tab{8}{ == NOTOK)}} ! 56: \L{\LB{}\Tab{8}{acs\_adios (aca, \S{}\"A\-ASSOCIATE.REQUEST\"\SE{});}} ! 57: \L{\LB{}} ! 58: \L{\LB{\Proc{if} \K{if} (acc \-\> acc\_result != ACS\_ACCEPT)}} ! 59: \L{\LB{}\Tab{8}{adios (NULLCP, \S{}\"association rejected: [\%s]\"\SE{},}} ! 60: \L{\LB{}\Tab{16}{AcErrString (acc \-\> acc\_result));}} ! 61: \L{\LB{}} ! 62: \L{\LB{ sd = acc \-\> acc\_sd;}} ! 63: \L{\LB{ ACCFREE (acc);}} ! 64: \L{\LB{}} ! 65: \L{\LB{\Proc{if} \K{if} (RoSetService (sd, RoPService, roi) == NOTOK)}} ! 66: \L{\LB{}\Tab{8}{ros\_adios (rop, \S{}\"set RO\/PS fails\"\SE{});}} ! 67: \L{\LB{}} ! 68: \L{\LB{...}}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.