home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: SHell self-extracting ARchive
(archive/shar).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| Newsgroup Content (archive/news)
| magic
| Supported |
| 100%
| dexvert
| SHell self-extracting ARchive (archive/shar)
| magic
| Supported |
| 100%
| dexvert
| Internet Message Format (text/imf)
| magic
| Supported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| news or mail, ASCII text
| default
| |
| 100%
| checkBytes
| Printable ASCII
| default
| |
| 100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
| 100%
| siegfried
| fmt/329 Shell Archive Format
| default
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
| |
| 100%
| xdgMime
| message/rfc822
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 53 75 62 6a 65 63 74 3a | 20 20 76 30 36 69 30 39 |Subject:| v06i09|
|00000010| 37 3a 20 20 53 75 6e 20 | 52 50 43 20 53 6f 75 72 |7: Sun |RPC Sour|
|00000020| 63 65 20 28 72 70 63 32 | 29 2c 20 50 61 72 74 30 |ce (rpc2|), Part0|
|00000030| 39 2f 31 31 0a 4e 65 77 | 73 67 72 6f 75 70 73 3a |9/11.New|sgroups:|
|00000040| 20 6d 6f 64 2e 73 6f 75 | 72 63 65 73 0a 41 70 70 | mod.sou|rces.App|
|00000050| 72 6f 76 65 64 3a 20 72 | 73 40 6d 69 72 72 6f 72 |roved: r|s@mirror|
|00000060| 2e 55 55 43 50 0a 0a 53 | 75 62 6d 69 74 74 65 64 |.UUCP..S|ubmitted|
|00000070| 20 62 79 3a 20 63 63 61 | 21 53 55 4e 2e 43 4f 4d | by: cca|!SUN.COM|
|00000080| 21 6d 61 72 6b 73 20 28 | 4d 61 72 6b 20 53 74 65 |!marks (|Mark Ste|
|00000090| 69 6e 29 0a 4d 6f 64 2e | 73 6f 75 72 63 65 73 3a |in).Mod.|sources:|
|000000a0| 20 56 6f 6c 75 6d 65 20 | 36 2c 20 49 73 73 75 65 | Volume |6, Issue|
|000000b0| 20 39 37 0a 41 72 63 68 | 69 76 65 2d 6e 61 6d 65 | 97.Arch|ive-name|
|000000c0| 3a 20 72 70 63 32 2f 50 | 61 72 74 30 39 0a 0a 5b |: rpc2/P|art09..[|
|000000d0| 20 23 69 6e 63 6c 75 64 | 65 20 3c 73 61 6d 65 2d | #includ|e <same-|
|000000e0| 64 69 73 63 6c 61 69 6d | 65 72 2d 79 6f 75 27 76 |disclaim|er-you'v|
|000000f0| 65 2d 73 65 65 6e 2d 6f | 6e 2d 61 6c 6c 2d 6f 74 |e-seen-o|n-all-ot|
|00000100| 68 65 72 2d 70 61 72 74 | 73 2e 68 3e 20 2d 2d 72 |her-part|s.h> --r|
|00000110| 24 20 5d 0a 0a 53 75 6e | 20 52 50 43 20 73 6f 75 |$ ]..Sun| RPC sou|
|00000120| 72 63 65 20 28 70 61 72 | 74 20 39 20 6f 66 20 31 |rce (par|t 9 of 1|
|00000130| 31 29 2e 20 20 54 68 69 | 73 20 73 6f 66 74 77 61 |1). Thi|s softwa|
|00000140| 72 65 20 70 61 63 6b 61 | 67 65 20 63 6f 6e 74 61 |re packa|ge conta|
|00000150| 69 6e 73 20 63 6f 64 65 | 0a 61 6e 64 20 64 6f 63 |ins code|.and doc|
|00000160| 75 6d 65 6e 74 61 74 69 | 6f 6e 20 66 6f 72 20 52 |umentati|on for R|
|00000170| 65 76 69 73 69 6f 6e 20 | 33 2e 30 20 6f 66 20 74 |evision |3.0 of t|
|00000180| 68 65 20 53 75 6e 20 52 | 65 6d 6f 74 65 20 50 72 |he Sun R|emote Pr|
|00000190| 6f 63 65 64 75 72 65 20 | 43 61 6c 6c 0a 6c 69 62 |ocedure |Call.lib|
|000001a0| 72 61 72 79 2e 20 20 49 | 6e 20 61 64 64 69 74 69 |rary. I|n additi|
|000001b0| 6f 6e 2c 20 61 20 62 65 | 74 61 20 76 65 72 73 69 |on, a be|ta versi|
|000001c0| 6f 6e 20 6f 66 20 74 68 | 65 20 58 44 52 2f 52 50 |on of th|e XDR/RP|
|000001d0| 43 20 70 72 6f 74 6f 63 | 6f 6c 20 63 6f 6d 70 69 |C protoc|ol compi|
|000001e0| 6c 65 72 0a 69 73 20 69 | 6e 63 6c 75 64 65 64 2e |ler.is i|ncluded.|
|000001f0| 20 20 43 6f 6d 6d 65 6e | 74 73 20 61 62 6f 75 74 | Commen|ts about|
|00000200| 20 74 68 69 73 20 6c 61 | 74 65 73 74 20 72 65 6c | this la|test rel|
|00000210| 65 61 73 65 20 6d 61 79 | 20 62 65 20 6d 61 69 6c |ease may| be mail|
|00000220| 65 64 20 74 6f 0a 73 75 | 6e 21 72 70 63 20 6f 72 |ed to.su|n!rpc or|
|00000230| 20 72 70 63 40 73 75 6e | 2e 63 6f 6d 2e 0a 0a 53 | rpc@sun|.com...S|
|00000240| 75 6e 20 52 50 43 20 69 | 73 20 61 20 70 72 6f 64 |un RPC i|s a prod|
|00000250| 75 63 74 20 6f 66 20 53 | 75 6e 20 4d 69 63 72 6f |uct of S|un Micro|
|00000260| 73 79 73 74 65 6d 73 2c | 20 49 6e 63 2e 20 61 6e |systems,| Inc. an|
|00000270| 64 20 69 73 20 70 72 6f | 76 69 64 65 64 20 66 6f |d is pro|vided fo|
|00000280| 72 0a 75 6e 72 65 73 74 | 72 69 63 74 65 64 20 75 |r.unrest|ricted u|
|00000290| 73 65 20 70 72 6f 76 69 | 64 65 64 20 74 68 61 74 |se provi|ded that|
|000002a0| 20 74 68 69 73 20 6c 65 | 67 65 6e 64 20 69 73 20 | this le|gend is |
|000002b0| 69 6e 63 6c 75 64 65 64 | 20 6f 6e 20 61 6c 6c 20 |included| on all |
|000002c0| 74 61 70 65 0a 6d 65 64 | 69 61 20 61 6e 64 20 61 |tape.med|ia and a|
|000002d0| 73 20 61 20 70 61 72 74 | 20 6f 66 20 74 68 65 20 |s a part| of the |
|000002e0| 73 6f 66 74 77 61 72 65 | 20 70 72 6f 67 72 61 6d |software| program|
|000002f0| 20 69 6e 20 77 68 6f 6c | 65 20 6f 72 20 70 61 72 | in whol|e or par|
|00000300| 74 2e 20 20 55 73 65 72 | 73 0a 6d 61 79 20 63 6f |t. User|s.may co|
|00000310| 70 79 20 6f 72 20 6d 6f | 64 69 66 79 20 53 75 6e |py or mo|dify Sun|
|00000320| 20 52 50 43 20 77 69 74 | 68 6f 75 74 20 63 68 61 | RPC wit|hout cha|
|00000330| 72 67 65 2c 20 62 75 74 | 20 61 72 65 20 6e 6f 74 |rge, but| are not|
|00000340| 20 61 75 74 68 6f 72 69 | 7a 65 64 20 74 6f 0a 6c | authori|zed to.l|
|00000350| 69 63 65 6e 73 65 20 6f | 72 20 64 69 73 74 72 69 |icense o|r distri|
|00000360| 62 75 74 65 20 69 74 20 | 74 6f 20 61 6e 79 6f 6e |bute it |to anyon|
|00000370| 65 20 65 6c 73 65 20 65 | 78 63 65 70 74 20 61 73 |e else e|xcept as|
|00000380| 20 70 61 72 74 20 6f 66 | 20 61 20 70 72 6f 64 75 | part of| a produ|
|00000390| 63 74 20 6f 72 0a 70 72 | 6f 67 72 61 6d 20 64 65 |ct or.pr|ogram de|
|000003a0| 76 65 6c 6f 70 65 64 20 | 62 79 20 74 68 65 20 75 |veloped |by the u|
|000003b0| 73 65 72 2e 0a 0a 2d 20 | 2d 20 2d 20 2d 20 2d 20 |ser...- |- - - - |
|000003c0| 2d 20 2d 20 2d 20 2d 20 | 43 20 55 20 54 20 2d 20 |- - - - |C U T - |
|000003d0| 48 20 45 20 52 20 45 20 | 2d 20 2d 20 2d 20 2d 20 |H E R E |- - - - |
|000003e0| 2d 20 2d 20 2d 20 2d 20 | 2d 20 2d 20 2d 20 2d 20 |- - - - |- - - - |
|000003f0| 2d 20 2d 20 2d 20 2d 20 | 2d 20 2d 0a 23 21 20 2f |- - - - |- -.#! /|
|00000400| 62 69 6e 2f 73 68 0a 23 | 20 54 68 69 73 20 69 73 |bin/sh.#| This is|
|00000410| 20 61 20 73 68 65 6c 6c | 20 61 72 63 68 69 76 65 | a shell| archive|
|00000420| 2c 20 6d 65 61 6e 69 6e | 67 3a 0a 23 20 31 2e 20 |, meanin|g:.# 1. |
|00000430| 52 65 6d 6f 76 65 20 65 | 76 65 72 79 74 68 69 6e |Remove e|verythin|
|00000440| 67 20 61 62 6f 76 65 20 | 74 68 65 20 23 21 20 2f |g above |the #! /|
|00000450| 62 69 6e 2f 73 68 20 6c | 69 6e 65 2e 0a 23 20 32 |bin/sh l|ine..# 2|
|00000460| 2e 20 53 61 76 65 20 74 | 68 65 20 72 65 73 75 6c |. Save t|he resul|
|00000470| 74 69 6e 67 20 74 65 78 | 74 20 69 6e 20 61 20 66 |ting tex|t in a f|
|00000480| 69 6c 65 2e 0a 23 20 33 | 2e 20 45 78 65 63 75 74 |ile..# 3|. Execut|
|00000490| 65 20 74 68 65 20 66 69 | 6c 65 20 77 69 74 68 20 |e the fi|le with |
|000004a0| 2f 62 69 6e 2f 73 68 20 | 28 6e 6f 74 20 63 73 68 |/bin/sh |(not csh|
|000004b0| 29 20 74 6f 20 63 72 65 | 61 74 65 3a 0a 23 09 72 |) to cre|ate:.#.r|
|000004c0| 70 63 2f 72 70 63 6c 69 | 62 2f 78 64 72 5f 66 6c |pc/rpcli|b/xdr_fl|
|000004d0| 6f 61 74 2e 63 0a 23 09 | 72 70 63 2f 72 70 63 6c |oat.c.#.|rpc/rpcl|
|000004e0| 69 62 2f 78 64 72 5f 6d | 65 6d 2e 63 0a 23 09 72 |ib/xdr_m|em.c.#.r|
|000004f0| 70 63 2f 72 70 63 6c 69 | 62 2f 78 64 72 5f 72 65 |pc/rpcli|b/xdr_re|
|00000500| 63 2e 63 0a 23 09 72 70 | 63 2f 72 70 63 6c 69 62 |c.c.#.rp|c/rpclib|
|00000510| 2f 78 64 72 5f 72 65 66 | 65 72 65 6e 63 65 2e 63 |/xdr_ref|erence.c|
|00000520| 0a 23 09 72 70 63 2f 72 | 70 63 6c 69 62 2f 78 64 |.#.rpc/r|pclib/xd|
|00000530| 72 5f 73 74 64 69 6f 2e | 63 0a 23 09 72 70 63 2f |r_stdio.|c.#.rpc/|
|00000540| 74 6f 6f 6c 73 2f 70 6f | 72 74 6d 61 70 2e 38 63 |tools/po|rtmap.8c|
|00000550| 0a 23 09 72 70 63 2f 74 | 6f 6f 6c 73 2f 70 6f 72 |.#.rpc/t|ools/por|
|00000560| 74 6d 61 70 2e 63 0a 23 | 20 54 68 69 73 20 61 72 |tmap.c.#| This ar|
|00000570| 63 68 69 76 65 20 63 72 | 65 61 74 65 64 3a 20 4d |chive cr|eated: M|
|00000580| 6f 6e 20 4a 75 6c 20 31 | 34 20 31 36 3a 35 35 3a |on Jul 1|4 16:55:|
|00000590| 34 30 20 31 39 38 36 0a | 65 78 70 6f 72 74 20 50 |40 1986.|export P|
|000005a0| 41 54 48 3b 20 50 41 54 | 48 3d 2f 62 69 6e 3a 2f |ATH; PAT|H=/bin:/|
|000005b0| 75 73 72 2f 62 69 6e 3a | 24 50 41 54 48 0a 66 6f |usr/bin:|$PATH.fo|
|000005c0| 72 20 64 20 69 6e 20 72 | 70 63 20 72 70 63 2f 64 |r d in r|pc rpc/d|
|000005d0| 6f 63 20 72 70 63 2f 72 | 70 63 6c 69 62 20 72 70 |oc rpc/r|pclib rp|
|000005e0| 63 2f 74 6f 6f 6c 73 20 | 72 70 63 2f 74 6f 79 73 |c/tools |rpc/toys|
|000005f0| 20 72 70 63 2f 72 70 63 | 6c 69 62 2f 70 72 6f 66 | rpc/rpc|lib/prof|
|00000600| 69 6c 65 64 20 72 70 63 | 2f 72 70 63 67 65 6e 20 |iled rpc|/rpcgen |
|00000610| 72 70 63 2f 72 70 63 67 | 65 6e 2f 74 65 73 74 0a |rpc/rpcg|en/test.|
|00000620| 64 6f 0a 09 69 66 20 74 | 65 73 74 20 21 20 2d 64 |do..if t|est ! -d|
|00000630| 20 24 64 0a 09 74 68 65 | 6e 0a 09 09 65 63 68 6f | $d..the|n...echo|
|00000640| 20 22 73 68 61 72 3a 20 | 4d 61 6b 69 6e 67 20 64 | "shar: |Making d|
|00000650| 69 72 65 63 74 6f 72 79 | 20 24 64 22 0a 09 09 6d |irectory| $d"...m|
|00000660| 6b 64 69 72 20 24 64 0a | 09 09 63 68 6d 6f 64 20 |kdir $d.|..chmod |
|00000670| 37 35 35 20 24 64 0a 09 | 66 69 0a 64 6f 6e 65 0a |755 $d..|fi.done.|
|00000680| 65 63 68 6f 20 73 68 61 | 72 3a 20 22 65 78 74 72 |echo sha|r: "extr|
|00000690| 61 63 74 69 6e 67 20 27 | 72 70 63 2f 72 70 63 6c |acting '|rpc/rpcl|
|000006a0| 69 62 2f 78 64 72 5f 66 | 6c 6f 61 74 2e 63 27 22 |ib/xdr_f|loat.c'"|
|000006b0| 20 27 28 36 36 32 33 20 | 63 68 61 72 61 63 74 65 | '(6623 |characte|
|000006c0| 72 73 29 27 0a 69 66 20 | 74 65 73 74 20 2d 66 20 |rs)'.if |test -f |
|000006d0| 27 72 70 63 2f 72 70 63 | 6c 69 62 2f 78 64 72 5f |'rpc/rpc|lib/xdr_|
|000006e0| 66 6c 6f 61 74 2e 63 27 | 0a 74 68 65 6e 0a 09 65 |float.c'|.then..e|
|000006f0| 63 68 6f 20 73 68 61 72 | 3a 20 22 77 69 6c 6c 20 |cho shar|: "will |
|00000700| 6e 6f 74 20 6f 76 65 72 | 2d 77 72 69 74 65 20 65 |not over|-write e|
|00000710| 78 69 73 74 69 6e 67 20 | 66 69 6c 65 20 27 72 70 |xisting |file 'rp|
|00000720| 63 2f 72 70 63 6c 69 62 | 2f 78 64 72 5f 66 6c 6f |c/rpclib|/xdr_flo|
|00000730| 61 74 2e 63 27 22 0a 65 | 6c 73 65 0a 73 65 64 20 |at.c'".e|lse.sed |
|00000740| 27 73 2f 5e 58 2f 2f 27 | 20 3c 3c 20 5c 53 48 41 |'s/^X//'| << \SHA|
|00000750| 52 5f 45 4f 46 20 3e 20 | 27 72 70 63 2f 72 70 63 |R_EOF > |'rpc/rpc|
|00000760| 6c 69 62 2f 78 64 72 5f | 66 6c 6f 61 74 2e 63 27 |lib/xdr_|float.c'|
|00000770| 0a 58 2f 2a 0a 58 20 2a | 20 53 75 6e 20 52 50 43 |.X/*.X *| Sun RPC|
|00000780| 20 69 73 20 61 20 70 72 | 6f 64 75 63 74 20 6f 66 | is a pr|oduct of|
|00000790| 20 53 75 6e 20 4d 69 63 | 72 6f 73 79 73 74 65 6d | Sun Mic|rosystem|
|000007a0| 73 2c 20 49 6e 63 2e 20 | 61 6e 64 20 69 73 20 70 |s, Inc. |and is p|
|000007b0| 72 6f 76 69 64 65 64 20 | 66 6f 72 0a 58 20 2a 20 |rovided |for.X * |
|000007c0| 75 6e 72 65 73 74 72 69 | 63 74 65 64 20 75 73 65 |unrestri|cted use|
|000007d0| 20 70 72 6f 76 69 64 65 | 64 20 74 68 61 74 20 74 | provide|d that t|
|000007e0| 68 69 73 20 6c 65 67 65 | 6e 64 20 69 73 20 69 6e |his lege|nd is in|
|000007f0| 63 6c 75 64 65 64 20 6f | 6e 20 61 6c 6c 20 74 61 |cluded o|n all ta|
|00000800| 70 65 0a 58 20 2a 20 6d | 65 64 69 61 20 61 6e 64 |pe.X * m|edia and|
|00000810| 20 61 73 20 61 20 70 61 | 72 74 20 6f 66 20 74 68 | as a pa|rt of th|
|00000820| 65 20 73 6f 66 74 77 61 | 72 65 20 70 72 6f 67 72 |e softwa|re progr|
|00000830| 61 6d 20 69 6e 20 77 68 | 6f 6c 65 20 6f 72 20 70 |am in wh|ole or p|
|00000840| 61 72 74 2e 20 20 55 73 | 65 72 73 0a 58 20 2a 20 |art. Us|ers.X * |
|00000850| 6d 61 79 20 63 6f 70 79 | 20 6f 72 20 6d 6f 64 69 |may copy| or modi|
|00000860| 66 79 20 53 75 6e 20 52 | 50 43 20 77 69 74 68 6f |fy Sun R|PC witho|
|00000870| 75 74 20 63 68 61 72 67 | 65 2c 20 62 75 74 20 61 |ut charg|e, but a|
|00000880| 72 65 20 6e 6f 74 20 61 | 75 74 68 6f 72 69 7a 65 |re not a|uthorize|
|00000890| 64 0a 58 20 2a 20 74 6f | 20 6c 69 63 65 6e 73 65 |d.X * to| license|
|000008a0| 20 6f 72 20 64 69 73 74 | 72 69 62 75 74 65 20 69 | or dist|ribute i|
|000008b0| 74 20 74 6f 20 61 6e 79 | 6f 6e 65 20 65 6c 73 65 |t to any|one else|
|000008c0| 20 65 78 63 65 70 74 20 | 61 73 20 70 61 72 74 20 | except |as part |
|000008d0| 6f 66 20 61 20 70 72 6f | 64 75 63 74 20 6f 72 0a |of a pro|duct or.|
|000008e0| 58 20 2a 20 70 72 6f 67 | 72 61 6d 20 64 65 76 65 |X * prog|ram deve|
|000008f0| 6c 6f 70 65 64 20 62 79 | 20 74 68 65 20 75 73 65 |loped by| the use|
|00000900| 72 2e 0a 58 20 2a 20 0a | 58 20 2a 20 53 55 4e 20 |r..X * .|X * SUN |
|00000910| 52 50 43 20 49 53 20 50 | 52 4f 56 49 44 45 44 20 |RPC IS P|ROVIDED |
|00000920| 41 53 20 49 53 20 57 49 | 54 48 20 4e 4f 20 57 41 |AS IS WI|TH NO WA|
|00000930| 52 52 41 4e 54 49 45 53 | 20 4f 46 20 41 4e 59 20 |RRANTIES| OF ANY |
|00000940| 4b 49 4e 44 20 49 4e 43 | 4c 55 44 49 4e 47 20 54 |KIND INC|LUDING T|
|00000950| 48 45 0a 58 20 2a 20 57 | 41 52 52 41 4e 54 49 45 |HE.X * W|ARRANTIE|
|00000960| 53 20 4f 46 20 44 45 53 | 49 47 4e 2c 20 4d 45 52 |S OF DES|IGN, MER|
|00000970| 43 48 41 4e 54 49 42 49 | 4c 49 54 59 20 41 4e 44 |CHANTIBI|LITY AND|
|00000980| 20 46 49 54 4e 45 53 53 | 20 46 4f 52 20 41 20 50 | FITNESS| FOR A P|
|00000990| 41 52 54 49 43 55 4c 41 | 52 0a 58 20 2a 20 50 55 |ARTICULA|R.X * PU|
|000009a0| 52 50 4f 53 45 2c 20 4f | 52 20 41 52 49 53 49 4e |RPOSE, O|R ARISIN|
|000009b0| 47 20 46 52 4f 4d 20 41 | 20 43 4f 55 52 53 45 20 |G FROM A| COURSE |
|000009c0| 4f 46 20 44 45 41 4c 49 | 4e 47 2c 20 55 53 41 47 |OF DEALI|NG, USAG|
|000009d0| 45 20 4f 52 20 54 52 41 | 44 45 20 50 52 41 43 54 |E OR TRA|DE PRACT|
|000009e0| 49 43 45 2e 0a 58 20 2a | 20 0a 58 20 2a 20 53 75 |ICE..X *| .X * Su|
|000009f0| 6e 20 52 50 43 20 69 73 | 20 70 72 6f 76 69 64 65 |n RPC is| provide|
|00000a00| 64 20 77 69 74 68 20 6e | 6f 20 73 75 70 70 6f 72 |d with n|o suppor|
|00000a10| 74 20 61 6e 64 20 77 69 | 74 68 6f 75 74 20 61 6e |t and wi|thout an|
|00000a20| 79 20 6f 62 6c 69 67 61 | 74 69 6f 6e 20 6f 6e 20 |y obliga|tion on |
|00000a30| 74 68 65 0a 58 20 2a 20 | 70 61 72 74 20 6f 66 20 |the.X * |part of |
|00000a40| 53 75 6e 20 4d 69 63 72 | 6f 73 79 73 74 65 6d 73 |Sun Micr|osystems|
|00000a50| 2c 20 49 6e 63 2e 20 74 | 6f 20 61 73 73 69 73 74 |, Inc. t|o assist|
|00000a60| 20 69 6e 20 69 74 73 20 | 75 73 65 2c 20 63 6f 72 | in its |use, cor|
|00000a70| 72 65 63 74 69 6f 6e 2c | 0a 58 20 2a 20 6d 6f 64 |rection,|.X * mod|
|00000a80| 69 66 69 63 61 74 69 6f | 6e 20 6f 72 20 65 6e 68 |ificatio|n or enh|
|00000a90| 61 6e 63 65 6d 65 6e 74 | 2e 0a 58 20 2a 20 0a 58 |ancement|..X * .X|
|00000aa0| 20 2a 20 53 55 4e 20 4d | 49 43 52 4f 53 59 53 54 | * SUN M|ICROSYST|
|00000ab0| 45 4d 53 2c 20 49 4e 43 | 2e 20 53 48 41 4c 4c 20 |EMS, INC|. SHALL |
|00000ac0| 48 41 56 45 20 4e 4f 20 | 4c 49 41 42 49 4c 49 54 |HAVE NO |LIABILIT|
|00000ad0| 59 20 57 49 54 48 20 52 | 45 53 50 45 43 54 20 54 |Y WITH R|ESPECT T|
|00000ae0| 4f 20 54 48 45 0a 58 20 | 2a 20 49 4e 46 52 49 4e |O THE.X |* INFRIN|
|00000af0| 47 45 4d 45 4e 54 20 4f | 46 20 43 4f 50 59 52 49 |GEMENT O|F COPYRI|
|00000b00| 47 48 54 53 2c 20 54 52 | 41 44 45 20 53 45 43 52 |GHTS, TR|ADE SECR|
|00000b10| 45 54 53 20 4f 52 20 41 | 4e 59 20 50 41 54 45 4e |ETS OR A|NY PATEN|
|00000b20| 54 53 20 42 59 20 53 55 | 4e 20 52 50 43 0a 58 20 |TS BY SU|N RPC.X |
|00000b30| 2a 20 4f 52 20 41 4e 59 | 20 50 41 52 54 20 54 48 |* OR ANY| PART TH|
|00000b40| 45 52 45 4f 46 2e 0a 58 | 20 2a 20 0a 58 20 2a 20 |EREOF..X| * .X * |
|00000b50| 49 6e 20 6e 6f 20 65 76 | 65 6e 74 20 77 69 6c 6c |In no ev|ent will|
|00000b60| 20 53 75 6e 20 4d 69 63 | 72 6f 73 79 73 74 65 6d | Sun Mic|rosystem|
|00000b70| 73 2c 20 49 6e 63 2e 20 | 62 65 20 6c 69 61 62 6c |s, Inc. |be liabl|
|00000b80| 65 20 66 6f 72 20 61 6e | 79 20 6c 6f 73 74 20 72 |e for an|y lost r|
|00000b90| 65 76 65 6e 75 65 0a 58 | 20 2a 20 6f 72 20 70 72 |evenue.X| * or pr|
|00000ba0| 6f 66 69 74 73 20 6f 72 | 20 6f 74 68 65 72 20 73 |ofits or| other s|
|00000bb0| 70 65 63 69 61 6c 2c 20 | 69 6e 64 69 72 65 63 74 |pecial, |indirect|
|00000bc0| 20 61 6e 64 20 63 6f 6e | 73 65 71 75 65 6e 74 69 | and con|sequenti|
|00000bd0| 61 6c 20 64 61 6d 61 67 | 65 73 2c 20 65 76 65 6e |al damag|es, even|
|00000be0| 20 69 66 0a 58 20 2a 20 | 53 75 6e 20 68 61 73 20 | if.X * |Sun has |
|00000bf0| 62 65 65 6e 20 61 64 76 | 69 73 65 64 20 6f 66 20 |been adv|ised of |
|00000c00| 74 68 65 20 70 6f 73 73 | 69 62 69 6c 69 74 79 20 |the poss|ibility |
|00000c10| 6f 66 20 73 75 63 68 20 | 64 61 6d 61 67 65 73 2e |of such |damages.|
|00000c20| 0a 58 20 2a 20 0a 58 20 | 2a 20 53 75 6e 20 4d 69 |.X * .X |* Sun Mi|
|00000c30| 63 72 6f 73 79 73 74 65 | 6d 73 2c 20 49 6e 63 2e |crosyste|ms, Inc.|
|00000c40| 0a 58 20 2a 20 32 35 35 | 30 20 47 61 72 63 69 61 |.X * 255|0 Garcia|
|00000c50| 20 41 76 65 6e 75 65 0a | 58 20 2a 20 4d 6f 75 6e | Avenue.|X * Moun|
|00000c60| 74 61 69 6e 20 56 69 65 | 77 2c 20 43 61 6c 69 66 |tain Vie|w, Calif|
|00000c70| 6f 72 6e 69 61 20 20 39 | 34 30 34 33 0a 58 20 2a |ornia 9|4043.X *|
|00000c80| 2f 0a 58 23 69 66 6e 64 | 65 66 20 6c 69 6e 74 0a |/.X#ifnd|ef lint.|
|00000c90| 58 73 74 61 74 69 63 20 | 63 68 61 72 20 73 63 63 |Xstatic |char scc|
|00000ca0| 73 69 64 5b 5d 20 3d 20 | 22 40 28 23 29 78 64 72 |sid[] = |"@(#)xdr|
|00000cb0| 5f 66 6c 6f 61 74 2e 63 | 20 31 2e 31 20 38 36 2f |_float.c| 1.1 86/|
|00000cc0| 30 32 2f 30 33 20 43 6f | 70 79 72 20 31 39 38 34 |02/03 Co|pyr 1984|
|00000cd0| 20 53 75 6e 20 4d 69 63 | 72 6f 22 3b 0a 58 23 65 | Sun Mic|ro";.X#e|
|00000ce0| 6e 64 69 66 0a 58 0a 58 | 2f 2a 0a 58 20 2a 20 78 |ndif.X.X|/*.X * x|
|00000cf0| 64 72 5f 66 6c 6f 61 74 | 2e 63 2c 20 47 65 6e 65 |dr_float|.c, Gene|
|00000d00| 72 69 63 20 58 44 52 20 | 72 6f 75 74 69 6e 65 73 |ric XDR |routines|
|00000d10| 20 69 6d 70 65 6c 6d 65 | 6e 74 61 74 69 6f 6e 2e | impelme|ntation.|
|00000d20| 0a 58 20 2a 0a 58 20 2a | 20 43 6f 70 79 72 69 67 |.X *.X *| Copyrig|
|00000d30| 68 74 20 28 43 29 20 31 | 39 38 34 2c 20 53 75 6e |ht (C) 1|984, Sun|
|00000d40| 20 4d 69 63 72 6f 73 79 | 73 74 65 6d 73 2c 20 49 | Microsy|stems, I|
|00000d50| 6e 63 2e 0a 58 20 2a 0a | 58 20 2a 20 54 68 65 73 |nc..X *.|X * Thes|
|00000d60| 65 20 61 72 65 20 74 68 | 65 20 22 66 6c 6f 61 74 |e are th|e "float|
|00000d70| 69 6e 67 20 70 6f 69 6e | 74 22 20 78 64 72 20 72 |ing poin|t" xdr r|
|00000d80| 6f 75 74 69 6e 65 73 20 | 75 73 65 64 20 74 6f 20 |outines |used to |
|00000d90| 28 64 65 29 73 65 72 69 | 61 6c 69 7a 65 0a 58 20 |(de)seri|alize.X |
|00000da0| 2a 20 6d 6f 73 74 20 63 | 6f 6d 6d 6f 6e 20 64 61 |* most c|ommon da|
|00000db0| 74 61 20 69 74 65 6d 73 | 2e 20 20 53 65 65 20 78 |ta items|. See x|
|00000dc0| 64 72 2e 68 20 66 6f 72 | 20 6d 6f 72 65 20 69 6e |dr.h for| more in|
|00000dd0| 66 6f 20 6f 6e 20 74 68 | 65 20 69 6e 74 65 72 66 |fo on th|e interf|
|00000de0| 61 63 65 20 74 6f 0a 58 | 20 2a 20 78 64 72 2e 0a |ace to.X| * xdr..|
|00000df0| 58 20 2a 2f 0a 58 0a 58 | 23 69 6e 63 6c 75 64 65 |X */.X.X|#include|
|00000e00| 20 22 74 79 70 65 73 2e | 68 22 0a 58 23 69 6e 63 | "types.|h".X#inc|
|00000e10| 6c 75 64 65 20 22 78 64 | 72 2e 68 22 0a 58 23 69 |lude "xd|r.h".X#i|
|00000e20| 6e 63 6c 75 64 65 20 3c | 73 74 64 69 6f 2e 68 3e |nclude <|stdio.h>|
|00000e30| 0a 58 0a 58 2f 2a 0a 58 | 20 2a 20 4e 42 3a 20 4e |.X.X/*.X| * NB: N|
|00000e40| 6f 74 20 70 6f 72 74 61 | 62 6c 65 2e 0a 58 20 2a |ot porta|ble..X *|
|00000e50| 20 54 68 69 73 20 72 6f | 75 74 69 6e 65 20 77 6f | This ro|utine wo|
|00000e60| 72 6b 73 20 6f 6e 20 53 | 75 6e 73 20 28 53 6b 79 |rks on S|uns (Sky|
|00000e70| 20 2f 20 36 38 30 30 30 | 27 73 29 20 61 6e 64 20 | / 68000|'s) and |
|00000e80| 56 61 78 65 6e 2e 0a 58 | 20 2a 2f 0a 58 20 20 20 |Vaxen..X| */.X |
|00000e90| 0a 58 2f 2a 20 57 68 61 | 74 20 49 45 45 45 20 73 |.X/* Wha|t IEEE s|
|00000ea0| 69 6e 67 6c 65 20 70 72 | 65 63 69 73 69 6f 6e 20 |ingle pr|ecision |
|00000eb0| 66 6c 6f 61 74 69 6e 67 | 20 70 6f 69 6e 74 20 6c |floating| point l|
|00000ec0| 6f 6f 6b 73 20 6c 69 6b | 65 20 6f 6e 20 61 20 56 |ooks lik|e on a V|
|00000ed0| 61 78 20 2a 2f 0a 58 73 | 74 72 75 63 74 20 20 69 |ax */.Xs|truct i|
|00000ee0| 65 65 65 5f 73 69 6e 67 | 6c 65 20 7b 0a 58 09 75 |eee_sing|le {.X.u|
|00000ef0| 6e 73 69 67 6e 65 64 20 | 69 6e 74 09 6d 61 6e 74 |nsigned |int.mant|
|00000f00| 69 73 73 61 3a 20 32 33 | 3b 0a 58 09 75 6e 73 69 |issa: 23|;.X.unsi|
|00000f10| 67 6e 65 64 20 69 6e 74 | 09 65 78 70 20 20 20 20 |gned int|.exp |
|00000f20| 20 3a 20 38 3b 0a 58 09 | 75 6e 73 69 67 6e 65 64 | : 8;.X.|unsigned|
|00000f30| 20 69 6e 74 09 73 69 67 | 6e 20 20 20 20 3a 20 31 | int.sig|n : 1|
|00000f40| 3b 0a 58 7d 3b 0a 58 0a | 58 2f 2a 20 56 61 78 20 |;.X};.X.|X/* Vax |
|00000f50| 73 69 6e 67 6c 65 20 70 | 72 65 63 69 73 69 6f 6e |single p|recision|
|00000f60| 20 66 6c 6f 61 74 69 6e | 67 20 70 6f 69 6e 74 20 | floatin|g point |
|00000f70| 2a 2f 0a 58 73 74 72 75 | 63 74 20 20 76 61 78 5f |*/.Xstru|ct vax_|
|00000f80| 73 69 6e 67 6c 65 20 7b | 0a 58 09 75 6e 73 69 67 |single {|.X.unsig|
|00000f90| 6e 65 64 20 69 6e 74 09 | 6d 61 6e 74 69 73 73 61 |ned int.|mantissa|
|00000fa0| 31 20 3a 20 37 3b 0a 58 | 09 75 6e 73 69 67 6e 65 |1 : 7;.X|.unsigne|
|00000fb0| 64 20 69 6e 74 09 65 78 | 70 20 20 20 20 20 20 20 |d int.ex|p |
|00000fc0| 3a 20 38 3b 0a 58 09 75 | 6e 73 69 67 6e 65 64 20 |: 8;.X.u|nsigned |
|00000fd0| 69 6e 74 09 73 69 67 6e | 20 20 20 20 20 20 3a 20 |int.sign| : |
|00000fe0| 31 3b 0a 58 09 75 6e 73 | 69 67 6e 65 64 20 69 6e |1;.X.uns|igned in|
|00000ff0| 74 09 6d 61 6e 74 69 73 | 73 61 32 20 3a 20 31 36 |t.mantis|sa2 : 16|
|00001000| 3b 0a 58 09 09 0a 58 7d | 3b 0a 58 0a 58 23 64 65 |;.X...X}|;.X.X#de|
|00001010| 66 69 6e 65 20 56 41 58 | 5f 53 4e 47 5f 42 49 41 |fine VAX|_SNG_BIA|
|00001020| 53 20 20 20 20 30 78 38 | 31 0a 58 23 64 65 66 69 |S 0x8|1.X#defi|
|00001030| 6e 65 20 49 45 45 45 5f | 53 4e 47 5f 42 49 41 53 |ne IEEE_|SNG_BIAS|
|00001040| 20 20 20 30 78 37 66 0a | 58 20 0a 58 73 74 61 74 | 0x7f.|X .Xstat|
|00001050| 69 63 20 73 74 72 75 63 | 74 20 73 67 6c 5f 6c 69 |ic struc|t sgl_li|
|00001060| 6d 69 74 73 20 7b 0a 58 | 09 73 74 72 75 63 74 20 |mits {.X|.struct |
|00001070| 76 61 78 5f 73 69 6e 67 | 6c 65 20 73 3b 0a 58 09 |vax_sing|le s;.X.|
|00001080| 73 74 72 75 63 74 20 69 | 65 65 65 5f 73 69 6e 67 |struct i|eee_sing|
|00001090| 6c 65 20 69 65 65 65 3b | 0a 58 7d 20 73 67 6c 5f |le ieee;|.X} sgl_|
|000010a0| 6c 69 6d 69 74 73 5b 32 | 5d 20 3d 20 7b 0a 58 09 |limits[2|] = {.X.|
|000010b0| 7b 7b 20 30 78 33 66 2c | 20 30 78 66 66 2c 20 30 |{{ 0x3f,| 0xff, 0|
|000010c0| 78 30 2c 20 30 78 66 66 | 66 66 20 7d 2c 09 2f 2a |x0, 0xff|ff },./*|
|000010d0| 20 4d 61 78 20 56 61 78 | 20 2a 2f 0a 58 09 7b 20 | Max Vax| */.X.{ |
|000010e0| 30 78 30 2c 20 30 78 66 | 66 2c 20 30 78 30 20 7d |0x0, 0xf|f, 0x0 }|
|000010f0| 7d 2c 09 09 2f 2a 20 4d | 61 78 20 49 45 45 45 20 |},../* M|ax IEEE |
|00001100| 2a 2f 0a 58 09 7b 7b 20 | 30 78 30 2c 20 30 78 30 |*/.X.{{ |0x0, 0x0|
|00001110| 2c 20 30 78 30 2c 20 30 | 78 30 20 7d 2c 09 2f 2a |, 0x0, 0|x0 },./*|
|00001120| 20 4d 69 6e 20 56 61 78 | 20 2a 2f 0a 58 09 7b 20 | Min Vax| */.X.{ |
|00001130| 30 78 30 2c 20 30 78 30 | 2c 20 30 78 30 20 7d 7d |0x0, 0x0|, 0x0 }}|
|00001140| 09 09 2f 2a 20 4d 69 6e | 20 49 45 45 45 20 2a 2f |../* Min| IEEE */|
|00001150| 0a 58 7d 3b 0a 58 0a 58 | 62 6f 6f 6c 5f 74 20 0a |.X};.X.X|bool_t .|
|00001160| 58 78 64 72 5f 66 6c 6f | 61 74 28 78 64 72 73 2c |Xxdr_flo|at(xdrs,|
|00001170| 20 66 70 29 0a 58 09 72 | 65 67 69 73 74 65 72 20 | fp).X.r|egister |
|00001180| 58 44 52 20 2a 78 64 72 | 73 3b 0a 58 09 72 65 67 |XDR *xdr|s;.X.reg|
|00001190| 69 73 74 65 72 20 66 6c | 6f 61 74 20 2a 66 70 3b |ister fl|oat *fp;|
|000011a0| 0a 58 7b 0a 58 09 73 74 | 72 75 63 74 20 69 65 65 |.X{.X.st|ruct iee|
|000011b0| 65 5f 73 69 6e 67 6c 65 | 20 69 73 3b 0a 58 09 73 |e_single| is;.X.s|
|000011c0| 74 72 75 63 74 20 76 61 | 78 5f 73 69 6e 67 6c 65 |truct va|x_single|
|000011d0| 20 76 73 2c 20 2a 76 73 | 70 3b 0a 58 09 73 74 72 | vs, *vs|p;.X.str|
|000011e0| 75 63 74 20 73 67 6c 5f | 6c 69 6d 69 74 73 20 2a |uct sgl_|limits *|
|000011f0| 6c 69 6d 3b 0a 58 09 69 | 6e 74 20 69 3b 0a 58 0a |lim;.X.i|nt i;.X.|
|00001200| 58 09 73 77 69 74 63 68 | 20 28 78 64 72 73 2d 3e |X.switch| (xdrs->|
|00001210| 78 5f 6f 70 29 20 7b 0a | 58 0a 58 09 63 61 73 65 |x_op) {.|X.X.case|
|00001220| 20 58 44 52 5f 45 4e 43 | 4f 44 45 3a 0a 58 23 69 | XDR_ENC|ODE:.X#i|
|00001230| 66 64 65 66 20 6d 63 36 | 38 30 30 30 0a 58 09 09 |fdef mc6|8000.X..|
|00001240| 72 65 74 75 72 6e 20 28 | 58 44 52 5f 50 55 54 4c |return (|XDR_PUTL|
|00001250| 4f 4e 47 28 78 64 72 73 | 2c 20 28 6c 6f 6e 67 20 |ONG(xdrs|, (long |
|00001260| 2a 29 66 70 29 29 3b 0a | 58 23 65 6c 73 65 0a 58 |*)fp));.|X#else.X|
|00001270| 09 09 76 73 20 3d 20 2a | 28 28 73 74 72 75 63 74 |..vs = *|((struct|
|00001280| 20 76 61 78 5f 73 69 6e | 67 6c 65 20 2a 29 66 70 | vax_sin|gle *)fp|
|00001290| 29 3b 0a 58 09 09 66 6f | 72 20 28 69 20 3d 20 30 |);.X..fo|r (i = 0|
|000012a0| 2c 20 6c 69 6d 20 3d 20 | 73 67 6c 5f 6c 69 6d 69 |, lim = |sgl_limi|
|000012b0| 74 73 3b 0a 58 09 09 09 | 69 20 3c 20 73 69 7a 65 |ts;.X...|i < size|
|000012c0| 6f 66 28 73 67 6c 5f 6c | 69 6d 69 74 73 29 2f 73 |of(sgl_l|imits)/s|
|000012d0| 69 7a 65 6f 66 28 73 74 | 72 75 63 74 20 73 67 6c |izeof(st|ruct sgl|
|000012e0| 5f 6c 69 6d 69 74 73 29 | 3b 0a 58 09 09 09 69 2b |_limits)|;.X...i+|
|000012f0| 2b 2c 20 6c 69 6d 2b 2b | 29 20 7b 0a 58 09 09 09 |+, lim++|) {.X...|
|00001300| 69 66 20 28 28 76 73 2e | 6d 61 6e 74 69 73 73 61 |if ((vs.|mantissa|
|00001310| 32 20 3d 3d 20 6c 69 6d | 2d 3e 73 2e 6d 61 6e 74 |2 == lim|->s.mant|
|00001320| 69 73 73 61 32 29 20 26 | 26 0a 58 09 09 09 09 28 |issa2) &|&.X....(|
|00001330| 76 73 2e 65 78 70 20 3d | 3d 20 6c 69 6d 2d 3e 73 |vs.exp =|= lim->s|
|00001340| 2e 65 78 70 29 20 26 26 | 0a 58 09 09 09 09 28 76 |.exp) &&|.X....(v|
|00001350| 73 2e 6d 61 6e 74 69 73 | 73 61 31 20 3d 3d 20 6c |s.mantis|sa1 == l|
|00001360| 69 6d 2d 3e 73 2e 6d 61 | 6e 74 69 73 73 61 31 29 |im->s.ma|ntissa1)|
|00001370| 29 20 7b 0a 58 09 09 09 | 09 69 73 20 3d 20 6c 69 |) {.X...|.is = li|
|00001380| 6d 2d 3e 69 65 65 65 3b | 0a 58 09 09 09 09 67 6f |m->ieee;|.X....go|
|00001390| 74 6f 20 73 68 69 70 69 | 74 3b 0a 58 09 09 09 7d |to shipi|t;.X...}|
|000013a0| 0a 58 09 09 7d 0a 58 09 | 09 69 73 2e 65 78 70 20 |.X..}.X.|.is.exp |
|000013b0| 3d 20 76 73 2e 65 78 70 | 20 2d 20 56 41 58 5f 53 |= vs.exp| - VAX_S|
|000013c0| 4e 47 5f 42 49 41 53 20 | 2b 20 49 45 45 45 5f 53 |NG_BIAS |+ IEEE_S|
|000013d0| 4e 47 5f 42 49 41 53 3b | 0a 58 09 09 69 73 2e 6d |NG_BIAS;|.X..is.m|
|000013e0| 61 6e 74 69 73 73 61 20 | 3d 20 28 76 73 2e 6d 61 |antissa |= (vs.ma|
|000013f0| 6e 74 69 73 73 61 31 20 | 3c 3c 20 31 36 29 20 7c |ntissa1 |<< 16) ||
|00001400| 20 76 73 2e 6d 61 6e 74 | 69 73 73 61 32 3b 0a 58 | vs.mant|issa2;.X|
|00001410| 09 73 68 69 70 69 74 3a | 0a 58 09 09 69 73 2e 73 |.shipit:|.X..is.s|
|00001420| 69 67 6e 20 3d 20 76 73 | 2e 73 69 67 6e 3b 0a 58 |ign = vs|.sign;.X|
|00001430| 09 09 72 65 74 75 72 6e | 20 28 58 44 52 5f 50 55 |..return| (XDR_PU|
|00001440| 54 4c 4f 4e 47 28 78 64 | 72 73 2c 20 28 6c 6f 6e |TLONG(xd|rs, (lon|
|00001450| 67 20 2a 29 26 69 73 29 | 29 3b 0a 58 23 65 6e 64 |g *)&is)|);.X#end|
|00001460| 69 66 0a 58 0a 58 09 63 | 61 73 65 20 58 44 52 5f |if.X.X.c|ase XDR_|
|00001470| 44 45 43 4f 44 45 3a 0a | 58 23 69 66 64 65 66 20 |DECODE:.|X#ifdef |
|00001480| 6d 63 36 38 30 30 30 0a | 58 09 09 72 65 74 75 72 |mc68000.|X..retur|
|00001490| 6e 20 28 58 44 52 5f 47 | 45 54 4c 4f 4e 47 28 78 |n (XDR_G|ETLONG(x|
|000014a0| 64 72 73 2c 20 28 6c 6f | 6e 67 20 2a 29 66 70 29 |drs, (lo|ng *)fp)|
|000014b0| 29 3b 0a 58 23 65 6c 73 | 65 0a 58 09 09 76 73 70 |);.X#els|e.X..vsp|
|000014c0| 20 3d 20 28 73 74 72 75 | 63 74 20 76 61 78 5f 73 | = (stru|ct vax_s|
|000014d0| 69 6e 67 6c 65 20 2a 29 | 66 70 3b 0a 58 09 09 69 |ingle *)|fp;.X..i|
|000014e0| 66 20 28 21 58 44 52 5f | 47 45 54 4c 4f 4e 47 28 |f (!XDR_|GETLONG(|
|000014f0| 78 64 72 73 2c 20 28 6c | 6f 6e 67 20 2a 29 26 69 |xdrs, (l|ong *)&i|
|00001500| 73 29 29 0a 58 09 09 09 | 72 65 74 75 72 6e 20 28 |s)).X...|return (|
|00001510| 46 41 4c 53 45 29 3b 0a | 58 09 09 66 6f 72 20 28 |FALSE);.|X..for (|
|00001520| 69 20 3d 20 30 2c 20 6c | 69 6d 20 3d 20 73 67 6c |i = 0, l|im = sgl|
|00001530| 5f 6c 69 6d 69 74 73 3b | 0a 58 09 09 09 69 20 3c |_limits;|.X...i <|
|00001540| 20 73 69 7a 65 6f 66 28 | 73 67 6c 5f 6c 69 6d 69 | sizeof(|sgl_limi|
|00001550| 74 73 29 2f 73 69 7a 65 | 6f 66 28 73 74 72 75 63 |ts)/size|of(struc|
|00001560| 74 20 73 67 6c 5f 6c 69 | 6d 69 74 73 29 3b 0a 58 |t sgl_li|mits);.X|
|00001570| 09 09 09 69 2b 2b 2c 20 | 6c 69 6d 2b 2b 29 20 7b |...i++, |lim++) {|
|00001580| 0a 58 09 09 09 69 66 20 | 28 28 69 73 2e 65 78 70 |.X...if |((is.exp|
|00001590| 20 3d 3d 20 6c 69 6d 2d | 3e 69 65 65 65 2e 65 78 | == lim-|>ieee.ex|
|000015a0| 70 29 20 26 26 0a 58 09 | 09 09 09 28 69 73 2e 6d |p) &&.X.|...(is.m|
|000015b0| 61 6e 74 69 73 73 61 20 | 3d 20 6c 69 6d 2d 3e 69 |antissa |= lim->i|
|000015c0| 65 65 65 2e 6d 61 6e 74 | 69 73 73 61 29 29 20 7b |eee.mant|issa)) {|
|000015d0| 0a 58 09 09 09 09 2a 76 | 73 70 20 3d 20 6c 69 6d |.X....*v|sp = lim|
|000015e0| 2d 3e 73 3b 0a 58 09 09 | 09 09 67 6f 74 6f 20 64 |->s;.X..|..goto d|
|000015f0| 6f 6e 65 69 74 3b 0a 58 | 09 09 09 7d 0a 58 09 09 |oneit;.X|...}.X..|
|00001600| 7d 0a 58 09 09 76 73 70 | 2d 3e 65 78 70 20 3d 20 |}.X..vsp|->exp = |
|00001610| 69 73 2e 65 78 70 20 2d | 20 49 45 45 45 5f 53 4e |is.exp -| IEEE_SN|
|00001620| 47 5f 42 49 41 53 20 2b | 20 56 41 58 5f 53 4e 47 |G_BIAS +| VAX_SNG|
|00001630| 5f 42 49 41 53 3b 0a 58 | 09 09 76 73 70 2d 3e 6d |_BIAS;.X|..vsp->m|
|00001640| 61 6e 74 69 73 73 61 32 | 20 3d 20 69 73 2e 6d 61 |antissa2| = is.ma|
|00001650| 6e 74 69 73 73 61 3b 0a | 58 09 09 76 73 70 2d 3e |ntissa;.|X..vsp->|
|00001660| 6d 61 6e 74 69 73 73 61 | 31 20 3d 20 28 69 73 2e |mantissa|1 = (is.|
|00001670| 6d 61 6e 74 69 73 73 61 | 20 3e 3e 20 31 36 29 3b |mantissa| >> 16);|
|00001680| 0a 58 09 64 6f 6e 65 69 | 74 3a 0a 58 09 09 76 73 |.X.donei|t:.X..vs|
|00001690| 70 2d 3e 73 69 67 6e 20 | 3d 20 69 73 2e 73 69 67 |p->sign |= is.sig|
|000016a0| 6e 3b 0a 58 09 09 72 65 | 74 75 72 6e 20 28 54 52 |n;.X..re|turn (TR|
|000016b0| 55 45 29 3b 0a 58 23 65 | 6e 64 69 66 0a 58 0a 58 |UE);.X#e|ndif.X.X|
|000016c0| 09 63 61 73 65 20 58 44 | 52 5f 46 52 45 45 3a 0a |.case XD|R_FREE:.|
|000016d0| 58 09 09 72 65 74 75 72 | 6e 20 28 54 52 55 45 29 |X..retur|n (TRUE)|
|000016e0| 3b 0a 58 09 7d 0a 58 09 | 72 65 74 75 72 6e 20 28 |;.X.}.X.|return (|
|000016f0| 46 41 4c 53 45 29 3b 0a | 58 7d 0a 58 0a 58 2f 2a |FALSE);.|X}.X.X/*|
|00001700| 0a 58 20 2a 20 54 68 69 | 73 20 72 6f 75 74 69 6e |.X * Thi|s routin|
|00001710| 65 20 77 6f 72 6b 73 20 | 6f 6e 20 53 75 6e 73 20 |e works |on Suns |
|00001720| 28 53 6b 79 20 2f 20 36 | 38 30 30 30 27 73 29 20 |(Sky / 6|8000's) |
|00001730| 61 6e 64 20 56 61 78 65 | 6e 2e 0a 58 20 2a 2f 0a |and Vaxe|n..X */.|
|00001740| 58 0a 58 2f 2a 20 57 68 | 61 74 20 49 45 45 45 20 |X.X/* Wh|at IEEE |
|00001750| 64 6f 75 62 6c 65 20 70 | 72 65 63 69 73 69 6f 6e |double p|recision|
|00001760| 20 66 6c 6f 61 74 69 6e | 67 20 70 6f 69 6e 74 20 | floatin|g point |
|00001770| 6c 6f 6f 6b 73 20 6c 69 | 6b 65 20 6f 6e 20 61 20 |looks li|ke on a |
|00001780| 56 61 78 20 2a 2f 0a 58 | 73 74 72 75 63 74 20 20 |Vax */.X|struct |
|00001790| 69 65 65 65 5f 64 6f 75 | 62 6c 65 20 7b 0a 58 09 |ieee_dou|ble {.X.|
|000017a0| 75 6e 73 69 67 6e 65 64 | 20 69 6e 74 09 6d 61 6e |unsigned| int.man|
|000017b0| 74 69 73 73 61 31 20 3a | 20 32 30 3b 0a 58 09 75 |tissa1 :| 20;.X.u|
|000017c0| 6e 73 69 67 6e 65 64 20 | 69 6e 74 09 65 78 70 09 |nsigned |int.exp.|
|000017d0| 20 20 3a 20 31 31 3b 0a | 58 09 75 6e 73 69 67 6e | : 11;.|X.unsign|
|000017e0| 65 64 20 69 6e 74 09 73 | 69 67 6e 09 20 20 3a 20 |ed int.s|ign. : |
|000017f0| 31 3b 0a 58 09 75 6e 73 | 69 67 6e 65 64 20 69 6e |1;.X.uns|igned in|
|00001800| 74 09 6d 61 6e 74 69 73 | 73 61 32 20 3a 20 33 32 |t.mantis|sa2 : 32|
|00001810| 3b 0a 58 7d 3b 0a 58 20 | 0a 58 2f 2a 20 56 61 78 |;.X};.X |.X/* Vax|
|00001820| 20 64 6f 75 62 6c 65 20 | 70 72 65 63 69 73 69 6f | double |precisio|
|00001830| 6e 20 66 6c 6f 61 74 69 | 6e 67 20 70 6f 69 6e 74 |n floati|ng point|
|00001840| 20 2a 2f 0a 58 73 74 72 | 75 63 74 20 20 76 61 78 | */.Xstr|uct vax|
|00001850| 5f 64 6f 75 62 6c 65 20 | 7b 0a 58 09 75 6e 73 69 |_double |{.X.unsi|
|00001860| 67 6e 65 64 20 69 6e 74 | 09 6d 61 6e 74 69 73 73 |gned int|.mantiss|
|00001870| 61 31 20 3a 20 37 3b 0a | 58 09 75 6e 73 69 67 6e |a1 : 7;.|X.unsign|
|00001880| 65 64 20 69 6e 74 09 65 | 78 70 20 20 20 20 20 20 |ed int.e|xp |
|00001890| 20 3a 20 38 3b 0a 58 09 | 75 6e 73 69 67 6e 65 64 | : 8;.X.|unsigned|
|000018a0| 20 69 6e 74 09 73 69 67 | 6e 20 20 20 20 20 20 3a | int.sig|n :|
|000018b0| 20 31 3b 0a 58 09 75 6e | 73 69 67 6e 65 64 20 69 | 1;.X.un|signed i|
|000018c0| 6e 74 09 6d 61 6e 74 69 | 73 73 61 32 20 3a 20 31 |nt.manti|ssa2 : 1|
|000018d0| 36 3b 0a 58 09 75 6e 73 | 69 67 6e 65 64 20 69 6e |6;.X.uns|igned in|
|000018e0| 74 09 6d 61 6e 74 69 73 | 73 61 33 20 3a 20 31 36 |t.mantis|sa3 : 16|
|000018f0| 3b 0a 58 09 75 6e 73 69 | 67 6e 65 64 20 69 6e 74 |;.X.unsi|gned int|
|00001900| 09 6d 61 6e 74 69 73 73 | 61 34 20 3a 20 31 36 3b |.mantiss|a4 : 16;|
|00001910| 0a 58 7d 3b 0a 58 0a 58 | 23 64 65 66 69 6e 65 20 |.X};.X.X|#define |
|00001920| 56 41 58 5f 44 42 4c 5f | 42 49 41 53 20 20 20 20 |VAX_DBL_|BIAS |
|00001930| 30 78 38 31 0a 58 23 64 | 65 66 69 6e 65 20 49 45 |0x81.X#d|efine IE|
|00001940| 45 45 5f 44 42 4c 5f 42 | 49 41 53 20 20 20 30 78 |EE_DBL_B|IAS 0x|
|00001950| 33 66 66 0a 58 23 64 65 | 66 69 6e 65 20 4d 41 53 |3ff.X#de|fine MAS|
|00001960| 4b 28 6e 62 69 74 73 29 | 20 20 20 20 20 28 28 31 |K(nbits)| ((1|
|00001970| 20 3c 3c 20 6e 62 69 74 | 73 29 20 2d 20 31 29 0a | << nbit|s) - 1).|
|00001980| 58 0a 58 73 74 61 74 69 | 63 20 73 74 72 75 63 74 |X.Xstati|c struct|
|00001990| 20 64 62 6c 5f 6c 69 6d | 69 74 73 20 7b 0a 58 09 | dbl_lim|its {.X.|
|000019a0| 73 74 72 75 63 74 20 20 | 76 61 78 5f 64 6f 75 62 |struct |vax_doub|
|000019b0| 6c 65 20 64 3b 0a 58 09 | 73 74 72 75 63 74 20 20 |le d;.X.|struct |
|000019c0| 69 65 65 65 5f 64 6f 75 | 62 6c 65 20 69 65 65 65 |ieee_dou|ble ieee|
|000019d0| 3b 0a 58 7d 20 64 62 6c | 5f 6c 69 6d 69 74 73 5b |;.X} dbl|_limits[|
|000019e0| 32 5d 20 3d 20 7b 0a 58 | 09 7b 7b 20 30 78 37 66 |2] = {.X|.{{ 0x7f|
|000019f0| 2c 20 30 78 66 66 2c 20 | 30 78 30 2c 20 30 78 66 |, 0xff, |0x0, 0xf|
|00001a00| 66 66 66 2c 20 30 78 66 | 66 66 66 2c 20 30 78 66 |fff, 0xf|fff, 0xf|
|00001a10| 66 66 66 20 7d 2c 09 2f | 2a 20 4d 61 78 20 56 61 |fff },./|* Max Va|
|00001a20| 78 20 2a 2f 0a 58 09 7b | 20 30 78 30 2c 20 30 78 |x */.X.{| 0x0, 0x|
|00001a30| 37 66 66 2c 20 30 78 30 | 2c 20 30 78 30 20 7d 7d |7ff, 0x0|, 0x0 }}|
|00001a40| 2c 09 09 09 2f 2a 20 4d | 61 78 20 49 45 45 45 20 |,.../* M|ax IEEE |
|00001a50| 2a 2f 0a 58 09 7b 7b 20 | 30 78 30 2c 20 30 78 30 |*/.X.{{ |0x0, 0x0|
|00001a60| 2c 20 30 78 30 2c 20 30 | 78 30 2c 20 30 78 30 2c |, 0x0, 0|x0, 0x0,|
|00001a70| 20 30 78 30 7d 2c 09 09 | 2f 2a 20 4d 69 6e 20 56 | 0x0},..|/* Min V|
|00001a80| 61 78 20 2a 2f 0a 58 09 | 7b 20 30 78 30 2c 20 30 |ax */.X.|{ 0x0, 0|
|00001a90| 78 30 2c 20 30 78 30 2c | 20 30 78 30 20 7d 7d 09 |x0, 0x0,| 0x0 }}.|
|00001aa0| 09 09 09 2f 2a 20 4d 69 | 6e 20 49 45 45 45 20 2a |.../* Mi|n IEEE *|
|00001ab0| 2f 0a 58 7d 3b 0a 58 0a | 58 62 6f 6f 6c 5f 74 20 |/.X};.X.|Xbool_t |
|00001ac0| 20 20 20 20 20 20 20 20 | 20 20 0a 58 78 64 72 5f | | .Xxdr_|
|00001ad0| 64 6f 75 62 6c 65 28 78 | 64 72 73 2c 20 64 70 29 |double(x|drs, dp)|
|00001ae0| 0a 58 09 72 65 67 69 73 | 74 65 72 20 58 44 52 20 |.X.regis|ter XDR |
|00001af0| 2a 78 64 72 73 3b 0a 58 | 09 64 6f 75 62 6c 65 20 |*xdrs;.X|.double |
|00001b00| 2a 64 70 3b 0a 58 7b 0a | 58 09 72 65 67 69 73 74 |*dp;.X{.|X.regist|
|00001b10| 65 72 20 6c 6f 6e 67 20 | 2a 6c 70 3b 0a 58 09 73 |er long |*lp;.X.s|
|00001b20| 74 72 75 63 74 20 20 69 | 65 65 65 5f 64 6f 75 62 |truct i|eee_doub|
|00001b30| 6c 65 20 69 64 3b 0a 58 | 09 73 74 72 75 63 74 20 |le id;.X|.struct |
|00001b40| 20 76 61 78 5f 64 6f 75 | 62 6c 65 20 76 64 3b 0a | vax_dou|ble vd;.|
|00001b50| 58 09 72 65 67 69 73 74 | 65 72 20 73 74 72 75 63 |X.regist|er struc|
|00001b60| 74 20 64 62 6c 5f 6c 69 | 6d 69 74 73 20 2a 6c 69 |t dbl_li|mits *li|
|00001b70| 6d 3b 0a 58 09 69 6e 74 | 20 69 3b 0a 58 0a 58 09 |m;.X.int| i;.X.X.|
|00001b80| 73 77 69 74 63 68 20 28 | 78 64 72 73 2d 3e 78 5f |switch (|xdrs->x_|
|00001b90| 6f 70 29 20 7b 0a 58 0a | 58 09 63 61 73 65 20 58 |op) {.X.|X.case X|
|00001ba0| 44 52 5f 45 4e 43 4f 44 | 45 3a 0a 58 23 69 66 64 |DR_ENCOD|E:.X#ifd|
|00001bb0| 65 66 20 6d 63 36 38 30 | 30 30 0a 58 09 09 6c 70 |ef mc680|00.X..lp|
|00001bc0| 20 3d 20 28 6c 6f 6e 67 | 20 2a 29 64 70 3b 0a 58 | = (long| *)dp;.X|
|00001bd0| 23 65 6c 73 65 0a 58 09 | 09 76 64 20 3d 20 2a 28 |#else.X.|.vd = *(|
|00001be0| 28 73 74 72 75 63 74 20 | 20 76 61 78 5f 64 6f 75 |(struct | vax_dou|
|00001bf0| 62 6c 65 20 2a 29 64 70 | 29 3b 0a 58 09 09 66 6f |ble *)dp|);.X..fo|
|00001c00| 72 20 28 69 20 3d 20 30 | 2c 20 6c 69 6d 20 3d 20 |r (i = 0|, lim = |
|00001c10| 64 62 6c 5f 6c 69 6d 69 | 74 73 3b 0a 58 09 09 09 |dbl_limi|ts;.X...|
|00001c20| 69 20 3c 20 73 69 7a 65 | 6f 66 28 64 62 6c 5f 6c |i < size|of(dbl_l|
|00001c30| 69 6d 69 74 73 29 2f 73 | 69 7a 65 6f 66 28 73 74 |imits)/s|izeof(st|
|00001c40| 72 75 63 74 20 64 62 6c | 5f 6c 69 6d 69 74 73 29 |ruct dbl|_limits)|
|00001c50| 3b 0a 58 09 09 09 69 2b | 2b 2c 20 6c 69 6d 2b 2b |;.X...i+|+, lim++|
|00001c60| 29 20 7b 0a 58 09 09 09 | 69 66 20 28 28 76 64 2e |) {.X...|if ((vd.|
|00001c70| 6d 61 6e 74 69 73 73 61 | 34 20 3d 3d 20 6c 69 6d |mantissa|4 == lim|
|00001c80| 2d 3e 64 2e 6d 61 6e 74 | 69 73 73 61 34 29 20 26 |->d.mant|issa4) &|
|00001c90| 26 0a 58 09 09 09 09 28 | 76 64 2e 6d 61 6e 74 69 |&.X....(|vd.manti|
|00001ca0| 73 73 61 33 20 3d 3d 20 | 6c 69 6d 2d 3e 64 2e 6d |ssa3 == |lim->d.m|
|00001cb0| 61 6e 74 69 73 73 61 33 | 29 20 26 26 0a 58 09 09 |antissa3|) &&.X..|
|00001cc0| 09 09 28 76 64 2e 6d 61 | 6e 74 69 73 73 61 32 20 |..(vd.ma|ntissa2 |
|00001cd0| 3d 3d 20 6c 69 6d 2d 3e | 64 2e 6d 61 6e 74 69 73 |== lim->|d.mantis|
|00001ce0| 73 61 32 29 20 26 26 0a | 58 09 09 09 09 28 76 64 |sa2) &&.|X....(vd|
|00001cf0| 2e 6d 61 6e 74 69 73 73 | 61 31 20 3d 3d 20 6c 69 |.mantiss|a1 == li|
|00001d00| 6d 2d 3e 64 2e 6d 61 6e | 74 69 73 73 61 31 29 20 |m->d.man|tissa1) |
|00001d10| 26 26 0a 58 09 09 09 09 | 28 76 64 2e 65 78 70 20 |&&.X....|(vd.exp |
|00001d20| 3d 3d 20 6c 69 6d 2d 3e | 64 2e 65 78 70 29 29 20 |== lim->|d.exp)) |
|00001d30| 7b 0a 58 09 09 09 09 69 | 64 20 3d 20 6c 69 6d 2d |{.X....i|d = lim-|
|00001d40| 3e 69 65 65 65 3b 0a 58 | 09 09 09 09 67 6f 74 6f |>ieee;.X|....goto|
|00001d50| 20 73 68 69 70 69 74 3b | 0a 58 09 09 09 7d 0a 58 | shipit;|.X...}.X|
|00001d60| 09 09 7d 0a 58 09 09 69 | 64 2e 65 78 70 20 3d 20 |..}.X..i|d.exp = |
|00001d70| 76 64 2e 65 78 70 20 2d | 20 56 41 58 5f 44 42 4c |vd.exp -| VAX_DBL|
|00001d80| 5f 42 49 41 53 20 2b 20 | 49 45 45 45 5f 44 42 4c |_BIAS + |IEEE_DBL|
|00001d90| 5f 42 49 41 53 3b 0a 58 | 09 09 69 64 2e 6d 61 6e |_BIAS;.X|..id.man|
|00001da0| 74 69 73 73 61 31 20 3d | 20 28 76 64 2e 6d 61 6e |tissa1 =| (vd.man|
|00001db0| 74 69 73 73 61 31 20 3c | 3c 20 31 33 29 20 7c 20 |tissa1 <|< 13) | |
|00001dc0| 28 76 64 2e 6d 61 6e 74 | 69 73 73 61 32 20 3e 3e |(vd.mant|issa2 >>|
|00001dd0| 20 33 29 3b 0a 58 09 09 | 69 64 2e 6d 61 6e 74 69 | 3);.X..|id.manti|
|00001de0| 73 73 61 32 20 3d 20 28 | 28 76 64 2e 6d 61 6e 74 |ssa2 = (|(vd.mant|
|00001df0| 69 73 73 61 32 20 26 20 | 4d 41 53 4b 28 33 29 29 |issa2 & |MASK(3))|
|00001e00| 20 3c 3c 20 32 39 29 20 | 7c 0a 58 09 09 09 09 28 | << 29) ||.X....(|
|00001e10| 76 64 2e 6d 61 6e 74 69 | 73 73 61 33 20 3c 3c 20 |vd.manti|ssa3 << |
|00001e20| 31 33 29 20 7c 0a 58 09 | 09 09 09 28 28 76 64 2e |13) |.X.|...((vd.|
|00001e30| 6d 61 6e 74 69 73 73 61 | 34 20 3e 3e 20 33 29 20 |mantissa|4 >> 3) |
|00001e40| 26 20 4d 41 53 4b 28 31 | 33 29 29 3b 0a 58 09 73 |& MASK(1|3));.X.s|
|00001e50| 68 69 70 69 74 3a 0a 58 | 09 09 69 64 2e 73 69 67 |hipit:.X|..id.sig|
|00001e60| 6e 20 3d 20 76 64 2e 73 | 69 67 6e 3b 0a 58 09 09 |n = vd.s|ign;.X..|
|00001e70| 6c 70 20 3d 20 28 6c 6f | 6e 67 20 2a 29 26 69 64 |lp = (lo|ng *)&id|
|00001e80| 3b 0a 58 23 65 6e 64 69 | 66 0a 58 09 09 72 65 74 |;.X#endi|f.X..ret|
|00001e90| 75 72 6e 20 28 58 44 52 | 5f 50 55 54 4c 4f 4e 47 |urn (XDR|_PUTLONG|
|00001ea0| 28 78 64 72 73 2c 20 6c | 70 2b 2b 29 20 26 26 20 |(xdrs, l|p++) && |
|00001eb0| 58 44 52 5f 50 55 54 4c | 4f 4e 47 28 78 64 72 73 |XDR_PUTL|ONG(xdrs|
|00001ec0| 2c 20 6c 70 29 29 3b 0a | 58 0a 58 09 63 61 73 65 |, lp));.|X.X.case|
|00001ed0| 20 58 44 52 5f 44 45 43 | 4f 44 45 3a 0a 58 23 69 | XDR_DEC|ODE:.X#i|
|00001ee0| 66 64 65 66 20 6d 63 36 | 38 30 30 30 0a 58 09 09 |fdef mc6|8000.X..|
|00001ef0| 6c 70 20 3d 20 28 6c 6f | 6e 67 20 2a 29 64 70 3b |lp = (lo|ng *)dp;|
|00001f00| 0a 58 09 09 72 65 74 75 | 72 6e 20 28 58 44 52 5f |.X..retu|rn (XDR_|
|00001f10| 47 45 54 4c 4f 4e 47 28 | 78 64 72 73 2c 20 6c 70 |GETLONG(|xdrs, lp|
|00001f20| 2b 2b 29 20 26 26 20 58 | 44 52 5f 47 45 54 4c 4f |++) && X|DR_GETLO|
|00001f30| 4e 47 28 78 64 72 73 2c | 20 6c 70 29 29 3b 0a 58 |NG(xdrs,| lp));.X|
|00001f40| 23 65 6c 73 65 0a 58 09 | 09 6c 70 20 3d 20 28 6c |#else.X.|.lp = (l|
|00001f50| 6f 6e 67 20 2a 29 26 69 | 64 3b 0a 58 09 09 69 66 |ong *)&i|d;.X..if|
|00001f60| 20 28 21 58 44 52 5f 47 | 45 54 4c 4f 4e 47 28 78 | (!XDR_G|ETLONG(x|
|00001f70| 64 72 73 2c 20 6c 70 2b | 2b 29 20 7c 7c 20 21 58 |drs, lp+|+) || !X|
|00001f80| 44 52 5f 47 45 54 4c 4f | 4e 47 28 78 64 72 73 2c |DR_GETLO|NG(xdrs,|
|00001f90| 20 6c 70 29 29 0a 58 09 | 09 09 72 65 74 75 72 6e | lp)).X.|..return|
|00001fa0| 20 28 46 41 4c 53 45 29 | 3b 0a 58 09 09 66 6f 72 | (FALSE)|;.X..for|
|00001fb0| 20 28 69 20 3d 20 30 2c | 20 6c 69 6d 20 3d 20 64 | (i = 0,| lim = d|
|00001fc0| 62 6c 5f 6c 69 6d 69 74 | 73 3b 0a 58 09 09 09 69 |bl_limit|s;.X...i|
|00001fd0| 20 3c 20 73 69 7a 65 6f | 66 28 64 62 6c 5f 6c 69 | < sizeo|f(dbl_li|
|00001fe0| 6d 69 74 73 29 2f 73 69 | 7a 65 6f 66 28 73 74 72 |mits)/si|zeof(str|
|00001ff0| 75 63 74 20 64 62 6c 5f | 6c 69 6d 69 74 73 29 3b |uct dbl_|limits);|
|00002000| 0a 58 09 09 09 69 2b 2b | 2c 20 6c 69 6d 2b 2b 29 |.X...i++|, lim++)|
|00002010| 20 7b 0a 58 09 09 09 69 | 66 20 28 28 69 64 2e 6d | {.X...i|f ((id.m|
|00002020| 61 6e 74 69 73 73 61 32 | 20 3d 3d 20 6c 69 6d 2d |antissa2| == lim-|
|00002030| 3e 69 65 65 65 2e 6d 61 | 6e 74 69 73 73 61 32 29 |>ieee.ma|ntissa2)|
|00002040| 20 26 26 0a 58 09 09 09 | 09 28 69 64 2e 6d 61 6e | &&.X...|.(id.man|
|00002050| 74 69 73 73 61 31 20 3d | 3d 20 6c 69 6d 2d 3e 69 |tissa1 =|= lim->i|
|00002060| 65 65 65 2e 6d 61 6e 74 | 69 73 73 61 31 29 20 26 |eee.mant|issa1) &|
|00002070| 26 0a 58 09 09 09 09 28 | 69 64 2e 65 78 70 20 3d |&.X....(|id.exp =|
|00002080| 3d 20 6c 69 6d 2d 3e 69 | 65 65 65 2e 65 78 70 29 |= lim->i|eee.exp)|
|00002090| 29 20 7b 0a 58 09 09 09 | 09 76 64 20 3d 20 6c 69 |) {.X...|.vd = li|
|000020a0| 6d 2d 3e 64 3b 0a 58 09 | 09 09 09 67 6f 74 6f 20 |m->d;.X.|...goto |
|000020b0| 64 6f 6e 65 69 74 3b 0a | 58 09 09 09 7d 0a 58 09 |doneit;.|X...}.X.|
|000020c0| 09 7d 0a 58 09 09 76 64 | 2e 65 78 70 20 3d 20 69 |.}.X..vd|.exp = i|
|000020d0| 64 2e 65 78 70 20 2d 20 | 49 45 45 45 5f 44 42 4c |d.exp - |IEEE_DBL|
|000020e0| 5f 42 49 41 53 20 2b 20 | 56 41 58 5f 44 42 4c 5f |_BIAS + |VAX_DBL_|
|000020f0| 42 49 41 53 3b 0a 58 09 | 09 76 64 2e 6d 61 6e 74 |BIAS;.X.|.vd.mant|
|00002100| 69 73 73 61 31 20 3d 20 | 28 69 64 2e 6d 61 6e 74 |issa1 = |(id.mant|
|00002110| 69 73 73 61 31 20 3e 3e | 20 31 33 29 3b 0a 58 09 |issa1 >>| 13);.X.|
|00002120| 09 76 64 2e 6d 61 6e 74 | 69 73 73 61 32 20 3d 20 |.vd.mant|issa2 = |
|00002130| 28 28 69 64 2e 6d 61 6e | 74 69 73 73 61 31 20 26 |((id.man|tissa1 &|
|00002140| 20 4d 41 53 4b 28 31 33 | 29 29 20 3c 3c 20 33 29 | MASK(13|)) << 3)|
|00002150| 20 7c 0a 58 09 09 09 09 | 28 69 64 2e 6d 61 6e 74 | |.X....|(id.mant|
|00002160| 69 73 73 61 32 20 3e 3e | 20 32 39 29 3b 0a 58 09 |issa2 >>| 29);.X.|
|00002170| 09 76 64 2e 6d 61 6e 74 | 69 73 73 61 33 20 3d 20 |.vd.mant|issa3 = |
|00002180| 28 69 64 2e 6d 61 6e 74 | 69 73 73 61 32 20 3e 3e |(id.mant|issa2 >>|
|00002190| 20 31 33 29 3b 0a 58 09 | 09 76 64 2e 6d 61 6e 74 | 13);.X.|.vd.mant|
|000021a0| 69 73 73 61 34 20 3d 20 | 28 69 64 2e 6d 61 6e 74 |issa4 = |(id.mant|
|000021b0| 69 73 73 61 32 20 3c 3c | 20 33 29 3b 0a 58 09 64 |issa2 <<| 3);.X.d|
|000021c0| 6f 6e 65 69 74 3a 0a 58 | 09 09 76 64 2e 73 69 67 |oneit:.X|..vd.sig|
|000021d0| 6e 20 3d 20 69 64 2e 73 | 69 67 6e 3b 0a 58 09 09 |n = id.s|ign;.X..|
|000021e0| 2a 64 70 20 3d 20 2a 28 | 28 64 6f 75 62 6c 65 20 |*dp = *(|(double |
|000021f0| 2a 29 26 76 64 29 3b 0a | 58 09 09 72 65 74 75 72 |*)&vd);.|X..retur|
|00002200| 6e 20 28 54 52 55 45 29 | 3b 0a 58 23 65 6e 64 69 |n (TRUE)|;.X#endi|
|00002210| 66 0a 58 0a 58 09 63 61 | 73 65 20 58 44 52 5f 46 |f.X.X.ca|se XDR_F|
|00002220| 52 45 45 3a 0a 58 09 09 | 72 65 74 75 72 6e 20 28 |REE:.X..|return (|
|00002230| 54 52 55 45 29 3b 0a 58 | 09 7d 0a 58 09 72 65 74 |TRUE);.X|.}.X.ret|
|00002240| 75 72 6e 20 28 46 41 4c | 53 45 29 3b 0a 58 7d 0a |urn (FAL|SE);.X}.|
|00002250| 53 48 41 52 5f 45 4f 46 | 0a 69 66 20 74 65 73 74 |SHAR_EOF|.if test|
|00002260| 20 36 36 32 33 20 2d 6e | 65 20 22 60 77 63 20 2d | 6623 -n|e "`wc -|
|00002270| 63 20 3c 20 27 72 70 63 | 2f 72 70 63 6c 69 62 2f |c < 'rpc|/rpclib/|
|00002280| 78 64 72 5f 66 6c 6f 61 | 74 2e 63 27 60 22 0a 74 |xdr_floa|t.c'`".t|
|00002290| 68 65 6e 0a 09 65 63 68 | 6f 20 73 68 61 72 3a 20 |hen..ech|o shar: |
|000022a0| 22 65 72 72 6f 72 20 74 | 72 61 6e 73 6d 69 74 74 |"error t|ransmitt|
|000022b0| 69 6e 67 20 27 72 70 63 | 2f 72 70 63 6c 69 62 2f |ing 'rpc|/rpclib/|
|000022c0| 78 64 72 5f 66 6c 6f 61 | 74 2e 63 27 22 20 27 28 |xdr_floa|t.c'" '(|
|000022d0| 73 68 6f 75 6c 64 20 68 | 61 76 65 20 62 65 65 6e |should h|ave been|
|000022e0| 20 36 36 32 33 20 63 68 | 61 72 61 63 74 65 72 73 | 6623 ch|aracters|
|000022f0| 29 27 0a 66 69 0a 63 68 | 6d 6f 64 20 34 34 34 20 |)'.fi.ch|mod 444 |
|00002300| 27 72 70 63 2f 72 70 63 | 6c 69 62 2f 78 64 72 5f |'rpc/rpc|lib/xdr_|
|00002310| 66 6c 6f 61 74 2e 63 27 | 0a 66 69 0a 65 63 68 6f |float.c'|.fi.echo|
|00002320| 20 73 68 61 72 3a 20 22 | 65 78 74 72 61 63 74 69 | shar: "|extracti|
|00002330| 6e 67 20 27 72 70 63 2f | 72 70 63 6c 69 62 2f 78 |ng 'rpc/|rpclib/x|
|00002340| 64 72 5f 6d 65 6d 2e 63 | 27 22 20 27 28 34 31 33 |dr_mem.c|'" '(413|
|00002350| 39 20 63 68 61 72 61 63 | 74 65 72 73 29 27 0a 69 |9 charac|ters)'.i|
|00002360| 66 20 74 65 73 74 20 2d | 66 20 27 72 70 63 2f 72 |f test -|f 'rpc/r|
|00002370| 70 63 6c 69 62 2f 78 64 | 72 5f 6d 65 6d 2e 63 27 |pclib/xd|r_mem.c'|
|00002380| 0a 74 68 65 6e 0a 09 65 | 63 68 6f 20 73 68 61 72 |.then..e|cho shar|
|00002390| 3a 20 22 77 69 6c 6c 20 | 6e 6f 74 20 6f 76 65 72 |: "will |not over|
|000023a0| 2d 77 72 69 74 65 20 65 | 78 69 73 74 69 6e 67 20 |-write e|xisting |
|000023b0| 66 69 6c 65 20 27 72 70 | 63 2f 72 70 63 6c 69 62 |file 'rp|c/rpclib|
|000023c0| 2f 78 64 72 5f 6d 65 6d | 2e 63 27 22 0a 65 6c 73 |/xdr_mem|.c'".els|
|000023d0| 65 0a 73 65 64 20 27 73 | 2f 5e 58 2f 2f 27 20 3c |e.sed 's|/^X//' <|
|000023e0| 3c 20 5c 53 48 41 52 5f | 45 4f 46 20 3e 20 27 72 |< \SHAR_|EOF > 'r|
|000023f0| 70 63 2f 72 70 63 6c 69 | 62 2f 78 64 72 5f 6d 65 |pc/rpcli|b/xdr_me|
|00002400| 6d 2e 63 27 0a 58 2f 2a | 0a 58 20 2a 20 53 75 6e |m.c'.X/*|.X * Sun|
|00002410| 20 52 50 43 20 69 73 20 | 61 20 70 72 6f 64 75 63 | RPC is |a produc|
|00002420| 74 20 6f 66 20 53 75 6e | 20 4d 69 63 72 6f 73 79 |t of Sun| Microsy|
|00002430| 73 74 65 6d 73 2c 20 49 | 6e 63 2e 20 61 6e 64 20 |stems, I|nc. and |
|00002440| 69 73 20 70 72 6f 76 69 | 64 65 64 20 66 6f 72 0a |is provi|ded for.|
|00002450| 58 20 2a 20 75 6e 72 65 | 73 74 72 69 63 74 65 64 |X * unre|stricted|
|00002460| 20 75 73 65 20 70 72 6f | 76 69 64 65 64 20 74 68 | use pro|vided th|
|00002470| 61 74 20 74 68 69 73 20 | 6c 65 67 65 6e 64 20 69 |at this |legend i|
|00002480| 73 20 69 6e 63 6c 75 64 | 65 64 20 6f 6e 20 61 6c |s includ|ed on al|
|00002490| 6c 20 74 61 70 65 0a 58 | 20 2a 20 6d 65 64 69 61 |l tape.X| * media|
|000024a0| 20 61 6e 64 20 61 73 20 | 61 20 70 61 72 74 20 6f | and as |a part o|
|000024b0| 66 20 74 68 65 20 73 6f | 66 74 77 61 72 65 20 70 |f the so|ftware p|
|000024c0| 72 6f 67 72 61 6d 20 69 | 6e 20 77 68 6f 6c 65 20 |rogram i|n whole |
|000024d0| 6f 72 20 70 61 72 74 2e | 20 20 55 73 65 72 73 0a |or part.| Users.|
|000024e0| 58 20 2a 20 6d 61 79 20 | 63 6f 70 79 20 6f 72 20 |X * may |copy or |
|000024f0| 6d 6f 64 69 66 79 20 53 | 75 6e 20 52 50 43 20 77 |modify S|un RPC w|
|00002500| 69 74 68 6f 75 74 20 63 | 68 61 72 67 65 2c 20 62 |ithout c|harge, b|
|00002510| 75 74 20 61 72 65 20 6e | 6f 74 20 61 75 74 68 6f |ut are n|ot autho|
|00002520| 72 69 7a 65 64 0a 58 20 | 2a 20 74 6f 20 6c 69 63 |rized.X |* to lic|
|00002530| 65 6e 73 65 20 6f 72 20 | 64 69 73 74 72 69 62 75 |ense or |distribu|
|00002540| 74 65 20 69 74 20 74 6f | 20 61 6e 79 6f 6e 65 20 |te it to| anyone |
|00002550| 65 6c 73 65 20 65 78 63 | 65 70 74 20 61 73 20 70 |else exc|ept as p|
|00002560| 61 72 74 20 6f 66 20 61 | 20 70 72 6f 64 75 63 74 |art of a| product|
|00002570| 20 6f 72 0a 58 20 2a 20 | 70 72 6f 67 72 61 6d 20 | or.X * |program |
|00002580| 64 65 76 65 6c 6f 70 65 | 64 20 62 79 20 74 68 65 |develope|d by the|
|00002590| 20 75 73 65 72 2e 0a 58 | 20 2a 20 0a 58 20 2a 20 | user..X| * .X * |
|000025a0| 53 55 4e 20 52 50 43 20 | 49 53 20 50 52 4f 56 49 |SUN RPC |IS PROVI|
|000025b0| 44 45 44 20 41 53 20 49 | 53 20 57 49 54 48 20 4e |DED AS I|S WITH N|
|000025c0| 4f 20 57 41 52 52 41 4e | 54 49 45 53 20 4f 46 20 |O WARRAN|TIES OF |
|000025d0| 41 4e 59 20 4b 49 4e 44 | 20 49 4e 43 4c 55 44 49 |ANY KIND| INCLUDI|
|000025e0| 4e 47 20 54 48 45 0a 58 | 20 2a 20 57 41 52 52 41 |NG THE.X| * WARRA|
|000025f0| 4e 54 49 45 53 20 4f 46 | 20 44 45 53 49 47 4e 2c |NTIES OF| DESIGN,|
|00002600| 20 4d 45 52 43 48 41 4e | 54 49 42 49 4c 49 54 59 | MERCHAN|TIBILITY|
|00002610| 20 41 4e 44 20 46 49 54 | 4e 45 53 53 20 46 4f 52 | AND FIT|NESS FOR|
|00002620| 20 41 20 50 41 52 54 49 | 43 55 4c 41 52 0a 58 20 | A PARTI|CULAR.X |
|00002630| 2a 20 50 55 52 50 4f 53 | 45 2c 20 4f 52 20 41 52 |* PURPOS|E, OR AR|
|00002640| 49 53 49 4e 47 20 46 52 | 4f 4d 20 41 20 43 4f 55 |ISING FR|OM A COU|
|00002650| 52 53 45 20 4f 46 20 44 | 45 41 4c 49 4e 47 2c 20 |RSE OF D|EALING, |
|00002660| 55 53 41 47 45 20 4f 52 | 20 54 52 41 44 45 20 50 |USAGE OR| TRADE P|
|00002670| 52 41 43 54 49 43 45 2e | 0a 58 20 2a 20 0a 58 20 |RACTICE.|.X * .X |
|00002680| 2a 20 53 75 6e 20 52 50 | 43 20 69 73 20 70 72 6f |* Sun RP|C is pro|
|00002690| 76 69 64 65 64 20 77 69 | 74 68 20 6e 6f 20 73 75 |vided wi|th no su|
|000026a0| 70 70 6f 72 74 20 61 6e | 64 20 77 69 74 68 6f 75 |pport an|d withou|
|000026b0| 74 20 61 6e 79 20 6f 62 | 6c 69 67 61 74 69 6f 6e |t any ob|ligation|
|000026c0| 20 6f 6e 20 74 68 65 0a | 58 20 2a 20 70 61 72 74 | on the.|X * part|
|000026d0| 20 6f 66 20 53 75 6e 20 | 4d 69 63 72 6f 73 79 73 | of Sun |Microsys|
|000026e0| 74 65 6d 73 2c 20 49 6e | 63 2e 20 74 6f 20 61 73 |tems, In|c. to as|
|000026f0| 73 69 73 74 20 69 6e 20 | 69 74 73 20 75 73 65 2c |sist in |its use,|
|00002700| 20 63 6f 72 72 65 63 74 | 69 6f 6e 2c 0a 58 20 2a | correct|ion,.X *|
|00002710| 20 6d 6f 64 69 66 69 63 | 61 74 69 6f 6e 20 6f 72 | modific|ation or|
|00002720| 20 65 6e 68 61 6e 63 65 | 6d 65 6e 74 2e 0a 58 20 | enhance|ment..X |
|00002730| 2a 20 0a 58 20 2a 20 53 | 55 4e 20 4d 49 43 52 4f |* .X * S|UN MICRO|
|00002740| 53 59 53 54 45 4d 53 2c | 20 49 4e 43 2e 20 53 48 |SYSTEMS,| INC. SH|
|00002750| 41 4c 4c 20 48 41 56 45 | 20 4e 4f 20 4c 49 41 42 |ALL HAVE| NO LIAB|
|00002760| 49 4c 49 54 59 20 57 49 | 54 48 20 52 45 53 50 45 |ILITY WI|TH RESPE|
|00002770| 43 54 20 54 4f 20 54 48 | 45 0a 58 20 2a 20 49 4e |CT TO TH|E.X * IN|
|00002780| 46 52 49 4e 47 45 4d 45 | 4e 54 20 4f 46 20 43 4f |FRINGEME|NT OF CO|
|00002790| 50 59 52 49 47 48 54 53 | 2c 20 54 52 41 44 45 20 |PYRIGHTS|, TRADE |
|000027a0| 53 45 43 52 45 54 53 20 | 4f 52 20 41 4e 59 20 50 |SECRETS |OR ANY P|
|000027b0| 41 54 45 4e 54 53 20 42 | 59 20 53 55 4e 20 52 50 |ATENTS B|Y SUN RP|
|000027c0| 43 0a 58 20 2a 20 4f 52 | 20 41 4e 59 20 50 41 52 |C.X * OR| ANY PAR|
|000027d0| 54 20 54 48 45 52 45 4f | 46 2e 0a 58 20 2a 20 0a |T THEREO|F..X * .|
|000027e0| 58 20 2a 20 49 6e 20 6e | 6f 20 65 76 65 6e 74 20 |X * In n|o event |
|000027f0| 77 69 6c 6c 20 53 75 6e | 20 4d 69 63 72 6f 73 79 |will Sun| Microsy|
|00002800| 73 74 65 6d 73 2c 20 49 | 6e 63 2e 20 62 65 20 6c |stems, I|nc. be l|
|00002810| 69 61 62 6c 65 20 66 6f | 72 20 61 6e 79 20 6c 6f |iable fo|r any lo|
|00002820| 73 74 20 72 65 76 65 6e | 75 65 0a 58 20 2a 20 6f |st reven|ue.X * o|
|00002830| 72 20 70 72 6f 66 69 74 | 73 20 6f 72 20 6f 74 68 |r profit|s or oth|
|00002840| 65 72 20 73 70 65 63 69 | 61 6c 2c 20 69 6e 64 69 |er speci|al, indi|
|00002850| 72 65 63 74 20 61 6e 64 | 20 63 6f 6e 73 65 71 75 |rect and| consequ|
|00002860| 65 6e 74 69 61 6c 20 64 | 61 6d 61 67 65 73 2c 20 |ential d|amages, |
|00002870| 65 76 65 6e 20 69 66 0a | 58 20 2a 20 53 75 6e 20 |even if.|X * Sun |
|00002880| 68 61 73 20 62 65 65 6e | 20 61 64 76 69 73 65 64 |has been| advised|
|00002890| 20 6f 66 20 74 68 65 20 | 70 6f 73 73 69 62 69 6c | of the |possibil|
|000028a0| 69 74 79 20 6f 66 20 73 | 75 63 68 20 64 61 6d 61 |ity of s|uch dama|
|000028b0| 67 65 73 2e 0a 58 20 2a | 20 0a 58 20 2a 20 53 75 |ges..X *| .X * Su|
|000028c0| 6e 20 4d 69 63 72 6f 73 | 79 73 74 65 6d 73 2c 20 |n Micros|ystems, |
|000028d0| 49 6e 63 2e 0a 58 20 2a | 20 32 35 35 30 20 47 61 |Inc..X *| 2550 Ga|
|000028e0| 72 63 69 61 20 41 76 65 | 6e 75 65 0a 58 20 2a 20 |rcia Ave|nue.X * |
|000028f0| 4d 6f 75 6e 74 61 69 6e | 20 56 69 65 77 2c 20 43 |Mountain| View, C|
|00002900| 61 6c 69 66 6f 72 6e 69 | 61 20 20 39 34 30 34 33 |aliforni|a 94043|
|00002910| 0a 58 20 2a 2f 0a 58 23 | 69 66 6e 64 65 66 20 6c |.X */.X#|ifndef l|
|00002920| 69 6e 74 0a 58 73 74 61 | 74 69 63 20 63 68 61 72 |int.Xsta|tic char|
|00002930| 20 73 63 63 73 69 64 5b | 5d 20 3d 20 22 40 28 23 | sccsid[|] = "@(#|
|00002940| 29 78 64 72 5f 6d 65 6d | 2e 63 20 31 2e 31 20 38 |)xdr_mem|.c 1.1 8|
|00002950| 36 2f 30 32 2f 30 33 20 | 43 6f 70 79 72 20 31 39 |6/02/03 |Copyr 19|
|00002960| 38 34 20 53 75 6e 20 4d | 69 63 72 6f 22 3b 0a 58 |84 Sun M|icro";.X|
|00002970| 23 65 6e 64 69 66 0a 58 | 0a 58 2f 2a 0a 58 20 2a |#endif.X|.X/*.X *|
|00002980| 20 78 64 72 5f 6d 65 6d | 2e 68 2c 20 58 44 52 20 | xdr_mem|.h, XDR |
|00002990| 69 6d 70 6c 65 6d 65 6e | 74 61 74 69 6f 6e 20 75 |implemen|tation u|
|000029a0| 73 69 6e 67 20 6d 65 6d | 6f 72 79 20 62 75 66 66 |sing mem|ory buff|
|000029b0| 65 72 73 2e 0a 58 20 2a | 0a 58 20 2a 20 43 6f 70 |ers..X *|.X * Cop|
|000029c0| 79 72 69 67 68 74 20 28 | 43 29 20 31 39 38 34 2c |yright (|C) 1984,|
|000029d0| 20 53 75 6e 20 4d 69 63 | 72 6f 73 79 73 74 65 6d | Sun Mic|rosystem|
|000029e0| 73 2c 20 49 6e 63 2e 0a | 58 20 2a 0a 58 20 2a 20 |s, Inc..|X *.X * |
|000029f0| 49 66 20 79 6f 75 20 68 | 61 76 65 20 73 6f 6d 65 |If you h|ave some|
|00002a00| 20 64 61 74 61 20 74 6f | 20 62 65 20 69 6e 74 65 | data to| be inte|
|00002a10| 72 70 72 65 74 65 64 20 | 61 73 20 65 78 74 65 72 |rpreted |as exter|
|00002a20| 6e 61 6c 20 64 61 74 61 | 20 72 65 70 72 65 73 65 |nal data| represe|
|00002a30| 6e 74 61 74 69 6f 6e 0a | 58 20 2a 20 6f 72 20 74 |ntation.|X * or t|
|00002a40| 6f 20 62 65 20 63 6f 6e | 76 65 72 74 65 64 20 74 |o be con|verted t|
|00002a50| 6f 20 65 78 74 65 72 6e | 61 6c 20 64 61 74 61 20 |o extern|al data |
|00002a60| 72 65 70 72 65 73 65 6e | 74 61 74 69 6f 6e 20 69 |represen|tation i|
|00002a70| 6e 20 61 20 6d 65 6d 6f | 72 79 20 62 75 66 66 65 |n a memo|ry buffe|
|00002a80| 72 2c 0a 58 20 2a 20 74 | 68 65 6e 20 74 68 69 73 |r,.X * t|hen this|
|00002a90| 20 69 73 20 74 68 65 20 | 70 61 63 6b 61 67 65 20 | is the |package |
|00002aa0| 66 6f 72 20 79 6f 75 2e | 0a 58 20 2a 0a 58 20 2a |for you.|.X *.X *|
|00002ab0| 2f 0a 58 0a 58 23 69 6e | 63 6c 75 64 65 20 22 74 |/.X.X#in|clude "t|
|00002ac0| 79 70 65 73 2e 68 22 0a | 58 23 69 6e 63 6c 75 64 |ypes.h".|X#includ|
|00002ad0| 65 20 22 78 64 72 2e 68 | 22 0a 58 23 69 6e 63 6c |e "xdr.h|".X#incl|
|00002ae0| 75 64 65 20 3c 6e 65 74 | 69 6e 65 74 2f 69 6e 2e |ude <net|inet/in.|
|00002af0| 68 3e 0a 58 0a 58 73 74 | 61 74 69 63 20 62 6f 6f |h>.X.Xst|atic boo|
|00002b00| 6c 5f 74 09 78 64 72 6d | 65 6d 5f 67 65 74 6c 6f |l_t.xdrm|em_getlo|
|00002b10| 6e 67 28 29 3b 0a 58 73 | 74 61 74 69 63 20 62 6f |ng();.Xs|tatic bo|
|00002b20| 6f 6c 5f 74 09 78 64 72 | 6d 65 6d 5f 70 75 74 6c |ol_t.xdr|mem_putl|
|00002b30| 6f 6e 67 28 29 3b 0a 58 | 73 74 61 74 69 63 20 62 |ong();.X|static b|
|00002b40| 6f 6f 6c 5f 74 09 78 64 | 72 6d 65 6d 5f 67 65 74 |ool_t.xd|rmem_get|
|00002b50| 62 79 74 65 73 28 29 3b | 0a 58 73 74 61 74 69 63 |bytes();|.Xstatic|
|00002b60| 20 62 6f 6f 6c 5f 74 09 | 78 64 72 6d 65 6d 5f 70 | bool_t.|xdrmem_p|
|00002b70| 75 74 62 79 74 65 73 28 | 29 3b 0a 58 73 74 61 74 |utbytes(|);.Xstat|
|00002b80| 69 63 20 75 5f 69 6e 74 | 09 78 64 72 6d 65 6d 5f |ic u_int|.xdrmem_|
|00002b90| 67 65 74 70 6f 73 28 29 | 3b 0a 58 73 74 61 74 69 |getpos()|;.Xstati|
|00002ba0| 63 20 62 6f 6f 6c 5f 74 | 09 78 64 72 6d 65 6d 5f |c bool_t|.xdrmem_|
|00002bb0| 73 65 74 70 6f 73 28 29 | 3b 0a 58 73 74 61 74 69 |setpos()|;.Xstati|
|00002bc0| 63 20 6c 6f 6e 67 20 2a | 09 78 64 72 6d 65 6d 5f |c long *|.xdrmem_|
|00002bd0| 69 6e 6c 69 6e 65 28 29 | 3b 0a 58 73 74 61 74 69 |inline()|;.Xstati|
|00002be0| 63 20 76 6f 69 64 09 78 | 64 72 6d 65 6d 5f 64 65 |c void.x|drmem_de|
|00002bf0| 73 74 72 6f 79 28 29 3b | 0a 58 0a 58 73 74 61 74 |stroy();|.X.Xstat|
|00002c00| 69 63 20 73 74 72 75 63 | 74 09 78 64 72 5f 6f 70 |ic struc|t.xdr_op|
|00002c10| 73 20 78 64 72 6d 65 6d | 5f 6f 70 73 20 3d 20 7b |s xdrmem|_ops = {|
|00002c20| 0a 58 09 78 64 72 6d 65 | 6d 5f 67 65 74 6c 6f 6e |.X.xdrme|m_getlon|
|00002c30| 67 2c 0a 58 09 78 64 72 | 6d 65 6d 5f 70 75 74 6c |g,.X.xdr|mem_putl|
|00002c40| 6f 6e 67 2c 0a 58 09 78 | 64 72 6d 65 6d 5f 67 65 |ong,.X.x|drmem_ge|
|00002c50| 74 62 79 74 65 73 2c 0a | 58 09 78 64 72 6d 65 6d |tbytes,.|X.xdrmem|
|00002c60| 5f 70 75 74 62 79 74 65 | 73 2c 0a 58 09 78 64 72 |_putbyte|s,.X.xdr|
|00002c70| 6d 65 6d 5f 67 65 74 70 | 6f 73 2c 0a 58 09 78 64 |mem_getp|os,.X.xd|
|00002c80| 72 6d 65 6d 5f 73 65 74 | 70 6f 73 2c 0a 58 09 78 |rmem_set|pos,.X.x|
|00002c90| 64 72 6d 65 6d 5f 69 6e | 6c 69 6e 65 2c 0a 58 09 |drmem_in|line,.X.|
|00002ca0| 78 64 72 6d 65 6d 5f 64 | 65 73 74 72 6f 79 0a 58 |xdrmem_d|estroy.X|
|00002cb0| 7d 3b 0a 58 0a 58 2f 2a | 0a 58 20 2a 20 54 68 65 |};.X.X/*|.X * The|
|00002cc0| 20 70 72 6f 63 65 64 75 | 72 65 20 78 64 72 6d 65 | procedu|re xdrme|
|00002cd0| 6d 5f 63 72 65 61 74 65 | 20 69 6e 69 74 69 61 6c |m_create| initial|
|00002ce0| 69 7a 65 73 20 61 20 73 | 74 72 65 61 6d 20 64 65 |izes a s|tream de|
|00002cf0| 73 63 72 69 70 74 6f 72 | 20 66 6f 72 20 61 0a 58 |scriptor| for a.X|
|00002d00| 20 2a 20 6d 65 6d 6f 72 | 79 20 62 75 66 66 65 72 | * memor|y buffer|
|00002d10| 2e 20 20 0a 58 20 2a 2f | 0a 58 76 6f 69 64 0a 58 |. .X */|.Xvoid.X|
|00002d20| 78 64 72 6d 65 6d 5f 63 | 72 65 61 74 65 28 78 64 |xdrmem_c|reate(xd|
|00002d30| 72 73 2c 20 61 64 64 72 | 2c 20 73 69 7a 65 2c 20 |rs, addr|, size, |
|00002d40| 6f 70 29 0a 58 09 72 65 | 67 69 73 74 65 72 20 58 |op).X.re|gister X|
|00002d50| 44 52 20 2a 78 64 72 73 | 3b 0a 58 09 63 61 64 64 |DR *xdrs|;.X.cadd|
|00002d60| 72 5f 74 20 61 64 64 72 | 3b 0a 58 09 75 5f 69 6e |r_t addr|;.X.u_in|
|00002d70| 74 20 73 69 7a 65 3b 0a | 58 09 65 6e 75 6d 20 78 |t size;.|X.enum x|
|00002d80| 64 72 5f 6f 70 20 6f 70 | 3b 0a 58 7b 0a 58 0a 58 |dr_op op|;.X{.X.X|
|00002d90| 09 78 64 72 73 2d 3e 78 | 5f 6f 70 20 3d 20 6f 70 |.xdrs->x|_op = op|
|00002da0| 3b 0a 58 09 78 64 72 73 | 2d 3e 78 5f 6f 70 73 20 |;.X.xdrs|->x_ops |
|00002db0| 3d 20 26 78 64 72 6d 65 | 6d 5f 6f 70 73 3b 0a 58 |= &xdrme|m_ops;.X|
|00002dc0| 09 78 64 72 73 2d 3e 78 | 5f 70 72 69 76 61 74 65 |.xdrs->x|_private|
|00002dd0| 20 3d 20 78 64 72 73 2d | 3e 78 5f 62 61 73 65 20 | = xdrs-|>x_base |
|00002de0| 3d 20 61 64 64 72 3b 0a | 58 09 78 64 72 73 2d 3e |= addr;.|X.xdrs->|
|00002df0| 78 5f 68 61 6e 64 79 20 | 3d 20 73 69 7a 65 3b 0a |x_handy |= size;.|
|00002e00| 58 7d 0a 58 0a 58 73 74 | 61 74 69 63 20 76 6f 69 |X}.X.Xst|atic voi|
|00002e10| 64 0a 58 78 64 72 6d 65 | 6d 5f 64 65 73 74 72 6f |d.Xxdrme|m_destro|
|00002e20| 79 28 2f 2a 78 64 72 73 | 2a 2f 29 0a 58 09 2f 2a |y(/*xdrs|*/).X./*|
|00002e30| 58 44 52 20 2a 78 64 72 | 73 3b 2a 2f 0a 58 7b 0a |XDR *xdr|s;*/.X{.|
|00002e40| 58 7d 0a 58 0a 58 73 74 | 61 74 69 63 20 62 6f 6f |X}.X.Xst|atic boo|
|00002e50| 6c 5f 74 0a 58 78 64 72 | 6d 65 6d 5f 67 65 74 6c |l_t.Xxdr|mem_getl|
|00002e60| 6f 6e 67 28 78 64 72 73 | 2c 20 6c 70 29 0a 58 09 |ong(xdrs|, lp).X.|
|00002e70| 72 65 67 69 73 74 65 72 | 20 58 44 52 20 2a 78 64 |register| XDR *xd|
|00002e80| 72 73 3b 0a 58 09 6c 6f | 6e 67 20 2a 6c 70 3b 0a |rs;.X.lo|ng *lp;.|
|00002e90| 58 7b 0a 58 0a 58 09 69 | 66 20 28 28 78 64 72 73 |X{.X.X.i|f ((xdrs|
|00002ea0| 2d 3e 78 5f 68 61 6e 64 | 79 20 2d 3d 20 73 69 7a |->x_hand|y -= siz|
|00002eb0| 65 6f 66 28 6c 6f 6e 67 | 29 29 20 3c 20 30 29 0a |eof(long|)) < 0).|
|00002ec0| 58 09 09 72 65 74 75 72 | 6e 20 28 46 41 4c 53 45 |X..retur|n (FALSE|
|00002ed0| 29 3b 0a 58 09 2a 6c 70 | 20 3d 20 6e 74 6f 68 6c |);.X.*lp| = ntohl|
|00002ee0| 28 2a 28 28 6c 6f 6e 67 | 20 2a 29 28 78 64 72 73 |(*((long| *)(xdrs|
|00002ef0| 2d 3e 78 5f 70 72 69 76 | 61 74 65 29 29 29 3b 0a |->x_priv|ate)));.|
|00002f00| 58 09 78 64 72 73 2d 3e | 78 5f 70 72 69 76 61 74 |X.xdrs->|x_privat|
|00002f10| 65 20 2b 3d 20 73 69 7a | 65 6f 66 28 6c 6f 6e 67 |e += siz|eof(long|
|00002f20| 29 3b 0a 58 09 72 65 74 | 75 72 6e 20 28 54 52 55 |);.X.ret|urn (TRU|
|00002f30| 45 29 3b 0a 58 7d 0a 58 | 0a 58 73 74 61 74 69 63 |E);.X}.X|.Xstatic|
|00002f40| 20 62 6f 6f 6c 5f 74 0a | 58 78 64 72 6d 65 6d 5f | bool_t.|Xxdrmem_|
|00002f50| 70 75 74 6c 6f 6e 67 28 | 78 64 72 73 2c 20 6c 70 |putlong(|xdrs, lp|
|00002f60| 29 0a 58 09 72 65 67 69 | 73 74 65 72 20 58 44 52 |).X.regi|ster XDR|
|00002f70| 20 2a 78 64 72 73 3b 0a | 58 09 6c 6f 6e 67 20 2a | *xdrs;.|X.long *|
|00002f80| 6c 70 3b 0a 58 7b 0a 58 | 0a 58 09 69 66 20 28 28 |lp;.X{.X|.X.if ((|
|00002f90| 78 64 72 73 2d 3e 78 5f | 68 61 6e 64 79 20 2d 3d |xdrs->x_|handy -=|
|00002fa0| 20 73 69 7a 65 6f 66 28 | 6c 6f 6e 67 29 29 20 3c | sizeof(|long)) <|
|00002fb0| 20 30 29 0a 58 09 09 72 | 65 74 75 72 6e 20 28 46 | 0).X..r|eturn (F|
|00002fc0| 41 4c 53 45 29 3b 0a 58 | 09 2a 28 6c 6f 6e 67 20 |ALSE);.X|.*(long |
|00002fd0| 2a 29 78 64 72 73 2d 3e | 78 5f 70 72 69 76 61 74 |*)xdrs->|x_privat|
|00002fe0| 65 20 3d 20 68 74 6f 6e | 6c 28 2a 6c 70 29 3b 0a |e = hton|l(*lp);.|
|00002ff0| 58 09 78 64 72 73 2d 3e | 78 5f 70 72 69 76 61 74 |X.xdrs->|x_privat|
|00003000| 65 20 2b 3d 20 73 69 7a | 65 6f 66 28 6c 6f 6e 67 |e += siz|eof(long|
|00003010| 29 3b 0a 58 09 72 65 74 | 75 72 6e 20 28 54 52 55 |);.X.ret|urn (TRU|
|00003020| 45 29 3b 0a 58 7d 0a 58 | 0a 58 73 74 61 74 69 63 |E);.X}.X|.Xstatic|
|00003030| 20 62 6f 6f 6c 5f 74 0a | 58 78 64 72 6d 65 6d 5f | bool_t.|Xxdrmem_|
|00003040| 67 65 74 62 79 74 65 73 | 28 78 64 72 73 2c 20 61 |getbytes|(xdrs, a|
|00003050| 64 64 72 2c 20 6c 65 6e | 29 0a 58 09 72 65 67 69 |ddr, len|).X.regi|
|00003060| 73 74 65 72 20 58 44 52 | 20 2a 78 64 72 73 3b 0a |ster XDR| *xdrs;.|
|00003070| 58 09 63 61 64 64 72 5f | 74 20 61 64 64 72 3b 0a |X.caddr_|t addr;.|
|00003080| 58 09 72 65 67 69 73 74 | 65 72 20 75 5f 69 6e 74 |X.regist|er u_int|
|00003090| 20 6c 65 6e 3b 0a 58 7b | 0a 58 0a 58 09 69 66 20 | len;.X{|.X.X.if |
|000030a0| 28 28 78 64 72 73 2d 3e | 78 5f 68 61 6e 64 79 20 |((xdrs->|x_handy |
|000030b0| 2d 3d 20 6c 65 6e 29 20 | 3c 20 30 29 0a 58 09 09 |-= len) |< 0).X..|
|000030c0| 72 65 74 75 72 6e 20 28 | 46 41 4c 53 45 29 3b 0a |return (|FALSE);.|
|000030d0| 58 09 62 63 6f 70 79 28 | 78 64 72 73 2d 3e 78 5f |X.bcopy(|xdrs->x_|
|000030e0| 70 72 69 76 61 74 65 2c | 20 61 64 64 72 2c 20 6c |private,| addr, l|
|000030f0| 65 6e 29 3b 0a 58 09 78 | 64 72 73 2d 3e 78 5f 70 |en);.X.x|drs->x_p|
|00003100| 72 69 76 61 74 65 20 2b | 3d 20 6c 65 6e 3b 0a 58 |rivate +|= len;.X|
|00003110| 09 72 65 74 75 72 6e 20 | 28 54 52 55 45 29 3b 0a |.return |(TRUE);.|
|00003120| 58 7d 0a 58 0a 58 73 74 | 61 74 69 63 20 62 6f 6f |X}.X.Xst|atic boo|
|00003130| 6c 5f 74 0a 58 78 64 72 | 6d 65 6d 5f 70 75 74 62 |l_t.Xxdr|mem_putb|
|00003140| 79 74 65 73 28 78 64 72 | 73 2c 20 61 64 64 72 2c |ytes(xdr|s, addr,|
|00003150| 20 6c 65 6e 29 0a 58 09 | 72 65 67 69 73 74 65 72 | len).X.|register|
|00003160| 20 58 44 52 20 2a 78 64 | 72 73 3b 0a 58 09 63 61 | XDR *xd|rs;.X.ca|
|00003170| 64 64 72 5f 74 20 61 64 | 64 72 3b 0a 58 09 72 65 |ddr_t ad|dr;.X.re|
|00003180| 67 69 73 74 65 72 20 75 | 5f 69 6e 74 20 6c 65 6e |gister u|_int len|
|00003190| 3b 0a 58 7b 0a 58 0a 58 | 09 69 66 20 28 28 78 64 |;.X{.X.X|.if ((xd|
|000031a0| 72 73 2d 3e 78 5f 68 61 | 6e 64 79 20 2d 3d 20 6c |rs->x_ha|ndy -= l|
|000031b0| 65 6e 29 20 3c 20 30 29 | 0a 58 09 09 72 65 74 75 |en) < 0)|.X..retu|
|000031c0| 72 6e 20 28 46 41 4c 53 | 45 29 3b 0a 58 09 62 63 |rn (FALS|E);.X.bc|
|000031d0| 6f 70 79 28 61 64 64 72 | 2c 20 78 64 72 73 2d 3e |opy(addr|, xdrs->|
|000031e0| 78 5f 70 72 69 76 61 74 | 65 2c 20 6c 65 6e 29 3b |x_privat|e, len);|
|000031f0| 0a 58 09 78 64 72 73 2d | 3e 78 5f 70 72 69 76 61 |.X.xdrs-|>x_priva|
|00003200| 74 65 20 2b 3d 20 6c 65 | 6e 3b 0a 58 09 72 65 74 |te += le|n;.X.ret|
|00003210| 75 72 6e 20 28 54 52 55 | 45 29 3b 0a 58 7d 0a 58 |urn (TRU|E);.X}.X|
|00003220| 0a 58 73 74 61 74 69 63 | 20 75 5f 69 6e 74 0a 58 |.Xstatic| u_int.X|
|00003230| 78 64 72 6d 65 6d 5f 67 | 65 74 70 6f 73 28 78 64 |xdrmem_g|etpos(xd|
|00003240| 72 73 29 0a 58 09 72 65 | 67 69 73 74 65 72 20 58 |rs).X.re|gister X|
|00003250| 44 52 20 2a 78 64 72 73 | 3b 0a 58 7b 0a 58 0a 58 |DR *xdrs|;.X{.X.X|
|00003260| 09 72 65 74 75 72 6e 20 | 28 28 75 5f 69 6e 74 29 |.return |((u_int)|
|00003270| 78 64 72 73 2d 3e 78 5f | 70 72 69 76 61 74 65 20 |xdrs->x_|private |
|00003280| 2d 20 28 75 5f 69 6e 74 | 29 78 64 72 73 2d 3e 78 |- (u_int|)xdrs->x|
|00003290| 5f 62 61 73 65 29 3b 0a | 58 7d 0a 58 0a 58 73 74 |_base);.|X}.X.Xst|
|000032a0| 61 74 69 63 20 62 6f 6f | 6c 5f 74 0a 58 78 64 72 |atic boo|l_t.Xxdr|
|000032b0| 6d 65 6d 5f 73 65 74 70 | 6f 73 28 78 64 72 73 2c |mem_setp|os(xdrs,|
|000032c0| 20 70 6f 73 29 0a 58 09 | 72 65 67 69 73 74 65 72 | pos).X.|register|
|000032d0| 20 58 44 52 20 2a 78 64 | 72 73 3b 0a 58 09 75 5f | XDR *xd|rs;.X.u_|
|000032e0| 69 6e 74 20 70 6f 73 3b | 0a 58 7b 0a 58 09 72 65 |int pos;|.X{.X.re|
|000032f0| 67 69 73 74 65 72 20 63 | 61 64 64 72 5f 74 20 6e |gister c|addr_t n|
|00003300| 65 77 61 64 64 72 20 3d | 20 78 64 72 73 2d 3e 78 |ewaddr =| xdrs->x|
|00003310| 5f 62 61 73 65 20 2b 20 | 70 6f 73 3b 0a 58 09 72 |_base + |pos;.X.r|
|00003320| 65 67 69 73 74 65 72 20 | 63 61 64 64 72 5f 74 20 |egister |caddr_t |
|00003330| 6c 61 73 74 61 64 64 72 | 20 3d 20 78 64 72 73 2d |lastaddr| = xdrs-|
|00003340| 3e 78 5f 70 72 69 76 61 | 74 65 20 2b 20 78 64 72 |>x_priva|te + xdr|
|00003350| 73 2d 3e 78 5f 68 61 6e | 64 79 3b 0a 58 0a 58 09 |s->x_han|dy;.X.X.|
|00003360| 69 66 20 28 28 6c 6f 6e | 67 29 6e 65 77 61 64 64 |if ((lon|g)newadd|
|00003370| 72 20 3e 20 28 6c 6f 6e | 67 29 6c 61 73 74 61 64 |r > (lon|g)lastad|
|00003380| 64 72 29 0a 58 09 09 72 | 65 74 75 72 6e 20 28 46 |dr).X..r|eturn (F|
|00003390| 41 4c 53 45 29 3b 0a 58 | 09 78 64 72 73 2d 3e 78 |ALSE);.X|.xdrs->x|
|000033a0| 5f 70 72 69 76 61 74 65 | 20 3d 20 6e 65 77 61 64 |_private| = newad|
|000033b0| 64 72 3b 0a 58 09 78 64 | 72 73 2d 3e 78 5f 68 61 |dr;.X.xd|rs->x_ha|
|000033c0| 6e 64 79 20 3d 20 28 69 | 6e 74 29 6c 61 73 74 61 |ndy = (i|nt)lasta|
|000033d0| 64 64 72 20 2d 20 28 69 | 6e 74 29 6e 65 77 61 64 |ddr - (i|nt)newad|
|000033e0| 64 72 3b 0a 58 09 72 65 | 74 75 72 6e 20 28 54 52 |dr;.X.re|turn (TR|
|000033f0| 55 45 29 3b 0a 58 7d 0a | 58 0a 58 73 74 61 74 69 |UE);.X}.|X.Xstati|
|00003400| 63 20 6c 6f 6e 67 20 2a | 0a 58 78 64 72 6d 65 6d |c long *|.Xxdrmem|
|00003410| 5f 69 6e 6c 69 6e 65 28 | 78 64 72 73 2c 20 6c 65 |_inline(|xdrs, le|
|00003420| 6e 29 0a 58 09 72 65 67 | 69 73 74 65 72 20 58 44 |n).X.reg|ister XD|
|00003430| 52 20 2a 78 64 72 73 3b | 0a 58 09 69 6e 74 20 6c |R *xdrs;|.X.int l|
|00003440| 65 6e 3b 0a 58 7b 0a 58 | 09 6c 6f 6e 67 20 2a 62 |en;.X{.X|.long *b|
|00003450| 75 66 20 3d 20 30 3b 0a | 58 0a 58 09 69 66 20 28 |uf = 0;.|X.X.if (|
|00003460| 78 64 72 73 2d 3e 78 5f | 68 61 6e 64 79 20 3e 3d |xdrs->x_|handy >=|
|00003470| 20 6c 65 6e 29 20 7b 0a | 58 09 09 78 64 72 73 2d | len) {.|X..xdrs-|
|00003480| 3e 78 5f 68 61 6e 64 79 | 20 2d 3d 20 6c 65 6e 3b |>x_handy| -= len;|
|00003490| 0a 58 09 09 62 75 66 20 | 3d 20 28 6c 6f 6e 67 20 |.X..buf |= (long |
|000034a0| 2a 29 20 78 64 72 73 2d | 3e 78 5f 70 72 69 76 61 |*) xdrs-|>x_priva|
|000034b0| 74 65 3b 0a 58 09 09 78 | 64 72 73 2d 3e 78 5f 70 |te;.X..x|drs->x_p|
|000034c0| 72 69 76 61 74 65 20 2b | 3d 20 6c 65 6e 3b 0a 58 |rivate +|= len;.X|
|000034d0| 09 7d 0a 58 09 72 65 74 | 75 72 6e 20 28 62 75 66 |.}.X.ret|urn (buf|
|000034e0| 29 3b 0a 58 7d 0a 53 48 | 41 52 5f 45 4f 46 0a 69 |);.X}.SH|AR_EOF.i|
|000034f0| 66 20 74 65 73 74 20 34 | 31 33 39 20 2d 6e 65 20 |f test 4|139 -ne |
|00003500| 22 60 77 63 20 2d 63 20 | 3c 20 27 72 70 63 2f 72 |"`wc -c |< 'rpc/r|
|00003510| 70 63 6c 69 62 2f 78 64 | 72 5f 6d 65 6d 2e 63 27 |pclib/xd|r_mem.c'|
|00003520| 60 22 0a 74 68 65 6e 0a | 09 65 63 68 6f 20 73 68 |`".then.|.echo sh|
|00003530| 61 72 3a 20 22 65 72 72 | 6f 72 20 74 72 61 6e 73 |ar: "err|or trans|
|00003540| 6d 69 74 74 69 6e 67 20 | 27 72 70 63 2f 72 70 63 |mitting |'rpc/rpc|
|00003550| 6c 69 62 2f 78 64 72 5f | 6d 65 6d 2e 63 27 22 20 |lib/xdr_|mem.c'" |
|00003560| 27 28 73 68 6f 75 6c 64 | 20 68 61 76 65 20 62 65 |'(should| have be|
|00003570| 65 6e 20 34 31 33 39 20 | 63 68 61 72 61 63 74 65 |en 4139 |characte|
|00003580| 72 73 29 27 0a 66 69 0a | 63 68 6d 6f 64 20 34 34 |rs)'.fi.|chmod 44|
|00003590| 34 20 27 72 70 63 2f 72 | 70 63 6c 69 62 2f 78 64 |4 'rpc/r|pclib/xd|
|000035a0| 72 5f 6d 65 6d 2e 63 27 | 0a 66 69 0a 65 63 68 6f |r_mem.c'|.fi.echo|
|000035b0| 20 73 68 61 72 3a 20 22 | 65 78 74 72 61 63 74 69 | shar: "|extracti|
|000035c0| 6e 67 20 27 72 70 63 2f | 72 70 63 6c 69 62 2f 78 |ng 'rpc/|rpclib/x|
|000035d0| 64 72 5f 72 65 63 2e 63 | 27 22 20 27 28 31 35 30 |dr_rec.c|'" '(150|
|000035e0| 36 33 20 63 68 61 72 61 | 63 74 65 72 73 29 27 0a |63 chara|cters)'.|
|000035f0| 69 66 20 74 65 73 74 20 | 2d 66 20 27 72 70 63 2f |if test |-f 'rpc/|
|00003600| 72 70 63 6c 69 62 2f 78 | 64 72 5f 72 65 63 2e 63 |rpclib/x|dr_rec.c|
|00003610| 27 0a 74 68 65 6e 0a 09 | 65 63 68 6f 20 73 68 61 |'.then..|echo sha|
|00003620| 72 3a 20 22 77 69 6c 6c | 20 6e 6f 74 20 6f 76 65 |r: "will| not ove|
|00003630| 72 2d 77 72 69 74 65 20 | 65 78 69 73 74 69 6e 67 |r-write |existing|
|00003640| 20 66 69 6c 65 20 27 72 | 70 63 2f 72 70 63 6c 69 | file 'r|pc/rpcli|
|00003650| 62 2f 78 64 72 5f 72 65 | 63 2e 63 27 22 0a 65 6c |b/xdr_re|c.c'".el|
|00003660| 73 65 0a 73 65 64 20 27 | 73 2f 5e 58 2f 2f 27 20 |se.sed '|s/^X//' |
|00003670| 3c 3c 20 5c 53 48 41 52 | 5f 45 4f 46 20 3e 20 27 |<< \SHAR|_EOF > '|
|00003680| 72 70 63 2f 72 70 63 6c | 69 62 2f 78 64 72 5f 72 |rpc/rpcl|ib/xdr_r|
|00003690| 65 63 2e 63 27 0a 58 2f | 2a 0a 58 20 2a 20 53 75 |ec.c'.X/|*.X * Su|
|000036a0| 6e 20 52 50 43 20 69 73 | 20 61 20 70 72 6f 64 75 |n RPC is| a produ|
|000036b0| 63 74 20 6f 66 20 53 75 | 6e 20 4d 69 63 72 6f 73 |ct of Su|n Micros|
|000036c0| 79 73 74 65 6d 73 2c 20 | 49 6e 63 2e 20 61 6e 64 |ystems, |Inc. and|
|000036d0| 20 69 73 20 70 72 6f 76 | 69 64 65 64 20 66 6f 72 | is prov|ided for|
|000036e0| 0a 58 20 2a 20 75 6e 72 | 65 73 74 72 69 63 74 65 |.X * unr|estricte|
|000036f0| 64 20 75 73 65 20 70 72 | 6f 76 69 64 65 64 20 74 |d use pr|ovided t|
|00003700| 68 61 74 20 74 68 69 73 | 20 6c 65 67 65 6e 64 20 |hat this| legend |
|00003710| 69 73 20 69 6e 63 6c 75 | 64 65 64 20 6f 6e 20 61 |is inclu|ded on a|
|00003720| 6c 6c 20 74 61 70 65 0a | 58 20 2a 20 6d 65 64 69 |ll tape.|X * medi|
|00003730| 61 20 61 6e 64 20 61 73 | 20 61 20 70 61 72 74 20 |a and as| a part |
|00003740| 6f 66 20 74 68 65 20 73 | 6f 66 74 77 61 72 65 20 |of the s|oftware |
|00003750| 70 72 6f 67 72 61 6d 20 | 69 6e 20 77 68 6f 6c 65 |program |in whole|
|00003760| 20 6f 72 20 70 61 72 74 | 2e 20 20 55 73 65 72 73 | or part|. Users|
|00003770| 0a 58 20 2a 20 6d 61 79 | 20 63 6f 70 79 20 6f 72 |.X * may| copy or|
|00003780| 20 6d 6f 64 69 66 79 20 | 53 75 6e 20 52 50 43 20 | modify |Sun RPC |
|00003790| 77 69 74 68 6f 75 74 20 | 63 68 61 72 67 65 2c 20 |without |charge, |
|000037a0| 62 75 74 20 61 72 65 20 | 6e 6f 74 20 61 75 74 68 |but are |not auth|
|000037b0| 6f 72 69 7a 65 64 0a 58 | 20 2a 20 74 6f 20 6c 69 |orized.X| * to li|
|000037c0| 63 65 6e 73 65 20 6f 72 | 20 64 69 73 74 72 69 62 |cense or| distrib|
|000037d0| 75 74 65 20 69 74 20 74 | 6f 20 61 6e 79 6f 6e 65 |ute it t|o anyone|
|000037e0| 20 65 6c 73 65 20 65 78 | 63 65 70 74 20 61 73 20 | else ex|cept as |
|000037f0| 70 61 72 74 20 6f 66 20 | 61 20 70 72 6f 64 75 63 |part of |a produc|
|00003800| 74 20 6f 72 0a 58 20 2a | 20 70 72 6f 67 72 61 6d |t or.X *| program|
|00003810| 20 64 65 76 65 6c 6f 70 | 65 64 20 62 79 20 74 68 | develop|ed by th|
|00003820| 65 20 75 73 65 72 2e 0a | 58 20 2a 20 0a 58 20 2a |e user..|X * .X *|
|00003830| 20 53 55 4e 20 52 50 43 | 20 49 53 20 50 52 4f 56 | SUN RPC| IS PROV|
|00003840| 49 44 45 44 20 41 53 20 | 49 53 20 57 49 54 48 20 |IDED AS |IS WITH |
|00003850| 4e 4f 20 57 41 52 52 41 | 4e 54 49 45 53 20 4f 46 |NO WARRA|NTIES OF|
|00003860| 20 41 4e 59 20 4b 49 4e | 44 20 49 4e 43 4c 55 44 | ANY KIN|D INCLUD|
|00003870| 49 4e 47 20 54 48 45 0a | 58 20 2a 20 57 41 52 52 |ING THE.|X * WARR|
|00003880| 41 4e 54 49 45 53 20 4f | 46 20 44 45 53 49 47 4e |ANTIES O|F DESIGN|
|00003890| 2c 20 4d 45 52 43 48 41 | 4e 54 49 42 49 4c 49 54 |, MERCHA|NTIBILIT|
|000038a0| 59 20 41 4e 44 20 46 49 | 54 4e 45 53 53 20 46 4f |Y AND FI|TNESS FO|
|000038b0| 52 20 41 20 50 41 52 54 | 49 43 55 4c 41 52 0a 58 |R A PART|ICULAR.X|
|000038c0| 20 2a 20 50 55 52 50 4f | 53 45 2c 20 4f 52 20 41 | * PURPO|SE, OR A|
|000038d0| 52 49 53 49 4e 47 20 46 | 52 4f 4d 20 41 20 43 4f |RISING F|ROM A CO|
|000038e0| 55 52 53 45 20 4f 46 20 | 44 45 41 4c 49 4e 47 2c |URSE OF |DEALING,|
|000038f0| 20 55 53 41 47 45 20 4f | 52 20 54 52 41 44 45 20 | USAGE O|R TRADE |
|00003900| 50 52 41 43 54 49 43 45 | 2e 0a 58 20 2a 20 0a 58 |PRACTICE|..X * .X|
|00003910| 20 2a 20 53 75 6e 20 52 | 50 43 20 69 73 20 70 72 | * Sun R|PC is pr|
|00003920| 6f 76 69 64 65 64 20 77 | 69 74 68 20 6e 6f 20 73 |ovided w|ith no s|
|00003930| 75 70 70 6f 72 74 20 61 | 6e 64 20 77 69 74 68 6f |upport a|nd witho|
|00003940| 75 74 20 61 6e 79 20 6f | 62 6c 69 67 61 74 69 6f |ut any o|bligatio|
|00003950| 6e 20 6f 6e 20 74 68 65 | 0a 58 20 2a 20 70 61 72 |n on the|.X * par|
|00003960| 74 20 6f 66 20 53 75 6e | 20 4d 69 63 72 6f 73 79 |t of Sun| Microsy|
|00003970| 73 74 65 6d 73 2c 20 49 | 6e 63 2e 20 74 6f 20 61 |stems, I|nc. to a|
|00003980| 73 73 69 73 74 20 69 6e | 20 69 74 73 20 75 73 65 |ssist in| its use|
|00003990| 2c 20 63 6f 72 72 65 63 | 74 69 6f 6e 2c 0a 58 20 |, correc|tion,.X |
|000039a0| 2a 20 6d 6f 64 69 66 69 | 63 61 74 69 6f 6e 20 6f |* modifi|cation o|
|000039b0| 72 20 65 6e 68 61 6e 63 | 65 6d 65 6e 74 2e 0a 58 |r enhanc|ement..X|
|000039c0| 20 2a 20 0a 58 20 2a 20 | 53 55 4e 20 4d 49 43 52 | * .X * |SUN MICR|
|000039d0| 4f 53 59 53 54 45 4d 53 | 2c 20 49 4e 43 2e 20 53 |OSYSTEMS|, INC. S|
|000039e0| 48 41 4c 4c 20 48 41 56 | 45 20 4e 4f 20 4c 49 41 |HALL HAV|E NO LIA|
|000039f0| 42 49 4c 49 54 59 20 57 | 49 54 48 20 52 45 53 50 |BILITY W|ITH RESP|
|00003a00| 45 43 54 20 54 4f 20 54 | 48 45 0a 58 20 2a 20 49 |ECT TO T|HE.X * I|
|00003a10| 4e 46 52 49 4e 47 45 4d | 45 4e 54 20 4f 46 20 43 |NFRINGEM|ENT OF C|
|00003a20| 4f 50 59 52 49 47 48 54 | 53 2c 20 54 52 41 44 45 |OPYRIGHT|S, TRADE|
|00003a30| 20 53 45 43 52 45 54 53 | 20 4f 52 20 41 4e 59 20 | SECRETS| OR ANY |
|00003a40| 50 41 54 45 4e 54 53 20 | 42 59 20 53 55 4e 20 52 |PATENTS |BY SUN R|
|00003a50| 50 43 0a 58 20 2a 20 4f | 52 20 41 4e 59 20 50 41 |PC.X * O|R ANY PA|
|00003a60| 52 54 20 54 48 45 52 45 | 4f 46 2e 0a 58 20 2a 20 |RT THERE|OF..X * |
|00003a70| 0a 58 20 2a 20 49 6e 20 | 6e 6f 20 65 76 65 6e 74 |.X * In |no event|
|00003a80| 20 77 69 6c 6c 20 53 75 | 6e 20 4d 69 63 72 6f 73 | will Su|n Micros|
|00003a90| 79 73 74 65 6d 73 2c 20 | 49 6e 63 2e 20 62 65 20 |ystems, |Inc. be |
|00003aa0| 6c 69 61 62 6c 65 20 66 | 6f 72 20 61 6e 79 20 6c |liable f|or any l|
|00003ab0| 6f 73 74 20 72 65 76 65 | 6e 75 65 0a 58 20 2a 20 |ost reve|nue.X * |
|00003ac0| 6f 72 20 70 72 6f 66 69 | 74 73 20 6f 72 20 6f 74 |or profi|ts or ot|
|00003ad0| 68 65 72 20 73 70 65 63 | 69 61 6c 2c 20 69 6e 64 |her spec|ial, ind|
|00003ae0| 69 72 65 63 74 20 61 6e | 64 20 63 6f 6e 73 65 71 |irect an|d conseq|
|00003af0| 75 65 6e 74 69 61 6c 20 | 64 61 6d 61 67 65 73 2c |uential |damages,|
|00003b00| 20 65 76 65 6e 20 69 66 | 0a 58 20 2a 20 53 75 6e | even if|.X * Sun|
|00003b10| 20 68 61 73 20 62 65 65 | 6e 20 61 64 76 69 73 65 | has bee|n advise|
|00003b20| 64 20 6f 66 20 74 68 65 | 20 70 6f 73 73 69 62 69 |d of the| possibi|
|00003b30| 6c 69 74 79 20 6f 66 20 | 73 75 63 68 20 64 61 6d |lity of |such dam|
|00003b40| 61 67 65 73 2e 0a 58 20 | 2a 20 0a 58 20 2a 20 53 |ages..X |* .X * S|
|00003b50| 75 6e 20 4d 69 63 72 6f | 73 79 73 74 65 6d 73 2c |un Micro|systems,|
|00003b60| 20 49 6e 63 2e 0a 58 20 | 2a 20 32 35 35 30 20 47 | Inc..X |* 2550 G|
|00003b70| 61 72 63 69 61 20 41 76 | 65 6e 75 65 0a 58 20 2a |arcia Av|enue.X *|
|00003b80| 20 4d 6f 75 6e 74 61 69 | 6e 20 56 69 65 77 2c 20 | Mountai|n View, |
|00003b90| 43 61 6c 69 66 6f 72 6e | 69 61 20 20 39 34 30 34 |Californ|ia 9404|
|00003ba0| 33 0a 58 20 2a 2f 0a 58 | 23 69 66 6e 64 65 66 20 |3.X */.X|#ifndef |
|00003bb0| 6c 69 6e 74 0a 58 73 74 | 61 74 69 63 20 63 68 61 |lint.Xst|atic cha|
|00003bc0| 72 20 73 63 63 73 69 64 | 5b 5d 20 3d 20 22 40 28 |r sccsid|[] = "@(|
|00003bd0| 23 29 78 64 72 5f 72 65 | 63 2e 63 20 31 2e 31 20 |#)xdr_re|c.c 1.1 |
|00003be0| 38 36 2f 30 32 2f 30 33 | 20 43 6f 70 79 72 20 31 |86/02/03| Copyr 1|
|00003bf0| 39 38 34 20 53 75 6e 20 | 4d 69 63 72 6f 22 3b 0a |984 Sun |Micro";.|
|00003c00| 58 23 65 6e 64 69 66 0a | 58 0a 58 2f 2a 0a 58 20 |X#endif.|X.X/*.X |
|00003c10| 2a 20 78 64 72 5f 72 65 | 63 2e 63 2c 20 49 6d 70 |* xdr_re|c.c, Imp|
|00003c20| 6c 65 6d 65 6e 74 73 20 | 54 43 50 2f 49 50 20 62 |lements |TCP/IP b|
|00003c30| 61 73 65 64 20 58 44 52 | 20 73 74 72 65 61 6d 73 |ased XDR| streams|
|00003c40| 20 77 69 74 68 20 61 20 | 22 72 65 63 6f 72 64 20 | with a |"record |
|00003c50| 6d 61 72 6b 69 6e 67 22 | 0a 58 20 2a 20 6c 61 79 |marking"|.X * lay|
|00003c60| 65 72 20 61 62 6f 76 65 | 20 74 63 70 20 28 66 6f |er above| tcp (fo|
|00003c70| 72 20 72 70 63 27 73 20 | 75 73 65 29 2e 0a 58 20 |r rpc's |use)..X |
|00003c80| 2a 0a 58 20 2a 20 43 6f | 70 79 72 69 67 68 74 20 |*.X * Co|pyright |
|00003c90| 28 43 29 20 31 39 38 34 | 2c 20 53 75 6e 20 4d 69 |(C) 1984|, Sun Mi|
|00003ca0| 63 72 6f 73 79 73 74 65 | 6d 73 2c 20 49 6e 63 2e |crosyste|ms, Inc.|
|00003cb0| 0a 58 20 2a 0a 58 20 2a | 20 54 68 65 73 65 20 72 |.X *.X *| These r|
|00003cc0| 6f 75 74 69 6e 65 73 20 | 69 6e 74 65 72 66 61 63 |outines |interfac|
|00003cd0| 65 20 58 44 52 53 54 52 | 45 41 4d 53 20 74 6f 20 |e XDRSTR|EAMS to |
|00003ce0| 61 20 74 63 70 2f 69 70 | 20 63 6f 6e 6e 65 63 74 |a tcp/ip| connect|
|00003cf0| 69 6f 6e 2e 0a 58 20 2a | 20 54 68 65 72 65 20 69 |ion..X *| There i|
|00003d00| 73 20 61 20 72 65 63 6f | 72 64 20 6d 61 72 6b 69 |s a reco|rd marki|
|00003d10| 6e 67 20 6c 61 79 65 72 | 20 62 65 74 77 65 65 6e |ng layer| between|
|00003d20| 20 74 68 65 20 78 64 72 | 20 73 74 72 65 61 6d 0a | the xdr| stream.|
|00003d30| 58 20 2a 20 61 6e 64 20 | 74 68 65 20 74 63 70 20 |X * and |the tcp |
|00003d40| 74 72 61 6e 73 70 6f 72 | 74 20 6c 65 76 65 6c 2e |transpor|t level.|
|00003d50| 20 20 41 20 72 65 63 6f | 72 64 20 69 73 20 63 6f | A reco|rd is co|
|00003d60| 6d 70 6f 73 65 64 20 6f | 6e 20 6f 6e 65 20 6f 72 |mposed o|n one or|
|00003d70| 20 6d 6f 72 65 0a 58 20 | 2a 20 72 65 63 6f 72 64 | more.X |* record|
|00003d80| 20 66 72 61 67 6d 65 6e | 74 73 2e 20 20 41 20 72 | fragmen|ts. A r|
|00003d90| 65 63 6f 72 64 20 66 72 | 61 67 6d 65 6e 74 20 69 |ecord fr|agment i|
|00003da0| 73 20 61 20 74 68 69 72 | 74 79 2d 74 77 6f 20 62 |s a thir|ty-two b|
|00003db0| 69 74 20 68 65 61 64 65 | 72 20 66 6f 6c 6c 6f 77 |it heade|r follow|
|00003dc0| 65 64 0a 58 20 2a 20 62 | 79 20 6e 20 62 79 74 65 |ed.X * b|y n byte|
|00003dd0| 73 20 6f 66 20 64 61 74 | 61 2c 20 77 68 65 72 65 |s of dat|a, where|
|00003de0| 20 6e 20 69 73 20 63 6f | 6e 74 61 69 6e 65 64 20 | n is co|ntained |
|00003df0| 69 6e 20 74 68 65 20 68 | 65 61 64 65 72 2e 20 20 |in the h|eader. |
|00003e00| 54 68 65 20 68 65 61 64 | 65 72 0a 58 20 2a 20 69 |The head|er.X * i|
|00003e10| 73 20 72 65 70 72 65 73 | 65 6e 74 65 64 20 61 73 |s repres|ented as|
|00003e20| 20 61 20 68 74 6f 6e 6c | 28 75 5f 6c 6f 6e 67 29 | a htonl|(u_long)|
|00003e30| 2e 20 20 54 68 65 67 68 | 20 6f 72 64 65 72 20 62 |. Thegh| order b|
|00003e40| 69 74 20 65 6e 63 6f 64 | 65 73 0a 58 20 2a 20 77 |it encod|es.X * w|
|00003e50| 68 65 74 68 65 72 20 6f | 72 20 6e 6f 74 20 74 68 |hether o|r not th|
|00003e60| 65 20 66 72 61 67 6d 65 | 6e 74 20 69 73 20 74 68 |e fragme|nt is th|
|00003e70| 65 20 6c 61 73 74 20 66 | 72 61 67 6d 65 6e 74 20 |e last f|ragment |
|00003e80| 6f 66 20 74 68 65 20 72 | 65 63 6f 72 64 0a 58 20 |of the r|ecord.X |
|00003e90| 2a 20 28 31 20 3d 3e 20 | 66 72 61 67 6d 65 6e 74 |* (1 => |fragment|
|00003ea0| 20 69 73 20 6c 61 73 74 | 2c 20 30 20 3d 3e 20 6d | is last|, 0 => m|
|00003eb0| 6f 72 65 20 66 72 61 67 | 6d 65 6e 74 73 20 74 6f |ore frag|ments to|
|00003ec0| 20 66 6f 6c 6c 6f 77 2e | 20 0a 58 20 2a 20 54 68 | follow.| .X * Th|
|00003ed0| 65 20 6f 74 68 65 72 20 | 33 31 20 62 69 74 73 20 |e other |31 bits |
|00003ee0| 65 6e 63 6f 64 65 20 74 | 68 65 20 62 79 74 65 20 |encode t|he byte |
|00003ef0| 6c 65 6e 67 74 68 20 6f | 66 20 74 68 65 20 66 72 |length o|f the fr|
|00003f00| 61 67 6d 65 6e 74 2e 0a | 58 20 2a 2f 0a 58 0a 58 |agment..|X */.X.X|
|00003f10| 23 69 6e 63 6c 75 64 65 | 20 3c 73 74 64 69 6f 2e |#include| <stdio.|
|00003f20| 68 3e 0a 58 23 69 6e 63 | 6c 75 64 65 20 22 74 79 |h>.X#inc|lude "ty|
|00003f30| 70 65 73 2e 68 22 0a 58 | 23 69 6e 63 6c 75 64 65 |pes.h".X|#include|
|00003f40| 20 22 78 64 72 2e 68 22 | 0a 58 23 69 6e 63 6c 75 | "xdr.h"|.X#inclu|
|00003f50| 64 65 20 3c 73 79 73 2f | 74 69 6d 65 2e 68 3e 0a |de <sys/|time.h>.|
|00003f60| 58 23 69 6e 63 6c 75 64 | 65 20 3c 6e 65 74 69 6e |X#includ|e <netin|
|00003f70| 65 74 2f 69 6e 2e 68 3e | 0a 58 0a 58 63 68 61 72 |et/in.h>|.X.Xchar|
|00003f80| 20 2a 6d 65 6d 5f 61 6c | 6c 6f 63 28 29 3b 0a 58 | *mem_al|loc();.X|
|00003f90| 0a 58 73 74 61 74 69 63 | 20 75 5f 69 6e 74 09 66 |.Xstatic| u_int.f|
|00003fa0| 69 78 5f 62 75 66 5f 73 | 69 7a 65 28 29 3b 0a 58 |ix_buf_s|ize();.X|
|00003fb0| 0a 58 73 74 61 74 69 63 | 20 62 6f 6f 6c 5f 74 09 |.Xstatic| bool_t.|
|00003fc0| 78 64 72 72 65 63 5f 67 | 65 74 6c 6f 6e 67 28 29 |xdrrec_g|etlong()|
|00003fd0| 3b 0a 58 73 74 61 74 69 | 63 20 62 6f 6f 6c 5f 74 |;.Xstati|c bool_t|
|00003fe0| 09 78 64 72 72 65 63 5f | 70 75 74 6c 6f 6e 67 28 |.xdrrec_|putlong(|
|00003ff0| 29 3b 0a 58 73 74 61 74 | 69 63 20 62 6f 6f 6c 5f |);.Xstat|ic bool_|
|00004000| 74 09 78 64 72 72 65 63 | 5f 67 65 74 62 79 74 65 |t.xdrrec|_getbyte|
|00004010| 73 28 29 3b 0a 58 73 74 | 61 74 69 63 20 62 6f 6f |s();.Xst|atic boo|
|00004020| 6c 5f 74 09 78 64 72 72 | 65 63 5f 70 75 74 62 79 |l_t.xdrr|ec_putby|
|00004030| 74 65 73 28 29 3b 0a 58 | 73 74 61 74 69 63 20 75 |tes();.X|static u|
|00004040| 5f 69 6e 74 09 78 64 72 | 72 65 63 5f 67 65 74 70 |_int.xdr|rec_getp|
|00004050| 6f 73 28 29 3b 0a 58 73 | 74 61 74 69 63 20 62 6f |os();.Xs|tatic bo|
|00004060| 6f 6c 5f 74 09 78 64 72 | 72 65 63 5f 73 65 74 70 |ol_t.xdr|rec_setp|
|00004070| 6f 73 28 29 3b 0a 58 73 | 74 61 74 69 63 20 6c 6f |os();.Xs|tatic lo|
|00004080| 6e 67 20 2a 09 78 64 72 | 72 65 63 5f 69 6e 6c 69 |ng *.xdr|rec_inli|
|00004090| 6e 65 28 29 3b 0a 58 73 | 74 61 74 69 63 20 76 6f |ne();.Xs|tatic vo|
|000040a0| 69 64 09 78 64 72 72 65 | 63 5f 64 65 73 74 72 6f |id.xdrre|c_destro|
|000040b0| 79 28 29 3b 0a 58 0a 58 | 73 74 61 74 69 63 20 73 |y();.X.X|static s|
|000040c0| 74 72 75 63 74 20 20 78 | 64 72 5f 6f 70 73 20 78 |truct x|dr_ops x|
|000040d0| 64 72 72 65 63 5f 6f 70 | 73 20 3d 20 7b 0a 58 09 |drrec_op|s = {.X.|
|000040e0| 78 64 72 72 65 63 5f 67 | 65 74 6c 6f 6e 67 2c 0a |xdrrec_g|etlong,.|
|000040f0| 58 09 78 64 72 72 65 63 | 5f 70 75 74 6c 6f 6e 67 |X.xdrrec|_putlong|
|00004100| 2c 0a 58 09 78 64 72 72 | 65 63 5f 67 65 74 62 79 |,.X.xdrr|ec_getby|
|00004110| 74 65 73 2c 0a 58 09 78 | 64 72 72 65 63 5f 70 75 |tes,.X.x|drrec_pu|
|00004120| 74 62 79 74 65 73 2c 0a | 58 09 78 64 72 72 65 63 |tbytes,.|X.xdrrec|
|00004130| 5f 67 65 74 70 6f 73 2c | 0a 58 09 78 64 72 72 65 |_getpos,|.X.xdrre|
|00004140| 63 5f 73 65 74 70 6f 73 | 2c 0a 58 09 78 64 72 72 |c_setpos|,.X.xdrr|
|00004150| 65 63 5f 69 6e 6c 69 6e | 65 2c 0a 58 09 78 64 72 |ec_inlin|e,.X.xdr|
|00004160| 72 65 63 5f 64 65 73 74 | 72 6f 79 0a 58 7d 3b 0a |rec_dest|roy.X};.|
|00004170| 58 0a 58 2f 2a 0a 58 20 | 2a 20 41 20 72 65 63 6f |X.X/*.X |* A reco|
|00004180| 72 64 20 69 73 20 63 6f | 6d 70 6f 73 65 64 20 6f |rd is co|mposed o|
|00004190| 66 20 6f 6e 65 20 6f 72 | 20 6d 6f 72 65 20 72 65 |f one or| more re|
|000041a0| 63 6f 72 64 20 66 72 61 | 67 6d 65 6e 74 73 2e 0a |cord fra|gments..|
|000041b0| 58 20 2a 20 41 20 72 65 | 63 6f 72 64 20 66 72 61 |X * A re|cord fra|
|000041c0| 67 6d 65 6e 74 20 69 73 | 20 61 20 74 77 6f 2d 62 |gment is| a two-b|
|000041d0| 79 74 65 20 68 65 61 64 | 65 72 20 66 6f 6c 6c 6f |yte head|er follo|
|000041e0| 77 65 64 20 62 79 20 7a | 65 72 6f 20 74 6f 0a 58 |wed by z|ero to.X|
|000041f0| 20 2a 20 32 2a 2a 33 32 | 2d 31 20 62 79 74 65 73 | * 2**32|-1 bytes|
|00004200| 2e 20 20 54 68 65 20 68 | 65 61 64 65 72 20 69 73 |. The h|eader is|
|00004210| 20 74 72 65 61 74 65 64 | 20 61 73 20 61 20 6c 6f | treated| as a lo|
|00004220| 6e 67 20 75 6e 73 69 67 | 6e 65 64 20 61 6e 64 20 |ng unsig|ned and |
|00004230| 69 73 0a 58 20 2a 20 65 | 6e 63 6f 64 65 2f 64 65 |is.X * e|ncode/de|
|00004240| 63 6f 64 65 64 20 74 6f | 20 74 68 65 20 6e 65 74 |coded to| the net|
|00004250| 77 6f 72 6b 20 76 69 61 | 20 68 74 6f 6e 6c 2f 6e |work via| htonl/n|
|00004260| 74 6f 68 6c 2e 20 20 54 | 68 65 20 6c 6f 77 20 6f |tohl. T|he low o|
|00004270| 72 64 65 72 20 33 31 20 | 62 69 74 73 0a 58 20 2a |rder 31 |bits.X *|
|00004280| 20 61 72 65 20 61 20 62 | 79 74 65 20 63 6f 75 6e | are a b|yte coun|
|00004290| 74 20 6f 66 20 74 68 65 | 20 66 72 61 67 6d 65 6e |t of the| fragmen|
|000042a0| 74 2e 20 20 54 68 65 20 | 68 69 67 68 65 73 74 20 |t. The |highest |
|000042b0| 6f 72 64 65 72 20 62 69 | 74 20 69 73 20 61 20 62 |order bi|t is a b|
|000042c0| 6f 6f 6c 65 61 6e 3a 0a | 58 20 2a 20 31 20 3d 3e |oolean:.|X * 1 =>|
|000042d0| 20 74 68 69 73 20 66 72 | 61 67 6d 65 6e 74 20 69 | this fr|agment i|
|000042e0| 73 20 74 68 65 20 6c 61 | 73 74 20 66 72 61 67 6d |s the la|st fragm|
|000042f0| 65 6e 74 20 6f 66 20 74 | 68 65 20 72 65 63 6f 72 |ent of t|he recor|
|00004300| 64 2c 0a 58 20 2a 20 30 | 20 3d 3e 20 74 68 69 73 |d,.X * 0| => this|
|00004310| 20 66 72 61 67 6d 65 6e | 74 20 69 73 20 66 6f 6c | fragmen|t is fol|
|00004320| 6c 6f 77 65 64 20 62 79 | 20 6d 6f 72 65 20 66 72 |lowed by| more fr|
|00004330| 61 67 6d 65 6e 74 28 73 | 29 2e 0a 58 20 2a 0a 58 |agment(s|)..X *.X|
|00004340| 20 2a 20 54 68 65 20 66 | 72 61 67 6d 65 6e 74 2f | * The f|ragment/|
|00004350| 72 65 63 6f 72 64 20 6d | 61 63 68 69 6e 65 72 79 |record m|achinery|
|00004360| 20 69 73 20 6e 6f 74 20 | 67 65 6e 65 72 61 6c 3b | is not |general;|
|00004370| 20 20 69 74 20 69 73 20 | 63 6f 6e 73 74 72 75 63 | it is |construc|
|00004380| 74 65 64 20 74 6f 0a 58 | 20 2a 20 6d 65 65 74 20 |ted to.X| * meet |
|00004390| 74 68 65 20 6e 65 65 64 | 73 20 6f 66 20 78 64 72 |the need|s of xdr|
|000043a0| 20 61 6e 64 20 72 70 63 | 20 62 61 73 65 64 20 6f | and rpc| based o|
|000043b0| 6e 20 74 63 70 2e 0a 58 | 20 2a 2f 0a 58 0a 58 23 |n tcp..X| */.X.X#|
|000043c0| 64 65 66 69 6e 65 20 4c | 41 53 54 5f 46 52 41 47 |define L|AST_FRAG|
|000043d0| 20 28 28 75 5f 6c 6f 6e | 67 29 28 31 20 3c 3c 20 | ((u_lon|g)(1 << |
|000043e0| 33 31 29 29 0a 58 0a 58 | 74 79 70 65 64 65 66 20 |31)).X.X|typedef |
|000043f0| 73 74 72 75 63 74 20 72 | 65 63 5f 73 74 72 6d 20 |struct r|ec_strm |
|00004400| 7b 0a 58 09 63 61 64 64 | 72 5f 74 20 74 63 70 5f |{.X.cadd|r_t tcp_|
|00004410| 68 61 6e 64 6c 65 3b 0a | 58 09 2f 2a 0a 58 09 20 |handle;.|X./*.X. |
|00004420| 2a 20 6f 75 74 2d 67 6f | 75 6e 67 20 62 69 74 73 |* out-go|ung bits|
|00004430| 0a 58 09 20 2a 2f 0a 58 | 09 69 6e 74 20 28 2a 77 |.X. */.X|.int (*w|
|00004440| 72 69 74 65 69 74 29 28 | 29 3b 0a 58 09 63 61 64 |riteit)(|);.X.cad|
|00004450| 64 72 5f 74 20 6f 75 74 | 5f 62 61 73 65 3b 09 2f |dr_t out|_base;./|
|00004460| 2a 20 6f 75 74 70 75 74 | 20 62 75 66 66 65 72 20 |* output| buffer |
|00004470| 28 70 6f 69 6e 74 73 20 | 74 6f 20 66 72 61 67 20 |(points |to frag |
|00004480| 68 65 61 64 65 72 29 20 | 2a 2f 0a 58 09 63 61 64 |header) |*/.X.cad|
|00004490| 64 72 5f 74 20 6f 75 74 | 5f 66 69 6e 67 65 72 3b |dr_t out|_finger;|
|000044a0| 09 2f 2a 20 6e 65 78 74 | 20 6f 75 74 70 75 74 20 |./* next| output |
|000044b0| 70 6f 73 69 74 69 6f 6e | 20 2a 2f 0a 58 09 63 61 |position| */.X.ca|
|000044c0| 64 64 72 5f 74 20 6f 75 | 74 5f 62 6f 75 6e 64 72 |ddr_t ou|t_boundr|
|000044d0| 79 3b 09 2f 2a 20 64 61 | 74 61 20 63 61 6e 6e 6f |y;./* da|ta canno|
|000044e0| 74 20 75 70 20 74 6f 20 | 74 68 69 73 20 61 64 64 |t up to |this add|
|000044f0| 72 65 73 73 20 2a 2f 0a | 58 09 75 5f 6c 6f 6e 67 |ress */.|X.u_long|
|00004500| 20 2a 66 72 61 67 5f 68 | 65 61 64 65 72 3b 09 2f | *frag_h|eader;./|
|00004510| 2a 20 62 65 67 69 6e 6e | 69 6e 67 20 6f 66 20 63 |* beginn|ing of c|
|00004520| 75 72 72 65 6e 20 66 72 | 61 67 6d 65 6e 74 20 2a |urren fr|agment *|
|00004530| 2f 0a 58 09 62 6f 6f 6c | 5f 74 20 66 72 61 67 5f |/.X.bool|_t frag_|
|00004540| 73 65 6e 74 3b 09 2f 2a | 20 74 72 75 65 20 69 66 |sent;./*| true if|
|00004550| 20 62 75 66 66 65 72 20 | 73 65 6e 74 20 69 6e 20 | buffer |sent in |
|00004560| 6d 69 64 64 6c 65 20 6f | 66 20 72 65 63 6f 72 64 |middle o|f record|
|00004570| 20 2a 2f 0a 58 09 2f 2a | 0a 58 09 20 2a 20 69 6e | */.X./*|.X. * in|
|00004580| 2d 63 6f 6d 69 6e 67 20 | 62 69 74 73 0a 58 09 20 |-coming |bits.X. |
|00004590| 2a 2f 0a 58 09 69 6e 74 | 20 28 2a 72 65 61 64 69 |*/.X.int| (*readi|
|000045a0| 74 29 28 29 3b 0a 58 09 | 75 5f 6c 6f 6e 67 20 69 |t)();.X.|u_long i|
|000045b0| 6e 5f 73 69 7a 65 3b 09 | 2f 2a 20 66 69 78 65 64 |n_size;.|/* fixed|
|000045c0| 20 73 69 7a 65 20 6f 66 | 20 74 68 65 20 69 6e 70 | size of| the inp|
|000045d0| 75 74 20 62 75 66 66 65 | 72 20 2a 2f 0a 58 09 63 |ut buffe|r */.X.c|
|000045e0| 61 64 64 72 5f 74 20 69 | 6e 5f 62 61 73 65 3b 0a |addr_t i|n_base;.|
|000045f0| 58 09 63 61 64 64 72 5f | 74 20 69 6e 5f 66 69 6e |X.caddr_|t in_fin|
|00004600| 67 65 72 3b 09 2f 2a 20 | 6c 6f 63 61 74 69 6f 6e |ger;./* |location|
|00004610| 20 6f 66 20 6e 65 78 74 | 20 62 79 74 65 20 74 6f | of next| byte to|
|00004620| 20 62 65 20 68 61 64 20 | 2a 2f 0a 58 09 63 61 64 | be had |*/.X.cad|
|00004630| 64 72 5f 74 20 69 6e 5f | 62 6f 75 6e 64 72 79 3b |dr_t in_|boundry;|
|00004640| 09 2f 2a 20 63 61 6e 20 | 72 65 61 64 20 75 70 20 |./* can |read up |
|00004650| 74 6f 20 74 68 69 73 20 | 6c 6f 63 61 74 69 6f 6e |to this |location|
|00004660| 20 2a 2f 0a 58 09 6c 6f | 6e 67 20 66 62 74 62 63 | */.X.lo|ng fbtbc|
|00004670| 3b 09 09 2f 2a 20 66 72 | 61 67 6d 65 6e 74 20 62 |;../* fr|agment b|
|00004680| 79 74 65 73 20 74 6f 20 | 62 65 20 63 6f 6e 73 75 |ytes to |be consu|
|00004690| 6d 65 64 20 2a 2f 0a 58 | 09 62 6f 6f 6c 5f 74 20 |med */.X|.bool_t |
|000046a0| 6c 61 73 74 5f 66 72 61 | 67 3b 0a 58 09 75 5f 69 |last_fra|g;.X.u_i|
|000046b0| 6e 74 20 73 65 6e 64 73 | 69 7a 65 3b 0a 58 09 75 |nt sends|ize;.X.u|
|000046c0| 5f 69 6e 74 20 72 65 63 | 76 73 69 7a 65 3b 0a 58 |_int rec|vsize;.X|
|000046d0| 7d 20 52 45 43 53 54 52 | 45 41 4d 3b 0a 58 0a 58 |} RECSTR|EAM;.X.X|
|000046e0| 0a 58 2f 2a 0a 58 20 2a | 20 43 72 65 61 74 65 20 |.X/*.X *| Create |
|000046f0| 61 6e 20 78 64 72 20 68 | 61 6e 64 6c 65 20 66 6f |an xdr h|andle fo|
|00004700| 72 20 78 64 72 72 65 63 | 0a 58 20 2a 20 78 64 72 |r xdrrec|.X * xdr|
|00004710| 72 65 63 5f 63 72 65 61 | 74 65 20 66 69 6c 6c 73 |rec_crea|te fills|
|00004720| 20 69 6e 20 78 64 72 73 | 2e 20 20 53 65 6e 64 73 | in xdrs|. Sends|
|00004730| 69 7a 65 20 61 6e 64 20 | 72 65 63 76 73 69 7a 65 |ize and |recvsize|
|00004740| 20 61 72 65 0a 58 20 2a | 20 73 65 6e 64 20 61 6e | are.X *| send an|
|00004750| 64 20 72 65 63 76 20 62 | 75 66 66 65 72 20 73 69 |d recv b|uffer si|
|00004760| 7a 65 73 20 28 30 20 3d | 3e 20 75 73 65 20 64 65 |zes (0 =|> use de|
|00004770| 66 61 75 6c 74 29 2e 0a | 58 20 2a 20 74 63 70 5f |fault)..|X * tcp_|
|00004780| 68 61 6e 64 6c 65 20 69 | 73 20 61 6e 20 6f 70 61 |handle i|s an opa|
|00004790| 71 75 65 20 68 61 6e 64 | 6c 65 20 74 68 61 74 20 |que hand|le that |
|000047a0| 69 73 20 70 61 73 73 65 | 64 20 61 73 20 74 68 65 |is passe|d as the|
|000047b0| 20 66 69 72 73 74 20 70 | 61 72 61 6d 65 74 65 72 | first p|arameter|
|000047c0| 20 74 6f 0a 58 20 2a 20 | 74 68 65 20 70 72 6f 63 | to.X * |the proc|
|000047d0| 65 64 75 72 65 73 20 72 | 65 61 64 69 74 20 61 6e |edures r|eadit an|
|000047e0| 64 20 77 72 69 74 65 69 | 74 2e 20 20 52 65 61 64 |d writei|t. Read|
|000047f0| 69 74 20 61 6e 64 20 77 | 72 69 74 65 69 74 20 61 |it and w|riteit a|
|00004800| 72 65 20 72 65 61 64 20 | 61 6e 64 0a 58 20 2a 20 |re read |and.X * |
|00004810| 77 72 69 74 65 20 72 65 | 73 70 65 63 74 69 76 65 |write re|spective|
|00004820| 6c 79 2e 20 20 20 54 68 | 65 79 20 61 72 65 20 6c |ly. Th|ey are l|
|00004830| 69 6b 65 20 74 68 65 20 | 73 79 73 74 65 6d 0a 58 |ike the |system.X|
|00004840| 20 2a 20 63 61 6c 6c 73 | 20 65 78 70 65 63 74 20 | * calls| expect |
|00004850| 74 68 61 74 20 74 68 65 | 79 20 74 61 6b 65 20 61 |that the|y take a|
|00004860| 6e 20 6f 70 61 71 75 65 | 20 68 61 6e 64 6c 65 20 |n opaque| handle |
|00004870| 72 61 74 68 65 72 20 74 | 68 61 6e 20 61 6e 20 66 |rather t|han an f|
|00004880| 64 2e 0a 58 20 2a 2f 0a | 58 76 6f 69 64 0a 58 78 |d..X */.|Xvoid.Xx|
|00004890| 64 72 72 65 63 5f 63 72 | 65 61 74 65 28 78 64 72 |drrec_cr|eate(xdr|
|000048a0| 73 2c 20 73 65 6e 64 73 | 69 7a 65 2c 20 72 65 63 |s, sends|ize, rec|
|000048b0| 76 73 69 7a 65 2c 20 74 | 63 70 5f 68 61 6e 64 6c |vsize, t|cp_handl|
|000048c0| 65 2c 20 72 65 61 64 69 | 74 2c 20 77 72 69 74 65 |e, readi|t, write|
|000048d0| 69 74 29 0a 58 09 72 65 | 67 69 73 74 65 72 20 58 |it).X.re|gister X|
|000048e0| 44 52 20 2a 78 64 72 73 | 3b 0a 58 09 75 5f 69 6e |DR *xdrs|;.X.u_in|
|000048f0| 74 20 73 65 6e 64 73 69 | 7a 65 3b 0a 58 09 75 5f |t sendsi|ze;.X.u_|
|00004900| 69 6e 74 20 72 65 63 76 | 73 69 7a 65 3b 0a 58 09 |int recv|size;.X.|
|00004910| 63 61 64 64 72 5f 74 20 | 74 63 70 5f 68 61 6e 64 |caddr_t |tcp_hand|
|00004920| 6c 65 3b 0a 58 09 69 6e | 74 20 28 2a 72 65 61 64 |le;.X.in|t (*read|
|00004930| 69 74 29 28 29 3b 20 20 | 2f 2a 20 6c 69 6b 65 20 |it)(); |/* like |
|00004940| 72 65 61 64 2c 20 62 75 | 74 20 70 61 73 73 20 69 |read, bu|t pass i|
|00004950| 74 20 61 20 74 63 70 5f | 68 61 6e 64 6c 65 2c 20 |t a tcp_|handle, |
|00004960| 6e 6f 74 20 73 6f 63 6b | 20 2a 2f 0a 58 09 69 6e |not sock| */.X.in|
|00004970| 74 20 28 2a 77 72 69 74 | 65 69 74 29 28 29 3b 20 |t (*writ|eit)(); |
|00004980| 20 2f 2a 20 6c 69 6b 65 | 20 77 72 69 74 65 2c 20 | /* like| write, |
|00004990| 62 75 74 20 70 61 73 73 | 20 69 74 20 61 20 74 63 |but pass| it a tc|
|000049a0| 70 5f 68 61 6e 64 6c 65 | 2c 20 6e 6f 74 20 73 6f |p_handle|, not so|
|000049b0| 63 6b 20 2a 2f 0a 58 7b | 0a 58 09 72 65 67 69 73 |ck */.X{|.X.regis|
|000049c0| 74 65 72 20 52 45 43 53 | 54 52 45 41 4d 20 2a 72 |ter RECS|TREAM *r|
|000049d0| 73 74 72 6d 20 3d 0a 58 | 09 20 20 20 20 28 52 45 |strm =.X|. (RE|
|000049e0| 43 53 54 52 45 41 4d 20 | 2a 29 6d 65 6d 5f 61 6c |CSTREAM |*)mem_al|
|000049f0| 6c 6f 63 28 73 69 7a 65 | 6f 66 28 52 45 43 53 54 |loc(size|of(RECST|
|00004a00| 52 45 41 4d 29 29 3b 0a | 58 0a 58 09 69 66 20 28 |REAM));.|X.X.if (|
|00004a10| 72 73 74 72 6d 20 3d 3d | 20 4e 55 4c 4c 29 20 7b |rstrm ==| NULL) {|
|00004a20| 0a 58 09 09 66 70 72 69 | 6e 74 66 28 73 74 64 65 |.X..fpri|ntf(stde|
|00004a30| 72 72 2c 20 22 78 64 72 | 72 65 63 5f 63 72 65 61 |rr, "xdr|rec_crea|
|00004a40| 74 65 3a 20 6f 75 74 20 | 6f 66 20 6d 65 6d 6f 72 |te: out |of memor|
|00004a50| 79 5c 6e 22 29 3b 0a 58 | 09 09 2f 2a 20 0a 58 09 |y\n");.X|../* .X.|
|00004a60| 09 20 2a 20 20 54 68 69 | 73 20 69 73 20 62 61 64 |. * Thi|s is bad|
|00004a70| 2e 20 20 53 68 6f 75 6c | 64 20 72 65 77 6f 72 6b |. Shoul|d rework|
|00004a80| 20 78 64 72 72 65 63 5f | 63 72 65 61 74 65 20 74 | xdrrec_|create t|
|00004a90| 6f 20 0a 58 09 09 20 2a | 20 20 72 65 74 75 72 6e |o .X.. *| return|
|00004aa0| 20 61 20 68 61 6e 64 6c | 65 2c 20 61 6e 64 20 69 | a handl|e, and i|
|00004ab0| 6e 20 74 68 69 73 20 63 | 61 73 65 20 72 65 74 75 |n this c|ase retu|
|00004ac0| 72 6e 20 4e 55 4c 4c 0a | 58 09 09 20 2a 2f 0a 58 |rn NULL.|X.. */.X|
|00004ad0| 09 09 72 65 74 75 72 6e | 3b 0a 58 09 7d 0a 58 09 |..return|;.X.}.X.|
|00004ae0| 78 64 72 73 2d 3e 78 5f | 6f 70 73 20 3d 20 26 78 |xdrs->x_|ops = &x|
|00004af0| 64 72 72 65 63 5f 6f 70 | 73 3b 0a 58 09 78 64 72 |drrec_op|s;.X.xdr|
|00004b00| 73 2d 3e 78 5f 70 72 69 | 76 61 74 65 20 3d 20 28 |s->x_pri|vate = (|
|00004b10| 63 61 64 64 72 5f 74 29 | 72 73 74 72 6d 3b 0a 58 |caddr_t)|rstrm;.X|
|00004b20| 09 72 73 74 72 6d 2d 3e | 74 63 70 5f 68 61 6e 64 |.rstrm->|tcp_hand|
|00004b30| 6c 65 20 3d 20 74 63 70 | 5f 68 61 6e 64 6c 65 3b |le = tcp|_handle;|
|00004b40| 0a 58 09 72 73 74 72 6d | 2d 3e 72 65 61 64 69 74 |.X.rstrm|->readit|
|00004b50| 20 3d 20 72 65 61 64 69 | 74 3b 0a 58 09 72 73 74 | = readi|t;.X.rst|
|00004b60| 72 6d 2d 3e 77 72 69 74 | 65 69 74 20 3d 20 77 72 |rm->writ|eit = wr|
|00004b70| 69 74 65 69 74 3b 0a 58 | 09 73 65 6e 64 73 69 7a |iteit;.X|.sendsiz|
|00004b80| 65 20 3d 20 66 69 78 5f | 62 75 66 5f 73 69 7a 65 |e = fix_|buf_size|
|00004b90| 28 73 65 6e 64 73 69 7a | 65 29 3b 0a 58 09 69 66 |(sendsiz|e);.X.if|
|00004ba0| 20 28 28 72 73 74 72 6d | 2d 3e 6f 75 74 5f 62 61 | ((rstrm|->out_ba|
|00004bb0| 73 65 20 3d 20 72 73 74 | 72 6d 2d 3e 6f 75 74 5f |se = rst|rm->out_|
|00004bc0| 66 69 6e 67 65 72 20 3d | 20 72 73 74 72 6d 2d 3e |finger =| rstrm->|
|00004bd0| 6f 75 74 5f 62 6f 75 6e | 64 72 79 20 3d 0a 58 09 |out_boun|dry =.X.|
|00004be0| 20 20 20 20 6d 65 6d 5f | 61 6c 6c 6f 63 28 73 65 | mem_|alloc(se|
|00004bf0| 6e 64 73 69 7a 65 29 29 | 20 3d 3d 20 4e 55 4c 4c |ndsize))| == NULL|
|00004c00| 29 20 7b 0a 58 09 09 66 | 70 72 69 6e 74 66 28 73 |) {.X..f|printf(s|
|00004c10| 74 64 65 72 72 2c 20 22 | 78 64 72 72 65 63 5f 63 |tderr, "|xdrrec_c|
|00004c20| 72 65 61 74 65 3a 20 6f | 75 74 20 6f 66 20 6d 65 |reate: o|ut of me|
|00004c30| 6d 6f 72 79 5c 6e 22 29 | 3b 0a 58 09 09 72 65 74 |mory\n")|;.X..ret|
|00004c40| 75 72 6e 3b 0a 58 09 7d | 0a 58 09 72 73 74 72 6d |urn;.X.}|.X.rstrm|
|00004c50| 2d 3e 66 72 61 67 5f 68 | 65 61 64 65 72 20 3d 20 |->frag_h|eader = |
|00004c60| 28 75 5f 6c 6f 6e 67 20 | 2a 29 72 73 74 72 6d 2d |(u_long |*)rstrm-|
|00004c70| 3e 6f 75 74 5f 62 61 73 | 65 3b 0a 58 09 72 73 74 |>out_bas|e;.X.rst|
|00004c80| 72 6d 2d 3e 6f 75 74 5f | 66 69 6e 67 65 72 20 2b |rm->out_|finger +|
|00004c90| 3d 20 73 69 7a 65 6f 66 | 28 75 5f 6c 6f 6e 67 29 |= sizeof|(u_long)|
|00004ca0| 3b 0a 58 09 72 73 74 72 | 6d 2d 3e 6f 75 74 5f 62 |;.X.rstr|m->out_b|
|00004cb0| 6f 75 6e 64 72 79 20 2b | 3d 20 73 65 6e 64 73 69 |oundry +|= sendsi|
|00004cc0| 7a 65 3b 0a 58 09 72 73 | 74 72 6d 2d 3e 66 72 61 |ze;.X.rs|trm->fra|
|00004cd0| 67 5f 73 65 6e 74 20 3d | 20 46 41 4c 53 45 3b 0a |g_sent =| FALSE;.|
|00004ce0| 58 09 72 73 74 72 6d 2d | 3e 69 6e 5f 73 69 7a 65 |X.rstrm-|>in_size|
|00004cf0| 20 3d 20 72 65 63 76 73 | 69 7a 65 20 3d 20 66 69 | = recvs|ize = fi|
|00004d00| 78 5f 62 75 66 5f 73 69 | 7a 65 28 72 65 63 76 73 |x_buf_si|ze(recvs|
|00004d10| 69 7a 65 29 3b 0a 58 09 | 69 66 20 28 28 72 73 74 |ize);.X.|if ((rst|
|00004d20| 72 6d 2d 3e 69 6e 5f 62 | 61 73 65 20 3d 20 72 73 |rm->in_b|ase = rs|
|00004d30| 74 72 6d 2d 3e 69 6e 5f | 62 6f 75 6e 64 72 79 3d |trm->in_|boundry=|
|00004d40| 6d 65 6d 5f 61 6c 6c 6f | 63 28 72 65 63 76 73 69 |mem_allo|c(recvsi|
|00004d50| 7a 65 29 29 20 3d 3d 20 | 4e 55 4c 4c 29 20 7b 0a |ze)) == |NULL) {.|
|00004d60| 58 09 09 66 70 72 69 6e | 74 66 28 73 74 64 65 72 |X..fprin|tf(stder|
|00004d70| 72 2c 20 22 78 64 72 72 | 65 63 5f 63 72 65 61 74 |r, "xdrr|ec_creat|
|00004d80| 65 3a 20 6f 75 74 20 6f | 66 20 6d 65 6d 6f 72 79 |e: out o|f memory|
|00004d90| 5c 6e 22 29 3b 0a 58 09 | 09 72 65 74 75 72 6e 3b |\n");.X.|.return;|
|00004da0| 0a 58 09 7d 0a 58 09 72 | 73 74 72 6d 2d 3e 69 6e |.X.}.X.r|strm->in|
|00004db0| 5f 66 69 6e 67 65 72 20 | 3d 20 28 72 73 74 72 6d |_finger |= (rstrm|
|00004dc0| 2d 3e 69 6e 5f 62 6f 75 | 6e 64 72 79 20 2b 3d 20 |->in_bou|ndry += |
|00004dd0| 72 65 63 76 73 69 7a 65 | 29 3b 0a 58 09 72 73 74 |recvsize|);.X.rst|
|00004de0| 72 6d 2d 3e 66 62 74 62 | 63 20 3d 20 30 3b 0a 58 |rm->fbtb|c = 0;.X|
|00004df0| 09 72 73 74 72 6d 2d 3e | 6c 61 73 74 5f 66 72 61 |.rstrm->|last_fra|
|00004e00| 67 20 3d 20 54 52 55 45 | 3b 0a 58 09 72 73 74 72 |g = TRUE|;.X.rstr|
|00004e10| 6d 2d 3e 73 65 6e 64 73 | 69 7a 65 20 3d 20 73 65 |m->sends|ize = se|
|00004e20| 6e 64 73 69 7a 65 3b 0a | 58 09 72 73 74 72 6d 2d |ndsize;.|X.rstrm-|
|00004e30| 3e 72 65 63 76 73 69 7a | 65 20 3d 20 72 65 63 76 |>recvsiz|e = recv|
|00004e40| 73 69 7a 65 3b 0a 58 7d | 0a 58 0a 58 0a 58 2f 2a |size;.X}|.X.X.X/*|
|00004e50| 0a 58 20 2a 20 54 68 65 | 20 72 65 6f 75 74 69 6e |.X * The| reoutin|
|00004e60| 65 73 20 64 65 66 69 6e | 65 64 20 62 65 6c 6f 77 |es defin|ed below|
|00004e70| 20 61 72 65 20 74 68 65 | 20 78 64 72 20 6f 70 73 | are the| xdr ops|
|00004e80| 20 77 68 69 63 68 20 77 | 69 6c 6c 20 67 6f 20 69 | which w|ill go i|
|00004e90| 6e 74 6f 20 74 68 65 0a | 58 20 2a 20 78 64 72 20 |nto the.|X * xdr |
|00004ea0| 68 61 6e 64 6c 65 20 66 | 69 6c 6c 65 64 20 69 6e |handle f|illed in|
|00004eb0| 20 62 79 20 78 64 72 72 | 65 63 5f 63 72 65 61 74 | by xdrr|ec_creat|
|00004ec0| 65 2e 0a 58 20 2a 2f 0a | 58 0a 58 73 74 61 74 69 |e..X */.|X.Xstati|
|00004ed0| 63 20 62 6f 6f 6c 5f 74 | 0a 58 78 64 72 72 65 63 |c bool_t|.Xxdrrec|
|00004ee0| 5f 67 65 74 6c 6f 6e 67 | 28 78 64 72 73 2c 20 6c |_getlong|(xdrs, l|
|00004ef0| 70 29 0a 58 09 58 44 52 | 20 2a 78 64 72 73 3b 0a |p).X.XDR| *xdrs;.|
|00004f00| 58 09 6c 6f 6e 67 20 2a | 6c 70 3b 0a 58 7b 0a 58 |X.long *|lp;.X{.X|
|00004f10| 09 72 65 67 69 73 74 65 | 72 20 52 45 43 53 54 52 |.registe|r RECSTR|
|00004f20| 45 41 4d 20 2a 72 73 74 | 72 6d 20 3d 20 28 52 45 |EAM *rst|rm = (RE|
|00004f30| 43 53 54 52 45 41 4d 20 | 2a 29 28 78 64 72 73 2d |CSTREAM |*)(xdrs-|
|00004f40| 3e 78 5f 70 72 69 76 61 | 74 65 29 3b 0a 58 09 72 |>x_priva|te);.X.r|
|00004f50| 65 67 69 73 74 65 72 20 | 6c 6f 6e 67 20 2a 62 75 |egister |long *bu|
|00004f60| 66 6c 70 20 3d 20 28 6c | 6f 6e 67 20 2a 29 28 72 |flp = (l|ong *)(r|
|00004f70| 73 74 72 6d 2d 3e 69 6e | 5f 66 69 6e 67 65 72 29 |strm->in|_finger)|
|00004f80| 3b 0a 58 09 6c 6f 6e 67 | 20 6d 79 6c 6f 6e 67 3b |;.X.long| mylong;|
|00004f90| 0a 58 0a 58 09 2f 2a 20 | 66 69 72 73 74 20 74 72 |.X.X./* |first tr|
|00004fa0| 79 20 74 68 65 20 69 6e | 6c 69 6e 65 2c 20 66 61 |y the in|line, fa|
|00004fb0| 73 74 20 63 61 73 65 20 | 2a 2f 0a 58 09 69 66 20 |st case |*/.X.if |
|00004fc0| 28 28 72 73 74 72 6d 2d | 3e 66 62 74 62 63 20 3e |((rstrm-|>fbtbc >|
|00004fd0| 3d 20 73 69 7a 65 6f 66 | 28 6c 6f 6e 67 29 29 20 |= sizeof|(long)) |
|00004fe0| 26 26 0a 58 09 20 20 20 | 20 28 28 28 69 6e 74 29 |&&.X. | (((int)|
|00004ff0| 72 73 74 72 6d 2d 3e 69 | 6e 5f 62 6f 75 6e 64 72 |rstrm->i|n_boundr|
|00005000| 79 20 2d 20 28 69 6e 74 | 29 62 75 66 6c 70 29 20 |y - (int|)buflp) |
|00005010| 3e 3d 20 73 69 7a 65 6f | 66 28 6c 6f 6e 67 29 29 |>= sizeo|f(long))|
|00005020| 29 20 7b 0a 58 09 09 2a | 6c 70 20 3d 20 6e 74 6f |) {.X..*|lp = nto|
|00005030| 68 6c 28 2a 62 75 66 6c | 70 29 3b 0a 58 09 09 72 |hl(*bufl|p);.X..r|
|00005040| 73 74 72 6d 2d 3e 66 62 | 74 62 63 20 2d 3d 20 73 |strm->fb|tbc -= s|
|00005050| 69 7a 65 6f 66 28 6c 6f | 6e 67 29 3b 0a 58 09 09 |izeof(lo|ng);.X..|
|00005060| 72 73 74 72 6d 2d 3e 69 | 6e 5f 66 69 6e 67 65 72 |rstrm->i|n_finger|
|00005070| 20 2b 3d 20 73 69 7a 65 | 6f 66 28 6c 6f 6e 67 29 | += size|of(long)|
|00005080| 3b 0a 58 09 7d 20 65 6c | 73 65 20 7b 0a 58 09 09 |;.X.} el|se {.X..|
|00005090| 69 66 20 28 21 20 78 64 | 72 72 65 63 5f 67 65 74 |if (! xd|rrec_get|
|000050a0| 62 79 74 65 73 28 78 64 | 72 73 2c 20 28 63 61 64 |bytes(xd|rs, (cad|
|000050b0| 64 72 5f 74 29 26 6d 79 | 6c 6f 6e 67 2c 20 73 69 |dr_t)&my|long, si|
|000050c0| 7a 65 6f 66 28 6c 6f 6e | 67 29 29 29 0a 58 09 09 |zeof(lon|g))).X..|
|000050d0| 09 72 65 74 75 72 6e 20 | 28 46 41 4c 53 45 29 3b |.return |(FALSE);|
|000050e0| 0a 58 09 09 2a 6c 70 20 | 3d 20 6e 74 6f 68 6c 28 |.X..*lp |= ntohl(|
|000050f0| 6d 79 6c 6f 6e 67 29 3b | 0a 58 09 7d 0a 58 09 72 |mylong);|.X.}.X.r|
|00005100| 65 74 75 72 6e 20 28 54 | 52 55 45 29 3b 0a 58 7d |eturn (T|RUE);.X}|
|00005110| 0a 58 0a 58 73 74 61 74 | 69 63 20 62 6f 6f 6c 5f |.X.Xstat|ic bool_|
|00005120| 74 0a 58 78 64 72 72 65 | 63 5f 70 75 74 6c 6f 6e |t.Xxdrre|c_putlon|
|00005130| 67 28 78 64 72 73 2c 20 | 6c 70 29 0a 58 09 58 44 |g(xdrs, |lp).X.XD|
|00005140| 52 20 2a 78 64 72 73 3b | 0a 58 09 6c 6f 6e 67 20 |R *xdrs;|.X.long |
|00005150| 2a 6c 70 3b 0a 58 7b 0a | 58 09 72 65 67 69 73 74 |*lp;.X{.|X.regist|
|00005160| 65 72 20 52 45 43 53 54 | 52 45 41 4d 20 2a 72 73 |er RECST|REAM *rs|
|00005170| 74 72 6d 20 3d 20 28 52 | 45 43 53 54 52 45 41 4d |trm = (R|ECSTREAM|
|00005180| 20 2a 29 28 78 64 72 73 | 2d 3e 78 5f 70 72 69 76 | *)(xdrs|->x_priv|
|00005190| 61 74 65 29 3b 0a 58 09 | 72 65 67 69 73 74 65 72 |ate);.X.|register|
|000051a0| 20 6c 6f 6e 67 20 2a 64 | 65 73 74 5f 6c 70 20 3d | long *d|est_lp =|
|000051b0| 20 28 28 6c 6f 6e 67 20 | 2a 29 28 72 73 74 72 6d | ((long |*)(rstrm|
|000051c0| 2d 3e 6f 75 74 5f 66 69 | 6e 67 65 72 29 29 3b 0a |->out_fi|nger));.|
|000051d0| 58 0a 58 09 69 66 20 28 | 28 72 73 74 72 6d 2d 3e |X.X.if (|(rstrm->|
|000051e0| 6f 75 74 5f 66 69 6e 67 | 65 72 20 2b 3d 20 73 69 |out_fing|er += si|
|000051f0| 7a 65 6f 66 28 6c 6f 6e | 67 29 29 20 3e 20 72 73 |zeof(lon|g)) > rs|
|00005200| 74 72 6d 2d 3e 6f 75 74 | 5f 62 6f 75 6e 64 72 79 |trm->out|_boundry|
|00005210| 29 20 7b 0a 58 09 09 2f | 2a 0a 58 09 09 20 2a 20 |) {.X../|*.X.. * |
|00005220| 74 68 69 73 20 63 61 73 | 65 20 73 68 6f 75 6c 64 |this cas|e should|
|00005230| 20 61 6c 6d 6f 73 74 20 | 6e 65 76 65 72 20 68 61 | almost |never ha|
|00005240| 70 70 65 6e 20 73 6f 20 | 74 68 65 20 63 6f 64 65 |ppen so |the code|
|00005250| 20 69 73 0a 58 09 09 20 | 2a 20 69 6e 65 66 66 69 | is.X.. |* ineffi|
|00005260| 63 69 65 6e 74 0a 58 09 | 09 20 2a 2f 0a 58 09 09 |cient.X.|. */.X..|
|00005270| 72 73 74 72 6d 2d 3e 6f | 75 74 5f 66 69 6e 67 65 |rstrm->o|ut_finge|
|00005280| 72 20 2d 3d 20 73 69 7a | 65 6f 66 28 6c 6f 6e 67 |r -= siz|eof(long|
|00005290| 29 3b 0a 58 09 09 72 73 | 74 72 6d 2d 3e 66 72 61 |);.X..rs|trm->fra|
|000052a0| 67 5f 73 65 6e 74 20 3d | 20 54 52 55 45 3b 0a 58 |g_sent =| TRUE;.X|
|000052b0| 09 09 69 66 20 28 21 20 | 66 6c 75 73 68 5f 6f 75 |..if (! |flush_ou|
|000052c0| 74 28 72 73 74 72 6d 2c | 20 46 41 4c 53 45 29 29 |t(rstrm,| FALSE))|
|000052d0| 0a 58 09 09 09 72 65 74 | 75 72 6e 20 28 46 41 4c |.X...ret|urn (FAL|
|000052e0| 53 45 29 3b 0a 58 09 09 | 64 65 73 74 5f 6c 70 20 |SE);.X..|dest_lp |
|000052f0| 3d 20 28 28 6c 6f 6e 67 | 20 2a 29 28 72 73 74 72 |= ((long| *)(rstr|
|00005300| 6d 2d 3e 6f 75 74 5f 66 | 69 6e 67 65 72 29 29 3b |m->out_f|inger));|
|00005310| 0a 58 09 09 72 73 74 72 | 6d 2d 3e 6f 75 74 5f 66 |.X..rstr|m->out_f|
|00005320| 69 6e 67 65 72 20 2b 3d | 20 73 69 7a 65 6f 66 28 |inger +=| sizeof(|
|00005330| 6c 6f 6e 67 29 3b 0a 58 | 09 7d 0a 58 09 2a 64 65 |long);.X|.}.X.*de|
|00005340| 73 74 5f 6c 70 20 3d 20 | 68 74 6f 6e 6c 28 2a 6c |st_lp = |htonl(*l|
|00005350| 70 29 3b 0a 58 09 72 65 | 74 75 72 6e 20 28 54 52 |p);.X.re|turn (TR|
|00005360| 55 45 29 3b 0a 58 7d 0a | 58 0a 58 73 74 61 74 69 |UE);.X}.|X.Xstati|
|00005370| 63 20 62 6f 6f 6c 5f 74 | 20 20 2f 2a 20 6d 75 73 |c bool_t| /* mus|
|00005380| 74 20 6d 61 6e 61 67 65 | 20 62 75 66 66 65 72 73 |t manage| buffers|
|00005390| 2c 20 66 72 61 67 6d 65 | 6e 74 73 2c 20 61 6e 64 |, fragme|nts, and|
|000053a0| 20 72 65 63 6f 72 64 73 | 20 2a 2f 0a 58 78 64 72 | records| */.Xxdr|
|000053b0| 72 65 63 5f 67 65 74 62 | 79 74 65 73 28 78 64 72 |rec_getb|ytes(xdr|
|000053c0| 73 2c 20 61 64 64 72 2c | 20 6c 65 6e 29 0a 58 09 |s, addr,| len).X.|
|000053d0| 58 44 52 20 2a 78 64 72 | 73 3b 0a 58 09 72 65 67 |XDR *xdr|s;.X.reg|
|000053e0| 69 73 74 65 72 20 63 61 | 64 64 72 5f 74 20 61 64 |ister ca|ddr_t ad|
|000053f0| 64 72 3b 0a 58 09 72 65 | 67 69 73 74 65 72 20 75 |dr;.X.re|gister u|
|00005400| 5f 69 6e 74 20 6c 65 6e | 3b 0a 58 7b 0a 58 09 72 |_int len|;.X{.X.r|
|00005410| 65 67 69 73 74 65 72 20 | 52 45 43 53 54 52 45 41 |egister |RECSTREA|
|00005420| 4d 20 2a 72 73 74 72 6d | 20 3d 20 28 52 45 43 53 |M *rstrm| = (RECS|
|00005430| 54 52 45 41 4d 20 2a 29 | 28 78 64 72 73 2d 3e 78 |TREAM *)|(xdrs->x|
|00005440| 5f 70 72 69 76 61 74 65 | 29 3b 0a 58 09 72 65 67 |_private|);.X.reg|
|00005450| 69 73 74 65 72 20 69 6e | 74 20 63 75 72 72 65 6e |ister in|t curren|
|00005460| 74 3b 0a 58 0a 58 09 77 | 68 69 6c 65 20 28 6c 65 |t;.X.X.w|hile (le|
|00005470| 6e 20 3e 20 30 29 20 7b | 0a 58 09 09 63 75 72 72 |n > 0) {|.X..curr|
|00005480| 65 6e 74 20 3d 20 72 73 | 74 72 6d 2d 3e 66 62 74 |ent = rs|trm->fbt|
|00005490| 62 63 3b 0a 58 09 09 69 | 66 20 28 63 75 72 72 65 |bc;.X..i|f (curre|
|000054a0| 6e 74 20 3d 3d 20 30 29 | 20 7b 0a 58 09 09 09 69 |nt == 0)| {.X...i|
|000054b0| 66 20 28 72 73 74 72 6d | 2d 3e 6c 61 73 74 5f 66 |f (rstrm|->last_f|
|000054c0| 72 61 67 29 0a 58 09 09 | 09 09 72 65 74 75 72 6e |rag).X..|..return|
|000054d0| 20 28 46 41 4c 53 45 29 | 3b 0a 58 09 09 09 69 66 | (FALSE)|;.X...if|
|000054e0| 20 28 21 20 73 65 74 5f | 69 6e 70 75 74 5f 66 72 | (! set_|input_fr|
|000054f0| 61 67 6d 65 6e 74 28 72 | 73 74 72 6d 29 29 0a 58 |agment(r|strm)).X|
|00005500| 09 09 09 09 72 65 74 75 | 72 6e 20 28 46 41 4c 53 |....retu|rn (FALS|
|00005510| 45 29 3b 0a 58 09 09 09 | 63 6f 6e 74 69 6e 75 65 |E);.X...|continue|
|00005520| 3b 0a 58 09 09 7d 0a 58 | 09 09 63 75 72 72 65 6e |;.X..}.X|..curren|
|00005530| 74 20 3d 20 28 6c 65 6e | 20 3c 20 63 75 72 72 65 |t = (len| < curre|
|00005540| 6e 74 29 20 3f 20 6c 65 | 6e 20 3a 20 63 75 72 72 |nt) ? le|n : curr|
|00005550| 65 6e 74 3b 0a 58 09 09 | 69 66 20 28 21 20 67 65 |ent;.X..|if (! ge|
|00005560| 74 5f 69 6e 70 75 74 5f | 62 79 74 65 73 28 72 73 |t_input_|bytes(rs|
|00005570| 74 72 6d 2c 20 61 64 64 | 72 2c 20 63 75 72 72 65 |trm, add|r, curre|
|00005580| 6e 74 29 29 0a 58 09 09 | 09 72 65 74 75 72 6e 20 |nt)).X..|.return |
|00005590| 28 46 41 4c 53 45 29 3b | 0a 58 09 09 61 64 64 72 |(FALSE);|.X..addr|
|000055a0| 20 2b 3d 20 63 75 72 72 | 65 6e 74 3b 20 0a 58 09 | += curr|ent; .X.|
|000055b0| 09 72 73 74 72 6d 2d 3e | 66 62 74 62 63 20 2d 3d |.rstrm->|fbtbc -=|
|000055c0| 20 63 75 72 72 65 6e 74 | 3b 0a 58 09 09 6c 65 6e | current|;.X..len|
|000055d0| 20 2d 3d 20 63 75 72 72 | 65 6e 74 3b 0a 58 09 7d | -= curr|ent;.X.}|
|000055e0| 0a 58 09 72 65 74 75 72 | 6e 20 28 54 52 55 45 29 |.X.retur|n (TRUE)|
|000055f0| 3b 0a 58 7d 0a 58 0a 58 | 73 74 61 74 69 63 20 62 |;.X}.X.X|static b|
|00005600| 6f 6f 6c 5f 74 0a 58 78 | 64 72 72 65 63 5f 70 75 |ool_t.Xx|drrec_pu|
|00005610| 74 62 79 74 65 73 28 78 | 64 72 73 2c 20 61 64 64 |tbytes(x|drs, add|
|00005620| 72 2c 20 6c 65 6e 29 0a | 58 09 58 44 52 20 2a 78 |r, len).|X.XDR *x|
|00005630| 64 72 73 3b 0a 58 09 72 | 65 67 69 73 74 65 72 20 |drs;.X.r|egister |
|00005640| 63 61 64 64 72 5f 74 20 | 61 64 64 72 3b 0a 58 09 |caddr_t |addr;.X.|
|00005650| 72 65 67 69 73 74 65 72 | 20 75 5f 69 6e 74 20 6c |register| u_int l|
|00005660| 65 6e 3b 0a 58 7b 0a 58 | 09 72 65 67 69 73 74 65 |en;.X{.X|.registe|
|00005670| 72 20 52 45 43 53 54 52 | 45 41 4d 20 2a 72 73 74 |r RECSTR|EAM *rst|
|00005680| 72 6d 20 3d 20 28 52 45 | 43 53 54 52 45 41 4d 20 |rm = (RE|CSTREAM |
|00005690| 2a 29 28 78 64 72 73 2d | 3e 78 5f 70 72 69 76 61 |*)(xdrs-|>x_priva|
|000056a0| 74 65 29 3b 0a 58 09 72 | 65 67 69 73 74 65 72 20 |te);.X.r|egister |
|000056b0| 69 6e 74 20 63 75 72 72 | 65 6e 74 3b 0a 58 0a 58 |int curr|ent;.X.X|
|000056c0| 09 77 68 69 6c 65 20 28 | 6c 65 6e 20 3e 20 30 29 |.while (|len > 0)|
|000056d0| 20 7b 0a 58 09 09 63 75 | 72 72 65 6e 74 20 3d 20 | {.X..cu|rrent = |
|000056e0| 28 75 5f 69 6e 74 29 72 | 73 74 72 6d 2d 3e 6f 75 |(u_int)r|strm->ou|
|000056f0| 74 5f 62 6f 75 6e 64 72 | 79 20 2d 20 28 75 5f 69 |t_boundr|y - (u_i|
|00005700| 6e 74 29 72 73 74 72 6d | 2d 3e 6f 75 74 5f 66 69 |nt)rstrm|->out_fi|
|00005710| 6e 67 65 72 3b 0a 58 09 | 09 63 75 72 72 65 6e 74 |nger;.X.|.current|
|00005720| 20 3d 20 28 6c 65 6e 20 | 3c 20 63 75 72 72 65 6e | = (len |< curren|
|00005730| 74 29 20 3f 20 6c 65 6e | 20 3a 20 63 75 72 72 65 |t) ? len| : curre|
|00005740| 6e 74 3b 0a 58 09 09 62 | 63 6f 70 79 28 61 64 64 |nt;.X..b|copy(add|
|00005750| 72 2c 20 72 73 74 72 6d | 2d 3e 6f 75 74 5f 66 69 |r, rstrm|->out_fi|
|00005760| 6e 67 65 72 2c 20 63 75 | 72 72 65 6e 74 29 3b 0a |nger, cu|rrent);.|
|00005770| 58 09 09 72 73 74 72 6d | 2d 3e 6f 75 74 5f 66 69 |X..rstrm|->out_fi|
|00005780| 6e 67 65 72 20 2b 3d 20 | 63 75 72 72 65 6e 74 3b |nger += |current;|
|00005790| 0a 58 09 09 61 64 64 72 | 20 2b 3d 20 63 75 72 72 |.X..addr| += curr|
|000057a0| 65 6e 74 3b 0a 58 09 09 | 6c 65 6e 20 2d 3d 20 63 |ent;.X..|len -= c|
|000057b0| 75 72 72 65 6e 74 3b 0a | 58 09 09 69 66 20 28 72 |urrent;.|X..if (r|
|000057c0| 73 74 72 6d 2d 3e 6f 75 | 74 5f 66 69 6e 67 65 72 |strm->ou|t_finger|
|000057d0| 20 3d 3d 20 72 73 74 72 | 6d 2d 3e 6f 75 74 5f 62 | == rstr|m->out_b|
|000057e0| 6f 75 6e 64 72 79 29 20 | 7b 0a 58 09 09 09 72 73 |oundry) |{.X...rs|
|000057f0| 74 72 6d 2d 3e 66 72 61 | 67 5f 73 65 6e 74 20 3d |trm->fra|g_sent =|
|00005800| 20 54 52 55 45 3b 0a 58 | 09 09 09 69 66 20 28 21 | TRUE;.X|...if (!|
|00005810| 20 66 6c 75 73 68 5f 6f | 75 74 28 72 73 74 72 6d | flush_o|ut(rstrm|
|00005820| 2c 20 46 41 4c 53 45 29 | 29 0a 58 09 09 09 09 72 |, FALSE)|).X....r|
|00005830| 65 74 75 72 6e 20 28 46 | 41 4c 53 45 29 3b 0a 58 |eturn (F|ALSE);.X|
|00005840| 09 09 7d 0a 58 09 7d 0a | 58 09 72 65 74 75 72 6e |..}.X.}.|X.return|
|00005850| 20 28 54 52 55 45 29 3b | 0a 58 7d 0a 58 0a 58 73 | (TRUE);|.X}.X.Xs|
|00005860| 74 61 74 69 63 20 75 5f | 69 6e 74 0a 58 78 64 72 |tatic u_|int.Xxdr|
|00005870| 72 65 63 5f 67 65 74 70 | 6f 73 28 78 64 72 73 29 |rec_getp|os(xdrs)|
|00005880| 0a 58 09 72 65 67 69 73 | 74 65 72 20 58 44 52 20 |.X.regis|ter XDR |
|00005890| 2a 78 64 72 73 3b 0a 58 | 7b 0a 58 09 72 65 67 69 |*xdrs;.X|{.X.regi|
|000058a0| 73 74 65 72 20 52 45 43 | 53 54 52 45 41 4d 20 2a |ster REC|STREAM *|
|000058b0| 72 73 74 72 6d 20 3d 20 | 28 52 45 43 53 54 52 45 |rstrm = |(RECSTRE|
|000058c0| 41 4d 20 2a 29 78 64 72 | 73 2d 3e 78 5f 70 72 69 |AM *)xdr|s->x_pri|
|000058d0| 76 61 74 65 3b 0a 58 09 | 72 65 67 69 73 74 65 72 |vate;.X.|register|
|000058e0| 20 75 5f 69 6e 74 20 70 | 6f 73 3b 0a 58 0a 58 09 | u_int p|os;.X.X.|
|000058f0| 70 6f 73 20 3d 20 6c 73 | 65 65 6b 28 28 69 6e 74 |pos = ls|eek((int|
|00005900| 29 72 73 74 72 6d 2d 3e | 74 63 70 5f 68 61 6e 64 |)rstrm->|tcp_hand|
|00005910| 6c 65 2c 20 30 2c 20 31 | 29 3b 0a 58 09 69 66 20 |le, 0, 1|);.X.if |
|00005920| 28 28 69 6e 74 29 70 6f | 73 20 21 3d 20 2d 31 29 |((int)po|s != -1)|
|00005930| 0a 58 09 09 73 77 69 74 | 63 68 20 28 78 64 72 73 |.X..swit|ch (xdrs|
|00005940| 2d 3e 78 5f 6f 70 29 20 | 7b 0a 58 0a 58 09 09 63 |->x_op) |{.X.X..c|
|00005950| 61 73 65 20 58 44 52 5f | 45 4e 43 4f 44 45 3a 0a |ase XDR_|ENCODE:.|
|00005960| 58 09 09 09 70 6f 73 20 | 2b 3d 20 72 73 74 72 6d |X...pos |+= rstrm|
|00005970| 2d 3e 6f 75 74 5f 66 69 | 6e 67 65 72 20 2d 20 72 |->out_fi|nger - r|
|00005980| 73 74 72 6d 2d 3e 6f 75 | 74 5f 62 61 73 65 3b 0a |strm->ou|t_base;.|
|00005990| 58 09 09 09 62 72 65 61 | 6b 3b 0a 58 0a 58 09 09 |X...brea|k;.X.X..|
|000059a0| 63 61 73 65 20 58 44 52 | 5f 44 45 43 4f 44 45 3a |case XDR|_DECODE:|
|000059b0| 0a 58 09 09 09 70 6f 73 | 20 2d 3d 20 72 73 74 72 |.X...pos| -= rstr|
|000059c0| 6d 2d 3e 69 6e 5f 62 6f | 75 6e 64 72 79 20 2d 20 |m->in_bo|undry - |
|000059d0| 72 73 74 72 6d 2d 3e 69 | 6e 5f 66 69 6e 67 65 72 |rstrm->i|n_finger|
|000059e0| 3b 0a 58 09 09 09 62 72 | 65 61 6b 3b 0a 58 0a 58 |;.X...br|eak;.X.X|
|000059f0| 09 09 64 65 66 61 75 6c | 74 3a 0a 58 09 09 09 70 |..defaul|t:.X...p|
|00005a00| 6f 73 20 3d 20 28 75 5f | 69 6e 74 29 20 2d 31 3b |os = (u_|int) -1;|
|00005a10| 0a 58 09 09 09 62 72 65 | 61 6b 3b 0a 58 09 09 7d |.X...bre|ak;.X..}|
|00005a20| 0a 58 09 72 65 74 75 72 | 6e 20 28 70 6f 73 29 3b |.X.retur|n (pos);|
|00005a30| 0a 58 7d 0a 58 0a 58 73 | 74 61 74 69 63 20 62 6f |.X}.X.Xs|tatic bo|
|00005a40| 6f 6c 5f 74 0a 58 78 64 | 72 72 65 63 5f 73 65 74 |ol_t.Xxd|rrec_set|
|00005a50| 70 6f 73 28 78 64 72 73 | 2c 20 70 6f 73 29 0a 58 |pos(xdrs|, pos).X|
|00005a60| 09 72 65 67 69 73 74 65 | 72 20 58 44 52 20 2a 78 |.registe|r XDR *x|
|00005a70| 64 72 73 3b 0a 58 09 75 | 5f 69 6e 74 20 70 6f 73 |drs;.X.u|_int pos|
|00005a80| 3b 0a 58 7b 0a 58 09 72 | 65 67 69 73 74 65 72 20 |;.X{.X.r|egister |
|00005a90| 52 45 43 53 54 52 45 41 | 4d 20 2a 72 73 74 72 6d |RECSTREA|M *rstrm|
|00005aa0| 20 3d 20 28 52 45 43 53 | 54 52 45 41 4d 20 2a 29 | = (RECS|TREAM *)|
|00005ab0| 78 64 72 73 2d 3e 78 5f | 70 72 69 76 61 74 65 3b |xdrs->x_|private;|
|00005ac0| 0a 58 09 75 5f 69 6e 74 | 20 63 75 72 72 70 6f 73 |.X.u_int| currpos|
|00005ad0| 20 3d 20 78 64 72 72 65 | 63 5f 67 65 74 70 6f 73 | = xdrre|c_getpos|
|00005ae0| 28 78 64 72 73 29 3b 0a | 58 09 69 6e 74 20 64 65 |(xdrs);.|X.int de|
|00005af0| 6c 74 61 20 3d 20 63 75 | 72 72 70 6f 73 20 2d 20 |lta = cu|rrpos - |
|00005b00| 70 6f 73 3b 0a 58 09 63 | 61 64 64 72 5f 74 20 6e |pos;.X.c|addr_t n|
|00005b10| 65 77 70 6f 73 3b 0a 58 | 0a 58 09 69 66 20 28 28 |ewpos;.X|.X.if ((|
|00005b20| 69 6e 74 29 63 75 72 72 | 70 6f 73 20 21 3d 20 2d |int)curr|pos != -|
|00005b30| 31 29 0a 58 09 09 73 77 | 69 74 63 68 20 28 78 64 |1).X..sw|itch (xd|
|00005b40| 72 73 2d 3e 78 5f 6f 70 | 29 20 7b 0a 58 0a 58 09 |rs->x_op|) {.X.X.|
|00005b50| 09 63 61 73 65 20 58 44 | 52 5f 45 4e 43 4f 44 45 |.case XD|R_ENCODE|
|00005b60| 3a 0a 58 09 09 09 6e 65 | 77 70 6f 73 20 3d 20 72 |:.X...ne|wpos = r|
|00005b70| 73 74 72 6d 2d 3e 6f 75 | 74 5f 66 69 6e 67 65 72 |strm->ou|t_finger|
|00005b80| 20 2d 20 64 65 6c 74 61 | 3b 0a 58 09 09 09 69 66 | - delta|;.X...if|
|00005b90| 20 28 28 6e 65 77 70 6f | 73 20 3e 20 28 63 61 64 | ((newpo|s > (cad|
|00005ba0| 64 72 5f 74 29 28 72 73 | 74 72 6d 2d 3e 66 72 61 |dr_t)(rs|trm->fra|
|00005bb0| 67 5f 68 65 61 64 65 72 | 29 29 20 26 26 0a 58 09 |g_header|)) &&.X.|
|00005bc0| 09 09 20 20 20 20 28 6e | 65 77 70 6f 73 20 3c 20 |.. (n|ewpos < |
|00005bd0| 72 73 74 72 6d 2d 3e 6f | 75 74 5f 62 6f 75 6e 64 |rstrm->o|ut_bound|
|00005be0| 72 79 29 29 20 7b 0a 58 | 09 09 09 09 72 73 74 72 |ry)) {.X|....rstr|
|00005bf0| 6d 2d 3e 6f 75 74 5f 66 | 69 6e 67 65 72 20 3d 20 |m->out_f|inger = |
|00005c00| 6e 65 77 70 6f 73 3b 0a | 58 09 09 09 09 72 65 74 |newpos;.|X....ret|
|00005c10| 75 72 6e 20 28 54 52 55 | 45 29 3b 0a 58 09 09 09 |urn (TRU|E);.X...|
|00005c20| 7d 0a 58 09 09 09 62 72 | 65 61 6b 3b 0a 58 0a 58 |}.X...br|eak;.X.X|
|00005c30| 09 09 63 61 73 65 20 58 | 44 52 5f 44 45 43 4f 44 |..case X|DR_DECOD|
|00005c40| 45 3a 0a 58 09 09 09 6e | 65 77 70 6f 73 20 3d 20 |E:.X...n|ewpos = |
|00005c50| 72 73 74 72 6d 2d 3e 69 | 6e 5f 66 69 6e 67 65 72 |rstrm->i|n_finger|
|00005c60| 20 2d 20 64 65 6c 74 61 | 3b 0a 58 09 09 09 69 66 | - delta|;.X...if|
|00005c70| 20 28 28 64 65 6c 74 61 | 20 3c 20 28 69 6e 74 29 | ((delta| < (int)|
|00005c80| 28 72 73 74 72 6d 2d 3e | 66 62 74 62 63 29 29 20 |(rstrm->|fbtbc)) |
|00005c90| 26 26 0a 58 09 09 09 20 | 20 20 20 28 6e 65 77 70 |&&.X... | (newp|
|00005ca0| 6f 73 20 3c 3d 20 72 73 | 74 72 6d 2d 3e 69 6e 5f |os <= rs|trm->in_|
|00005cb0| 62 6f 75 6e 64 72 79 29 | 20 26 26 0a 58 09 09 09 |boundry)| &&.X...|
|00005cc0| 20 20 20 20 28 6e 65 77 | 70 6f 73 20 3e 3d 20 72 | (new|pos >= r|
|00005cd0| 73 74 72 6d 2d 3e 69 6e | 5f 62 61 73 65 29 29 20 |strm->in|_base)) |
|00005ce0| 7b 0a 58 09 09 09 09 72 | 73 74 72 6d 2d 3e 69 6e |{.X....r|strm->in|
|00005cf0| 5f 66 69 6e 67 65 72 20 | 3d 20 6e 65 77 70 6f 73 |_finger |= newpos|
|00005d00| 3b 0a 58 09 09 09 09 72 | 73 74 72 6d 2d 3e 66 62 |;.X....r|strm->fb|
|00005d10| 74 62 63 20 2d 3d 20 64 | 65 6c 74 61 3b 0a 58 09 |tbc -= d|elta;.X.|
|00005d20| 09 09 09 72 65 74 75 72 | 6e 20 28 54 52 55 45 29 |...retur|n (TRUE)|
|00005d30| 3b 0a 58 09 09 09 7d 0a | 58 09 09 09 62 72 65 61 |;.X...}.|X...brea|
|00005d40| 6b 3b 0a 58 09 09 7d 0a | 58 09 72 65 74 75 72 6e |k;.X..}.|X.return|
|00005d50| 20 28 46 41 4c 53 45 29 | 3b 0a 58 7d 0a 58 0a 58 | (FALSE)|;.X}.X.X|
|00005d60| 73 74 61 74 69 63 20 6c | 6f 6e 67 20 2a 0a 58 78 |static l|ong *.Xx|
|00005d70| 64 72 72 65 63 5f 69 6e | 6c 69 6e 65 28 78 64 72 |drrec_in|line(xdr|
|00005d80| 73 2c 20 6c 65 6e 29 0a | 58 09 72 65 67 69 73 74 |s, len).|X.regist|
|00005d90| 65 72 20 58 44 52 20 2a | 78 64 72 73 3b 0a 58 09 |er XDR *|xdrs;.X.|
|00005da0| 69 6e 74 20 6c 65 6e 3b | 0a 58 7b 0a 58 09 72 65 |int len;|.X{.X.re|
|00005db0| 67 69 73 74 65 72 20 52 | 45 43 53 54 52 45 41 4d |gister R|ECSTREAM|
|00005dc0| 20 2a 72 73 74 72 6d 20 | 3d 20 28 52 45 43 53 54 | *rstrm |= (RECST|
|00005dd0| 52 45 41 4d 20 2a 29 78 | 64 72 73 2d 3e 78 5f 70 |REAM *)x|drs->x_p|
|00005de0| 72 69 76 61 74 65 3b 0a | 58 09 6c 6f 6e 67 20 2a |rivate;.|X.long *|
|00005df0| 20 62 75 66 20 3d 20 4e | 55 4c 4c 3b 0a 58 0a 58 | buf = N|ULL;.X.X|
|00005e00| 09 73 77 69 74 63 68 20 | 28 78 64 72 73 2d 3e 78 |.switch |(xdrs->x|
|00005e10| 5f 6f 70 29 20 7b 0a 58 | 0a 58 09 63 61 73 65 20 |_op) {.X|.X.case |
|00005e20| 58 44 52 5f 45 4e 43 4f | 44 45 3a 0a 58 09 09 69 |XDR_ENCO|DE:.X..i|
|00005e30| 66 20 28 28 72 73 74 72 | 6d 2d 3e 6f 75 74 5f 66 |f ((rstr|m->out_f|
|00005e40| 69 6e 67 65 72 20 2b 20 | 6c 65 6e 29 20 3c 3d 20 |inger + |len) <= |
|00005e50| 72 73 74 72 6d 2d 3e 6f | 75 74 5f 62 6f 75 6e 64 |rstrm->o|ut_bound|
|00005e60| 72 79 29 20 7b 0a 58 09 | 09 09 62 75 66 20 3d 20 |ry) {.X.|..buf = |
|00005e70| 28 6c 6f 6e 67 20 2a 29 | 20 72 73 74 72 6d 2d 3e |(long *)| rstrm->|
|00005e80| 6f 75 74 5f 66 69 6e 67 | 65 72 3b 0a 58 09 09 09 |out_fing|er;.X...|
|00005e90| 72 73 74 72 6d 2d 3e 6f | 75 74 5f 66 69 6e 67 65 |rstrm->o|ut_finge|
|00005ea0| 72 20 2b 3d 20 6c 65 6e | 3b 0a 58 09 09 7d 0a 58 |r += len|;.X..}.X|
|00005eb0| 09 09 62 72 65 61 6b 3b | 0a 58 0a 58 09 63 61 73 |..break;|.X.X.cas|
|00005ec0| 65 20 58 44 52 5f 44 45 | 43 4f 44 45 3a 0a 58 09 |e XDR_DE|CODE:.X.|
|00005ed0| 09 69 66 20 28 28 6c 65 | 6e 20 3c 3d 20 72 73 74 |.if ((le|n <= rst|
|00005ee0| 72 6d 2d 3e 66 62 74 62 | 63 29 20 26 26 0a 58 09 |rm->fbtb|c) &&.X.|
|00005ef0| 09 20 20 20 20 28 28 72 | 73 74 72 6d 2d 3e 69 6e |. ((r|strm->in|
|00005f00| 5f 66 69 6e 67 65 72 20 | 2b 20 6c 65 6e 29 20 3c |_finger |+ len) <|
|00005f10| 3d 20 72 73 74 72 6d 2d | 3e 69 6e 5f 62 6f 75 6e |= rstrm-|>in_boun|
|00005f20| 64 72 79 29 29 20 7b 0a | 58 09 09 09 62 75 66 20 |dry)) {.|X...buf |
|00005f30| 3d 20 28 6c 6f 6e 67 20 | 2a 29 20 72 73 74 72 6d |= (long |*) rstrm|
|00005f40| 2d 3e 69 6e 5f 66 69 6e | 67 65 72 3b 0a 58 09 09 |->in_fin|ger;.X..|
|00005f50| 09 72 73 74 72 6d 2d 3e | 66 62 74 62 63 20 2d 3d |.rstrm->|fbtbc -=|
|00005f60| 20 6c 65 6e 3b 0a 58 09 | 09 09 72 73 74 72 6d 2d | len;.X.|..rstrm-|
|00005f70| 3e 69 6e 5f 66 69 6e 67 | 65 72 20 2b 3d 20 6c 65 |>in_fing|er += le|
|00005f80| 6e 3b 0a 58 09 09 7d 0a | 58 09 09 62 72 65 61 6b |n;.X..}.|X..break|
|00005f90| 3b 0a 58 09 7d 0a 58 09 | 72 65 74 75 72 6e 20 28 |;.X.}.X.|return (|
|00005fa0| 62 75 66 29 3b 0a 58 7d | 0a 58 0a 58 73 74 61 74 |buf);.X}|.X.Xstat|
|00005fb0| 69 63 20 76 6f 69 64 0a | 58 78 64 72 72 65 63 5f |ic void.|Xxdrrec_|
|00005fc0| 64 65 73 74 72 6f 79 28 | 78 64 72 73 29 0a 58 09 |destroy(|xdrs).X.|
|00005fd0| 72 65 67 69 73 74 65 72 | 20 58 44 52 20 2a 78 64 |register| XDR *xd|
|00005fe0| 72 73 3b 0a 58 7b 0a 58 | 09 72 65 67 69 73 74 65 |rs;.X{.X|.registe|
|00005ff0| 72 20 52 45 43 53 54 52 | 45 41 4d 20 2a 72 73 74 |r RECSTR|EAM *rst|
|00006000| 72 6d 20 3d 20 28 52 45 | 43 53 54 52 45 41 4d 20 |rm = (RE|CSTREAM |
|00006010| 2a 29 78 64 72 73 2d 3e | 78 5f 70 72 69 76 61 74 |*)xdrs->|x_privat|
|00006020| 65 3b 0a 58 0a 58 09 6d | 65 6d 5f 66 72 65 65 28 |e;.X.X.m|em_free(|
|00006030| 72 73 74 72 6d 2d 3e 6f | 75 74 5f 62 61 73 65 2c |rstrm->o|ut_base,|
|00006040| 20 72 73 74 72 6d 2d 3e | 73 65 6e 64 73 69 7a 65 | rstrm->|sendsize|
|00006050| 29 3b 0a 58 09 6d 65 6d | 5f 66 72 65 65 28 72 73 |);.X.mem|_free(rs|
|00006060| 74 72 6d 2d 3e 69 6e 5f | 62 61 73 65 2c 20 72 73 |trm->in_|base, rs|
|00006070| 74 72 6d 2d 3e 72 65 63 | 76 73 69 7a 65 29 3b 0a |trm->rec|vsize);.|
|00006080| 58 09 6d 65 6d 5f 66 72 | 65 65 28 28 63 61 64 64 |X.mem_fr|ee((cadd|
|00006090| 72 5f 74 29 72 73 74 72 | 6d 2c 20 73 69 7a 65 6f |r_t)rstr|m, sizeo|
|000060a0| 66 28 52 45 43 53 54 52 | 45 41 4d 29 29 3b 0a 58 |f(RECSTR|EAM));.X|
|000060b0| 7d 0a 58 0a 58 0a 58 2f | 2a 0a 58 20 2a 20 45 78 |}.X.X.X/|*.X * Ex|
|000060c0| 70 6f 72 74 65 64 20 72 | 6f 75 74 69 6e 65 73 20 |ported r|outines |
|000060d0| 74 6f 20 6d 61 6e 61 67 | 65 20 78 64 72 20 72 65 |to manag|e xdr re|
|000060e0| 63 6f 72 64 73 0a 58 20 | 2a 2f 0a 58 0a 58 2f 2a |cords.X |*/.X.X/*|
|000060f0| 0a 58 20 2a 20 42 65 66 | 6f 72 65 20 72 65 61 64 |.X * Bef|ore read|
|00006100| 69 6e 67 20 28 64 65 73 | 65 72 69 61 6c 69 7a 69 |ing (des|erializi|
|00006110| 6e 67 20 66 72 6f 6d 20 | 74 68 65 20 73 74 72 65 |ng from |the stre|
|00006120| 61 6d 2c 20 6f 6e 65 20 | 73 68 6f 75 6c 64 20 61 |am, one |should a|
|00006130| 6c 77 61 79 73 20 63 61 | 6c 6c 0a 58 20 2a 20 74 |lways ca|ll.X * t|
|00006140| 68 69 73 20 70 72 6f 63 | 65 64 75 72 65 20 74 6f |his proc|edure to|
|00006150| 20 67 75 61 72 61 6e 74 | 65 65 20 70 72 6f 70 65 | guarant|ee prope|
|00006160| 72 20 72 65 63 6f 72 64 | 20 61 6c 69 67 6e 6d 65 |r record| alignme|
|00006170| 6e 74 2e 0a 58 20 2a 2f | 0a 58 62 6f 6f 6c 5f 74 |nt..X */|.Xbool_t|
|00006180| 0a 58 78 64 72 72 65 63 | 5f 73 6b 69 70 72 65 63 |.Xxdrrec|_skiprec|
|00006190| 6f 72 64 28 78 64 72 73 | 29 0a 58 09 58 44 52 20 |ord(xdrs|).X.XDR |
|000061a0| 2a 78 64 72 73 3b 0a 58 | 7b 0a 58 09 72 65 67 69 |*xdrs;.X|{.X.regi|
|000061b0| 73 74 65 72 20 52 45 43 | 53 54 52 45 41 4d 20 2a |ster REC|STREAM *|
|000061c0| 72 73 74 72 6d 20 3d 20 | 28 52 45 43 53 54 52 45 |rstrm = |(RECSTRE|
|000061d0| 41 4d 20 2a 29 28 78 64 | 72 73 2d 3e 78 5f 70 72 |AM *)(xd|rs->x_pr|
|000061e0| 69 76 61 74 65 29 3b 0a | 58 0a 58 09 77 68 69 6c |ivate);.|X.X.whil|
|000061f0| 65 20 28 72 73 74 72 6d | 2d 3e 66 62 74 62 63 20 |e (rstrm|->fbtbc |
|00006200| 3e 20 30 20 7c 7c 20 28 | 21 20 72 73 74 72 6d 2d |> 0 || (|! rstrm-|
|00006210| 3e 6c 61 73 74 5f 66 72 | 61 67 29 29 20 7b 0a 58 |>last_fr|ag)) {.X|
|00006220| 09 09 69 66 20 28 21 20 | 73 6b 69 70 5f 69 6e 70 |..if (! |skip_inp|
|00006230| 75 74 5f 62 79 74 65 73 | 28 72 73 74 72 6d 2c 20 |ut_bytes|(rstrm, |
|00006240| 72 73 74 72 6d 2d 3e 66 | 62 74 62 63 29 29 0a 58 |rstrm->f|btbc)).X|
|00006250| 09 09 09 72 65 74 75 72 | 6e 20 28 46 41 4c 53 45 |...retur|n (FALSE|
|00006260| 29 3b 0a 58 09 09 72 73 | 74 72 6d 2d 3e 66 62 74 |);.X..rs|trm->fbt|
|00006270| 62 63 20 3d 20 30 3b 0a | 58 09 09 69 66 20 28 28 |bc = 0;.|X..if ((|
|00006280| 21 20 72 73 74 72 6d 2d | 3e 6c 61 73 74 5f 66 72 |! rstrm-|>last_fr|
|00006290| 61 67 29 20 26 26 20 28 | 21 20 73 65 74 5f 69 6e |ag) && (|! set_in|
|000062a0| 70 75 74 5f 66 72 61 67 | 6d 65 6e 74 28 72 73 74 |put_frag|ment(rst|
|000062b0| 72 6d 29 29 29 0a 58 09 | 09 09 72 65 74 75 72 6e |rm))).X.|..return|
|000062c0| 20 28 46 41 4c 53 45 29 | 3b 0a 58 09 7d 0a 58 09 | (FALSE)|;.X.}.X.|
|000062d0| 72 73 74 72 6d 2d 3e 6c | 61 73 74 5f 66 72 61 67 |rstrm->l|ast_frag|
|000062e0| 20 3d 20 46 41 4c 53 45 | 3b 0a 58 09 72 65 74 75 | = FALSE|;.X.retu|
|000062f0| 72 6e 20 28 54 52 55 45 | 29 3b 0a 58 7d 0a 58 0a |rn (TRUE|);.X}.X.|
|00006300| 58 2f 2a 0a 58 20 2a 20 | 4c 6f 6f 6b 20 61 68 65 |X/*.X * |Look ahe|
|00006310| 61 64 20 66 75 63 74 69 | 6f 6e 2e 0a 58 20 2a 20 |ad fucti|on..X * |
|00006320| 52 65 74 75 72 6e 73 20 | 54 52 55 45 20 69 66 66 |Returns |TRUE iff|
|00006330| 20 74 68 65 72 65 20 69 | 73 20 6e 6f 20 6d 6f 72 | there i|s no mor|
|00006340| 65 20 69 6e 70 75 74 20 | 69 6e 20 74 68 65 20 62 |e input |in the b|
|00006350| 75 66 66 65 72 20 0a 58 | 20 2a 20 61 66 74 65 72 |uffer .X| * after|
|00006360| 20 63 6f 6e 73 75 6d 69 | 6e 67 20 74 68 65 20 72 | consumi|ng the r|
|00006370| 65 73 74 20 6f 66 20 74 | 68 65 20 63 75 72 72 65 |est of t|he curre|
|00006380| 6e 74 20 72 65 63 6f 72 | 64 2e 0a 58 20 2a 2f 0a |nt recor|d..X */.|
|00006390| 58 62 6f 6f 6c 5f 74 0a | 58 78 64 72 72 65 63 5f |Xbool_t.|Xxdrrec_|
|000063a0| 65 6f 66 28 78 64 72 73 | 29 0a 58 09 58 44 52 20 |eof(xdrs|).X.XDR |
|000063b0| 2a 78 64 72 73 3b 0a 58 | 7b 0a 58 09 72 65 67 69 |*xdrs;.X|{.X.regi|
|000063c0| 73 74 65 72 20 52 45 43 | 53 54 52 45 41 4d 20 2a |ster REC|STREAM *|
|000063d0| 72 73 74 72 6d 20 3d 20 | 28 52 45 43 53 54 52 45 |rstrm = |(RECSTRE|
|000063e0| 41 4d 20 2a 29 28 78 64 | 72 73 2d 3e 78 5f 70 72 |AM *)(xd|rs->x_pr|
|000063f0| 69 76 61 74 65 29 3b 0a | 58 0a 58 09 77 68 69 6c |ivate);.|X.X.whil|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
