|
|
1.1 ! root 1: \File{grind2b\-3c.c},{22:23},{Jun 12 1988} ! 2: \L{\LB{...}} ! 3: \L{\LB{}} ! 4: \L{\LB{\K{static} \K{int} ros\_invoke (sd, rox)}} ! 5: \L{\LB{\K{int} sd;}} ! 6: \L{\LB{\K{register} \K{struct} RoSAPinvoke *rox;}} ! 7: \L{\LB{\{}} ! 8: \L{\LB{ \K{int} result;}} ! 9: \L{\LB{ \K{register} \K{struct} dispatch *ds;}} ! 10: \L{\LB{ \K{struct} RoSAPindication rois;}} ! 11: \L{\LB{ \K{register} \K{struct} RoSAPindication *roi = \&rois;}} ! 12: \L{\LB{ \K{register} \K{struct} RoSAPpreject *rop = \&roi \-\> roi\_preject;}} ! 13: \L{\LB{}} ! 14: \L{\LB{ \K{for} (ds = dispatches; ds \-\> ds\_operation != APDU\_UNKNOWN; ds++)}} ! 15: \L{\LB{}\Tab{8}{\K{if} (ds \-\> ds\_operation == rox \-\> rox\_op)}} ! 16: \L{\LB{}\Tab{8}{ \K{break};}} ! 17: \L{\LB{}} ! 18: \L{\LB{ \K{if} (ds \-\> ds\_operation == APDU\_UNKNOWN) \{}} ! 19: \L{\LB{}\Tab{8}{\K{if} (RoURejectRequest (sd, \&rox \-\> rox\_id, ROS\_IP\_UNRECOG,}} ! 20: \L{\LB{}\Tab{16}{ ROS\_NOPRIO, roi) == NOTOK)}} ! 21: \L{\LB{}\Tab{8}{ error (\S{}\"RO\-U\-REJECT.REQUEST: \%s\"\SE{}, RoErrString (rop \-\> rop\_reason));}} ! 22: \L{\LB{}\Tab{8}{\K{goto} out;}} ! 23: \L{\LB{ \}}} ! 24: \L{\LB{}} ! 25: \L{\LB{ \K{if} (rox \-\> rox\_nolinked == 0) \{}} ! 26: \L{\LB{}\Tab{8}{\K{if} (RoURejectRequest (sd, \&rox \-\> rox\_id, ROS\_IP\_LINKED,}} ! 27: \L{\LB{}\Tab{16}{ ROS\_NOPRIO, roi) == NOTOK)}} ! 28: \L{\LB{}\Tab{8}{ error (\S{}\"RO\-U\-REJECT.REQUEST: \%s\"\SE{}, RoErrString (rop \-\> rop\_reason));}} ! 29: \L{\LB{}\Tab{8}{\K{goto} out;}} ! 30: \L{\LB{ \}}} ! 31: \L{\LB{}} ! 32: \L{\LB{ \K{switch} (result = (*ds \-\> ds\_vector) (rox)) \{}} ! 33: \L{\LB{}\Tab{8}{\K{case} ERROR\_UNKNOWN: }} ! 34: \L{\LB{}\Tab{8}{ \K{if} (RoResultRequest (sd, rox \-\> rox\_id, rox \-\> rox\_op,}} ! 35: \L{\LB{}\Tab{24}{rox \-\> rox\_args, ROS\_NOPRIO, roi) == NOTOK)}} ! 36: \L{\LB{}\Tab{16}{error (\S{}\"RO\-RESULT.REQUEST: \%s\"\SE{},}} ! 37: \L{\LB{}\Tab{24}{RoErrString (rop \-\> rop\_reason));}} ! 38: \L{\LB{}\Tab{8}{ \K{break};}} ! 39: \L{\LB{}} ! 40: \L{\LB{}\Tab{8}{\K{default}: }} ! 41: \L{\LB{}\Tab{8}{ \K{if} (RoErrorRequest (sd, rox \-\> rox\_id, result, rox \-\> rox\_args,}} ! 42: \L{\LB{}\Tab{24}{ROS\_NOPRIO, roi) == NOTOK)}} ! 43: \L{\LB{}\Tab{16}{error (\S{}\"RO\-ERROR.REQUEST: \%s\"\SE{},}} ! 44: \L{\LB{}\Tab{24}{RoErrString (rop \-\> rop\_reason));}} ! 45: \L{\LB{}\Tab{8}{ \K{break};}} ! 46: \L{\LB{}} ! 47: \L{\LB{}\Tab{8}{\K{case} ERROR\_MISTYPED: }} ! 48: \L{\LB{}\Tab{8}{ \K{if} (RoURejectRequest (sd, \&rox \-\> rox\_id, ROS\_IP\_MISTYPED,}} ! 49: \L{\LB{}\Tab{24}{ROS\_NOPRIO, roi) == NOTOK)}} ! 50: \L{\LB{}\Tab{16}{error (\S{}\"RO\-U\-REJECT.REQUEST: \%s\"\SE{},}} ! 51: \L{\LB{}\Tab{24}{RoErrString (rop \-\> rop\_reason));}} ! 52: \L{\LB{}\Tab{8}{ \K{break};}} ! 53: \L{\LB{ \}}} ! 54: \L{\LB{}} ! 55: \L{\LB{out: ;}} ! 56: \L{\LB{ ROXFREE (rox);}} ! 57: \L{\LB{\}}} ! 58: \L{\LB{}} ! 59: \L{\LB{...}}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.