1 #include <u.h> 2 #include <libc.h> 3 #include <thread.h> 4 #include <sunrpc.h> 5 6 static void 7 portMapPrint(Fmt *fmt, PortMap *x) 8 { 9 fmtprint(fmt, "[%ud %ud %ud %ud]", x->prog, x->vers, x->prot, x->port); 10 } 11 static uint 12 portMapSize(PortMap *x) 13 { 14 uint a; 15 USED(x); 16 a = 0 + 4 + 4 + 4 + 4; 17 return a; 18 } 19 static int 20 portMapPack(uchar *a, uchar *ea, uchar **pa, PortMap *x) 21 { 22 if(sunUint32Pack(a, ea, &a, &x->prog) < 0) goto Err; 23 if(sunUint32Pack(a, ea, &a, &x->vers) < 0) goto Err; 24 if(sunUint32Pack(a, ea, &a, &x->prot) < 0) goto Err; 25 if(sunUint32Pack(a, ea, &a, &x->port) < 0) goto Err; 26 *pa = a; 27 return 0; 28 Err: 29 *pa = ea; 30 return -1; 31 } 32 static int 33 portMapUnpack(uchar *a, uchar *ea, uchar **pa, PortMap *x) 34 { 35 if(sunUint32Unpack(a, ea, &a, &x->prog) < 0) goto Err; 36 if(sunUint32Unpack(a, ea, &a, &x->vers) < 0) goto Err; 37 if(sunUint32Unpack(a, ea, &a, &x->prot) < 0) goto Err; 38 if(sunUint32Unpack(a, ea, &a, &x->port) < 0) goto Err; 39 *pa = a; 40 return 0; 41 Err: 42 *pa = ea; 43 return -1; 44 } 45 static void 46 portTNullPrint(Fmt *fmt, PortTNull *x) 47 { 48 USED(x); 49 fmtprint(fmt, "%s", "PortTNull"); 50 } 51 static uint 52 portTNullSize(PortTNull *x) 53 { 54 uint a; 55 USED(x); 56 a = 0; 57 return a; 58 } 59 static int 60 portTNullPack(uchar *a, uchar *ea, uchar **pa, PortTNull *x) 61 { 62 USED(ea); 63 USED(x); 64 *pa = a; 65 return 0; 66 } 67 static int 68 portTNullUnpack(uchar *a, uchar *ea, uchar **pa, PortTNull *x) 69 { 70 USED(ea); 71 USED(x); 72 *pa = a; 73 return 0; 74 } 75 static void 76 portRNullPrint(Fmt *fmt, PortRNull *x) 77 { 78 USED(x); 79 fmtprint(fmt, "%s", "PortRNull"); 80 } 81 static uint 82 portRNullSize(PortRNull *x) 83 { 84 uint a; 85 USED(x); 86 a = 0; 87 return a; 88 } 89 static int 90 portRNullPack(uchar *a, uchar *ea, uchar **pa, PortRNull *x) 91 { 92 USED(ea); 93 USED(x); 94 *pa = a; 95 return 0; 96 } 97 static int 98 portRNullUnpack(uchar *a, uchar *ea, uchar **pa, PortRNull *x) 99 { 100 USED(ea); 101 USED(x); 102 *pa = a; 103 return 0; 104 } 105 static void 106 portTSetPrint(Fmt *fmt, PortTSet *x) 107 { 108 fmtprint(fmt, "PortTSet "); 109 portMapPrint(fmt, &x->map); 110 } 111 static uint 112 portTSetSize(PortTSet *x) 113 { 114 uint a; 115 USED(x); 116 a = 0 + portMapSize(&x->map); 117 return a; 118 } 119 static int 120 portTSetPack(uchar *a, uchar *ea, uchar **pa, PortTSet *x) 121 { 122 if(portMapPack(a, ea, &a, &x->map) < 0) goto Err; 123 *pa = a; 124 return 0; 125 Err: 126 *pa = ea; 127 return -1; 128 } 129 static int 130 portTSetUnpack(uchar *a, uchar *ea, uchar **pa, PortTSet *x) 131 { 132 if(portMapUnpack(a, ea, &a, &x->map) < 0) goto Err; 133 *pa = a; 134 return 0; 135 Err: 136 *pa = ea; 137 return -1; 138 } 139 static void 140 portRSetPrint(Fmt *fmt, PortRSet *x) 141 { 142 fmtprint(fmt, "PortRSet %ud", x->b); 143 } 144 static uint 145 portRSetSize(PortRSet *x) 146 { 147 uint a; 148 USED(x); 149 a = 0 + 4; 150 return a; 151 } 152 static int 153 portRSetPack(uchar *a, uchar *ea, uchar **pa, PortRSet *x) 154 { 155 if(sunUint1Pack(a, ea, &a, &x->b) < 0) goto Err; 156 *pa = a; 157 return 0; 158 Err: 159 *pa = ea; 160 return -1; 161 } 162 static int 163 portRSetUnpack(uchar *a, uchar *ea, uchar **pa, PortRSet *x) 164 { 165 if(sunUint1Unpack(a, ea, &a, &x->b) < 0) goto Err; 166 *pa = a; 167 return 0; 168 Err: 169 *pa = ea; 170 return -1; 171 } 172 static void 173 portTUnsetPrint(Fmt *fmt, PortTUnset *x) 174 { 175 fmtprint(fmt, "PortTUnset "); 176 portMapPrint(fmt, &x->map); 177 } 178 static uint 179 portTUnsetSize(PortTUnset *x) 180 { 181 uint a; 182 USED(x); 183 a = 0 + portMapSize(&x->map); 184 return a; 185 } 186 static int 187 portTUnsetPack(uchar *a, uchar *ea, uchar **pa, PortTUnset *x) 188 { 189 if(portMapPack(a, ea, &a, &x->map) < 0) goto Err; 190 *pa = a; 191 return 0; 192 Err: 193 *pa = ea; 194 return -1; 195 } 196 static int 197 portTUnsetUnpack(uchar *a, uchar *ea, uchar **pa, PortTUnset *x) 198 { 199 if(portMapUnpack(a, ea, &a, &x->map) < 0) goto Err; 200 *pa = a; 201 return 0; 202 Err: 203 *pa = ea; 204 return -1; 205 } 206 static void 207 portRUnsetPrint(Fmt *fmt, PortRUnset *x) 208 { 209 fmtprint(fmt, "PortRUnset %ud", x->b); 210 } 211 static uint 212 portRUnsetSize(PortRUnset *x) 213 { 214 uint a; 215 USED(x); 216 a = 0 + 4; 217 return a; 218 } 219 static int 220 portRUnsetPack(uchar *a, uchar *ea, uchar **pa, PortRUnset *x) 221 { 222 if(sunUint1Pack(a, ea, &a, &x->b) < 0) goto Err; 223 *pa = a; 224 return 0; 225 Err: 226 *pa = ea; 227 return -1; 228 } 229 static int 230 portRUnsetUnpack(uchar *a, uchar *ea, uchar **pa, PortRUnset *x) 231 { 232 if(sunUint1Unpack(a, ea, &a, &x->b) < 0) goto Err; 233 *pa = a; 234 return 0; 235 Err: 236 *pa = ea; 237 return -1; 238 } 239 static void 240 portTGetportPrint(Fmt *fmt, PortTGetport *x) 241 { 242 fmtprint(fmt, "PortTGetport "); 243 portMapPrint(fmt, &x->map); 244 } 245 static uint 246 portTGetportSize(PortTGetport *x) 247 { 248 uint a; 249 USED(x); 250 a = 0 + portMapSize(&x->map); 251 return a; 252 } 253 static int 254 portTGetportPack(uchar *a, uchar *ea, uchar **pa, PortTGetport *x) 255 { 256 if(portMapPack(a, ea, &a, &x->map) < 0) goto Err; 257 *pa = a; 258 return 0; 259 Err: 260 *pa = ea; 261 return -1; 262 } 263 static int 264 portTGetportUnpack(uchar *a, uchar *ea, uchar **pa, PortTGetport *x) 265 { 266 if(portMapUnpack(a, ea, &a, &x->map) < 0) goto Err; 267 *pa = a; 268 return 0; 269 Err: 270 *pa = ea; 271 return -1; 272 } 273 static void 274 portRGetportPrint(Fmt *fmt, PortRGetport *x) 275 { 276 fmtprint(fmt, "PortRGetport %ud", x->port); 277 } 278 static uint 279 portRGetportSize(PortRGetport *x) 280 { 281 uint a; 282 USED(x); 283 a = 0 + 4; 284 return a; 285 } 286 static int 287 portRGetportPack(uchar *a, uchar *ea, uchar **pa, PortRGetport *x) 288 { 289 if(sunUint32Pack(a, ea, &a, &x->port) < 0) goto Err; 290 *pa = a; 291 return 0; 292 Err: 293 *pa = ea; 294 return -1; 295 } 296 static int 297 portRGetportUnpack(uchar *a, uchar *ea, uchar **pa, PortRGetport *x) 298 { 299 if(sunUint32Unpack(a, ea, &a, &x->port) < 0) goto Err; 300 *pa = a; 301 return 0; 302 Err: 303 *pa = ea; 304 return -1; 305 } 306 static void 307 portTDumpPrint(Fmt *fmt, PortTDump *x) 308 { 309 USED(x); 310 fmtprint(fmt, "PortTDump"); 311 } 312 static uint 313 portTDumpSize(PortTDump *x) 314 { 315 uint a; 316 USED(x); 317 a = 0; 318 return a; 319 } 320 static int 321 portTDumpPack(uchar *a, uchar *ea, uchar **pa, PortTDump *x) 322 { 323 USED(ea); 324 USED(x); 325 *pa = a; 326 return 0; 327 } 328 static int 329 portTDumpUnpack(uchar *a, uchar *ea, uchar **pa, PortTDump *x) 330 { 331 USED(ea); 332 USED(x); 333 *pa = a; 334 return 0; 335 } 336 static void 337 portRDumpPrint(Fmt *fmt, PortRDump *x) 338 { 339 int i; 340 341 fmtprint(fmt, "PortRDump"); 342 for(i=0; i<x->nmap; i++){ 343 fmtprint(fmt, " "); 344 portMapPrint(fmt, &x->map[i]); 345 } 346 } 347 static uint 348 portRDumpSize(PortRDump *x) 349 { 350 return (5*4*x->nmap) + 4; 351 } 352 static int 353 portRDumpPack(uchar *a, uchar *ea, uchar **pa, PortRDump *x) 354 { 355 int i; 356 u32int zero, one; 357 358 zero = 0; 359 one = 1; 360 for(i=0; i<x->nmap; i++){ 361 if(sunUint32Pack(a, ea, &a, &one) < 0 362 || portMapPack(a, ea, &a, &x->map[i]) < 0) 363 goto Err; 364 } 365 if(sunUint32Pack(a, ea, &a, &zero) < 0) 366 goto Err; 367 *pa = a; 368 return 0; 369 Err: 370 *pa = ea; 371 return -1; 372 } 373 static int 374 portRDumpUnpack(uchar *a, uchar *ea, uchar **pa, PortRDump *x) 375 { 376 int i; 377 u1int u1; 378 PortMap *m; 379 380 m = (PortMap*)a; 381 for(i=0;; i++){ 382 if(sunUint1Unpack(a, ea, &a, &u1) < 0) 383 goto Err; 384 if(u1 == 0) 385 break; 386 if(portMapUnpack(a, ea, &a, &m[i]) < 0) 387 goto Err; 388 } 389 x->nmap = i; 390 x->map = m; 391 *pa = a; 392 return 0; 393 394 Err: 395 *pa = ea; 396 return -1; 397 } 398 static void 399 portTCallitPrint(Fmt *fmt, PortTCallit *x) 400 { 401 fmtprint(fmt, "PortTCallit [%ud,%ud,%ud] %ud", x->prog, x->vers, x->proc, x->count); 402 } 403 static uint 404 portTCallitSize(PortTCallit *x) 405 { 406 uint a; 407 USED(x); 408 a = 0 + 4 + 4 + 4 + sunVarOpaqueSize(x->count); 409 return a; 410 } 411 static int 412 portTCallitPack(uchar *a, uchar *ea, uchar **pa, PortTCallit *x) 413 { 414 if(sunUint32Pack(a, ea, &a, &x->prog) < 0) goto Err; 415 if(sunUint32Pack(a, ea, &a, &x->vers) < 0) goto Err; 416 if(sunUint32Pack(a, ea, &a, &x->proc) < 0) goto Err; 417 if(sunVarOpaquePack(a, ea, &a, &x->data, &x->count, -1) < 0) goto Err; 418 *pa = a; 419 return 0; 420 Err: 421 *pa = ea; 422 return -1; 423 } 424 static int 425 portTCallitUnpack(uchar *a, uchar *ea, uchar **pa, PortTCallit *x) 426 { 427 if(sunUint32Unpack(a, ea, &a, &x->prog) < 0) goto Err; 428 if(sunUint32Unpack(a, ea, &a, &x->vers) < 0) goto Err; 429 if(sunUint32Unpack(a, ea, &a, &x->proc) < 0) goto Err; 430 if(sunVarOpaqueUnpack(a, ea, &a, &x->data, &x->count, -1) < 0) goto Err; 431 *pa = a; 432 return 0; 433 Err: 434 *pa = ea; 435 return -1; 436 } 437 static void 438 portRCallitPrint(Fmt *fmt, PortRCallit *x) 439 { 440 fmtprint(fmt, "PortRCallit %ud %ud", x->port, x->count); 441 } 442 static uint 443 portRCallitSize(PortRCallit *x) 444 { 445 uint a; 446 USED(x); 447 a = 0 + 4 + sunVarOpaqueSize(x->count); 448 return a; 449 } 450 static int 451 portRCallitPack(uchar *a, uchar *ea, uchar **pa, PortRCallit *x) 452 { 453 if(sunUint32Pack(a, ea, &a, &x->port) < 0) goto Err; 454 if(sunVarOpaquePack(a, ea, &a, &x->data, &x->count, -1) < 0) goto Err; 455 *pa = a; 456 return 0; 457 Err: 458 *pa = ea; 459 return -1; 460 } 461 static int 462 portRCallitUnpack(uchar *a, uchar *ea, uchar **pa, PortRCallit *x) 463 { 464 if(sunUint32Unpack(a, ea, &a, &x->port) < 0) goto Err; 465 if(sunVarOpaqueUnpack(a, ea, &a, &x->data, &x->count, -1) < 0) goto Err; 466 *pa = a; 467 return 0; 468 Err: 469 *pa = ea; 470 return -1; 471 } 472 473 typedef int (*P)(uchar*, uchar*, uchar**, SunCall*); 474 typedef void (*F)(Fmt*, SunCall*); 475 typedef uint (*S)(SunCall*); 476 477 static SunProc proc[] = { 478 (P)portTNullPack, (P)portTNullUnpack, (S)portTNullSize, (F)portTNullPrint, sizeof(PortTNull), 479 (P)portRNullPack, (P)portRNullUnpack, (S)portRNullSize, (F)portRNullPrint, sizeof(PortRNull), 480 (P)portTSetPack, (P)portTSetUnpack, (S)portTSetSize, (F)portTSetPrint, sizeof(PortTSet), 481 (P)portRSetPack, (P)portRSetUnpack, (S)portRSetSize, (F)portRSetPrint, sizeof(PortRSet), 482 (P)portTUnsetPack, (P)portTUnsetUnpack, (S)portTUnsetSize, (F)portTUnsetPrint, sizeof(PortTUnset), 483 (P)portRUnsetPack, (P)portRUnsetUnpack, (S)portRUnsetSize, (F)portRUnsetPrint, sizeof(PortRUnset), 484 (P)portTGetportPack, (P)portTGetportUnpack, (S)portTGetportSize, (F)portTGetportPrint, sizeof(PortTGetport), 485 (P)portRGetportPack, (P)portRGetportUnpack, (S)portRGetportSize, (F)portRGetportPrint, sizeof(PortRGetport), 486 (P)portTDumpPack, (P)portTDumpUnpack, (S)portTDumpSize, (F)portTDumpPrint, sizeof(PortTDump), 487 (P)portRDumpPack, (P)portRDumpUnpack, (S)portRDumpSize, (F)portRDumpPrint, sizeof(PortRDump), 488 (P)portTCallitPack, (P)portTCallitUnpack, (S)portTCallitSize, (F)portTCallitPrint, sizeof(PortTCallit), 489 (P)portRCallitPack, (P)portRCallitUnpack, (S)portRCallitSize, (F)portRCallitPrint, sizeof(PortRCallit), 490 }; 491 492 SunProg portProg = 493 { 494 PortProgram, 495 PortVersion, 496 proc, 497 nelem(proc), 498 }; 499