Libinfo-129.tar.gz
[apple/libinfo.git] / rpc.subproj / clnt_perror.c
1 /*
2 * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
3 *
4 * @APPLE_LICENSE_HEADER_START@
5 *
6 * Portions Copyright (c) 1999 Apple Computer, Inc. All Rights
7 * Reserved. This file contains Original Code and/or Modifications of
8 * Original Code as defined in and that are subject to the Apple Public
9 * Source License Version 1.1 (the "License"). You may not use this file
10 * except in compliance with the License. Please obtain a copy of the
11 * License at http://www.apple.com/publicsource and read it before using
12 * this file.
13 *
14 * The Original Code and all software distributed under the License are
15 * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
16 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
17 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE OR NON- INFRINGEMENT. Please see the
19 * License for the specific language governing rights and limitations
20 * under the License.
21 *
22 * @APPLE_LICENSE_HEADER_END@
23 */
24 /*
25 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
26 * unrestricted use provided that this legend is included on all tape
27 * media and as a part of the software program in whole or part. Users
28 * may copy or modify Sun RPC without charge, but are not authorized
29 * to license or distribute it to anyone else except as part of a product or
30 * program developed by the user.
31 *
32 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
33 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
34 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
35 *
36 * Sun RPC is provided with no support and without any obligation on the
37 * part of Sun Microsystems, Inc. to assist in its use, correction,
38 * modification or enhancement.
39 *
40 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
41 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
42 * OR ANY PART THEREOF.
43 *
44 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
45 * or profits or other special, indirect and consequential damages, even if
46 * Sun has been advised of the possibility of such damages.
47 *
48 * Sun Microsystems, Inc.
49 * 2550 Garcia Avenue
50 * Mountain View, California 94043
51 */
52
53 #if defined(LIBC_SCCS) && !defined(lint)
54 /*static char *sccsid = "from: @(#)clnt_perror.c 1.15 87/10/07 Copyr 1984 Sun Micro";*/
55 /*static char *sccsid = "from: @(#)clnt_perror.c 2.1 88/07/29 4.0 RPCSRC";*/
56 static char *rcsid = "$Id: clnt_perror.c,v 1.3 2002/02/19 20:36:22 epeyton Exp $";
57 #endif
58
59 /*
60 * clnt_perror.c
61 *
62 * Copyright (C) 1984, Sun Microsystems, Inc.
63 *
64 */
65 #include <stdio.h>
66 #include <stdlib.h>
67 #include <string.h>
68 #include <rpc/rpc.h>
69 #include <rpc/types.h>
70 #include <rpc/auth.h>
71 #include <rpc/clnt.h>
72
73 static char *auth_errmsg();
74
75 static char *buf;
76
77 static char *
78 _buf()
79 {
80
81 if (buf == 0)
82 buf = (char *)malloc(256);
83 return (buf);
84 }
85
86 /*
87 * Print reply error info
88 */
89 char *
90 clnt_sperror(rpch, s)
91 CLIENT *rpch;
92 char *s;
93 {
94 struct rpc_err e;
95 void clnt_perrno();
96 char *err;
97 char *str = _buf();
98 char *strstart = str;
99
100 if (str == 0)
101 return (0);
102 CLNT_GETERR(rpch, &e);
103
104 (void) sprintf(str, "%s: ", s);
105 str += strlen(str);
106
107 (void) strcpy(str, clnt_sperrno(e.re_status));
108 str += strlen(str);
109
110 switch (e.re_status) {
111 case RPC_SUCCESS:
112 case RPC_CANTENCODEARGS:
113 case RPC_CANTDECODERES:
114 case RPC_TIMEDOUT:
115 case RPC_PROGUNAVAIL:
116 case RPC_PROCUNAVAIL:
117 case RPC_CANTDECODEARGS:
118 case RPC_SYSTEMERROR:
119 case RPC_UNKNOWNHOST:
120 case RPC_UNKNOWNPROTO:
121 case RPC_PMAPFAILURE:
122 case RPC_PROGNOTREGISTERED:
123 case RPC_FAILED:
124 break;
125
126 case RPC_CANTSEND:
127 case RPC_CANTRECV:
128 (void) sprintf(str, "; errno = %s",
129 strerror(e.re_errno));
130 str += strlen(str);
131 break;
132
133 case RPC_VERSMISMATCH:
134 (void) sprintf(str,
135 "; low version = %lu, high version = %lu",
136 e.re_vers.low, e.re_vers.high);
137 str += strlen(str);
138 break;
139
140 case RPC_AUTHERROR:
141 err = auth_errmsg(e.re_why);
142 (void) sprintf(str,"; why = ");
143 str += strlen(str);
144 if (err != NULL) {
145 (void) sprintf(str, "%s",err);
146 } else {
147 (void) sprintf(str,
148 "(unknown authentication error - %d)",
149 (int) e.re_why);
150 }
151 str += strlen(str);
152 break;
153
154 case RPC_PROGVERSMISMATCH:
155 (void) sprintf(str,
156 "; low version = %lu, high version = %lu",
157 e.re_vers.low, e.re_vers.high);
158 str += strlen(str);
159 break;
160
161 default: /* unknown */
162 (void) sprintf(str,
163 "; s1 = %lu, s2 = %lu",
164 e.re_lb.s1, e.re_lb.s2);
165 str += strlen(str);
166 break;
167 }
168 (void) sprintf(str, "\n");
169 return(strstart) ;
170 }
171
172 void
173 clnt_perror(rpch, s)
174 CLIENT *rpch;
175 char *s;
176 {
177 (void) fprintf(stderr,"%s",clnt_sperror(rpch,s));
178 }
179
180
181 struct rpc_errtab {
182 enum clnt_stat status;
183 char *message;
184 };
185
186 static struct rpc_errtab rpc_errlist[] = {
187 { RPC_SUCCESS,
188 "RPC: Success" },
189 { RPC_CANTENCODEARGS,
190 "RPC: Can't encode arguments" },
191 { RPC_CANTDECODERES,
192 "RPC: Can't decode result" },
193 { RPC_CANTSEND,
194 "RPC: Unable to send" },
195 { RPC_CANTRECV,
196 "RPC: Unable to receive" },
197 { RPC_TIMEDOUT,
198 "RPC: Timed out" },
199 { RPC_VERSMISMATCH,
200 "RPC: Incompatible versions of RPC" },
201 { RPC_AUTHERROR,
202 "RPC: Authentication error" },
203 { RPC_PROGUNAVAIL,
204 "RPC: Program unavailable" },
205 { RPC_PROGVERSMISMATCH,
206 "RPC: Program/version mismatch" },
207 { RPC_PROCUNAVAIL,
208 "RPC: Procedure unavailable" },
209 { RPC_CANTDECODEARGS,
210 "RPC: Server can't decode arguments" },
211 { RPC_SYSTEMERROR,
212 "RPC: Remote system error" },
213 { RPC_UNKNOWNHOST,
214 "RPC: Unknown host" },
215 { RPC_UNKNOWNPROTO,
216 "RPC: Unknown protocol" },
217 { RPC_PMAPFAILURE,
218 "RPC: Port mapper failure" },
219 { RPC_PROGNOTREGISTERED,
220 "RPC: Program not registered"},
221 { RPC_FAILED,
222 "RPC: Failed (unspecified error)"}
223 };
224
225
226 /*
227 * This interface for use by clntrpc
228 */
229 char *
230 clnt_sperrno(stat)
231 enum clnt_stat stat;
232 {
233 int i;
234
235 for (i = 0; i < sizeof(rpc_errlist)/sizeof(struct rpc_errtab); i++) {
236 if (rpc_errlist[i].status == stat) {
237 return (rpc_errlist[i].message);
238 }
239 }
240 return ("RPC: (unknown error code)");
241 }
242
243 void
244 clnt_perrno(num)
245 enum clnt_stat num;
246 {
247 (void) fprintf(stderr,"%s",clnt_sperrno(num));
248 }
249
250
251 char *
252 clnt_spcreateerror(s)
253 char *s;
254 {
255 char *str = _buf();
256
257 if (str == 0)
258 return(0);
259 (void) sprintf(str, "%s: ", s);
260 (void) strcat(str, clnt_sperrno(rpc_createerr.cf_stat));
261 switch (rpc_createerr.cf_stat) {
262 case RPC_PMAPFAILURE:
263 (void) strcat(str, " - ");
264 (void) strcat(str,
265 clnt_sperrno(rpc_createerr.cf_error.re_status));
266 break;
267
268 case RPC_SYSTEMERROR:
269 (void) strcat(str, " - ");
270 if (rpc_createerr.cf_error.re_errno > 0
271 && rpc_createerr.cf_error.re_errno < sys_nerr)
272 (void) strcat(str,
273 strerror(rpc_createerr.cf_error.re_errno));
274 else
275 (void) sprintf(&str[strlen(str)], "Error %d",
276 rpc_createerr.cf_error.re_errno);
277 break;
278 }
279 (void) strcat(str, "\n");
280 return (str);
281 }
282
283 void
284 clnt_pcreateerror(s)
285 char *s;
286 {
287 (void) fprintf(stderr,"%s",clnt_spcreateerror(s));
288 }
289
290 struct auth_errtab {
291 enum auth_stat status;
292 char *message;
293 };
294
295 static struct auth_errtab auth_errlist[] = {
296 { AUTH_OK,
297 "Authentication OK" },
298 { AUTH_BADCRED,
299 "Invalid client credential" },
300 { AUTH_REJECTEDCRED,
301 "Server rejected credential" },
302 { AUTH_BADVERF,
303 "Invalid client verifier" },
304 { AUTH_REJECTEDVERF,
305 "Server rejected verifier" },
306 { AUTH_TOOWEAK,
307 "Client credential too weak" },
308 { AUTH_INVALIDRESP,
309 "Invalid server verifier" },
310 { AUTH_FAILED,
311 "Failed (unspecified error)" },
312 };
313
314 static char *
315 auth_errmsg(stat)
316 enum auth_stat stat;
317 {
318 int i;
319
320 for (i = 0; i < sizeof(auth_errlist)/sizeof(struct auth_errtab); i++) {
321 if (auth_errlist[i].status == stat) {
322 return(auth_errlist[i].message);
323 }
324 }
325 return(NULL);
326 }