OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [linux/] [uClibc/] [libc/] [inet/] [rpc/] [auth_unix.c] - Blame information for rev 1771

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 1325 phoenix
/*
2
 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
3
 * unrestricted use provided that this legend is included on all tape
4
 * media and as a part of the software program in whole or part.  Users
5
 * may copy or modify Sun RPC without charge, but are not authorized
6
 * to license or distribute it to anyone else except as part of a product or
7
 * program developed by the user.
8
 *
9
 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
10
 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
11
 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
12
 *
13
 * Sun RPC is provided with no support and without any obligation on the
14
 * part of Sun Microsystems, Inc. to assist in its use, correction,
15
 * modification or enhancement.
16
 *
17
 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
18
 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
19
 * OR ANY PART THEREOF.
20
 *
21
 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
22
 * or profits or other special, indirect and consequential damages, even if
23
 * Sun has been advised of the possibility of such damages.
24
 *
25
 * Sun Microsystems, Inc.
26
 * 2550 Garcia Avenue
27
 * Mountain View, California  94043
28
 */
29
/*
30
 * Copyright (C) 1984, Sun Microsystems, Inc.
31
 */
32
/*
33
 * auth_unix.c, Implements UNIX style authentication parameters.
34
 *
35
 * The system is very weak.  The client uses no encryption for it's
36
 * credentials and only sends null verifiers.  The server sends backs
37
 * null verifiers or optionally a verifier that suggests a new short hand
38
 * for the credentials.
39
 */
40
 
41
#define __FORCE_GLIBC
42
#include <features.h>
43
 
44
#include <limits.h>
45
#include <stdio.h>
46
#include <string.h>
47
#include <unistd.h>
48
#include <sys/param.h>
49
 
50
#include <rpc/types.h>
51
#include <rpc/xdr.h>
52
#include <rpc/auth.h>
53
#include <rpc/auth_unix.h>
54
 
55
#ifdef USE_IN_LIBIO
56
# include <wchar.h>
57
#endif
58
 
59
/*
60
 * Unix authenticator operations vector
61
 */
62
static void authunix_nextverf (AUTH *);
63
static bool_t authunix_marshal (AUTH *, XDR *);
64
static bool_t authunix_validate (AUTH *, struct opaque_auth *);
65
static bool_t authunix_refresh (AUTH *);
66
static void authunix_destroy (AUTH *);
67
 
68
static struct auth_ops auth_unix_ops = {
69
  authunix_nextverf,
70
  authunix_marshal,
71
  authunix_validate,
72
  authunix_refresh,
73
  authunix_destroy
74
};
75
 
76
/*
77
 * This struct is pointed to by the ah_private field of an auth_handle.
78
 */
79
struct audata {
80
  struct opaque_auth au_origcred;       /* original credentials */
81
  struct opaque_auth au_shcred; /* short hand cred */
82
  u_long au_shfaults;           /* short hand cache faults */
83
  char au_marshed[MAX_AUTH_BYTES];
84
  u_int au_mpos;                /* xdr pos at end of marshed */
85
};
86
#define AUTH_PRIVATE(auth)      ((struct audata *)auth->ah_private)
87
 
88
static bool_t marshal_new_auth (AUTH *) internal_function;
89
 
90
 
91
/*
92
 * Create a unix style authenticator.
93
 * Returns an auth handle with the given stuff in it.
94
 */
95
AUTH *
96
authunix_create (char *machname, uid_t uid, gid_t gid, int len,
97
                 gid_t *aup_gids)
