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