Annotation of 43BSDReno/contrib/isode-beta/doc/manual/ryresp-invoke.tex, revision 1.1.1.1

1.1       root        1: \File{ryresp\-invoke.c},{21:34},{Aug 31 1988}
                      2: \L{\LB{...}}
                      3: \L{\LB{}}
                      4: \L{\LB{\K{static} \K{int}  op\_name (sd, ryo, rox, in, roi)}}
                      5: \L{\LB{\K{int}}\Tab{8}{sd;}}
                      6: \L{\LB{\K{struct} RyOperation *ryo;}}
                      7: \L{\LB{\K{struct} RoSAPinvoke *rox;}}
                      8: \L{\LB{caddr\_t}\Tab{8}{in;}}
                      9: \L{\LB{\K{struct} RoSAPindication *roi;}}
                     10: \L{\LB{\{}}
                     11: \L{\LB{    \K{int}}\Tab{8}{    result,}}
                     12: \L{\LB{}\Tab{8}{    won;}}
                     13: \L{\LB{    \K{register} \K{struct} type\_MODULE\_argument *arg =}}
                     14: \L{\LB{}\Tab{16}{(\K{struct} type\_MODULE\_argument *) in;}}
                     15: \L{\LB{}}
                     16: \L{\LB{\C{}\/* this check should *not* be made if linking of operations is expected *\/\CE{}}}
                     17: \L{\LB{    \K{if} (rox \-\> rox\_nolinked == 0) \{}}
                     18: \L{\LB{}\Tab{8}{advise (LLOG\_EXCEPTIONS, NULLCP,}}
                     19: \L{\LB{}\Tab{16}{\S{}\"RO\-INVOKE.INDICATION\/\%d: \%s, unknown linkage \%d\"\SE{},}}
                     20: \L{\LB{}\Tab{16}{sd, ryo \-\> ryo\_name, rox \-\> rox\_linkid);}}
                     21: \L{\LB{}\Tab{8}{\K{return} ureject (sd, ROS\_IP\_LINKED, rox, roi);}}
                     22: \L{\LB{    \}}}
                     23: \L{\LB{    \K{if} (debug)}}
                     24: \L{\LB{}\Tab{8}{advise (LLOG\_DEBUG, NULLCP, \S{}\"RO\-INVOKE.INDICATION\/\%d: \%s\"\SE{},}}
                     25: \L{\LB{}\Tab{16}{sd, ryo \-\> ryo\_name);}}
                     26: \L{\LB{}}
                     27: \L{\LB{\C{}\/* do something with ``arg\'\' here and decide if won... *\/\CE{}}}
                     28: \L{\LB{}}
                     29: \L{\LB{    \K{if} (won) \{}}
                     30: \L{\LB{}\Tab{8}{\K{register} \K{struct} type\_MODULE\_result *res;}}
                     31: \L{\LB{}}
                     32: \L{\LB{\C{}\/* allocate and initialize the result ``res\'\' here... *\/\CE{}}}
                     33: \L{\LB{}}
                     34: \L{\LB{}\Tab{8}{\K{if} (RyDsResult (sd, rox \-\> rox\_id, (caddr\_t) res, ROS\_NOPRIO, roi)}}
                     35: \L{\LB{}\Tab{16}{== NOTOK)}}
                     36: \L{\LB{}\Tab{8}{    ros\_adios (\&roi \-\> roi\_preject, \S{}\"RESULT\"\SE{});}}
                     37: \L{\LB{}\Tab{8}{result = OK;}}
                     38: \L{\LB{}}
                     39: \L{\LB{}\Tab{8}{free\_MODULE\_result (res);}}
                     40: \L{\LB{    \}}}
                     41: \L{\LB{    \K{else} \{}}
                     42: \L{\LB{}\Tab{8}{\K{struct} type\_MODULE\_parameter *parm;}}
                     43: \L{\LB{}}
                     44: \L{\LB{\C{}\/* allocate and initialize ``parm\'\' here... *\/\CE{}}}
                     45: \L{\LB{}}
                     46: \L{\LB{}\Tab{8}{result = error (sd, error\_MODULE\_error1, (caddr\_t) parm, rox, roi);}}
                     47: \L{\LB{}}
                     48: \L{\LB{}\Tab{8}{free\_MODULE\_parameter (parm);}}
                     49: \L{\LB{    \}}}
                     50: \L{\LB{}}
                     51: \L{\LB{\C{}\/* ``arg\'\' will be automatically free\'d when op\_name returns *\/\CE{}}}
                     52: \L{\LB{}}
                     53: \L{\LB{    \K{return} result;}}
                     54: \L{\LB{\}}}
                     55: \L{\LB{}}
                     56: \L{\LB{...}}
                     57: \L{\LB{}}
                     58: \L{\LB{\K{static} \K{int}  error (sd, err, param, rox, roi)}}
                     59: \L{\LB{\K{int}}\Tab{8}{sd,}}
                     60: \L{\LB{}\Tab{8}{err;}}
                     61: \L{\LB{caddr\_t}\Tab{8}{param;}}
                     62: \L{\LB{\K{struct} RoSAPinvoke *rox;}}
                     63: \L{\LB{\K{struct} RoSAPindication *roi;}}
                     64: \L{\LB{\{}}
                     65: \L{\LB{    \K{if} (RyDsError (sd, rox \-\> rox\_id, err, param, ROS\_NOPRIO, roi) == NOTOK)}}
                     66: \L{\LB{}\Tab{8}{ros\_adios (\&roi \-\> roi\_preject, \S{}\"ERROR\"\SE{});}}
                     67: \L{\LB{}}
                     68: \L{\LB{    \K{return} OK;}}
                     69: \L{\LB{\}}}
                     70: \L{\LB{}}
                     71: \L{\LB{}}
                     72: \L{\LB{\K{static} \K{int}  ureject (sd, reason, rox, roi)}}
                     73: \L{\LB{\K{int}}\Tab{8}{sd,}}
                     74: \L{\LB{}\Tab{8}{reason;}}
                     75: \L{\LB{\K{struct} RoSAPinvoke *rox;}}
                     76: \L{\LB{\K{struct} RoSAPindication *roi;}}
                     77: \L{\LB{\{}}
                     78: \L{\LB{    \K{if} (RyDsUReject (sd, rox \-\> rox\_id, reason, ROS\_NOPRIO, roi) == NOTOK)}}
                     79: \L{\LB{}\Tab{8}{ros\_adios (\&roi \-\> roi\_preject, \S{}\"U\-REJECT\"\SE{});}}
                     80: \L{\LB{}}
                     81: \L{\LB{    \K{return} OK;}}
                     82: \L{\LB{\}}}
                     83: \L{\LB{}}
                     84: \L{\LB{...}}

unix.superglobalmegacorp.com

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