98
{
99
  struct authunix_parms aup;
100
  char mymem[MAX_AUTH_BYTES];
101
  struct timeval now;
102
  XDR xdrs;
103
  AUTH *auth;
104
  struct audata *au;
105
 
106
  /*
107
   * Allocate and set up auth handle
108
   */
109
  auth = (AUTH *) mem_alloc (sizeof (*auth));
110
  au = (struct audata *) mem_alloc (sizeof (*au));
111
  if (auth == NULL || au == NULL)
112
    {
113
no_memory:
114
#ifdef USE_IN_LIBIO
115
      if (_IO_fwide (stderr, 0) > 0)
116
        (void) __fwprintf (stderr, L"%s",
117
                           _("authunix_create: out of memory\n"));
118
      else
119
#endif
120
        (void) fputs (_("authunix_create: out of memory\n"), stderr);
121
      mem_free (auth, sizeof (*auth));
122
      mem_free (au, sizeof (*au));
123
      return NULL;
124
    }
125
  auth->ah_ops = &auth_unix_ops;
126
  auth->ah_private = (caddr_t) au;
127
  auth->ah_verf = au->au_shcred = _null_auth;
128
  au->au_shfaults = 0;
129
 
130
  /*
131
   * fill in param struct from the given params
132
   */
133
  (void) gettimeofday (&now, (struct timezone *) 0);
134
  aup.aup_time = now.tv_sec;
135
  aup.aup_machname = machname;
136
  aup.aup_uid = uid;
137
  aup.aup_gid = gid;
138
  aup.aup_len = (u_int) len;
139
  aup.aup_gids = aup_gids;
140
 
141
  /*
142
   * Serialize the parameters into origcred
143
   */
144
  xdrmem_create (&xdrs, mymem, MAX_AUTH_BYTES, XDR_ENCODE);
145
  if (!xdr_authunix_parms (&xdrs, &aup))
146
    abort ();
147
  au->au_origcred.oa_length = len = XDR_GETPOS (&xdrs);
148
  au->au_origcred.oa_flavor = AUTH_UNIX;
149
  au->au_origcred.oa_base = mem_alloc ((u_int) len);
150
  if (au->au_origcred.oa_base == NULL)
151
    goto no_memory;
152
  memcpy(au->au_origcred.oa_base, mymem, (u_int) len);
153
 
154
  /*
155
   * set auth handle to reflect new cred.
156
   */
157
  auth->ah_cred = au->au_origcred;
158
  marshal_new_auth (auth);
159
  return auth;
160
}
161
 
162
/*
163
 * Returns an auth handle with parameters determined by doing lots of
164
 * syscalls.
165
 */
166
AUTH *
167
authunix_create_default (void)
168
{
169
  int len;
170
  char machname[MAX_MACHINE_NAME + 1];
171
  uid_t uid;
172
  gid_t gid;
173
  int max_nr_groups = sysconf (_SC_NGROUPS_MAX);
174
  gid_t gids[max_nr_groups];
175
 
176
  if (gethostname (machname, MAX_MACHINE_NAME) == -1)
177
    abort ();
178
  machname[MAX_MACHINE_NAME] = 0;
179
  uid = geteuid ();
180
  gid = getegid ();
181
 
182
  if ((len = getgroups (max_nr_groups, gids)) < 0)
183
    abort ();
184
  /* This braindamaged Sun code forces us here to truncate the
185
     list of groups to NGRPS members since the code in
186
     authuxprot.c transforms a fixed array.  Grrr.  */
187
  return authunix_create (machname, uid, gid, MIN (NGRPS, len), gids);
188
}
189
 
190
/*
191
 * authunix operations
192
 */
193
 
194
static void
195
authunix_nextverf (AUTH *auth)
196
{
197
  /* no action necessary */
198
}
199
 
200
static bool_t
201
authunix_marshal (AUTH *auth, XDR *xdrs)
202
{
203
  struct audata *au = AUTH_PRIVATE (auth);
204
 
205
  return XDR_PUTBYTES (xdrs, au->au_marshed, au->au_mpos);
206
}
207
 
