|
|
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.