1 551445b9 2004-04-21 devnull #include <u.h>
2 551445b9 2004-04-21 devnull #include <libc.h>
3 551445b9 2004-04-21 devnull #include <thread.h>
4 551445b9 2004-04-21 devnull #include <sunrpc.h>
7 551445b9 2004-04-21 devnull suncallpack(SunProg *prog, uchar *a, uchar *ea, uchar **pa, SunCall *c)
10 551445b9 2004-04-21 devnull int (*pack)(uchar*, uchar*, uchar**, SunCall*);
12 551445b9 2004-04-21 devnull if(pa == nil)
14 551445b9 2004-04-21 devnull if(c->type < 0 || c->type >= prog->nproc || (pack=prog->proc[c->type].pack) == nil)
15 551445b9 2004-04-21 devnull return SunProcUnavail;
16 551445b9 2004-04-21 devnull if((*pack)(a, ea, pa, c) < 0)
17 551445b9 2004-04-21 devnull return SunGarbageArgs;
18 551445b9 2004-04-21 devnull return SunSuccess;
21 551445b9 2004-04-21 devnull SunStatus
22 551445b9 2004-04-21 devnull suncallunpack(SunProg *prog, uchar *a, uchar *ea, uchar **pa, SunCall *c)
24 551445b9 2004-04-21 devnull uchar *x;
25 551445b9 2004-04-21 devnull int (*unpack)(uchar*, uchar*, uchar**, SunCall*);
27 551445b9 2004-04-21 devnull if(pa == nil)
29 551445b9 2004-04-21 devnull if(c->type < 0 || c->type >= prog->nproc || (unpack=prog->proc[c->type].unpack) == nil)
30 551445b9 2004-04-21 devnull return SunProcUnavail;
31 551445b9 2004-04-21 devnull if((*unpack)(a, ea, pa, c) < 0){
32 4c06b8ee 2005-05-19 devnull fprint(2, "%lud %d: '%.*H' unpack failed\n", prog->prog, c->type, (int)(ea-a), a);
33 551445b9 2004-04-21 devnull return SunGarbageArgs;
35 551445b9 2004-04-21 devnull return SunSuccess;
38 551445b9 2004-04-21 devnull SunStatus
39 551445b9 2004-04-21 devnull suncallunpackalloc(SunProg *prog, SunCallType type, uchar *a, uchar *ea, uchar **pa, SunCall **pc)
41 551445b9 2004-04-21 devnull uchar *x;
42 551445b9 2004-04-21 devnull uint size;
43 551445b9 2004-04-21 devnull int (*unpack)(uchar*, uchar*, uchar**, SunCall*);
44 551445b9 2004-04-21 devnull SunCall *c;
46 551445b9 2004-04-21 devnull if(pa == nil)
48 551445b9 2004-04-21 devnull if(type < 0 || type >= prog->nproc || (unpack=prog->proc[type].unpack) == nil)
49 551445b9 2004-04-21 devnull return SunProcUnavail;
50 551445b9 2004-04-21 devnull size = prog->proc[type].sizeoftype;
51 551445b9 2004-04-21 devnull if(size == 0)
52 551445b9 2004-04-21 devnull return SunProcUnavail;
53 551445b9 2004-04-21 devnull c = mallocz(size, 1);
54 551445b9 2004-04-21 devnull if(c == nil)
55 551445b9 2004-04-21 devnull return SunSystemErr;
56 551445b9 2004-04-21 devnull c->type = type;
57 551445b9 2004-04-21 devnull if((*unpack)(a, ea, pa, c) < 0){
58 551445b9 2004-04-21 devnull fprint(2, "in: %.*H unpack failed\n", (int)(ea-a), a);
60 551445b9 2004-04-21 devnull return SunGarbageArgs;
63 551445b9 2004-04-21 devnull return SunSuccess;
67 551445b9 2004-04-21 devnull suncallsize(SunProg *prog, SunCall *c)
69 551445b9 2004-04-21 devnull uint (*size)(SunCall*);
71 551445b9 2004-04-21 devnull if(c->type < 0 || c->type >= prog->nproc || (size=prog->proc[c->type].size) == nil)
72 551445b9 2004-04-21 devnull return ~0;
73 551445b9 2004-04-21 devnull return (*size)(c);