208
static bool_t
209
authunix_validate (AUTH *auth, struct opaque_auth *verf)
210
{
211
  struct audata *au;
212
  XDR xdrs;
213
 
214
  if (verf->oa_flavor == AUTH_SHORT)
215
    {
216
      au = AUTH_PRIVATE (auth);
217
      xdrmem_create (&xdrs, verf->oa_base, verf->oa_length,
218
                     XDR_DECODE);
219
 
220
      if (au->au_shcred.oa_base != NULL)
221
        {
222
          mem_free (au->au_shcred.oa_base,
223
                    au->au_shcred.oa_length);
224
          au->au_shcred.oa_base = NULL;
225
        }
226
      if (xdr_opaque_auth (&xdrs, &au->au_shcred))
227
        {
228
          auth->ah_cred = au->au_shcred;
229
        }
230
      else
231
        {
232
          xdrs.x_op = XDR_FREE;
233
          (void) xdr_opaque_auth (&xdrs, &au->au_shcred);
234
          au->au_shcred.oa_base = NULL;
235
          auth->ah_cred = au->au_origcred;
236
        }
237
      marshal_new_auth (auth);
238
    }
239
  return TRUE;
240
}
241
 
242
static bool_t
243
authunix_refresh (AUTH *auth)
244
{
245
  struct audata *au = AUTH_PRIVATE (auth);
246
  struct authunix_parms aup;
247
  struct timeval now;
248
  XDR xdrs;
249
  int stat;
250
 
251
  if (auth->ah_cred.oa_base == au->au_origcred.oa_base)
252
    {
253
      /* there is no hope.  Punt */
254
      return FALSE;
255
    }
256
  au->au_shfaults++;
257
 
258
  /* first deserialize the creds back into a struct authunix_parms */
259
  aup.aup_machname = NULL;
260
  aup.aup_gids = (gid_t *) NULL;
261
  xdrmem_create (&xdrs, au->au_origcred.oa_base,
262
                 au->au_origcred.oa_length, XDR_DECODE);
263
  stat = xdr_authunix_parms (&xdrs, &aup);
264
  if (!stat)
265
    goto done;
266
 
267
  /* update the time and serialize in place */
268
  (void) gettimeofday (&now, (struct timezone *) 0);
269
  aup.aup_time = now.tv_sec;
270
  xdrs.x_op = XDR_ENCODE;
271
  XDR_SETPOS (&xdrs, 0);
272
  stat = xdr_authunix_parms (&xdrs, &aup);
273
  if (!stat)
274
    goto done;
275
  auth->ah_cred = au->au_origcred;
276
  marshal_new_auth (auth);
277
done:
278
  /* free the struct authunix_parms created by deserializing */
279
  xdrs.x_op = XDR_FREE;
280
  (void) xdr_authunix_parms (&xdrs, &aup);
281
  XDR_DESTROY (&xdrs);
282
  return stat;
283
}
284
 
285
static void
286
authunix_destroy (AUTH *auth)
287
{
288
  struct audata *au = AUTH_PRIVATE (auth);
289
 
290
  mem_free (au->au_origcred.oa_base, au->au_origcred.oa_length);
291
 
292
  if (au->au_shcred.oa_base != NULL)
293
    mem_free (au->au_shcred.oa_base, au->au_shcred.oa_length);
294
 
295
  mem_free (auth->ah_private, sizeof (struct audata));
296
 
297
  if (auth->ah_verf.oa_base != NULL)
298
    mem_free (auth->ah_verf.oa_base, auth->ah_verf.oa_length);
299
 
300
  mem_free ((caddr_t) auth, sizeof (*auth));
301
}
302
 
303
/*
304
 * Marshals (pre-serializes) an auth struct.
305
 * sets private data, au_marshed and au_mpos
306
 */
307
static bool_t
308
internal_function
309
marshal_new_auth (AUTH *auth)
310
{
311
  XDR xdr_stream;
312
  XDR *xdrs = &xdr_stream;
313
  struct audata *au = AUTH_PRIVATE (auth);
314
 
315
  xdrmem_create (xdrs, au->au_marshed, MAX_AUTH_BYTES, XDR_ENCODE);
316
  if ((!xdr_opaque_auth (xdrs, &(auth->ah_cred))) ||
317
      (!xdr_opaque_auth (xdrs, &(auth->ah_verf))))
318
    perror (_("auth_none.c - Fatal marshalling problem"));
319
  else
320
    au->au_mpos = XDR_GETPOS (xdrs);
321
 
322
  XDR_DESTROY (xdrs);
323
 
324
  return TRUE;
325
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.