mount.nfs: Move network functions into a common source module
[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/stat.h>
52 #include <netinet/in.h>
53 #include <arpa/inet.h>
54 #include <mntent.h>
55 #include <sys/mount.h>
56 #include <paths.h>
57 #include <syslog.h>
58
59 #include "conn.h"
60 #include "xcommon.h"
61 #include "mount.h"
62 #include "nfsumount.h"
63 #include "nfs_mount.h"
64 #include "mount_constants.h"
65 #include "nls.h"
66 #include "error.h"
67 #include "network.h"
68
69 #ifndef NFS_PORT
70 #define NFS_PORT 2049
71 #endif
72 #ifndef NFS_FHSIZE
73 #define NFS_FHSIZE 32
74 #endif
75
76 #ifndef HAVE_INET_ATON
77 #define inet_aton(a,b) (0)
78 #endif
79
80 typedef dirpath mnt2arg_t;
81 typedef dirpath mnt3arg_t;
82 typedef dirpath mntarg_t;
83
84 typedef struct fhstatus  mnt2res_t;
85 typedef struct mountres3 mnt3res_t;
86 typedef union {
87         mnt2res_t nfsv2;
88         mnt3res_t nfsv3;
89 } mntres_t;
90
91 extern int nfs_mount_data_version;
92 extern int verbose;
93 extern int sloppy;
94
95 extern int linux_version_code();
96
97 static inline enum clnt_stat
98 nfs3_mount(CLIENT *clnt, mnt3arg_t *mnt3arg, mnt3res_t *mnt3res)
99 {
100         return clnt_call(clnt, MOUNTPROC3_MNT,
101                          (xdrproc_t) xdr_dirpath, (caddr_t) mnt3arg,
102                          (xdrproc_t) xdr_mountres3, (caddr_t) mnt3res,
103                          TIMEOUT);
104 }
105
106 static inline enum clnt_stat
107 nfs2_mount(CLIENT *clnt, mnt2arg_t *mnt2arg, mnt2res_t *mnt2res)
108 {
109         return clnt_call(clnt, MOUNTPROC_MNT,
110                          (xdrproc_t) xdr_dirpath, (caddr_t) mnt2arg,
111                          (xdrproc_t) xdr_fhstatus, (caddr_t) mnt2res,
112                          TIMEOUT);
113 }
114
115 static int
116 nfs_call_mount(clnt_addr_t *mnt_server, clnt_addr_t *nfs_server,
117                mntarg_t *mntarg, mntres_t *mntres)
118 {
119         CLIENT *clnt;
120         enum clnt_stat stat;
121         int msock;
122
123         if (!probe_bothports(mnt_server, nfs_server))
124                 goto out_bad;
125
126         clnt = mnt_openclnt(mnt_server, &msock);
127         if (!clnt)
128                 goto out_bad;
129         /* make pointers in xdr_mountres3 NULL so
130          * that xdr_array allocates memory for us
131          */
132         memset(mntres, 0, sizeof(*mntres));
133         switch (mnt_server->pmap.pm_vers) {
134         case 3:
135                 stat = nfs3_mount(clnt, mntarg, &mntres->nfsv3);
136                 break;
137         case 2:
138         case 1:
139                 stat = nfs2_mount(clnt, mntarg, &mntres->nfsv2);
140                 break;
141         default:
142                 goto out_bad;
143         }
144         if (stat != RPC_SUCCESS) {
145                 clnt_geterr(clnt, &rpc_createerr.cf_error);
146                 rpc_createerr.cf_stat = stat;
147         }
148         mnt_closeclnt(clnt, msock);
149         if (stat == RPC_SUCCESS)
150                 return 1;
151  out_bad:
152         return 0;
153 }
154
155 static int
156 parse_options(char *old_opts, struct nfs_mount_data *data,
157               int *bg, int *retry, clnt_addr_t *mnt_server,
158               clnt_addr_t *nfs_server, char *new_opts, const int opt_size)
159 {
160         struct sockaddr_in *mnt_saddr = &mnt_server->saddr;
161         struct pmap *mnt_pmap = &mnt_server->pmap;
162         struct pmap *nfs_pmap = &nfs_server->pmap;
163         int len;
164         char *opt, *opteq, *p, *opt_b;
165         char *mounthost = NULL;
166         char cbuf[128];
167         int open_quote = 0;
168
169         data->flags = 0;
170         *bg = 0;
171
172         len = strlen(new_opts);
173         for (p=old_opts, opt_b=NULL; p && *p; p++) {
174                 if (!opt_b)
175                         opt_b = p;              /* begin of the option item */
176                 if (*p == '"')
177                         open_quote ^= 1;        /* reverse the status */
178                 if (open_quote)
179                         continue;               /* still in a quoted block */
180                 if (*p == ',')
181                         *p = '\0';              /* terminate the option item */
182                 if (*p == '\0' || *(p+1) == '\0') {
183                         opt = opt_b;            /* opt is useful now */
184                         opt_b = NULL;
185                 }
186                 else
187                         continue;               /* still somewhere in the option item */
188
189                 if (strlen(opt) >= sizeof(cbuf))
190                         goto bad_parameter;
191                 if ((opteq = strchr(opt, '=')) && isdigit(opteq[1])) {
192                         int val = atoi(opteq + 1);      
193                         *opteq = '\0';
194 /* printf("opt=%s\n", opt); */
195                         if (!strcmp(opt, "rsize"))
196                                 data->rsize = val;
197                         else if (!strcmp(opt, "wsize"))
198                                 data->wsize = val;
199                         else if (!strcmp(opt, "timeo"))
200                                 data->timeo = val;
201                         else if (!strcmp(opt, "retrans"))
202                                 data->retrans = val;
203                         else if (!strcmp(opt, "acregmin"))
204                                 data->acregmin = val;
205                         else if (!strcmp(opt, "acregmax"))
206                                 data->acregmax = val;
207                         else if (!strcmp(opt, "acdirmin"))
208                                 data->acdirmin = val;
209                         else if (!strcmp(opt, "acdirmax"))
210                                 data->acdirmax = val;
211                         else if (!strcmp(opt, "actimeo")) {
212                                 data->acregmin = val;
213                                 data->acregmax = val;
214                                 data->acdirmin = val;
215                                 data->acdirmax = val;
216                         }
217                         else if (!strcmp(opt, "retry"))
218                                 *retry = val;
219                         else if (!strcmp(opt, "port"))
220                                 nfs_pmap->pm_port = val;
221                         else if (!strcmp(opt, "mountport"))
222                                 mnt_pmap->pm_port = val;
223                         else if (!strcmp(opt, "mountprog"))
224                                 mnt_pmap->pm_prog = val;
225                         else if (!strcmp(opt, "mountvers"))
226                                 mnt_pmap->pm_vers = val;
227                         else if (!strcmp(opt, "mounthost"))
228                                 mounthost=xstrndup(opteq+1, strcspn(opteq+1," \t\n\r,"));
229                         else if (!strcmp(opt, "nfsprog"))
230                                 nfs_pmap->pm_prog = val;
231                         else if (!strcmp(opt, "nfsvers") ||
232                                  !strcmp(opt, "vers")) {
233                                 nfs_pmap->pm_vers = val;
234                                 opt = "nfsvers";
235 #if NFS_MOUNT_VERSION >= 2
236                         } else if (!strcmp(opt, "namlen")) {
237                                 if (nfs_mount_data_version >= 2)
238                                         data->namlen = val;
239                                 else if (sloppy)
240                                         continue;
241                                 else
242                                         goto bad_parameter;
243 #endif
244                         } else if (!strcmp(opt, "addr")) {
245                                 /* ignore */;
246                                 continue;
247                         } else if (sloppy)
248                                 continue;
249                         else
250                                 goto bad_parameter;
251                         sprintf(cbuf, "%s=%s,", opt, opteq+1);
252                 } else if (opteq) {
253                         *opteq = '\0';
254                         if (!strcmp(opt, "proto")) {
255                                 if (!strcmp(opteq+1, "udp")) {
256                                         nfs_pmap->pm_prot = IPPROTO_UDP;
257                                         mnt_pmap->pm_prot = IPPROTO_UDP;
258 #if NFS_MOUNT_VERSION >= 2
259                                         data->flags &= ~NFS_MOUNT_TCP;
260                                 } else if (!strcmp(opteq+1, "tcp") &&
261                                            nfs_mount_data_version > 2) {
262                                         nfs_pmap->pm_prot = IPPROTO_TCP;
263                                         mnt_pmap->pm_prot = IPPROTO_TCP;
264                                         data->flags |= NFS_MOUNT_TCP;
265 #endif
266                                 } else if (sloppy)
267                                         continue;
268                                 else
269                                         goto bad_parameter;
270 #if NFS_MOUNT_VERSION >= 5
271                         } else if (!strcmp(opt, "sec")) {
272                                 char *secflavor = opteq+1;
273                                 /* see RFC 2623 */
274                                 if (nfs_mount_data_version < 5) {
275                                         printf(_("Warning: ignoring sec=%s option\n"), secflavor);
276                                         continue;
277                                 } else if (!strcmp(secflavor, "none"))
278                                         data->pseudoflavor = AUTH_NONE;
279                                 else if (!strcmp(secflavor, "sys"))
280                                         data->pseudoflavor = AUTH_SYS;
281                                 else if (!strcmp(secflavor, "krb5"))
282                                         data->pseudoflavor = AUTH_GSS_KRB5;
283                                 else if (!strcmp(secflavor, "krb5i"))
284                                         data->pseudoflavor = AUTH_GSS_KRB5I;
285                                 else if (!strcmp(secflavor, "krb5p"))
286                                         data->pseudoflavor = AUTH_GSS_KRB5P;
287                                 else if (!strcmp(secflavor, "lipkey"))
288                                         data->pseudoflavor = AUTH_GSS_LKEY;
289                                 else if (!strcmp(secflavor, "lipkey-i"))
290                                         data->pseudoflavor = AUTH_GSS_LKEYI;
291                                 else if (!strcmp(secflavor, "lipkey-p"))
292                                         data->pseudoflavor = AUTH_GSS_LKEYP;
293                                 else if (!strcmp(secflavor, "spkm3"))
294                                         data->pseudoflavor = AUTH_GSS_SPKM;
295                                 else if (!strcmp(secflavor, "spkm3i"))
296                                         data->pseudoflavor = AUTH_GSS_SPKMI;
297                                 else if (!strcmp(secflavor, "spkm3p"))
298                                         data->pseudoflavor = AUTH_GSS_SPKMP;
299                                 else if (sloppy)
300                                         continue;
301                                 else {
302                                         printf(_("Warning: Unrecognized security flavor %s.\n"),
303                                                 secflavor);
304                                         goto bad_parameter;
305                                 }
306                                 data->flags |= NFS_MOUNT_SECFLAVOUR;
307 #endif
308                         } else if (!strcmp(opt, "mounthost"))
309                                 mounthost=xstrndup(opteq+1,
310                                                    strcspn(opteq+1," \t\n\r,"));
311                          else if (!strcmp(opt, "context")) {
312                                 char *context = opteq + 1;
313                                 int ctxlen = strlen(context);
314
315                                 if (ctxlen > NFS_MAX_CONTEXT_LEN) {
316                                         printf(_("context parameter exceeds limit of %d\n"),
317                                                  NFS_MAX_CONTEXT_LEN);
318                                         goto bad_parameter;
319                                 }
320                                 /* The context string is in the format of
321                                  * "system_u:object_r:...".  We only want
322                                  * the context str between the quotes.
323                                  */
324                                 if (*context == '"')
325                                         strncpy(data->context, context+1,
326                                                         ctxlen-2);
327                                 else
328                                         strncpy(data->context, context,
329                                                         NFS_MAX_CONTEXT_LEN);
330                         } else if (sloppy)
331                                 continue;
332                         else
333                                 goto bad_parameter;
334                         sprintf(cbuf, "%s=%s,", opt, opteq+1);
335                 } else {
336                         int val = 1;
337                         if (!strncmp(opt, "no", 2)) {
338                                 val = 0;
339                                 opt += 2;
340                         }
341                         if (!strcmp(opt, "bg")) 
342                                 *bg = val;
343                         else if (!strcmp(opt, "fg")) 
344                                 *bg = !val;
345                         else if (!strcmp(opt, "soft")) {
346                                 data->flags &= ~NFS_MOUNT_SOFT;
347                                 if (val)
348                                         data->flags |= NFS_MOUNT_SOFT;
349                         } else if (!strcmp(opt, "hard")) {
350                                 data->flags &= ~NFS_MOUNT_SOFT;
351                                 if (!val)
352                                         data->flags |= NFS_MOUNT_SOFT;
353                         } else if (!strcmp(opt, "intr")) {
354                                 data->flags &= ~NFS_MOUNT_INTR;
355                                 if (val)
356                                         data->flags |= NFS_MOUNT_INTR;
357                         } else if (!strcmp(opt, "posix")) {
358                                 data->flags &= ~NFS_MOUNT_POSIX;
359                                 if (val)
360                                         data->flags |= NFS_MOUNT_POSIX;
361                         } else if (!strcmp(opt, "cto")) {
362                                 data->flags &= ~NFS_MOUNT_NOCTO;
363                                 if (!val)
364                                         data->flags |= NFS_MOUNT_NOCTO;
365                         } else if (!strcmp(opt, "ac")) {
366                                 data->flags &= ~NFS_MOUNT_NOAC;
367                                 if (!val)
368                                         data->flags |= NFS_MOUNT_NOAC;
369 #if NFS_MOUNT_VERSION >= 2
370                         } else if (!strcmp(opt, "tcp")) {
371                                 data->flags &= ~NFS_MOUNT_TCP;
372                                 if (val) {
373                                         if (nfs_mount_data_version < 2)
374                                                 goto bad_option;
375                                         nfs_pmap->pm_prot = IPPROTO_TCP;
376                                         mnt_pmap->pm_prot = IPPROTO_TCP;
377                                         data->flags |= NFS_MOUNT_TCP;
378                                 } else {
379                                         mnt_pmap->pm_prot = IPPROTO_UDP;
380                                         nfs_pmap->pm_prot = IPPROTO_UDP;
381                                 }
382                         } else if (!strcmp(opt, "udp")) {
383                                 data->flags &= ~NFS_MOUNT_TCP;
384                                 if (!val) {
385                                         if (nfs_mount_data_version < 2)
386                                                 goto bad_option;
387                                         nfs_pmap->pm_prot = IPPROTO_TCP;
388                                         mnt_pmap->pm_prot = IPPROTO_TCP;
389                                         data->flags |= NFS_MOUNT_TCP;
390                                 } else {
391                                         nfs_pmap->pm_prot = IPPROTO_UDP;
392                                         mnt_pmap->pm_prot = IPPROTO_UDP;
393                                 }
394 #endif
395 #if NFS_MOUNT_VERSION >= 3
396                         } else if (!strcmp(opt, "lock")) {
397                                 data->flags &= ~NFS_MOUNT_NONLM;
398                                 if (!val) {
399                                         if (nfs_mount_data_version < 3)
400                                                 goto bad_option;
401                                         data->flags |= NFS_MOUNT_NONLM;
402                                 }
403 #endif
404 #if NFS_MOUNT_VERSION >= 4
405                         } else if (!strcmp(opt, "broken_suid")) {
406                                 data->flags &= ~NFS_MOUNT_BROKEN_SUID;
407                                 if (val) {
408                                         if (nfs_mount_data_version < 4)
409                                                 goto bad_option;
410                                         data->flags |= NFS_MOUNT_BROKEN_SUID;
411                                 }
412                         } else if (!strcmp(opt, "acl")) {
413                                 data->flags &= ~NFS_MOUNT_NOACL;
414                                 if (!val)
415                                         data->flags |= NFS_MOUNT_NOACL;
416                         } else if (!strcmp(opt, "rdirplus")) {
417                                 data->flags &= ~NFS_MOUNT_NORDIRPLUS;
418                                 if (!val)
419                                         data->flags |= NFS_MOUNT_NORDIRPLUS;
420                         } else if (!strcmp(opt, "sharecache")) {
421                                 data->flags &= ~NFS_MOUNT_UNSHARED;
422                                 if (!val)
423                                         data->flags |= NFS_MOUNT_UNSHARED;
424 #endif
425                         } else {
426                         bad_option:
427                                 if (sloppy)
428                                         continue;
429                                 printf(_("Unsupported nfs mount option: "
430                                          "%s%s\n"), val ? "" : "no", opt);
431                                 goto out_bad;
432                         }
433                         sprintf(cbuf, val ? "%s,":"no%s,", opt);
434                 }
435                 len += strlen(cbuf);
436                 if (len >= opt_size) {
437                         printf(_("mount: excessively long option argument\n"));
438                         goto out_bad;
439                 }
440                 strcat(new_opts, cbuf);
441         }
442         /* See if the nfs host = mount host. */
443         if (mounthost) {
444                 if (!nfs_gethostbyname(mounthost, mnt_saddr))
445                         goto out_bad;
446                 *mnt_server->hostname = mounthost;
447         }
448         return 1;
449  bad_parameter:
450         printf(_("Bad nfs mount parameter: %s\n"), opt);
451  out_bad:
452         return 0;
453 }
454
455 static int nfsmnt_check_compat(const struct pmap *nfs_pmap,
456                                 const struct pmap *mnt_pmap)
457 {
458         unsigned int max_nfs_vers = (nfs_mount_data_version >= 4) ? 3 : 2;
459         unsigned int max_mnt_vers = (nfs_mount_data_version >= 4) ? 3 : 2;
460
461         if (nfs_pmap->pm_vers == 4) {
462                 fprintf(stderr, _("Please use '-t nfs4' "
463                                         "instead of '-o vers=4'.\n"));
464                 goto out_bad;
465         }
466
467         if (nfs_pmap->pm_vers) {
468                 if (nfs_pmap->pm_vers > max_nfs_vers || nfs_pmap->pm_vers < 2) {
469                         fprintf(stderr, _("NFS version %ld is not supported.\n"), 
470                                         nfs_pmap->pm_vers);
471                         goto out_bad;
472                 }
473         }
474
475         if (mnt_pmap->pm_vers > max_mnt_vers) {
476                 fprintf(stderr, _("NFS mount version %ld s not supported.\n"), 
477                         mnt_pmap->pm_vers);
478                 goto out_bad;
479         }
480
481         return 1;
482
483 out_bad:
484         return 0;
485 }
486
487 int
488 nfsmount(const char *spec, const char *node, int *flags,
489          char **extra_opts, char **mount_opts,
490          int running_bg, int *need_statd)
491 {
492         static char *prev_bg_host;
493         char hostdir[1024];
494         char *hostname, *dirname, *old_opts, *mounthost = NULL;
495         char new_opts[1024], cbuf[1024];
496         static struct nfs_mount_data data;
497         int val;
498         static int doonce = 0;
499
500         clnt_addr_t mnt_server = { &mounthost, };
501         clnt_addr_t nfs_server = { &hostname, };
502         struct sockaddr_in *nfs_saddr = &nfs_server.saddr;
503         struct pmap  *mnt_pmap = &mnt_server.pmap, 
504                      *nfs_pmap = &nfs_server.pmap;
505         struct pmap  save_mnt, save_nfs;
506
507         int fsock = -1;
508
509         mntres_t mntres;
510
511         struct stat statbuf;
512         char *s;
513         int bg, retry;
514         int retval = EX_FAIL;
515         time_t t;
516         time_t prevt;
517         time_t timeout;
518
519         if (strlen(spec) >= sizeof(hostdir)) {
520                 fprintf(stderr, _("mount: "
521                                   "excessively long host:dir argument\n"));
522                 goto fail;
523         }
524         strcpy(hostdir, spec);
525         if ((s = strchr(hostdir, ':'))) {
526                 hostname = hostdir;
527                 dirname = s + 1;
528                 *s = '\0';
529                 /* Ignore all but first hostname in replicated mounts
530                    until they can be fully supported. (mack@sgi.com) */
531                 if ((s = strchr(hostdir, ','))) {
532                         *s = '\0';
533                         fprintf(stderr,
534                                 _("mount: warning: "
535                                   "multiple hostnames not supported\n"));
536                 }
537         } else {
538                 fprintf(stderr,
539                         _("mount: "
540                           "directory to mount not in host:dir format\n"));
541                 goto fail;
542         }
543
544         if (!nfs_gethostbyname(hostname, nfs_saddr))
545                 goto fail;
546         mounthost = hostname;
547         memcpy (&mnt_server.saddr, nfs_saddr, sizeof (mnt_server.saddr));
548
549         /* add IP address to mtab options for use when unmounting */
550
551         s = inet_ntoa(nfs_saddr->sin_addr);
552         old_opts = *extra_opts;
553         if (!old_opts)
554                 old_opts = "";
555
556         /* Set default options.
557          * rsize/wsize (and bsize, for ver >= 3) are left 0 in order to
558          * let the kernel decide.
559          * timeo is filled in after we know whether it'll be TCP or UDP. */
560         memset(&data, 0, sizeof(data));
561         data.acregmin   = 3;
562         data.acregmax   = 60;
563         data.acdirmin   = 30;
564         data.acdirmax   = 60;
565 #if NFS_MOUNT_VERSION >= 2
566         data.namlen     = NAME_MAX;
567 #endif
568
569         bg = 0;
570         retry = 10000;          /* 10000 minutes ~ 1 week */
571
572         memset(mnt_pmap, 0, sizeof(*mnt_pmap));
573         mnt_pmap->pm_prog = MOUNTPROG;
574         memset(nfs_pmap, 0, sizeof(*nfs_pmap));
575         nfs_pmap->pm_prog = NFS_PROGRAM;
576
577         /* parse options */
578         new_opts[0] = 0;
579         if (!parse_options(old_opts, &data, &bg, &retry, &mnt_server, &nfs_server,
580                            new_opts, sizeof(new_opts)))
581                 goto fail;
582         if (!nfsmnt_check_compat(nfs_pmap, mnt_pmap))
583                 goto fail;
584         
585         if (retry == 10000 && !bg)
586                 retry = 2; /* reset for fg mounts */
587         
588
589 #ifdef NFS_MOUNT_DEBUG
590         printf("rsize = %d, wsize = %d, timeo = %d, retrans = %d\n",
591                data.rsize, data.wsize, data.timeo, data.retrans);
592         printf("acreg (min, max) = (%d, %d), acdir (min, max) = (%d, %d)\n",
593                data.acregmin, data.acregmax, data.acdirmin, data.acdirmax);
594         printf("port = %d, bg = %d, retry = %d, flags = %.8x\n",
595                nfs_pmap->pm_port, bg, retry, data.flags);
596         printf("mountprog = %d, mountvers = %d, nfsprog = %d, nfsvers = %d\n",
597                mnt_pmap->pm_prog, mnt_pmap->pm_vers,
598                nfs_pmap->pm_prog, nfs_pmap->pm_vers);
599         printf("soft = %d, intr = %d, posix = %d, nocto = %d, noac = %d ",
600                (data.flags & NFS_MOUNT_SOFT) != 0,
601                (data.flags & NFS_MOUNT_INTR) != 0,
602                (data.flags & NFS_MOUNT_POSIX) != 0,
603                (data.flags & NFS_MOUNT_NOCTO) != 0,
604                (data.flags & NFS_MOUNT_NOAC) != 0);
605 #if NFS_MOUNT_VERSION >= 2
606         printf("tcp = %d ",
607                (data.flags & NFS_MOUNT_TCP) != 0);
608 #endif
609 #if NFS_MOUNT_VERSION >= 4
610         printf("noacl = %d ", (data.flags & NFS_MOUNT_NOACL) != 0);
611 #endif
612 #if NFS_MOUNT_VERSION >= 5
613         printf("sec = %u ", data.pseudoflavor);
614         printf("readdirplus = %d ", (data.flags & NFS_MOUNT_NORDIRPLUS) != 0);
615 #endif
616         printf("\n");
617 #endif
618
619         data.version = nfs_mount_data_version;
620         *mount_opts = (char *) &data;
621
622         if (*flags & MS_REMOUNT)
623                 goto out_ok;
624
625         /*
626          * If the previous mount operation on the same host was
627          * backgrounded, and the "bg" for this mount is also set,
628          * give up immediately, to avoid the initial timeout.
629          */
630         if (bg && !running_bg &&
631             prev_bg_host && strcmp(hostname, prev_bg_host) == 0) {
632                 if (retry > 0)
633                         retval = EX_BG;
634                 return retval;
635         }
636
637         /* create mount deamon client */
638
639         /*
640          * The following loop implements the mount retries. On the first
641          * call, "running_bg" is 0. When the mount times out, and the
642          * "bg" option is set, the exit status EX_BG will be returned.
643          * For a backgrounded mount, there will be a second call by the
644          * child process with "running_bg" set to 1.
645          *
646          * The case where the mount point is not present and the "bg"
647          * option is set, is treated as a timeout. This is done to
648          * support nested mounts.
649          *
650          * The "retry" count specified by the user is the number of
651          * minutes to retry before giving up.
652          *
653          * Only the first error message will be displayed.
654          */
655         timeout = time(NULL) + 60 * retry;
656         prevt = 0;
657         t = 30;
658         val = 1;
659
660         memcpy(&save_nfs, nfs_pmap, sizeof(save_nfs));
661         memcpy(&save_mnt, mnt_pmap, sizeof(save_mnt));
662         for (;;) {
663                 if (bg && stat(node, &statbuf) == -1) {
664                         /* no mount point yet - sleep */
665                         if (running_bg) {
666                                 sleep(val);     /* 1, 2, 4, 8, 16, 30, ... */
667                                 val *= 2;
668                                 if (val > 30)
669                                         val = 30;
670                         }
671                 } else {
672                         int stat;
673                         /* be careful not to use too many CPU cycles */
674                         if (t - prevt < 30)
675                                 sleep(30);
676
677                         stat = nfs_call_mount(&mnt_server, &nfs_server,
678                                               &dirname, &mntres);
679                         if (stat)
680                                 break;
681                         memcpy(nfs_pmap, &save_nfs, sizeof(*nfs_pmap));
682                         memcpy(mnt_pmap, &save_mnt, sizeof(*mnt_pmap));
683                         prevt = t;
684                 }
685                 if (!bg) {
686                         switch(rpc_createerr.cf_stat){
687                         case RPC_TIMEDOUT:
688                                 break;
689                         case RPC_SYSTEMERROR:
690                                 if (errno == ETIMEDOUT)
691                                         break;
692                         default:
693                                 mount_errors(*nfs_server.hostname, 0, bg);
694                         goto fail;
695                         }
696                         t = time(NULL);
697                         if (t >= timeout) {
698                                 mount_errors(*nfs_server.hostname, 0, bg);
699                                 goto fail;
700                         }
701                         mount_errors(*nfs_server.hostname, 1, bg);
702                         continue;
703                 }
704                 if (!running_bg) {
705                         prev_bg_host = xstrdup(hostname);
706                         if (retry > 0)
707                                 retval = EX_BG;
708                         goto fail;
709                 }
710                 t = time(NULL);
711                 if (t >= timeout) {
712                         mount_errors(*nfs_server.hostname, 0, bg);
713                         goto fail;
714                 }
715                 if (doonce++ < 1)
716                         mount_errors(*nfs_server.hostname, 1, bg);
717         }
718
719         if (nfs_pmap->pm_vers == 2) {
720                 if (mntres.nfsv2.fhs_status != 0) {
721                         fprintf(stderr,
722                                 _("mount: %s:%s failed, reason given by server: %s\n"),
723                                 hostname, dirname,
724                                 nfs_strerror(mntres.nfsv2.fhs_status));
725                         goto fail;
726                 }
727                 memcpy(data.root.data,
728                        (char *) mntres.nfsv2.fhstatus_u.fhs_fhandle,
729                        NFS_FHSIZE);
730 #if NFS_MOUNT_VERSION >= 4
731                 data.root.size = NFS_FHSIZE;
732                 memcpy(data.old_root.data,
733                        (char *) mntres.nfsv2.fhstatus_u.fhs_fhandle,
734                        NFS_FHSIZE);
735 #endif
736         } else {
737 #if NFS_MOUNT_VERSION >= 4
738                 mountres3_ok *mountres;
739                 fhandle3 *fhandle;
740                 int i, *flavor, yum = 0;
741                 if (mntres.nfsv3.fhs_status != 0) {
742                         fprintf(stderr,
743                                 _("mount: %s:%s failed, reason given by server: %s\n"),
744                                 hostname, dirname,
745                                 nfs_strerror(mntres.nfsv3.fhs_status));
746                         goto fail;
747                 }
748 #if NFS_MOUNT_VERSION >= 5
749                 mountres = &mntres.nfsv3.mountres3_u.mountinfo;
750                 i = mountres->auth_flavors.auth_flavors_len;
751                 if (i <= 0) 
752                         goto noauth_flavors;
753
754                 flavor = mountres->auth_flavors.auth_flavors_val;
755                 while (--i >= 0) {
756                         /* If no flavour requested, use first simple
757                          * flavour that is offered.
758                          */
759                         if (! (data.flags & NFS_MOUNT_SECFLAVOUR) &&
760                             (flavor[i] == AUTH_SYS ||
761                              flavor[i] == AUTH_NONE)) {
762                                 data.pseudoflavor = flavor[i];
763                                 data.flags |= NFS_MOUNT_SECFLAVOUR;
764                         }
765                         if (flavor[i] == data.pseudoflavor)
766                                 yum = 1;
767 #ifdef NFS_MOUNT_DEBUG
768                         printf("auth flavor %d: %d\n",
769                                 i, flavor[i]);
770 #endif
771                 }
772                 if (!yum) {
773                         fprintf(stderr,
774                                 "mount: %s:%s failed, "
775                                 "security flavor not supported\n",
776                                 hostname, dirname);
777                         /* server has registered us in rmtab, send umount */
778                         nfs_call_umount(&mnt_server, &dirname);
779                         goto fail;
780                 }
781 noauth_flavors:
782 #endif
783                 fhandle = &mntres.nfsv3.mountres3_u.mountinfo.fhandle;
784                 memset(data.old_root.data, 0, NFS_FHSIZE);
785                 memset(&data.root, 0, sizeof(data.root));
786                 data.root.size = fhandle->fhandle3_len;
787                 memcpy(data.root.data,
788                        (char *) fhandle->fhandle3_val,
789                        fhandle->fhandle3_len);
790
791                 data.flags |= NFS_MOUNT_VER3;
792 #endif
793         }
794
795         if (nfs_mount_data_version == 1) {
796                 /* create nfs socket for kernel */
797                 if (nfs_pmap->pm_prot == IPPROTO_TCP)
798                         fsock = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
799                 else
800                         fsock = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
801                 if (fsock < 0) {
802                         perror(_("nfs socket"));
803                         goto fail;
804                 }
805                 if (bindresvport(fsock, 0) < 0) {
806                         perror(_("nfs bindresvport"));
807                         goto fail;
808                 }
809         }
810
811 #ifdef NFS_MOUNT_DEBUG
812         printf(_("using port %d for nfs deamon\n"), nfs_pmap->pm_port);
813 #endif
814         nfs_saddr->sin_port = htons(nfs_pmap->pm_port);
815         /*
816          * connect() the socket for kernels 1.3.10 and below only,
817          * to avoid problems with multihomed hosts.
818          * --Swen
819          */
820         if (linux_version_code() <= 0x01030a && fsock != -1
821             && connect(fsock, (struct sockaddr *) nfs_saddr,
822                        sizeof (*nfs_saddr)) < 0) {
823                 perror(_("nfs connect"));
824                 goto fail;
825         }
826
827 #if NFS_MOUNT_VERSION >= 2
828         if (nfs_pmap->pm_prot == IPPROTO_TCP)
829                 data.flags |= NFS_MOUNT_TCP;
830         else
831                 data.flags &= ~NFS_MOUNT_TCP;
832 #endif
833
834         /* prepare data structure for kernel */
835
836         data.fd = fsock;
837         memcpy((char *) &data.addr, (char *) nfs_saddr, sizeof(data.addr));
838         strncpy(data.hostname, hostname, sizeof(data.hostname));
839
840  out_ok:
841         /* Ensure we have enough padding for the following strcat()s */
842         if (strlen(new_opts) + strlen(s) + 30 >= sizeof(new_opts)) {
843                 fprintf(stderr, _("mount: "
844                                   "excessively long option argument\n"));
845                 goto fail;
846         }
847
848         snprintf(cbuf, sizeof(cbuf)-1, "addr=%s", s);
849         strcat(new_opts, cbuf);
850
851         *extra_opts = xstrdup(new_opts);
852         *need_statd = ! (data.flags & NFS_MOUNT_NONLM);
853         return 0;
854
855         /* abort */
856  fail:
857         if (fsock != -1)
858                 close(fsock);
859         return retval;
860 }