Annotation of 43BSDReno/contrib/isode-beta/doc/manual/grind5a-2b.c, revision 1.1.1.1

1.1       root        1: ...
                      2: 
                      3:     if ((pz = is2paddr (argv[1], NULLCP, is)) == NULLPA)
                      4:        error ("address translation failed");
                      5:     sf = addr2ref (PLocalHostName ());
                      6: 
                      7:     settings = 0;
                      8: #define        dotoken(requires,shift,bit,type) \
                      9: { \
                     10:     if (requirements & requires) \
                     11:        settings |= ST_INIT_VALUE << shift; \
                     12: }
                     13:     dotokens ();
                     14: #undef dotoken
                     15: 
                     16:     if (PConnRequest (NULLSA, pz, NULLPC, NULLOID, 0, requirements,
                     17:            SERIAL_NONE, settings, sf, NULLPEP, 0, NULLQOS, pc, pi) == NOTOK)
                     18:        error ("P-CONNECT.REQUEST: %s", PErrString (pa -> pa_reason));
                     19:     if (pc -> pc_result != PC_ACCEPT)
                     20:        error ("connection rejected by sink: %s",
                     21:                    PErrString (pc -> pc_result));      
                     22: 
                     23:     sd = pc -> pc_sd;
                     24:     requirements = pc -> pc_requirements;
                     25: 
                     26: #define dotoken(requires,shift,bit,type) \
                     27: { \
                     28:     if (requirements & requires) \
                     29:        if ((pc -> pc_settings & (ST_MASK << shift)) \
                     30:                == ST_INIT_VALUE) \
                     31:            owned |= bit; \
                     32: }
                     33:        dotokens ();
                     34: #undef dotoken
                     35: 
                     36:     PCFREE (pc);
                     37: 
                     38: ...

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.