2.10.90-22
[glibc.git] / sunrpc / key_prot.c
blobb2eb233846b1e4e06bb11ae7f7e29c3e5a8fbe6c
1 /* Copyright (c) 1990, 1991 Sun Microsystems, Inc.
3 * Redistribution and use in source and binary forms, with or without
4 * modification, are permitted provided that the following conditions are
5 * met:
7 * * Redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer.
9 * * Redistributions in binary form must reproduce the above
10 * copyright notice, this list of conditions and the following
11 * disclaimer in the documentation and/or other materials
12 * provided with the distribution.
13 * * Neither the name of Sun Microsystems, Inc. nor the names of its
14 * contributors may be used to endorse or promote products derived
15 * from this software without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
18 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
19 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
20 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
21 * COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
22 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
24 * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
26 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
27 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
28 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 #include "rpc/key_prot.h"
33 bool_t
34 xdr_keystatus (XDR * xdrs, keystatus * objp)
36 if (!INTUSE(xdr_enum) (xdrs, (enum_t *) objp))
37 return FALSE;
39 return TRUE;
41 INTDEF(xdr_keystatus)
43 bool_t
44 xdr_keybuf (XDR * xdrs, keybuf objp)
46 if (!INTUSE(xdr_opaque) (xdrs, objp, HEXKEYBYTES))
47 return FALSE;
49 return TRUE;
51 INTDEF(xdr_keybuf)
53 bool_t
54 xdr_netnamestr (XDR * xdrs, netnamestr * objp)
56 if (!INTUSE(xdr_string) (xdrs, objp, MAXNETNAMELEN))
57 return FALSE;
59 return TRUE;
61 INTDEF(xdr_netnamestr)
63 bool_t
64 xdr_cryptkeyarg (XDR * xdrs, cryptkeyarg * objp)
66 if (!INTUSE(xdr_netnamestr) (xdrs, &objp->remotename))
67 return FALSE;
69 if (!INTUSE(xdr_des_block) (xdrs, &objp->deskey))
70 return FALSE;
72 return TRUE;
74 INTDEF(xdr_cryptkeyarg)
76 bool_t
77 xdr_cryptkeyarg2 (XDR * xdrs, cryptkeyarg2 * objp)
79 if (!INTUSE(xdr_netnamestr) (xdrs, &objp->remotename))
80 return FALSE;
81 if (!INTUSE(xdr_netobj) (xdrs, &objp->remotekey))
82 return FALSE;
83 if (!INTUSE(xdr_des_block) (xdrs, &objp->deskey))
84 return FALSE;
85 return TRUE;
87 INTDEF(xdr_cryptkeyarg2)
89 bool_t
90 xdr_cryptkeyres (XDR * xdrs, cryptkeyres * objp)
92 if (!INTUSE(xdr_keystatus) (xdrs, &objp->status))
93 return FALSE;
94 switch (objp->status)
96 case KEY_SUCCESS:
97 if (!INTUSE(xdr_des_block) (xdrs, &objp->cryptkeyres_u.deskey))
98 return FALSE;
99 break;
100 default:
101 break;
103 return TRUE;
105 INTDEF(xdr_cryptkeyres)
107 bool_t
108 xdr_unixcred (XDR * xdrs, unixcred * objp)
110 if (!INTUSE(xdr_u_int) (xdrs, &objp->uid))
111 return FALSE;
112 if (!INTUSE(xdr_u_int) (xdrs, &objp->gid))
113 return FALSE;
114 if (!INTUSE(xdr_array) (xdrs, (void *) &objp->gids.gids_val,
115 (u_int *) & objp->gids.gids_len, MAXGIDS,
116 sizeof (u_int), (xdrproc_t) INTUSE(xdr_u_int)))
117 return FALSE;
118 return TRUE;
120 INTDEF(xdr_unixcred)
122 bool_t
123 xdr_getcredres (XDR * xdrs, getcredres * objp)
125 if (!INTUSE(xdr_keystatus) (xdrs, &objp->status))
126 return FALSE;
127 switch (objp->status)
129 case KEY_SUCCESS:
130 if (!INTUSE(xdr_unixcred) (xdrs, &objp->getcredres_u.cred))
131 return FALSE;
132 break;
133 default:
134 break;
136 return TRUE;
139 bool_t
140 xdr_key_netstarg (XDR * xdrs, key_netstarg * objp)
142 if (!INTUSE(xdr_keybuf) (xdrs, objp->st_priv_key))
143 return FALSE;
144 if (!INTUSE(xdr_keybuf) (xdrs, objp->st_pub_key))
145 return FALSE;
146 if (!INTUSE(xdr_netnamestr) (xdrs, &objp->st_netname))
147 return FALSE;
148 return TRUE;
150 INTDEF(xdr_key_netstarg)
152 bool_t
153 xdr_key_netstres (XDR * xdrs, key_netstres * objp)
155 if (!INTUSE(xdr_keystatus) (xdrs, &objp->status))
156 return FALSE;
157 switch (objp->status)
159 case KEY_SUCCESS:
160 if (!INTUSE(xdr_key_netstarg) (xdrs, &objp->key_netstres_u.knet))
161 return FALSE;
162 break;
163 default:
164 break;
166 return TRUE;
168 INTDEF(xdr_key_netstres)