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 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 = 0;
 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                         } else if (!strcmp(opt, "rdirplus")) {
 804                                 data->flags &= ~NFS_MOUNT_NORDIRPLUS;
 805                                 if (!val)
 806                                         data->flags |= NFS_MOUNT_NORDIRPLUS;
 807                         } else if (!strcmp(opt, "sharecache")) {
 808                                 data->flags &= ~NFS_MOUNT_UNSHARED;
 809                                 if (!val)
 810                                         data->flags |= NFS_MOUNT_UNSHARED;
 811 #endif
 812                         } else {
 813                         bad_option:
 814                                 if (sloppy)
 815                                         continue;
 816                                 printf(_("Unsupported nfs mount option: "
 817                                          "%s%s\n"), val ? "" : "no", opt);
 818                                 goto out_bad;
 819                         }
 820                         sprintf(cbuf, val ? "%s,":"no%s,", opt);
 821                 }
 822                 len += strlen(cbuf);
 823                 if (len >= opt_size) {
 824                         printf(_("mount: excessively long option argument\n"));
 825                         goto out_bad;
 826                 }
 827                 strcat(new_opts, cbuf);
 828         }
 829         /* See if the nfs host = mount host. */
 830         if (mounthost) {
 831                 if (!nfs_gethostbyname(mounthost, mnt_saddr))
 832                         goto out_bad;
 833                 *mnt_server->hostname = mounthost;
 834         }
 835         return 1;
 836  bad_parameter:
 837         printf(_("Bad nfs mount parameter: %s\n"), opt);
 838  out_bad:
 839         return 0;
 840 }
 841
 842 static inline int
 843 nfsmnt_check_compat(const struct pmap *nfs_pmap, const struct pmap *mnt_pmap)
 844 {
 845         if (nfs_pmap->pm_vers &&
 846                 (nfs_pmap->pm_vers > MAX_NFSPROT || nfs_pmap->pm_vers < 2)) {
 847                 if (nfs_pmap->pm_vers == 4)
 848                         fprintf(stderr, _("'vers=4' is not supported.  "
 849                                 "Use '-t nfs4' instead.\n"));
 850                 else
 851                         fprintf(stderr, _("NFS version %ld is not supported.\n"),
 852                                 nfs_pmap->pm_vers);
 853                 goto out_bad;
 854         }
 855         if (mnt_pmap->pm_vers > MAX_MNTPROT) {
 856                 fprintf(stderr, _("NFS mount version %ld s not supported.\n"),
 857                         mnt_pmap->pm_vers);
 858                 goto out_bad;
 859         }
 860         return 1;
 861  out_bad:
 862         return 0;
 863 }
 864
 865 int
 866 nfsmount(const char *spec, const char *node, int *flags,
 867          char **extra_opts, char **mount_opts,
 868          int running_bg, int *need_statd)
 869 {
 870         static char *prev_bg_host;
 871         char hostdir[1024];
 872         char *hostname, *dirname, *old_opts, *mounthost = NULL;
 873         char new_opts[1024], cbuf[1024];
 874         static struct nfs_mount_data data;
 875         int val;
 876         static int doonce = 0;
 877
 878         clnt_addr_t mnt_server = { &mounthost, };
 879         clnt_addr_t nfs_server = { &hostname, };
 880         struct sockaddr_in *nfs_saddr = &nfs_server.saddr;
 881         struct pmap  *mnt_pmap = &mnt_server.pmap,
 882                      *nfs_pmap = &nfs_server.pmap;
 883         struct pmap  save_mnt, save_nfs;
 884
 885         int fsock = -1;
 886
 887         mntres_t mntres;
 888
 889         struct stat statbuf;
 890         char *s;
 891         int bg, retry;
 892         int retval = EX_FAIL;
 893         time_t t;
 894         time_t prevt;
 895         time_t timeout;
 896
 897         nfs_mount_version = find_kernel_nfs_mount_version();
 898
 899         if (strlen(spec) >= sizeof(hostdir)) {
 900                 fprintf(stderr, _("mount: "
 901                                   "excessively long host:dir argument\n"));
 902                 goto fail;
 903         }
 904         strcpy(hostdir, spec);
 905         if ((s = strchr(hostdir, ':'))) {
 906                 hostname = hostdir;
 907                 dirname = s + 1;
 908                 *s = '\0';
 909                 /* Ignore all but first hostname in replicated mounts
 910                    until they can be fully supported. (mack@sgi.com) */
 911                 if ((s = strchr(hostdir, ','))) {
 912                         *s = '\0';
 913                         fprintf(stderr,
 914                                 _("mount: warning: "
 915                                   "multiple hostnames not supported\n"));
 916                 }
 917         } else {
 918                 fprintf(stderr,
 919                         _("mount: "
 920                           "directory to mount not in host:dir format\n"));
 921                 goto fail;
 922         }
 923
 924         if (!nfs_gethostbyname(hostname, nfs_saddr))
 925                 goto fail;
 926         mounthost = hostname;
 927         memcpy (&mnt_server.saddr, nfs_saddr, sizeof (mnt_server.saddr));
 928
 929         /* add IP address to mtab options for use when unmounting */
 930
 931         s = inet_ntoa(nfs_saddr->sin_addr);
 932         old_opts = *extra_opts;
 933         if (!old_opts)
 934                 old_opts = "";
 935
 936         /* Set default options.
 937          * rsize/wsize (and bsize, for ver >= 3) are left 0 in order to
 938          * let the kernel decide.
 939          * timeo is filled in after we know whether it'll be TCP or UDP. */
 940         memset(&data, 0, sizeof(data));
 941         data.acregmin   = 3;
 942         data.acregmax   = 60;
 943         data.acdirmin   = 30;
 944         data.acdirmax   = 60;
 945 #if NFS_MOUNT_VERSION >= 2
 946         data.namlen     = NAME_MAX;
 947 #endif
 948
 949         bg = 0;
 950         retry = 10000;          /* 10000 minutes ~ 1 week */
 951
 952         memset(mnt_pmap, 0, sizeof(*mnt_pmap));
 953         mnt_pmap->pm_prog = MOUNTPROG;
 954         memset(nfs_pmap, 0, sizeof(*nfs_pmap));
 955         nfs_pmap->pm_prog = NFS_PROGRAM;
 956
 957         /* parse options */
 958         new_opts[0] = 0;
 959         if (!parse_options(old_opts, &data, &bg, &retry, &mnt_server, &nfs_server,
 960                            new_opts, sizeof(new_opts)))
 961                 goto fail;
 962         if (!nfsmnt_check_compat(nfs_pmap, mnt_pmap))
 963                 goto fail;
 964
 965         if (retry == 10000 && !bg)
 966                 retry = 2; /* reset for fg mounts */
 967
 968
 969 #ifdef NFS_MOUNT_DEBUG
 970         printf("rsize = %d, wsize = %d, timeo = %d, retrans = %d\n",
 971                data.rsize, data.wsize, data.timeo, data.retrans);
 972         printf("acreg (min, max) = (%d, %d), acdir (min, max) = (%d, %d)\n",
 973                data.acregmin, data.acregmax, data.acdirmin, data.acdirmax);
 974         printf("port = %d, bg = %d, retry = %d, flags = %.8x\n",
 975                nfs_pmap->pm_port, bg, retry, data.flags);
 976         printf("mountprog = %d, mountvers = %d, nfsprog = %d, nfsvers = %d\n",
 977                mnt_pmap->pm_prog, mnt_pmap->pm_vers,
 978                nfs_pmap->pm_prog, nfs_pmap->pm_vers);
 979         printf("soft = %d, intr = %d, posix = %d, nocto = %d, noac = %d ",
 980                (data.flags & NFS_MOUNT_SOFT) != 0,
 981                (data.flags & NFS_MOUNT_INTR) != 0,
 982                (data.flags & NFS_MOUNT_POSIX) != 0,
 983                (data.flags & NFS_MOUNT_NOCTO) != 0,
 984                (data.flags & NFS_MOUNT_NOAC) != 0);
 985 #if NFS_MOUNT_VERSION >= 2
 986         printf("tcp = %d ",
 987                (data.flags & NFS_MOUNT_TCP) != 0);
 988 #endif
 989 #if NFS_MOUNT_VERSION >= 4
 990         printf("noacl = %d ", (data.flags & NFS_MOUNT_NOACL) != 0);
 991 #endif
 992 #if NFS_MOUNT_VERSION >= 5
 993         printf("sec = %u ", data.pseudoflavor);
 994         printf("readdirplus = %d ", (data.flags & NFS_MOUNT_NORDIRPLUS) != 0);
 995 #endif
 996         printf("\n");
 997 #endif
 998
 999         data.version = nfs_mount_version;
1000         *mount_opts = (char *) &data;
1001
1002         if (*flags & MS_REMOUNT)
1003                 goto out_ok;
1004
1005         /*
1006          * If the previous mount operation on the same host was
1007          * backgrounded, and the "bg" for this mount is also set,
1008          * give up immediately, to avoid the initial timeout.
1009          */
1010         if (bg && !running_bg &&
1011             prev_bg_host && strcmp(hostname, prev_bg_host) == 0) {
1012                 if (retry > 0)
1013                         retval = EX_BG;
1014                 return retval;
1015         }
1016
1017         /* create mount deamon client */
1018
1019         /*
1020          * The following loop implements the mount retries. On the first
1021          * call, "running_bg" is 0. When the mount times out, and the
1022          * "bg" option is set, the exit status EX_BG will be returned.
1023          * For a backgrounded mount, there will be a second call by the
1024          * child process with "running_bg" set to 1.
1025          *
1026          * The case where the mount point is not present and the "bg"
1027          * option is set, is treated as a timeout. This is done to
1028          * support nested mounts.
1029          *
1030          * The "retry" count specified by the user is the number of
1031          * minutes to retry before giving up.
1032          *
1033          * Only the first error message will be displayed.
1034          */
1035         timeout = time(NULL) + 60 * retry;
1036         prevt = 0;
1037         t = 30;
1038         val = 1;
1039
1040         memcpy(&save_nfs, nfs_pmap, sizeof(save_nfs));
1041         memcpy(&save_mnt, mnt_pmap, sizeof(save_mnt));
1042         for (;;) {
1043                 if (bg && stat(node, &statbuf) == -1) {
1044                         /* no mount point yet - sleep */
1045                         if (running_bg) {
1046                                 sleep(val);     /* 1, 2, 4, 8, 16, 30, ... */
1047                                 val *= 2;
1048                                 if (val > 30)
1049                                         val = 30;
1050                         }
1051                 } else {
1052                         int stat;
1053                         /* be careful not to use too many CPU cycles */
1054                         if (t - prevt < 30)
1055                                 sleep(30);
1056
1057                         stat = nfs_call_mount(&mnt_server, &nfs_server,
1058                                               &dirname, &mntres);
1059                         if (stat)
1060                                 break;
1061                         memcpy(nfs_pmap, &save_nfs, sizeof(*nfs_pmap));
1062                         memcpy(mnt_pmap, &save_mnt, sizeof(*mnt_pmap));
1063                         prevt = t;
1064                 }
1065                 if (!bg) {
1066                         switch(rpc_createerr.cf_stat){
1067                         case RPC_TIMEDOUT:
1068                                 break;
1069                         case RPC_SYSTEMERROR:
1070                                 if (errno == ETIMEDOUT)
1071                                         break;
1072                         default:
1073                                 mount_errors(*nfs_server.hostname, 0, bg);
1074                         goto fail;
1075                         }
1076                         t = time(NULL);
1077                         if (t >= timeout) {
1078                                 mount_errors(*nfs_server.hostname, 0, bg);
1079                                 goto fail;
1080                         }
1081                         mount_errors(*nfs_server.hostname, 1, bg);
1082                         continue;
1083                 }
1084                 if (!running_bg) {
1085                         prev_bg_host = xstrdup(hostname);
1086                         if (retry > 0)
1087                                 retval = EX_BG;
1088                         goto fail;
1089                 }
1090                 t = time(NULL);
1091                 if (t >= timeout) {
1092                         mount_errors(*nfs_server.hostname, 0, bg);
1093                         goto fail;
1094                 }
1095                 if (doonce++ < 1)
1096                         mount_errors(*nfs_server.hostname, 1, bg);
1097         }
1098
1099         if (nfs_pmap->pm_vers == 2) {
1100                 if (mntres.nfsv2.fhs_status != 0) {
1101                         fprintf(stderr,
1102                                 _("mount: %s:%s failed, reason given by server: %s\n"),
1103                                 hostname, dirname,
1104                                 nfs_strerror(mntres.nfsv2.fhs_status));
1105                         goto fail;
1106                 }
1107                 memcpy(data.root.data,
1108                        (char *) mntres.nfsv2.fhstatus_u.fhs_fhandle,
1109                        NFS_FHSIZE);
1110 #if NFS_MOUNT_VERSION >= 4
1111                 data.root.size = NFS_FHSIZE;
1112                 memcpy(data.old_root.data,
1113                        (char *) mntres.nfsv2.fhstatus_u.fhs_fhandle,
1114                        NFS_FHSIZE);
1115 #endif
1116         } else {
1117 #if NFS_MOUNT_VERSION >= 4
1118                 mountres3_ok *mountres;
1119                 fhandle3 *fhandle;
1120                 int i, *flavor, yum = 0;
1121                 if (mntres.nfsv3.fhs_status != 0) {
1122                         fprintf(stderr,
1123                                 _("mount: %s:%s failed, reason given by server: %s\n"),
1124                                 hostname, dirname,
1125                                 nfs_strerror(mntres.nfsv3.fhs_status));
1126                         goto fail;
1127                 }
1128 #if NFS_MOUNT_VERSION >= 5
1129                 mountres = &mntres.nfsv3.mountres3_u.mountinfo;
1130                 i = mountres->auth_flavors.auth_flavors_len;
1131                 if (i <= 0)
1132                         goto noauth_flavors;
1133
1134                 flavor = mountres->auth_flavors.auth_flavors_val;
1135                 while (--i >= 0) {
1136                         /* If no flavour requested, use first simple
1137                          * flavour that is offered.
1138                          */
1139                         if (! (data.flags & NFS_MOUNT_SECFLAVOUR) &&
1140                             (flavor[i] == AUTH_SYS ||
1141                              flavor[i] == AUTH_NONE)) {
1142                                 data.pseudoflavor = flavor[i];
1143                                 data.flags |= NFS_MOUNT_SECFLAVOUR;
1144                         }
1145                         if (flavor[i] == data.pseudoflavor)
1146                                 yum = 1;
1147 #ifdef NFS_MOUNT_DEBUG
1148                         printf("auth flavor %d: %d\n",
1149                                 i, flavor[i]);
1150 #endif
1151                 }
1152                 if (!yum) {
1153                         fprintf(stderr,
1154                                 "mount: %s:%s failed, "
1155                                 "security flavor not supported\n",
1156                                 hostname, dirname);
1157                         /* server has registered us in rmtab, send umount */
1158                         nfs_call_umount(&mnt_server, &dirname);
1159                         goto fail;
1160                 }
1161 noauth_flavors:
1162 #endif
1163                 fhandle = &mntres.nfsv3.mountres3_u.mountinfo.fhandle;
1164                 memset(data.old_root.data, 0, NFS_FHSIZE);
1165                 memset(&data.root, 0, sizeof(data.root));
1166                 data.root.size = fhandle->fhandle3_len;
1167                 memcpy(data.root.data,
1168                        (char *) fhandle->fhandle3_val,
1169                        fhandle->fhandle3_len);
1170
1171                 data.flags |= NFS_MOUNT_VER3;
1172 #endif
1173         }
1174
1175         if (nfs_mount_version == 1) {
1176                 /* create nfs socket for kernel */
1177                 if (nfs_pmap->pm_prot == IPPROTO_TCP)
1178                         fsock = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
1179                 else
1180                         fsock = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
1181                 if (fsock < 0) {
1182                         perror(_("nfs socket"));
1183                         goto fail;
1184                 }
1185                 if (bindresvport(fsock, 0) < 0) {
1186                         perror(_("nfs bindresvport"));
1187                         goto fail;
1188                 }
1189         }
1190
1191 #ifdef NFS_MOUNT_DEBUG
1192         printf(_("using port %d for nfs deamon\n"), nfs_pmap->pm_port);
1193 #endif
1194         nfs_saddr->sin_port = htons(nfs_pmap->pm_port);
1195         /*
1196          * connect() the socket for kernels 1.3.10 and below only,
1197          * to avoid problems with multihomed hosts.
1198          * --Swen
1199          */
1200         if (linux_version_code() <= 0x01030a && fsock != -1
1201             && connect(fsock, (struct sockaddr *) nfs_saddr,
1202                        sizeof (*nfs_saddr)) < 0) {
1203                 perror(_("nfs connect"));
1204                 goto fail;
1205         }
1206
1207 #if NFS_MOUNT_VERSION >= 2
1208         if (nfs_pmap->pm_prot == IPPROTO_TCP)
1209                 data.flags |= NFS_MOUNT_TCP;
1210         else
1211                 data.flags &= ~NFS_MOUNT_TCP;
1212 #endif
1213
1214         /* prepare data structure for kernel */
1215
1216         data.fd = fsock;
1217         memcpy((char *) &data.addr, (char *) nfs_saddr, sizeof(data.addr));
1218         strncpy(data.hostname, hostname, sizeof(data.hostname));
1219
1220  out_ok:
1221         /* Ensure we have enough padding for the following strcat()s */
1222         if (strlen(new_opts) + strlen(s) + 30 >= sizeof(new_opts)) {
1223                 fprintf(stderr, _("mount: "
1224                                   "excessively long option argument\n"));
1225                 goto fail;
1226         }
1227
1228         snprintf(cbuf, sizeof(cbuf)-1, "addr=%s", s);
1229         strcat(new_opts, cbuf);
1230
1231         *extra_opts = xstrdup(new_opts);
1232         *need_statd = ! (data.flags & NFS_MOUNT_NONLM);
1233         return 0;
1234
1235         /* abort */
1236  fail:
1237         if (fsock != -1)
1238                 close(fsock);
1239         return retval;
1240 }
1241
1242 /*
1243  * We need to translate between nfs status return values and
1244  * the local errno values which may not be the same.
1245  *
1246  * Andreas Schwab <schwab@LS5.informatik.uni-dortmund.de>: change errno:
1247  * "after #include <errno.h> the symbol errno is reserved for any use,
1248  *  it cannot even be used as a struct tag or field name".
1249  */
1250
1251 #ifndef EDQUOT
1252 #define EDQUOT  ENOSPC
1253 #endif
1254
1255 static struct {
1256         enum nfsstat stat;
1257         int errnum;
1258 } nfs_errtbl[] = {
1259         { NFS_OK,               0               },
1260         { NFSERR_PERM,          EPERM           },
1261         { NFSERR_NOENT,         ENOENT          },
1262         { NFSERR_IO,            EIO             },
1263         { NFSERR_NXIO,          ENXIO           },
1264         { NFSERR_ACCES,         EACCES          },
1265         { NFSERR_EXIST,         EEXIST          },
1266         { NFSERR_NODEV,         ENODEV          },
1267         { NFSERR_NOTDIR,        ENOTDIR         },
1268         { NFSERR_ISDIR,         EISDIR          },
1269 #ifdef NFSERR_INVAL
1270         { NFSERR_INVAL,         EINVAL          },      /* that Sun forgot */
1271 #endif
1272         { NFSERR_FBIG,          EFBIG           },
1273         { NFSERR_NOSPC,         ENOSPC          },
1274         { NFSERR_ROFS,          EROFS           },
1275         { NFSERR_NAMETOOLONG,   ENAMETOOLONG    },
1276         { NFSERR_NOTEMPTY,      ENOTEMPTY       },
1277         { NFSERR_DQUOT,         EDQUOT          },
1278         { NFSERR_STALE,         ESTALE          },
1279 #ifdef EWFLUSH
1280         { NFSERR_WFLUSH,        EWFLUSH         },
1281 #endif
1282         /* Throw in some NFSv3 values for even more fun (HP returns these) */
1283         { 71,                   EREMOTE         },
1284
1285         { -1,                   EIO             }
1286 };
1287
1288 static char *nfs_strerror(int stat)
1289 {
1290         int i;
1291         static char buf[256];
1292
1293         for (i = 0; nfs_errtbl[i].stat != -1; i++) {
1294                 if (nfs_errtbl[i].stat == stat)
1295                         return strerror(nfs_errtbl[i].errnum);
1296         }
1297         sprintf(buf, _("unknown nfs status return value: %d"), stat);
1298         return buf;
1299 }