Add support for quoted mount options
[nfs-utils.git] / utils / mount / nfsmount.c
1 /*
2  * nfsmount.c -- Linux NFS mount
3  * Copyright (C) 1993 Rick Sladkey <jrs@world.std.com>
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2, or (at your option)
8  * any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * Wed Feb  8 12:51:48 1995, biro@yggdrasil.com (Ross Biro): allow all port
16  * numbers to be specified on the command line.
17  *
18  * Fri, 8 Mar 1996 18:01:39, Swen Thuemmler <swen@uni-paderborn.de>:
19  * Omit the call to connect() for Linux version 1.3.11 or later.
20  *
21  * Wed Oct  1 23:55:28 1997: Dick Streefland <dick_streefland@tasking.com>
22  * Implemented the "bg", "fg" and "retry" mount options for NFS.
23  *
24  * 1999-02-22 Arkadiusz Mi¬∂kiewicz <misiek@pld.ORG.PL>
25  * - added Native Language Support
26  * 
27  * Modified by Olaf Kirch and Trond Myklebust for new NFS code,
28  * plus NFSv3 stuff.
29  *
30  * 2006-06-06 Amit Gud <agud@redhat.com>
31  * - Moved with modifcations to nfs-utils/utils/mount from util-linux/mount.
32  */
33
34 /*
35  * nfsmount.c,v 1.1.1.1 1993/11/18 08:40:51 jrs Exp
36  */
37
38 #include <ctype.h>
39 #include <unistd.h>
40 #include <stdio.h>
41 #include <string.h>
42 #include <stdlib.h>
43 #include <errno.h>
44 #include <netdb.h>
45 #include <time.h>
46 #include <rpc/rpc.h>
47 #include <rpc/pmap_prot.h>
48 #include <rpc/pmap_clnt.h>
49 #include <sys/socket.h>
50 #include <sys/time.h>
51 #include <sys/utsname.h>
52 #include <sys/stat.h>
53 #include <netinet/in.h>
54 #include <arpa/inet.h>
55 #include <mntent.h>
56 #include <sys/mount.h>
57 #include <paths.h>
58 #include <syslog.h>
59
60 #include "conn.h"
61 #include "xcommon.h"
62 #include "mount.h"
63 #include "nfsumount.h"
64 #include "nfs_mount.h"
65 #include "mount_constants.h"
66 #include "nls.h"
67
68 #ifdef HAVE_RPCSVC_NFS_PROT_H
69 #include <rpcsvc/nfs_prot.h>
70 #else
71 #include <linux/nfs.h>
72 #define nfsstat nfs_stat
73 #endif
74
75 #ifndef NFS_PORT
76 #define NFS_PORT 2049
77 #endif
78 #ifndef NFS_FHSIZE
79 #define NFS_FHSIZE 32
80 #endif
81
82 static char *nfs_strerror(int stat);
83
84 #define MAKE_VERSION(p,q,r)     (65536*(p) + 256*(q) + (r))
85 #define MAX_NFSPROT ((nfs_mount_version >= 4) ? 3 : 2)
86 #define MAX_MNTPROT ((nfs_mount_version >= 4) ? 3 : 2)
87 #define HAVE_RELIABLE_TCP (nfs_mount_version >= 4)
88
89 #ifndef HAVE_INET_ATON
90 #define inet_aton(a,b) (0)
91 #endif
92
93 typedef dirpath mnt2arg_t;
94 typedef dirpath mnt3arg_t;
95 typedef dirpath mntarg_t;
96
97 typedef struct fhstatus  mnt2res_t;
98 typedef struct mountres3 mnt3res_t;
99 typedef union {
100         mnt2res_t nfsv2;
101         mnt3res_t nfsv3;
102 } mntres_t;
103
104 static char errbuf[BUFSIZ];
105 static char *erreob = &errbuf[BUFSIZ];
106 extern int verbose;
107 extern int sloppy;
108
109 /* Convert RPC errors into strings */
110 int rpc_strerror(int);
111 int rpc_strerror(int spos)
112 {
113         int cf_stat = rpc_createerr.cf_stat; 
114         int pos=0, cf_errno = rpc_createerr.cf_error.re_errno;
115         char *ptr, *estr = clnt_sperrno(cf_stat);
116         char *tmp;
117
118         if (estr) {
119                 if ((ptr = index(estr, ':')))
120                         estr = ++ptr;
121
122                 tmp = &errbuf[spos];
123                 if (cf_stat == RPC_SYSTEMERROR)
124                         pos = snprintf(tmp, (erreob - tmp), 
125                                 "System Error: %s", strerror(cf_errno));
126                 else
127                         pos = snprintf(tmp, (erreob - tmp), "RPC Error:%s", estr);
128         }
129         return (pos);
130 }
131 void mount_errors(char *, int, int);
132 void mount_errors(char *server, int will_retry, int bg)
133 {
134         int pos = 0;
135         char *tmp;
136         static int onlyonce = 0;
137
138         tmp = &errbuf[pos];
139         if (bg) 
140                 pos = snprintf(tmp, (erreob - tmp), 
141                         "mount to NFS server '%s' failed: ", server);
142         else
143                 pos = snprintf(tmp, (erreob - tmp), 
144                         "mount: mount to NFS server '%s' failed: ", server);
145
146         tmp = &errbuf[pos];
147         if (rpc_createerr.cf_stat == RPC_TIMEDOUT) {
148                 pos = snprintf(tmp, (erreob - tmp), "timed out %s", 
149                         will_retry ? "(retrying)" : "(giving up)");
150         } else {
151                 pos += rpc_strerror(pos);
152                 tmp = &errbuf[pos];
153                 if (bg) {
154                         pos = snprintf(tmp, (erreob - tmp), " %s",
155                                 will_retry ? "(retrying)" : "(giving up)");
156                 }
157         }
158         if (bg) {
159                 if (onlyonce++ < 1)
160                         openlog("mount", LOG_CONS|LOG_PID, LOG_AUTH);
161                 syslog(LOG_ERR, "%s.", errbuf);
162         } else
163                 fprintf(stderr, "%s.\n", errbuf);
164 }
165
166 /* Define the order in which to probe for UDP/TCP services */
167 enum plist {
168         use_tcp = 0,
169         udp_tcp,
170         udp_only,
171 };
172 static const u_int *
173 proto_probelist(enum plist list)
174 {
175         static const u_int probe_udp_tcp[] = { IPPROTO_UDP, IPPROTO_TCP, 0 };
176         static const u_int probe_both[] = { IPPROTO_TCP, IPPROTO_UDP, 0 };
177         static const u_int probe_udponly[] = { IPPROTO_UDP, 0 };
178
179         if (list == use_tcp)
180                 return probe_both;
181         if (list == udp_tcp)
182                 return probe_udp_tcp;
183         return probe_udponly;
184 }
185
186 /* Define the order in which NFS versions are probed on portmapper */
187 static const u_long *
188 nfs_probelist(const int vers)
189 {
190         static const u_long nfs2_probe[] = { 2, 0};
191         static const u_long nfs3_probe[] = { 3, 2, 0};
192         switch (vers) {
193         case 3:
194                 return nfs3_probe;
195         default:
196                 return nfs2_probe;
197         }
198 }
199
200 /* Define the order in which Mountd versions are probed on portmapper */
201 static const u_long *
202 mnt_probelist(const int vers)
203 {
204         static const u_long mnt1_probe[] = { 1, 2, 0 };
205         static const u_long mnt3_probe[] = { 3, 1, 2, 0 };
206         switch (vers) {
207         case 3:
208                 return mnt3_probe;
209         default:
210                 return mnt1_probe;
211         }
212 }
213
214 static int
215 linux_version_code(void) {
216         struct utsname my_utsname;
217         int p, q, r;
218
219         if (uname(&my_utsname) == 0) {
220                 p = atoi(strtok(my_utsname.release, "."));
221                 q = atoi(strtok(NULL, "."));
222                 r = atoi(strtok(NULL, "."));
223                 return MAKE_VERSION(p,q,r);
224         }
225         return 0;
226 }
227
228 /*
229  * Unfortunately, the kernel prints annoying console messages
230  * in case of an unexpected nfs mount version (instead of
231  * just returning some error).  Therefore we'll have to try
232  * and figure out what version the kernel expects.
233  *
234  * Variables:
235  *      NFS_MOUNT_VERSION: these nfsmount sources at compile time
236  *      nfs_mount_version: version this source and running kernel can handle
237  */
238 int nfs_mount_version = NFS_MOUNT_VERSION;
239
240 int
241 find_kernel_nfs_mount_version(void) {
242         static int kernel_version = -1;
243         int mnt_version = NFS_MOUNT_VERSION;
244
245         if (kernel_version == -1)
246                 kernel_version = linux_version_code();
247
248         if (kernel_version) {
249              if (kernel_version < MAKE_VERSION(2,1,32))
250                   mnt_version = 1;
251              else if (kernel_version < MAKE_VERSION(2,2,18))
252                   mnt_version = 3;
253              else if (kernel_version < MAKE_VERSION(2,3,0))
254                   mnt_version = 4; /* since 2.2.18pre9 */
255              else if (kernel_version < MAKE_VERSION(2,3,99))
256                   mnt_version = 3;
257              else if (kernel_version < MAKE_VERSION(2,6,3))
258                   mnt_version = 4;
259              else
260                   mnt_version = 6;
261         }
262         if (mnt_version > NFS_MOUNT_VERSION)
263              mnt_version = NFS_MOUNT_VERSION;
264         return mnt_version;
265 }
266
267 int nfs_gethostbyname(const char *, struct sockaddr_in *);
268 int nfs_gethostbyname(const char *hostname, struct sockaddr_in *saddr)
269 {
270         struct hostent *hp;
271
272         saddr->sin_family = AF_INET;
273         if (!inet_aton(hostname, &saddr->sin_addr)) {
274                 if ((hp = gethostbyname(hostname)) == NULL) {
275                         fprintf(stderr, _("mount: can't get address for %s\n"),
276                                 hostname);
277                         return 0;
278                 } else {
279                         if (hp->h_length > sizeof(*saddr)) {
280                                 fprintf(stderr,
281                                         _("mount: got bad hp->h_length\n"));
282                                 hp->h_length = sizeof(*saddr);
283                         }
284                         memcpy(&saddr->sin_addr, hp->h_addr, hp->h_length);
285                 }
286         }
287         return 1;
288 }
289
290 /*
291  * getport() is very similar to pmap_getport() with
292  * the exception this version uses a non-reserve ports 
293  * instead of reserve ports since reserve ports
294  * are not needed for pmap requests.
295  */
296 static u_short
297 getport(
298         struct sockaddr_in *saddr, 
299         u_long prog, 
300         u_long vers, 
301         u_int prot)
302 {
303         u_short port;
304         int    socket;
305         CLIENT *clnt = NULL;
306         struct pmap parms;
307         enum clnt_stat stat;
308
309         saddr->sin_port = htons (PMAPPORT);
310         socket = get_socket(saddr, prot, FALSE, FALSE);
311
312         switch (prot) {
313         case IPPROTO_UDP:
314                 clnt = clntudp_bufcreate(saddr,
315                                          PMAPPROG, PMAPVERS, TIMEOUT, &socket,
316                                          UDPMSGSIZE, UDPMSGSIZE);
317                 break;
318         case IPPROTO_TCP:
319                 clnt = clnttcp_create(saddr,
320                         PMAPPROG, PMAPVERS, &socket, 50, 500);
321                 break;
322         }
323         if (clnt != NULL) {
324                 parms.pm_prog = prog;
325                 parms.pm_vers = vers;
326                 parms.pm_prot = prot;
327                 parms.pm_port = 0;    /* not needed or used */
328
329                 stat = clnt_call(clnt, PMAPPROC_GETPORT, (xdrproc_t)xdr_pmap,
330                         (caddr_t)&parms, (xdrproc_t)xdr_u_short, (caddr_t)&port, TIMEOUT);
331                 if (stat) {
332                         clnt_geterr(clnt, &rpc_createerr.cf_error);
333                         rpc_createerr.cf_stat = stat;
334                 }
335                 clnt_destroy(clnt);
336                 if (stat != RPC_SUCCESS)
337                         port = 0;
338                 else if (port == 0)
339                         rpc_createerr.cf_stat = RPC_PROGNOTREGISTERED;
340         }
341         if (socket != 1)
342                 close(socket);
343
344         return port;
345 }
346
347 /*
348  * Use the portmapper to discover whether or not the service we want is
349  * available. The lists 'versions' and 'protos' define ordered sequences
350  * of service versions and udp/tcp protocols to probe for.
351  */
352 static int
353 probe_port(clnt_addr_t *server, 
354            const u_long *versions,
355            const u_int *protos)
356 {
357         struct sockaddr_in *saddr = &server->saddr;
358         struct pmap *pmap = &server->pmap;
359         const u_long prog = pmap->pm_prog, *p_vers;
360         const u_int prot = (u_int)pmap->pm_prot,
361                 *p_prot;
362         const u_short port = (u_short) pmap->pm_port;
363         u_long vers = pmap->pm_vers;
364         u_short p_port;
365         p_prot = prot ? &prot : protos;
366         p_vers = vers ? &vers : versions;
367         rpc_createerr.cf_stat = 0;
368         for (;;) {
369                 saddr->sin_port = htons(PMAPPORT);
370                 p_port = getport(saddr, prog, *p_vers, *p_prot);
371                 if (p_port) {
372                         if (!port || port == p_port) {
373                                 saddr->sin_port = htons(p_port);
374                                 if (verbose) {
375                                         fprintf(stderr, 
376                                                 "mount: trying %s prog %ld vers %ld prot %s port %d\n", 
377                                                 inet_ntoa(saddr->sin_addr), prog, *p_vers,
378                                                 *p_prot == IPPROTO_UDP ? "udp" : "tcp", p_port);
379                                 }
380                                 if (clnt_ping(saddr, prog, *p_vers, *p_prot, NULL))
381                                         goto out_ok;
382                                 if (rpc_createerr.cf_stat == RPC_TIMEDOUT)
383                                         goto out_bad;
384                         }
385                 }
386                 if (rpc_createerr.cf_stat != RPC_PROGNOTREGISTERED) 
387                         goto out_bad;
388
389                 if (!prot) {
390                         if (*++p_prot)
391                                 continue;
392                         p_prot = protos;
393                 }
394                 if (vers == pmap->pm_vers) {
395                         p_vers = versions;
396                         vers = 0;
397                 }
398                 if (vers || !*++p_vers)
399                         break;
400         }
401 out_bad:
402         return 0;
403
404  out_ok:
405         if (!vers)
406                 pmap->pm_vers = *p_vers;
407         if (!prot)
408                 pmap->pm_prot = *p_prot;
409         if (!port)
410                 pmap->pm_port = p_port;
411         rpc_createerr.cf_stat = 0;
412         return 1;
413 }
414
415 static int
416 probe_nfsport(clnt_addr_t *nfs_server)
417 {
418         const struct pmap *pmap = &nfs_server->pmap;
419         const u_long *probe_vers;
420         const u_int *probe_prot;
421
422         if (pmap->pm_vers && pmap->pm_prot && pmap->pm_port)
423                 return 1;
424         probe_vers = nfs_probelist(MAX_NFSPROT);
425         probe_prot = proto_probelist(HAVE_RELIABLE_TCP ? use_tcp : udp_only);
426         return probe_port(nfs_server, probe_vers, probe_prot);
427 }
428
429 int probe_mntport(clnt_addr_t *mnt_server)
430 {
431         const struct pmap *pmap = &mnt_server->pmap;
432         const u_long *probe_vers;
433         const u_int *probe_prot;
434
435         if (pmap->pm_vers && pmap->pm_prot && pmap->pm_port)
436                 return 1;
437         probe_vers = mnt_probelist(MAX_MNTPROT);
438         probe_prot = proto_probelist(HAVE_RELIABLE_TCP ? udp_tcp : udp_only);
439         return probe_port(mnt_server, probe_vers, probe_prot);
440 }
441
442 static int
443 probe_bothports(clnt_addr_t *mnt_server, clnt_addr_t *nfs_server)
444 {
445         struct pmap *nfs_pmap = &nfs_server->pmap;
446         struct pmap *mnt_pmap = &mnt_server->pmap;
447         struct pmap save_nfs, save_mnt;
448         int res;
449         const u_long *probe_vers;
450
451         if (mnt_pmap->pm_vers && !nfs_pmap->pm_vers)
452                 nfs_pmap->pm_vers = mntvers_to_nfs(mnt_pmap->pm_vers);
453         else if (nfs_pmap->pm_vers && !mnt_pmap->pm_vers)
454                 mnt_pmap->pm_vers = nfsvers_to_mnt(nfs_pmap->pm_vers);
455         if (nfs_pmap->pm_vers)
456                 goto version_fixed;
457         memcpy(&save_nfs, nfs_pmap, sizeof(save_nfs));
458         memcpy(&save_mnt, mnt_pmap, sizeof(save_mnt));
459         for (probe_vers = mnt_probelist(MAX_MNTPROT); *probe_vers; probe_vers++) {
460                 nfs_pmap->pm_vers = mntvers_to_nfs(*probe_vers);
461                 if ((res = probe_nfsport(nfs_server) != 0)) {
462                         mnt_pmap->pm_vers = nfsvers_to_mnt(nfs_pmap->pm_vers);
463                         if ((res = probe_mntport(mnt_server)) != 0)
464                                 return 1;
465                         memcpy(mnt_pmap, &save_mnt, sizeof(*mnt_pmap));
466                 }
467                 switch (rpc_createerr.cf_stat) {
468                 case RPC_PROGVERSMISMATCH:
469                 case RPC_PROGNOTREGISTERED:
470                         break;
471                 default:
472                         goto out_bad;
473                 }
474                 memcpy(nfs_pmap, &save_nfs, sizeof(*nfs_pmap));
475         }
476  out_bad:
477         return 0;
478  version_fixed:
479         if (!probe_nfsport(nfs_server))
480                 goto out_bad;
481         return probe_mntport(mnt_server);
482 }
483
484 static inline enum clnt_stat
485 nfs3_mount(CLIENT *clnt, mnt3arg_t *mnt3arg, mnt3res_t *mnt3res)
486 {
487         return clnt_call(clnt, MOUNTPROC3_MNT,
488                          (xdrproc_t) xdr_dirpath, (caddr_t) mnt3arg,
489                          (xdrproc_t) xdr_mountres3, (caddr_t) mnt3res,
490                          TIMEOUT);
491 }
492
493 static inline enum clnt_stat
494 nfs2_mount(CLIENT *clnt, mnt2arg_t *mnt2arg, mnt2res_t *mnt2res)
495 {
496         return clnt_call(clnt, MOUNTPROC_MNT,
497                          (xdrproc_t) xdr_dirpath, (caddr_t) mnt2arg,
498                          (xdrproc_t) xdr_fhstatus, (caddr_t) mnt2res,
499                          TIMEOUT);
500 }
501
502 static int
503 nfs_call_mount(clnt_addr_t *mnt_server, clnt_addr_t *nfs_server,
504                mntarg_t *mntarg, mntres_t *mntres)
505 {
506         CLIENT *clnt;
507         enum clnt_stat stat;
508         int msock;
509
510         if (!probe_bothports(mnt_server, nfs_server))
511                 goto out_bad;
512
513         clnt = mnt_openclnt(mnt_server, &msock);
514         if (!clnt)
515                 goto out_bad;
516         /* make pointers in xdr_mountres3 NULL so
517          * that xdr_array allocates memory for us
518          */
519         memset(mntres, 0, sizeof(*mntres));
520         switch (mnt_server->pmap.pm_vers) {
521         case 3:
522                 stat = nfs3_mount(clnt, mntarg, &mntres->nfsv3);
523                 break;
524         case 2:
525         case 1:
526                 stat = nfs2_mount(clnt, mntarg, &mntres->nfsv2);
527                 break;
528         default:
529                 goto out_bad;
530         }
531         if (stat != RPC_SUCCESS) {
532                 clnt_geterr(clnt, &rpc_createerr.cf_error);
533                 rpc_createerr.cf_stat = stat;
534         }
535         mnt_closeclnt(clnt, msock);
536         if (stat == RPC_SUCCESS)
537                 return 1;
538  out_bad:
539         return 0;
540 }
541
542 static int
543 parse_options(char *old_opts, struct nfs_mount_data *data,
544               int *bg, int *retry, clnt_addr_t *mnt_server,
545               clnt_addr_t *nfs_server, char *new_opts, const int opt_size)
546 {
547         struct sockaddr_in *mnt_saddr = &mnt_server->saddr;
548         struct pmap *mnt_pmap = &mnt_server->pmap;
549         struct pmap *nfs_pmap = &nfs_server->pmap;
550         int len;
551         char *opt, *opteq, *p, *opt_b;
552         char *mounthost = NULL;
553         char cbuf[128];
554         int open_quote = 0;
555
556         data->flags = 0;
557         *bg = 0;
558
559         len = strlen(new_opts);
560         for (p=old_opts, opt_b=NULL; p && *p; p++) {
561                 if (!opt_b)
562                         opt_b = p;              /* begin of the option item */
563                 if (*p == '"')
564                         open_quote ^= 1;        /* reverse the status */
565                 if (open_quote)
566                         continue;               /* still in a quoted block */
567                 if (*p == ',')
568                         *p = '\0';              /* terminate the option item */
569                 if (*p == '\0' || *(p+1) == '\0') {
570                         opt = opt_b;            /* opt is useful now */
571                         opt_b = NULL;
572                 }
573                 else
574                         continue;               /* still somewhere in the option item */
575
576                 if (strlen(opt) >= sizeof(cbuf))
577                         goto bad_parameter;
578                 if ((opteq = strchr(opt, '=')) && isdigit(opteq[1])) {
579                         int val = atoi(opteq + 1);      
580                         *opteq = '\0';
581 /* printf("opt=%s\n", opt); */
582                         if (!strcmp(opt, "rsize"))
583                                 data->rsize = val;
584                         else if (!strcmp(opt, "wsize"))
585                                 data->wsize = val;
586                         else if (!strcmp(opt, "timeo"))
587                                 data->timeo = val;
588                         else if (!strcmp(opt, "retrans"))
589                                 data->retrans = val;
590                         else if (!strcmp(opt, "acregmin"))
591                                 data->acregmin = val;
592                         else if (!strcmp(opt, "acregmax"))
593                                 data->acregmax = val;
594                         else if (!strcmp(opt, "acdirmin"))
595                                 data->acdirmin = val;
596                         else if (!strcmp(opt, "acdirmax"))
597                                 data->acdirmax = val;
598                         else if (!strcmp(opt, "actimeo")) {
599                                 data->acregmin = val;
600                                 data->acregmax = val;
601                                 data->acdirmin = val;
602                                 data->acdirmax = val;
603                         }
604                         else if (!strcmp(opt, "retry"))
605                                 *retry = val;
606                         else if (!strcmp(opt, "port"))
607                                 nfs_pmap->pm_port = val;
608                         else if (!strcmp(opt, "mountport"))
609                                 mnt_pmap->pm_port = val;
610                         else if (!strcmp(opt, "mountprog"))
611                                 mnt_pmap->pm_prog = val;
612                         else if (!strcmp(opt, "mountvers"))
613                                 mnt_pmap->pm_vers = val;
614                         else if (!strcmp(opt, "mounthost"))
615                                 mounthost=xstrndup(opteq+1, strcspn(opteq+1," \t\n\r,"));
616                         else if (!strcmp(opt, "nfsprog"))
617                                 nfs_pmap->pm_prog = val;
618                         else if (!strcmp(opt, "nfsvers") ||
619                                  !strcmp(opt, "vers")) {
620                                 nfs_pmap->pm_vers = val;
621                                 opt = "nfsvers";
622 #if NFS_MOUNT_VERSION >= 2
623                         } else if (!strcmp(opt, "namlen")) {
624                                 if (nfs_mount_version >= 2)
625                                         data->namlen = val;
626                                 else if (sloppy)
627                                         continue;
628                                 else
629                                         goto bad_parameter;
630 #endif
631                         } else if (!strcmp(opt, "addr")) {
632                                 /* ignore */;
633                                 continue;
634                         } else if (sloppy)
635                                 continue;
636                         else
637                                 goto bad_parameter;
638                         sprintf(cbuf, "%s=%s,", opt, opteq+1);
639                 } else if (opteq) {
640                         *opteq = '\0';
641                         if (!strcmp(opt, "proto")) {
642                                 if (!strcmp(opteq+1, "udp")) {
643                                         nfs_pmap->pm_prot = IPPROTO_UDP;
644                                         mnt_pmap->pm_prot = IPPROTO_UDP;
645 #if NFS_MOUNT_VERSION >= 2
646                                         data->flags &= ~NFS_MOUNT_TCP;
647                                 } else if (!strcmp(opteq+1, "tcp") &&
648                                            nfs_mount_version > 2) {
649                                         nfs_pmap->pm_prot = IPPROTO_TCP;
650                                         mnt_pmap->pm_prot = IPPROTO_TCP;
651                                         data->flags |= NFS_MOUNT_TCP;
652 #endif
653                                 } else if (sloppy)
654                                         continue;
655                                 else
656                                         goto bad_parameter;
657 #if NFS_MOUNT_VERSION >= 5
658                         } else if (!strcmp(opt, "sec")) {
659                                 char *secflavor = opteq+1;
660                                 /* see RFC 2623 */
661                                 if (nfs_mount_version < 5) {
662                                         printf(_("Warning: ignoring sec=%s option\n"), secflavor);
663                                         continue;
664                                 } else if (!strcmp(secflavor, "none"))
665                                         data->pseudoflavor = AUTH_NONE;
666                                 else if (!strcmp(secflavor, "sys"))
667                                         data->pseudoflavor = AUTH_SYS;
668                                 else if (!strcmp(secflavor, "krb5"))
669                                         data->pseudoflavor = AUTH_GSS_KRB5;
670                                 else if (!strcmp(secflavor, "krb5i"))
671                                         data->pseudoflavor = AUTH_GSS_KRB5I;
672                                 else if (!strcmp(secflavor, "krb5p"))
673                                         data->pseudoflavor = AUTH_GSS_KRB5P;
674                                 else if (!strcmp(secflavor, "lipkey"))
675                                         data->pseudoflavor = AUTH_GSS_LKEY;
676                                 else if (!strcmp(secflavor, "lipkey-i"))
677                                         data->pseudoflavor = AUTH_GSS_LKEYI;
678                                 else if (!strcmp(secflavor, "lipkey-p"))
679                                         data->pseudoflavor = AUTH_GSS_LKEYP;
680                                 else if (!strcmp(secflavor, "spkm3"))
681                                         data->pseudoflavor = AUTH_GSS_SPKM;
682                                 else if (!strcmp(secflavor, "spkm3i"))
683                                         data->pseudoflavor = AUTH_GSS_SPKMI;
684                                 else if (!strcmp(secflavor, "spkm3p"))
685                                         data->pseudoflavor = AUTH_GSS_SPKMP;
686                                 else if (sloppy)
687                                         continue;
688                                 else {
689                                         printf(_("Warning: Unrecognized security flavor %s.\n"),
690                                                 secflavor);
691                                         goto bad_parameter;
692                                 }
693                                 data->flags |= NFS_MOUNT_SECFLAVOUR;
694 #endif
695                         } else if (!strcmp(opt, "mounthost"))
696                                 mounthost=xstrndup(opteq+1,
697                                                    strcspn(opteq+1," \t\n\r,"));
698                          else if (!strcmp(opt, "context")) {
699                                 char *context = opteq + 1;
700                                 int ctxlen = strlen(context);
701
702                                 if (ctxlen > NFS_MAX_CONTEXT_LEN) {
703                                         printf(_("context parameter exceeds limit of %d\n"),
704                                                  NFS_MAX_CONTEXT_LEN);
705                                         goto bad_parameter;
706                                 }
707                                 /* The context string is in the format of
708                                  * "system_u:object_r:...".  We only want
709                                  * the context str between the quotes.
710                                  */
711                                 if (*context == '"')
712                                         strncpy(data->context, context+1,
713                                                         ctxlen-2);
714                                 else
715                                         strncpy(data->context, context,
716                                                         NFS_MAX_CONTEXT_LEN);
717                         } else if (sloppy)
718                                 continue;
719                         else
720                                 goto bad_parameter;
721                         sprintf(cbuf, "%s=%s,", opt, opteq+1);
722                 } else {
723                         int val = 1;
724                         if (!strncmp(opt, "no", 2)) {
725                                 val = 0;
726                                 opt += 2;
727                         }
728                         if (!strcmp(opt, "bg")) 
729                                 *bg = val;
730                         else if (!strcmp(opt, "fg")) 
731                                 *bg = !val;
732                         else if (!strcmp(opt, "soft")) {
733                                 data->flags &= ~NFS_MOUNT_SOFT;
734                                 if (val)
735                                         data->flags |= NFS_MOUNT_SOFT;
736                         } else if (!strcmp(opt, "hard")) {
737                                 data->flags &= ~NFS_MOUNT_SOFT;
738                                 if (!val)
739                                         data->flags |= NFS_MOUNT_SOFT;
740                         } else if (!strcmp(opt, "intr")) {
741                                 data->flags &= ~NFS_MOUNT_INTR;
742                                 if (val)
743                                         data->flags |= NFS_MOUNT_INTR;
744                         } else if (!strcmp(opt, "posix")) {
745                                 data->flags &= ~NFS_MOUNT_POSIX;
746                                 if (val)
747                                         data->flags |= NFS_MOUNT_POSIX;
748                         } else if (!strcmp(opt, "cto")) {
749                                 data->flags &= ~NFS_MOUNT_NOCTO;
750                                 if (!val)
751                                         data->flags |= NFS_MOUNT_NOCTO;
752                         } else if (!strcmp(opt, "ac")) {
753                                 data->flags &= ~NFS_MOUNT_NOAC;
754                                 if (!val)
755                                         data->flags |= NFS_MOUNT_NOAC;
756 #if NFS_MOUNT_VERSION >= 2
757                         } else if (!strcmp(opt, "tcp")) {
758                                 data->flags &= ~NFS_MOUNT_TCP;
759                                 if (val) {
760                                         if (nfs_mount_version < 2)
761                                                 goto bad_option;
762                                         nfs_pmap->pm_prot = IPPROTO_TCP;
763                                         mnt_pmap->pm_prot = IPPROTO_TCP;
764                                         data->flags |= NFS_MOUNT_TCP;
765                                 } else {
766                                         mnt_pmap->pm_prot = IPPROTO_UDP;
767                                         nfs_pmap->pm_prot = IPPROTO_UDP;
768                                 }
769                         } else if (!strcmp(opt, "udp")) {
770                                 data->flags &= ~NFS_MOUNT_TCP;
771                                 if (!val) {
772                                         if (nfs_mount_version < 2)
773                                                 goto bad_option;
774                                         nfs_pmap->pm_prot = IPPROTO_TCP;
775                                         mnt_pmap->pm_prot = IPPROTO_TCP;
776                                         data->flags |= NFS_MOUNT_TCP;
777                                 } else {
778                                         nfs_pmap->pm_prot = IPPROTO_UDP;
779                                         mnt_pmap->pm_prot = IPPROTO_UDP;
780                                 }
781 #endif
782 #if NFS_MOUNT_VERSION >= 3
783                         } else if (!strcmp(opt, "lock")) {
784                                 data->flags &= ~NFS_MOUNT_NONLM;
785                                 if (!val) {
786                                         if (nfs_mount_version < 3)
787                                                 goto bad_option;
788                                         data->flags |= NFS_MOUNT_NONLM;
789                                 }
790 #endif
791 #if NFS_MOUNT_VERSION >= 4
792                         } else if (!strcmp(opt, "broken_suid")) {
793                                 data->flags &= ~NFS_MOUNT_BROKEN_SUID;
794                                 if (val) {
795                                         if (nfs_mount_version < 4)
796                                                 goto bad_option;
797                                         data->flags |= NFS_MOUNT_BROKEN_SUID;
798                                 }
799                         } else if (!strcmp(opt, "acl")) {
800                                 data->flags &= ~NFS_MOUNT_NOACL;
801                                 if (!val)
802                                         data->flags |= NFS_MOUNT_NOACL;
803 #endif
804                         } else {
805                         bad_option:
806                                 if (sloppy)
807                                         continue;
808                                 printf(_("Unsupported nfs mount option: "
809                                          "%s%s\n"), val ? "" : "no", opt);
810                                 goto out_bad;
811                         }
812                         sprintf(cbuf, val ? "%s,":"no%s,", opt);
813                 }
814                 len += strlen(cbuf);
815                 if (len >= opt_size) {
816                         printf(_("mount: excessively long option argument\n"));
817                         goto out_bad;
818                 }
819                 strcat(new_opts, cbuf);
820         }
821         /* See if the nfs host = mount host. */
822         if (mounthost) {
823                 if (!nfs_gethostbyname(mounthost, mnt_saddr))
824                         goto out_bad;
825                 *mnt_server->hostname = mounthost;
826         }
827         return 1;
828  bad_parameter:
829         printf(_("Bad nfs mount parameter: %s\n"), opt);
830  out_bad:
831         return 0;
832 }
833
834 static inline int
835 nfsmnt_check_compat(const struct pmap *nfs_pmap, const struct pmap *mnt_pmap)
836 {
837         if (nfs_pmap->pm_vers && 
838                 (nfs_pmap->pm_vers > MAX_NFSPROT || nfs_pmap->pm_vers < 2)) {
839                 if (nfs_pmap->pm_vers == 4)
840                         fprintf(stderr, _("'vers=4' is not supported.  "
841                                 "Use '-t nfs4' instead.\n"));
842                 else
843                         fprintf(stderr, _("NFS version %ld is not supported.\n"), 
844                                 nfs_pmap->pm_vers);
845                 goto out_bad;
846         }
847         if (mnt_pmap->pm_vers > MAX_MNTPROT) {
848                 fprintf(stderr, _("NFS mount version %ld s not supported.\n"), 
849                         mnt_pmap->pm_vers);
850                 goto out_bad;
851         }
852         return 1;
853  out_bad:
854         return 0;
855 }
856
857 int
858 nfsmount(const char *spec, const char *node, int *flags,
859          char **extra_opts, char **mount_opts,
860          int running_bg, int *need_statd)
861 {
862         static char *prev_bg_host;
863         char hostdir[1024];
864         char *hostname, *dirname, *old_opts, *mounthost = NULL;
865         char new_opts[1024], cbuf[1024];
866         static struct nfs_mount_data data;
867         int val;
868         static int doonce = 0;
869
870         clnt_addr_t mnt_server = { &mounthost, };
871         clnt_addr_t nfs_server = { &hostname, };
872         struct sockaddr_in *nfs_saddr = &nfs_server.saddr;
873         struct pmap  *mnt_pmap = &mnt_server.pmap, 
874                      *nfs_pmap = &nfs_server.pmap;
875         struct pmap  save_mnt, save_nfs;
876
877         int fsock = -1;
878
879         mntres_t mntres;
880
881         struct stat statbuf;
882         char *s;
883         int bg, retry;
884         int retval = EX_FAIL;
885         time_t t;
886         time_t prevt;
887         time_t timeout;
888
889         nfs_mount_version = find_kernel_nfs_mount_version();
890
891         if (strlen(spec) >= sizeof(hostdir)) {
892                 fprintf(stderr, _("mount: "
893                                   "excessively long host:dir argument\n"));
894                 goto fail;
895         }
896         strcpy(hostdir, spec);
897         if ((s = strchr(hostdir, ':'))) {
898                 hostname = hostdir;
899                 dirname = s + 1;
900                 *s = '\0';
901                 /* Ignore all but first hostname in replicated mounts
902                    until they can be fully supported. (mack@sgi.com) */
903                 if ((s = strchr(hostdir, ','))) {
904                         *s = '\0';
905                         fprintf(stderr,
906                                 _("mount: warning: "
907                                   "multiple hostnames not supported\n"));
908                 }
909         } else {
910                 fprintf(stderr,
911                         _("mount: "
912                           "directory to mount not in host:dir format\n"));
913                 goto fail;
914         }
915
916         if (!nfs_gethostbyname(hostname, nfs_saddr))
917                 goto fail;
918         mounthost = hostname;
919         memcpy (&mnt_server.saddr, nfs_saddr, sizeof (mnt_server.saddr));
920
921         /* add IP address to mtab options for use when unmounting */
922
923         s = inet_ntoa(nfs_saddr->sin_addr);
924         old_opts = *extra_opts;
925         if (!old_opts)
926                 old_opts = "";
927
928         /* Set default options.
929          * rsize/wsize (and bsize, for ver >= 3) are left 0 in order to
930          * let the kernel decide.
931          * timeo is filled in after we know whether it'll be TCP or UDP. */
932         memset(&data, 0, sizeof(data));
933         data.acregmin   = 3;
934         data.acregmax   = 60;
935         data.acdirmin   = 30;
936         data.acdirmax   = 60;
937 #if NFS_MOUNT_VERSION >= 2
938         data.namlen     = NAME_MAX;
939 #endif
940
941         bg = 0;
942         retry = 10000;          /* 10000 minutes ~ 1 week */
943
944         memset(mnt_pmap, 0, sizeof(*mnt_pmap));
945         mnt_pmap->pm_prog = MOUNTPROG;
946         memset(nfs_pmap, 0, sizeof(*nfs_pmap));
947         nfs_pmap->pm_prog = NFS_PROGRAM;
948
949         /* parse options */
950         new_opts[0] = 0;
951         if (!parse_options(old_opts, &data, &bg, &retry, &mnt_server, &nfs_server,
952                            new_opts, sizeof(new_opts)))
953                 goto fail;
954         if (!nfsmnt_check_compat(nfs_pmap, mnt_pmap))
955                 goto fail;
956         
957         if (retry == 10000 && !bg)
958                 retry = 2; /* reset for fg mounts */
959         
960
961 #ifdef NFS_MOUNT_DEBUG
962         printf("rsize = %d, wsize = %d, timeo = %d, retrans = %d\n",
963                data.rsize, data.wsize, data.timeo, data.retrans);
964         printf("acreg (min, max) = (%d, %d), acdir (min, max) = (%d, %d)\n",
965                data.acregmin, data.acregmax, data.acdirmin, data.acdirmax);
966         printf("port = %d, bg = %d, retry = %d, flags = %.8x\n",
967                nfs_pmap->pm_port, bg, retry, data.flags);
968         printf("mountprog = %d, mountvers = %d, nfsprog = %d, nfsvers = %d\n",
969                mnt_pmap->pm_prog, mnt_pmap->pm_vers,
970                nfs_pmap->pm_prog, nfs_pmap->pm_vers);
971         printf("soft = %d, intr = %d, posix = %d, nocto = %d, noac = %d ",
972                (data.flags & NFS_MOUNT_SOFT) != 0,
973                (data.flags & NFS_MOUNT_INTR) != 0,
974                (data.flags & NFS_MOUNT_POSIX) != 0,
975                (data.flags & NFS_MOUNT_NOCTO) != 0,
976                (data.flags & NFS_MOUNT_NOAC) != 0);
977 #if NFS_MOUNT_VERSION >= 2
978         printf("tcp = %d ",
979                (data.flags & NFS_MOUNT_TCP) != 0);
980 #endif
981 #if NFS_MOUNT_VERSION >= 4
982         printf("noacl = %d ", (data.flags & NFS_MOUNT_NOACL) != 0);
983 #endif
984 #if NFS_MOUNT_VERSION >= 5
985         printf("sec = %u ", data.pseudoflavor);
986 #endif
987         printf("\n");
988 #endif
989
990         data.version = nfs_mount_version;
991         *mount_opts = (char *) &data;
992
993         if (*flags & MS_REMOUNT)
994                 goto out_ok;
995
996         /*
997          * If the previous mount operation on the same host was
998          * backgrounded, and the "bg" for this mount is also set,
999          * give up immediately, to avoid the initial timeout.
1000          */
1001         if (bg && !running_bg &&
1002             prev_bg_host && strcmp(hostname, prev_bg_host) == 0) {
1003                 if (retry > 0)
1004                         retval = EX_BG;
1005                 return retval;
1006         }
1007
1008         /* create mount deamon client */
1009
1010         /*
1011          * The following loop implements the mount retries. On the first
1012          * call, "running_bg" is 0. When the mount times out, and the
1013          * "bg" option is set, the exit status EX_BG will be returned.
1014          * For a backgrounded mount, there will be a second call by the
1015          * child process with "running_bg" set to 1.
1016          *
1017          * The case where the mount point is not present and the "bg"
1018          * option is set, is treated as a timeout. This is done to
1019          * support nested mounts.
1020          *
1021          * The "retry" count specified by the user is the number of
1022          * minutes to retry before giving up.
1023          *
1024          * Only the first error message will be displayed.
1025          */
1026         timeout = time(NULL) + 60 * retry;
1027         prevt = 0;
1028         t = 30;
1029         val = 1;
1030
1031         memcpy(&save_nfs, nfs_pmap, sizeof(save_nfs));
1032         memcpy(&save_mnt, mnt_pmap, sizeof(save_mnt));
1033         for (;;) {
1034                 if (bg && stat(node, &statbuf) == -1) {
1035                         /* no mount point yet - sleep */
1036                         if (running_bg) {
1037                                 sleep(val);     /* 1, 2, 4, 8, 16, 30, ... */
1038                                 val *= 2;
1039                                 if (val > 30)
1040                                         val = 30;
1041                         }
1042                 } else {
1043                         int stat;
1044                         /* be careful not to use too many CPU cycles */
1045                         if (t - prevt < 30)
1046                                 sleep(30);
1047
1048                         stat = nfs_call_mount(&mnt_server, &nfs_server,
1049                                               &dirname, &mntres);
1050                         if (stat)
1051                                 break;
1052                         memcpy(nfs_pmap, &save_nfs, sizeof(*nfs_pmap));
1053                         memcpy(mnt_pmap, &save_mnt, sizeof(*mnt_pmap));
1054                         prevt = t;
1055                 }
1056                 if (!bg) {
1057                         switch(rpc_createerr.cf_stat){
1058                         case RPC_TIMEDOUT:
1059                                 break;
1060                         case RPC_SYSTEMERROR:
1061                                 if (errno == ETIMEDOUT)
1062                                         break;
1063                         default:
1064                                 mount_errors(*nfs_server.hostname, 0, bg);
1065                         goto fail;
1066                         }
1067                         t = time(NULL);
1068                         if (t >= timeout) {
1069                                 mount_errors(*nfs_server.hostname, 0, bg);
1070                                 goto fail;
1071                         }
1072                         mount_errors(*nfs_server.hostname, 1, bg);
1073                         continue;
1074                 }
1075                 if (!running_bg) {
1076                         prev_bg_host = xstrdup(hostname);
1077                         if (retry > 0)
1078                                 retval = EX_BG;
1079                         goto fail;
1080                 }
1081                 t = time(NULL);
1082                 if (t >= timeout) {
1083                         mount_errors(*nfs_server.hostname, 0, bg);
1084                         goto fail;
1085                 }
1086                 if (doonce++ < 1)
1087                         mount_errors(*nfs_server.hostname, 1, bg);
1088         }
1089
1090         if (nfs_pmap->pm_vers == 2) {
1091                 if (mntres.nfsv2.fhs_status != 0) {
1092                         fprintf(stderr,
1093                                 _("mount: %s:%s failed, reason given by server: %s\n"),
1094                                 hostname, dirname,
1095                                 nfs_strerror(mntres.nfsv2.fhs_status));
1096                         goto fail;
1097                 }
1098                 memcpy(data.root.data,
1099                        (char *) mntres.nfsv2.fhstatus_u.fhs_fhandle,
1100                        NFS_FHSIZE);
1101 #if NFS_MOUNT_VERSION >= 4
1102                 data.root.size = NFS_FHSIZE;
1103                 memcpy(data.old_root.data,
1104                        (char *) mntres.nfsv2.fhstatus_u.fhs_fhandle,
1105                        NFS_FHSIZE);
1106 #endif
1107         } else {
1108 #if NFS_MOUNT_VERSION >= 4
1109                 mountres3_ok *mountres;
1110                 fhandle3 *fhandle;
1111                 int i, *flavor, yum = 0;
1112                 if (mntres.nfsv3.fhs_status != 0) {
1113                         fprintf(stderr,
1114                                 _("mount: %s:%s failed, reason given by server: %s\n"),
1115                                 hostname, dirname,
1116                                 nfs_strerror(mntres.nfsv3.fhs_status));
1117                         goto fail;
1118                 }
1119 #if NFS_MOUNT_VERSION >= 5
1120                 mountres = &mntres.nfsv3.mountres3_u.mountinfo;
1121                 i = mountres->auth_flavors.auth_flavors_len;
1122                 if (i <= 0) 
1123                         goto noauth_flavors;
1124
1125                 flavor = mountres->auth_flavors.auth_flavors_val;
1126                 while (--i >= 0) {
1127                         /* If no flavour requested, use first simple
1128                          * flavour that is offered.
1129                          */
1130                         if (! (data.flags & NFS_MOUNT_SECFLAVOUR) &&
1131                             (flavor[i] == AUTH_SYS ||
1132                              flavor[i] == AUTH_NONE)) {
1133                                 data.pseudoflavor = flavor[i];
1134                                 data.flags |= NFS_MOUNT_SECFLAVOUR;
1135                         }
1136                         if (flavor[i] == data.pseudoflavor)
1137                                 yum = 1;
1138 #ifdef NFS_MOUNT_DEBUG
1139                         printf("auth flavor %d: %d\n",
1140                                 i, flavor[i]);
1141 #endif
1142                 }
1143                 if (!yum) {
1144                         fprintf(stderr,
1145                                 "mount: %s:%s failed, "
1146                                 "security flavor not supported\n",
1147                                 hostname, dirname);
1148                         /* server has registered us in rmtab, send umount */
1149                         nfs_call_umount(&mnt_server, &dirname);
1150                         goto fail;
1151                 }
1152 noauth_flavors:
1153 #endif
1154                 fhandle = &mntres.nfsv3.mountres3_u.mountinfo.fhandle;
1155                 memset(data.old_root.data, 0, NFS_FHSIZE);
1156                 memset(&data.root, 0, sizeof(data.root));
1157                 data.root.size = fhandle->fhandle3_len;
1158                 memcpy(data.root.data,
1159                        (char *) fhandle->fhandle3_val,
1160                        fhandle->fhandle3_len);
1161
1162                 data.flags |= NFS_MOUNT_VER3;
1163 #endif
1164         }
1165
1166         if (nfs_mount_version == 1) {
1167                 /* create nfs socket for kernel */
1168                 if (nfs_pmap->pm_prot == IPPROTO_TCP)
1169                         fsock = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
1170                 else
1171                         fsock = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
1172                 if (fsock < 0) {
1173                         perror(_("nfs socket"));
1174                         goto fail;
1175                 }
1176                 if (bindresvport(fsock, 0) < 0) {
1177                         perror(_("nfs bindresvport"));
1178                         goto fail;
1179                 }
1180         }
1181
1182 #ifdef NFS_MOUNT_DEBUG
1183         printf(_("using port %d for nfs deamon\n"), nfs_pmap->pm_port);
1184 #endif
1185         nfs_saddr->sin_port = htons(nfs_pmap->pm_port);
1186         /*
1187          * connect() the socket for kernels 1.3.10 and below only,
1188          * to avoid problems with multihomed hosts.
1189          * --Swen
1190          */
1191         if (linux_version_code() <= 0x01030a && fsock != -1
1192             && connect(fsock, (struct sockaddr *) nfs_saddr,
1193                        sizeof (*nfs_saddr)) < 0) {
1194                 perror(_("nfs connect"));
1195                 goto fail;
1196         }
1197
1198 #if NFS_MOUNT_VERSION >= 2
1199         if (nfs_pmap->pm_prot == IPPROTO_TCP)
1200                 data.flags |= NFS_MOUNT_TCP;
1201         else
1202                 data.flags &= ~NFS_MOUNT_TCP;
1203 #endif
1204
1205         /* prepare data structure for kernel */
1206
1207         data.fd = fsock;
1208         memcpy((char *) &data.addr, (char *) nfs_saddr, sizeof(data.addr));
1209         strncpy(data.hostname, hostname, sizeof(data.hostname));
1210
1211  out_ok:
1212         /* Ensure we have enough padding for the following strcat()s */
1213         if (strlen(new_opts) + strlen(s) + 30 >= sizeof(new_opts)) {
1214                 fprintf(stderr, _("mount: "
1215                                   "excessively long option argument\n"));
1216                 goto fail;
1217         }
1218
1219         snprintf(cbuf, sizeof(cbuf)-1, "addr=%s", s);
1220         strcat(new_opts, cbuf);
1221
1222         *extra_opts = xstrdup(new_opts);
1223         *need_statd = ! (data.flags & NFS_MOUNT_NONLM);
1224         return 0;
1225
1226         /* abort */
1227  fail:
1228         if (fsock != -1)
1229                 close(fsock);
1230         return retval;
1231 }
1232
1233 /*
1234  * We need to translate between nfs status return values and
1235  * the local errno values which may not be the same.
1236  *
1237  * Andreas Schwab <schwab@LS5.informatik.uni-dortmund.de>: change errno:
1238  * "after #include <errno.h> the symbol errno is reserved for any use,
1239  *  it cannot even be used as a struct tag or field name".
1240  */
1241
1242 #ifndef EDQUOT
1243 #define EDQUOT  ENOSPC
1244 #endif
1245
1246 static struct {
1247         enum nfsstat stat;
1248         int errnum;
1249 } nfs_errtbl[] = {
1250         { NFS_OK,               0               },
1251         { NFSERR_PERM,          EPERM           },
1252         { NFSERR_NOENT,         ENOENT          },
1253         { NFSERR_IO,            EIO             },
1254         { NFSERR_NXIO,          ENXIO           },
1255         { NFSERR_ACCES,         EACCES          },
1256         { NFSERR_EXIST,         EEXIST          },
1257         { NFSERR_NODEV,         ENODEV          },
1258         { NFSERR_NOTDIR,        ENOTDIR         },
1259         { NFSERR_ISDIR,         EISDIR          },
1260 #ifdef NFSERR_INVAL
1261         { NFSERR_INVAL,         EINVAL          },      /* that Sun forgot */
1262 #endif
1263         { NFSERR_FBIG,          EFBIG           },
1264         { NFSERR_NOSPC,         ENOSPC          },
1265         { NFSERR_ROFS,          EROFS           },
1266         { NFSERR_NAMETOOLONG,   ENAMETOOLONG    },
1267         { NFSERR_NOTEMPTY,      ENOTEMPTY       },
1268         { NFSERR_DQUOT,         EDQUOT          },
1269         { NFSERR_STALE,         ESTALE          },
1270 #ifdef EWFLUSH
1271         { NFSERR_WFLUSH,        EWFLUSH         },
1272 #endif
1273         /* Throw in some NFSv3 values for even more fun (HP returns these) */
1274         { 71,                   EREMOTE         },
1275
1276         { -1,                   EIO             }
1277 };
1278
1279 static char *nfs_strerror(int stat)
1280 {
1281         int i;
1282         static char buf[256];
1283
1284         for (i = 0; nfs_errtbl[i].stat != -1; i++) {
1285                 if (nfs_errtbl[i].stat == stat)
1286                         return strerror(nfs_errtbl[i].errnum);
1287         }
1288         sprintf(buf, _("unknown nfs status return value: %d"), stat);
1289         return buf;
1290 }