Annotation of 43BSDReno/contrib/isode-beta/doc/manual/ryresp-invoke.tex, revision 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.