1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21
22 /*
23 * Copyright 2015 Nexenta Systems, Inc. All rights reserved.
24 * Copyright (c) 2006, 2010, Oracle and/or its affiliates. All rights reserved.
25 */
26
27 /*
28 * NFS specific functions
29 */
30 #include <stdio.h>
31 #include <string.h>
32 #include <ctype.h>
33 #include <stdlib.h>
34 #include <unistd.h>
35 #include <zone.h>
36 #include <errno.h>
37 #include <locale.h>
38 #include <signal.h>
39 #include <strings.h>
40 #include "libshare.h"
41 #include "libshare_impl.h"
42 #include <nfs/export.h>
43 #include <pwd.h>
44 #include <grp.h>
45 #include <limits.h>
46 #include <libscf.h>
47 #include <syslog.h>
48 #include <rpcsvc/daemon_utils.h>
49 #include "nfslog_config.h"
50 #include "nfslogtab.h"
51 #include "libshare_nfs.h"
52 #include <nfs/nfs.h>
53 #include <nfs/nfssys.h>
54 #include "smfcfg.h"
55
56 /* should really be in some global place */
57 #define DEF_WIN 30000
58 #define OPT_CHUNK 1024
59
60 int debug = 0;
61
62 #define NFS_SERVER_SVC "svc:/network/nfs/server:default"
63 #define NFS_CLIENT_SVC (char *)"svc:/network/nfs/client:default"
64
65 /* internal functions */
66 static int nfs_init();
67 static void nfs_fini();
68 static int nfs_enable_share(sa_share_t);
69 static int nfs_disable_share(sa_share_t, char *);
70 static int nfs_validate_property(sa_handle_t, sa_property_t, sa_optionset_t);
71 static int nfs_validate_security_mode(char *);
72 static int nfs_is_security_opt(char *);
73 static int nfs_parse_legacy_options(sa_group_t, char *);
74 static char *nfs_format_options(sa_group_t, int);
75 static int nfs_set_proto_prop(sa_property_t);
76 static sa_protocol_properties_t nfs_get_proto_set();
77 static char *nfs_get_status();
78 static char *nfs_space_alias(char *);
79 static uint64_t nfs_features();
80
81 /*
82 * ops vector that provides the protocol specific info and operations
83 * for share management.
84 */
85
86 struct sa_plugin_ops sa_plugin_ops = {
87 SA_PLUGIN_VERSION,
88 "nfs",
89 nfs_init,
90 nfs_fini,
91 nfs_enable_share,
92 nfs_disable_share,
93 nfs_validate_property,
94 nfs_validate_security_mode,
95 nfs_is_security_opt,
96 nfs_parse_legacy_options,
97 nfs_format_options,
98 nfs_set_proto_prop,
99 nfs_get_proto_set,
100 nfs_get_status,
101 nfs_space_alias,
102 NULL, /* update_legacy */
103 NULL, /* delete_legacy */
104 NULL, /* change_notify */
105 NULL, /* enable_resource */
106 NULL, /* disable_resource */
107 nfs_features,
108 NULL, /* transient shares */
109 NULL, /* notify resource */
110 NULL, /* rename_resource */
111 NULL, /* run_command */
112 NULL, /* command_help */
113 NULL /* delete_proto_section */
114 };
115
116 /*
117 * list of support services needed
118 * defines should come from head/rpcsvc/daemon_utils.h
119 */
120
121 static char *service_list_default[] =
122 { STATD, LOCKD, MOUNTD, NFSD, NFSMAPID, RQUOTAD, REPARSED, NULL };
123 static char *service_list_logging[] =
124 { STATD, LOCKD, MOUNTD, NFSD, NFSMAPID, RQUOTAD, NFSLOGD, REPARSED,
125 NULL };
126
127 /*
128 * option definitions. Make sure to keep the #define for the option
129 * index just before the entry it is the index for. Changing the order
130 * can cause breakage. E.g OPT_RW is index 1 and must precede the
131 * line that includes the SHOPT_RW and OPT_RW entries.
132 */
133
134 struct option_defs optdefs[] = {
135 #define OPT_RO 0
136 {SHOPT_RO, OPT_RO, OPT_TYPE_ACCLIST},
137 #define OPT_RW 1
138 {SHOPT_RW, OPT_RW, OPT_TYPE_ACCLIST},
139 #define OPT_ROOT 2
140 {SHOPT_ROOT, OPT_ROOT, OPT_TYPE_ACCLIST},
141 #define OPT_SECURE 3
142 {SHOPT_SECURE, OPT_SECURE, OPT_TYPE_DEPRECATED},
143 #define OPT_ANON 4
144 {SHOPT_ANON, OPT_ANON, OPT_TYPE_USER},
145 #define OPT_WINDOW 5
146 {SHOPT_WINDOW, OPT_WINDOW, OPT_TYPE_NUMBER},
147 #define OPT_NOSUID 6
148 {SHOPT_NOSUID, OPT_NOSUID, OPT_TYPE_BOOLEAN},
149 #define OPT_ACLOK 7
150 {SHOPT_ACLOK, OPT_ACLOK, OPT_TYPE_BOOLEAN},
151 #define OPT_NOSUB 8
152 {SHOPT_NOSUB, OPT_NOSUB, OPT_TYPE_BOOLEAN},
153 #define OPT_SEC 9
154 {SHOPT_SEC, OPT_SEC, OPT_TYPE_SECURITY},
155 #define OPT_PUBLIC 10
156 {SHOPT_PUBLIC, OPT_PUBLIC, OPT_TYPE_BOOLEAN, OPT_SHARE_ONLY},
157 #define OPT_INDEX 11
158 {SHOPT_INDEX, OPT_INDEX, OPT_TYPE_FILE},
159 #define OPT_LOG 12
160 {SHOPT_LOG, OPT_LOG, OPT_TYPE_LOGTAG},
161 #define OPT_CKSUM 13
162 {SHOPT_CKSUM, OPT_CKSUM, OPT_TYPE_STRINGSET},
163 #define OPT_NONE 14
164 {SHOPT_NONE, OPT_NONE, OPT_TYPE_ACCLIST},
165 #define OPT_ROOT_MAPPING 15
166 {SHOPT_ROOT_MAPPING, OPT_ROOT_MAPPING, OPT_TYPE_USER},
167 #define OPT_CHARSET_MAP 16
168 {"", OPT_CHARSET_MAP, OPT_TYPE_ACCLIST},
169 #define OPT_NOACLFAB 17
170 {SHOPT_NOACLFAB, OPT_NOACLFAB, OPT_TYPE_BOOLEAN},
171 #define OPT_UIDMAP 18
172 {SHOPT_UIDMAP, OPT_UIDMAP, OPT_TYPE_MAPPING},
173 #define OPT_GIDMAP 19
174 {SHOPT_GIDMAP, OPT_GIDMAP, OPT_TYPE_MAPPING},
175 #ifdef VOLATILE_FH_TEST /* XXX added for testing volatile fh's only */
176 #define OPT_VOLFH 20
177 {SHOPT_VOLFH, OPT_VOLFH},
178 #endif /* VOLATILE_FH_TEST */
179 NULL
180 };
181
182 /*
183 * Codesets that may need to be converted to UTF-8 for file paths.
184 * Add new names here to add new property support. If we ever get a
185 * way to query the kernel for character sets, this should become
186 * dynamically loaded. Make sure changes here are reflected in
187 * cmd/fs.d/nfs/mountd/nfscmd.c
188 */
189
190 static char *legal_conv[] = {
191 "euc-cn",
192 "euc-jp",
193 "euc-jpms",
194 "euc-kr",
195 "euc-tw",
196 "iso8859-1",
197 "iso8859-2",
198 "iso8859-5",
199 "iso8859-6",
200 "iso8859-7",
201 "iso8859-8",
202 "iso8859-9",
203 "iso8859-13",
204 "iso8859-15",
205 "koi8-r",
206 NULL
207 };
208
209 /*
210 * list of properties that are related to security flavors.
211 */
212 static char *seclist[] = {
213 SHOPT_RO,
214 SHOPT_RW,
215 SHOPT_ROOT,
216 SHOPT_WINDOW,
217 SHOPT_NONE,
218 SHOPT_ROOT_MAPPING,
219 SHOPT_UIDMAP,
220 SHOPT_GIDMAP,
221 NULL
222 };
223
224 /* structure for list of securities */
225 struct securities {
226 sa_security_t security;
227 struct securities *next;
228 };
229
230 /*
231 * findcharset(charset)
232 *
233 * Returns B_TRUE if the charset is a legal conversion otherwise
234 * B_FALSE. This will need to be rewritten to be more efficient when
235 * we have a dynamic list of legal conversions.
236 */
237
238 static boolean_t
findcharset(char * charset)239 findcharset(char *charset)
240 {
241 int i;
242
243 for (i = 0; legal_conv[i] != NULL; i++)
244 if (strcmp(charset, legal_conv[i]) == 0)
245 return (B_TRUE);
246 return (B_FALSE);
247 }
248
249 /*
250 * findopt(name)
251 *
252 * Lookup option "name" in the option table and return the table
253 * index.
254 */
255
256 static int
findopt(char * name)257 findopt(char *name)
258 {
259 int i;
260 if (name != NULL) {
261 for (i = 0; optdefs[i].tag != NULL; i++) {
262 if (strcmp(optdefs[i].tag, name) == 0)
263 return (optdefs[i].index);
264 }
265 if (findcharset(name))
266 return (OPT_CHARSET_MAP);
267 }
268 return (-1);
269 }
270
271 /*
272 * gettype(name)
273 *
274 * Return the type of option "name".
275 */
276
277 static int
gettype(char * name)278 gettype(char *name)
279 {
280 int optdef;
281
282 optdef = findopt(name);
283 if (optdef != -1)
284 return (optdefs[optdef].type);
285 return (OPT_TYPE_ANY);
286 }
287
288 /*
289 * nfs_validate_security_mode(mode)
290 *
291 * is the specified mode string a valid one for use with NFS?
292 */
293
294 static int
nfs_validate_security_mode(char * mode)295 nfs_validate_security_mode(char *mode)
296 {
297 seconfig_t secinfo;
298 int err;
299
300 (void) memset(&secinfo, '\0', sizeof (secinfo));
301 err = nfs_getseconfig_byname(mode, &secinfo);
302 if (err == SC_NOERROR)
303 return (1);
304 return (0);
305 }
306
307 /*
308 * nfs_is_security_opt(tok)
309 *
310 * check to see if tok represents an option that is only valid in some
311 * security flavor.
312 */
313
314 static int
nfs_is_security_opt(char * tok)315 nfs_is_security_opt(char *tok)
316 {
317 int i;
318
319 for (i = 0; seclist[i] != NULL; i++) {
320 if (strcmp(tok, seclist[i]) == 0)
321 return (1);
322 }
323 return (0);
324 }
325
326 /*
327 * find_security(seclist, sec)
328 *
329 * Walk the current list of security flavors and return true if it is
330 * present, else return false.
331 */
332
333 static int
find_security(struct securities * seclist,sa_security_t sec)334 find_security(struct securities *seclist, sa_security_t sec)
335 {
336 while (seclist != NULL) {
337 if (seclist->security == sec)
338 return (1);
339 seclist = seclist->next;
340 }
341 return (0);
342 }
343
344 /*
345 * make_security_list(group, securitymodes, proto)
346 * go through the list of securitymodes and add them to the
347 * group's list of security optionsets. We also keep a list of
348 * those optionsets so we don't have to find them later. All of
349 * these will get copies of the same properties.
350 */
351
352 static struct securities *
make_security_list(sa_group_t group,char * securitymodes,char * proto)353 make_security_list(sa_group_t group, char *securitymodes, char *proto)
354 {
355 char *tok, *next = NULL;
356 struct securities *curp, *headp = NULL, *prev;
357 sa_security_t check;
358 int freetok = 0;
359
360 for (tok = securitymodes; tok != NULL; tok = next) {
361 next = strchr(tok, ':');
362 if (next != NULL)
363 *next++ = '\0';
364 if (strcmp(tok, "default") == 0) {
365 /* resolve default into the real type */
366 tok = nfs_space_alias(tok);
367 freetok = 1;
368 }
369 check = sa_get_security(group, tok, proto);
370
371 /* add to the security list if it isn't there already */
372 if (check == NULL || !find_security(headp, check)) {
373 curp = (struct securities *)calloc(1,
374 sizeof (struct securities));
375 if (curp != NULL) {
376 if (check == NULL) {
377 curp->security = sa_create_security(
378 group, tok, proto);
379 } else {
380 curp->security = check;
381 }
382 /*
383 * note that the first time through the loop,
384 * headp will be NULL and prev will be
385 * undefined. Since headp is NULL, we set
386 * both it and prev to the curp (first
387 * structure to be allocated).
388 *
389 * later passes through the loop will have
390 * headp not being NULL and prev will be used
391 * to allocate at the end of the list.
392 */
393 if (headp == NULL) {
394 headp = curp;
395 prev = curp;
396 } else {
397 prev->next = curp;
398 prev = curp;
399 }
400 }
401 }
402
403 if (freetok) {
404 freetok = 0;
405 sa_free_attr_string(tok);
406 }
407 }
408 return (headp);
409 }
410
411 static void
free_security_list(struct securities * sec)412 free_security_list(struct securities *sec)
413 {
414 struct securities *next;
415 if (sec != NULL) {
416 for (next = sec->next; sec != NULL; sec = next) {
417 next = sec->next;
418 free(sec);
419 }
420 }
421 }
422
423 /*
424 * nfs_alistcat(str1, str2, sep)
425 *
426 * concatenate str1 and str2 into a new string using sep as a separate
427 * character. If memory allocation fails, return NULL;
428 */
429
430 static char *
nfs_alistcat(char * str1,char * str2,char sep)431 nfs_alistcat(char *str1, char *str2, char sep)
432 {
433 char *newstr;
434 size_t len;
435
436 len = strlen(str1) + strlen(str2) + 2;
437 newstr = (char *)malloc(len);
438 if (newstr != NULL)
439 (void) snprintf(newstr, len, "%s%c%s", str1, sep, str2);
440 return (newstr);
441 }
442
443 /*
444 * add_security_prop(sec, name, value, persist, iszfs)
445 *
446 * Add the property to the securities structure. This accumulates
447 * properties for as part of parsing legacy options.
448 */
449
450 static int
add_security_prop(struct securities * sec,char * name,char * value,int persist,int iszfs)451 add_security_prop(struct securities *sec, char *name, char *value,
452 int persist, int iszfs)
453 {
454 sa_property_t prop;
455 int ret = SA_OK;
456
457 for (; sec != NULL; sec = sec->next) {
458 if (value == NULL) {
459 if (strcmp(name, SHOPT_RW) == 0 ||
460 strcmp(name, SHOPT_RO) == 0)
461 value = "*";
462 else
463 value = "true";
464 }
465
466 /*
467 * Get the existing property, if it exists, so we can
468 * determine what to do with it. The ro/rw/root
469 * properties can be merged if multiple instances of
470 * these properies are given. For example, if "rw"
471 * exists with a value "host1" and a later token of
472 * rw="host2" is seen, the values are merged into a
473 * single rw="host1:host2".
474 */
475 prop = sa_get_property(sec->security, name);
476
477 if (prop != NULL) {
478 char *oldvalue;
479 char *newvalue;
480
481 /*
482 * The security options of ro/rw/root/uidmap/gidmap
483 * might appear multiple times. If they do, the values
484 * need to be merged. If it was previously empty, the
485 * new value alone is added.
486 */
487 oldvalue = sa_get_property_attr(prop, "value");
488 if (oldvalue != NULL) {
489 char sep = ':';
490
491 if (strcmp(name, SHOPT_UIDMAP) == 0 ||
492 strcmp(name, SHOPT_GIDMAP) == 0)
493 sep = '~';
494
495 /*
496 * The general case is to concatenate the new
497 * value onto the old value for multiple
498 * rw(ro/root/uidmap/gidmap) properties. For
499 * rw/ro/root a special case exists when either
500 * the old or new is the "all" case. In the
501 * special case, if both are "all", then it is
502 * "all", else if one is an access-list, that
503 * replaces the "all".
504 */
505 if (strcmp(oldvalue, "*") == 0) {
506 /* Replace old value with new value. */
507 newvalue = strdup(value);
508 } else if (strcmp(value, "*") == 0 ||
509 strcmp(oldvalue, value) == 0) {
510 /*
511 * Keep old value and ignore
512 * the new value.
513 */
514 newvalue = NULL;
515 } else {
516 /*
517 * Make a new list of old plus new
518 * access-list.
519 */
520 newvalue = nfs_alistcat(oldvalue,
521 value, sep);
522 }
523
524 if (newvalue != NULL) {
525 (void) sa_remove_property(prop);
526 prop = sa_create_property(name,
527 newvalue);
528 ret = sa_add_property(sec->security,
529 prop);
530 free(newvalue);
531 }
532
533 sa_free_attr_string(oldvalue);
534 }
535 } else {
536 prop = sa_create_property(name, value);
537 ret = sa_add_property(sec->security, prop);
538 }
539 if (ret == SA_OK && !iszfs) {
540 ret = sa_commit_properties(sec->security, !persist);
541 }
542 }
543 return (ret);
544 }
545
546 /*
547 * check to see if group/share is persistent.
548 */
549 static int
is_persistent(sa_group_t group)550 is_persistent(sa_group_t group)
551 {
552 char *type;
553 int persist = 1;
554
555 type = sa_get_group_attr(group, "type");
556 if (type != NULL && strcmp(type, "persist") != 0)
557 persist = 0;
558 if (type != NULL)
559 sa_free_attr_string(type);
560 return (persist);
561 }
562
563 /*
564 * invalid_security(options)
565 *
566 * search option string for any invalid sec= type.
567 * return true (1) if any are not valid else false (0)
568 */
569 static int
invalid_security(char * options)570 invalid_security(char *options)
571 {
572 char *copy, *base, *token, *value;
573 int ret = 0;
574
575 copy = strdup(options);
576 token = base = copy;
577 while (token != NULL && ret == 0) {
578 token = strtok(base, ",");
579 base = NULL;
580 if (token != NULL) {
581 value = strchr(token, '=');
582 if (value != NULL)
583 *value++ = '\0';
584 if (strcmp(token, SHOPT_SEC) == 0) {
585 /* HAVE security flavors so check them */
586 char *tok, *next;
587 for (next = NULL, tok = value; tok != NULL;
588 tok = next) {
589 next = strchr(tok, ':');
590 if (next != NULL)
591 *next++ = '\0';
592 ret = !nfs_validate_security_mode(tok);
593 if (ret)
594 break;
595 }
596 }
597 }
598 }
599 if (copy != NULL)
600 free(copy);
601 return (ret);
602 }
603
604 /*
605 * nfs_parse_legacy_options(group, options)
606 *
607 * Parse the old style options into internal format and store on the
608 * specified group. Group could be a share for full legacy support.
609 */
610
611 static int
nfs_parse_legacy_options(sa_group_t group,char * options)612 nfs_parse_legacy_options(sa_group_t group, char *options)
613 {
614 char *dup;
615 char *base;
616 char *token;
617 sa_optionset_t optionset;
618 struct securities *security_list = NULL;
619 sa_property_t prop;
620 int ret = SA_OK;
621 int iszfs = 0;
622 sa_group_t parent;
623 int persist = 0;
624 char *lasts;
625
626 /* do we have an existing optionset? */
627 optionset = sa_get_optionset(group, "nfs");
628 if (optionset == NULL) {
629 /* didn't find existing optionset so create one */
630 optionset = sa_create_optionset(group, "nfs");
631 } else {
632 /*
633 * Have an existing optionset . Ideally, we would need
634 * to compare options in order to detect errors. For
635 * now, we assume that the first optionset is the
636 * correct one and the others will be the same. An
637 * empty optionset is the same as no optionset so we
638 * don't want to exit in that case. Getting an empty
639 * optionset can occur with ZFS property checking.
640 */
641 if (sa_get_property(optionset, NULL) != NULL)
642 return (ret);
643 }
644
645 if (strcmp(options, SHOPT_RW) == 0) {
646 /*
647 * there is a special case of only the option "rw"
648 * being the default option. We don't have to do
649 * anything.
650 */
651 return (ret);
652 }
653
654 /*
655 * check if security types are present and validate them. If
656 * any are not legal, fail.
657 */
658
659 if (invalid_security(options)) {
660 return (SA_INVALID_SECURITY);
661 }
662
663 /*
664 * in order to not attempt to change ZFS properties unless
665 * absolutely necessary, we never do it in the legacy parsing.
666 */
667 if (sa_is_share(group)) {
668 char *zfs;
669 parent = sa_get_parent_group(group);
670 if (parent != NULL) {
671 zfs = sa_get_group_attr(parent, "zfs");
672 if (zfs != NULL) {
673 sa_free_attr_string(zfs);
674 iszfs++;
675 }
676 }
677 } else {
678 iszfs = sa_group_is_zfs(group);
679 }
680
681 /* We need a copy of options for the next part. */
682 dup = strdup(options);
683 if (dup == NULL)
684 return (SA_NO_MEMORY);
685
686 /*
687 * we need to step through each option in the string and then
688 * add either the option or the security option as needed. If
689 * this is not a persistent share, don't commit to the
690 * repository. If there is an error, we also want to abort the
691 * processing and report it.
692 */
693 persist = is_persistent(group);
694 base = dup;
695 token = dup;
696 lasts = NULL;
697 while (token != NULL && ret == SA_OK) {
698 token = strtok_r(base, ",", &lasts);
699 base = NULL;
700 if (token != NULL) {
701 char *value;
702 /*
703 * if the option has a value, it will have an '=' to
704 * separate the name from the value. The following
705 * code will result in value != NULL and token
706 * pointing to just the name if there is a value.
707 */
708 value = strchr(token, '=');
709 if (value != NULL) {
710 *value++ = '\0';
711 }
712 if (strcmp(token, SHOPT_SEC) == 0 ||
713 strcmp(token, SHOPT_SECURE) == 0) {
714 /*
715 * Once in security parsing, we only
716 * do security. We do need to move
717 * between the security node and the
718 * toplevel. The security tag goes on
719 * the root while the following ones
720 * go on the security.
721 */
722 if (security_list != NULL) {
723 /*
724 * have an old list so close it and
725 * start the new
726 */
727 free_security_list(security_list);
728 }
729 if (strcmp(token, SHOPT_SECURE) == 0) {
730 value = "dh";
731 } else {
732 if (value == NULL) {
733 ret = SA_SYNTAX_ERR;
734 break;
735 }
736 }
737 security_list = make_security_list(group,
738 value, "nfs");
739 } else {
740 /*
741 * Note that the "old" syntax allowed a
742 * default security model. This must be
743 * accounted for and internally converted to
744 * "standard" security structure.
745 */
746 if (nfs_is_security_opt(token)) {
747 if (security_list == NULL) {
748 /*
749 * need to have a
750 * security
751 * option. This will
752 * be "closed" when a
753 * defined "sec="
754 * option is
755 * seen. This is
756 * technically an
757 * error but will be
758 * allowed with
759 * warning.
760 */
761 security_list =
762 make_security_list(group,
763 "default",
764 "nfs");
765 }
766 if (security_list != NULL) {
767 ret = add_security_prop(
768 security_list, token,
769 value, persist, iszfs);
770 } else {
771 ret = SA_NO_MEMORY;
772 }
773 } else {
774 /* regular options */
775 if (value == NULL) {
776 if (strcmp(token, SHOPT_RW) ==
777 0 || strcmp(token,
778 SHOPT_RO) == 0) {
779 value = "*";
780 } else {
781 value = "global";
782 if (strcmp(token,
783 SHOPT_LOG) != 0) {
784 value = "true";
785 }
786 }
787 }
788 /*
789 * In all cases, create the
790 * property specified. If the
791 * value was NULL, the default
792 * value will have been
793 * substituted.
794 */
795 prop = sa_create_property(token, value);
796 ret = sa_add_property(optionset, prop);
797 if (ret != SA_OK)
798 break;
799
800 if (!iszfs) {
801 ret = sa_commit_properties(
802 optionset, !persist);
803 }
804 }
805 }
806 }
807 }
808 if (security_list != NULL)
809 free_security_list(security_list);
810
811 free(dup);
812 return (ret);
813 }
814
815 /*
816 * is_a_number(number)
817 *
818 * is the string a number in one of the forms we want to use?
819 */
820
821 static int
is_a_number(char * number)822 is_a_number(char *number)
823 {
824 int ret = 1;
825 int hex = 0;
826
827 if (strncmp(number, "0x", 2) == 0) {
828 number += 2;
829 hex = 1;
830 } else if (*number == '-') {
831 number++; /* skip the minus */
832 }
833 while (ret == 1 && *number != '\0') {
834 if (hex) {
835 ret = isxdigit(*number++);
836 } else {
837 ret = isdigit(*number++);
838 }
839 }
840 return (ret);
841 }
842
843 /*
844 * Look for the specified tag in the configuration file. If it is found,
845 * enable logging and set the logging configuration information for exp.
846 */
847 static void
configlog(struct exportdata * exp,char * tag)848 configlog(struct exportdata *exp, char *tag)
849 {
850 nfsl_config_t *configlist = NULL, *configp;
851 int error = 0;
852 char globaltag[] = DEFAULTTAG;
853
854 /*
855 * Sends config errors to stderr
856 */
857 nfsl_errs_to_syslog = B_FALSE;
858
859 /*
860 * get the list of configuration settings
861 */
862 error = nfsl_getconfig_list(&configlist);
863 if (error) {
864 (void) fprintf(stderr,
865 dgettext(TEXT_DOMAIN, "Cannot get log configuration: %s\n"),
866 strerror(error));
867 }
868
869 if (tag == NULL)
870 tag = globaltag;
871 if ((configp = nfsl_findconfig(configlist, tag, &error)) == NULL) {
872 nfsl_freeconfig_list(&configlist);
873 (void) fprintf(stderr,
874 dgettext(TEXT_DOMAIN, "No tags matching \"%s\"\n"), tag);
875 /* bad configuration */
876 error = ENOENT;
877 goto err;
878 }
879
880 if ((exp->ex_tag = strdup(tag)) == NULL) {
881 error = ENOMEM;
882 goto out;
883 }
884 if ((exp->ex_log_buffer = strdup(configp->nc_bufferpath)) == NULL) {
885 error = ENOMEM;
886 goto out;
887 }
888 exp->ex_flags |= EX_LOG;
889 if (configp->nc_rpclogpath != NULL)
890 exp->ex_flags |= EX_LOG_ALLOPS;
891 out:
892 if (configlist != NULL)
893 nfsl_freeconfig_list(&configlist);
894
895 err:
896 if (error != 0) {
897 free(exp->ex_tag);
898 free(exp->ex_log_buffer);
899 (void) fprintf(stderr,
900 dgettext(TEXT_DOMAIN, "Cannot set log configuration: %s\n"),
901 strerror(error));
902 }
903 }
904
905 /*
906 * fill_export_from_optionset(export, optionset)
907 *
908 * In order to share, we need to set all the possible general options
909 * into the export structure. Share info will be filled in by the
910 * caller. Various property values get turned into structure specific
911 * values.
912 */
913
914 static int
fill_export_from_optionset(struct exportdata * export,sa_optionset_t optionset)915 fill_export_from_optionset(struct exportdata *export, sa_optionset_t optionset)
916 {
917 sa_property_t option;
918 int ret = SA_OK;
919
920 for (option = sa_get_property(optionset, NULL);
921 option != NULL; option = sa_get_next_property(option)) {
922 char *name;
923 char *value;
924 uint32_t val;
925
926 /*
927 * since options may be set/reset multiple times, always do an
928 * explicit set or clear of the option. This allows defaults
929 * to be set and then the protocol specific to override.
930 */
931
932 name = sa_get_property_attr(option, "type");
933 value = sa_get_property_attr(option, "value");
934 switch (findopt(name)) {
935 case OPT_ANON:
936 if (value != NULL && is_a_number(value)) {
937 val = strtoul(value, NULL, 0);
938 } else {
939 struct passwd *pw;
940 pw = getpwnam(value != NULL ? value : "nobody");
941 if (pw != NULL) {
942 val = pw->pw_uid;
943 } else {
944 val = UID_NOBODY;
945 }
946 endpwent();
947 }
948 export->ex_anon = val;
949 break;
950 case OPT_NOSUID:
951 if (value != NULL && (strcasecmp(value, "true") == 0 ||
952 strcmp(value, "1") == 0))
953 export->ex_flags |= EX_NOSUID;
954 else
955 export->ex_flags &= ~EX_NOSUID;
956 break;
957 case OPT_ACLOK:
958 if (value != NULL && (strcasecmp(value, "true") == 0 ||
959 strcmp(value, "1") == 0))
960 export->ex_flags |= EX_ACLOK;
961 else
962 export->ex_flags &= ~EX_ACLOK;
963 break;
964 case OPT_NOSUB:
965 if (value != NULL && (strcasecmp(value, "true") == 0 ||
966 strcmp(value, "1") == 0))
967 export->ex_flags |= EX_NOSUB;
968 else
969 export->ex_flags &= ~EX_NOSUB;
970 break;
971 case OPT_PUBLIC:
972 if (value != NULL && (strcasecmp(value, "true") == 0 ||
973 strcmp(value, "1") == 0))
974 export->ex_flags |= EX_PUBLIC;
975 else
976 export->ex_flags &= ~EX_PUBLIC;
977 break;
978 case OPT_INDEX:
979 if (value != NULL && (strcmp(value, "..") == 0 ||
980 strchr(value, '/') != NULL)) {
981 /* this is an error */
982 (void) printf(dgettext(TEXT_DOMAIN,
983 "NFS: index=\"%s\" not valid;"
984 "must be a filename.\n"),
985 value);
986 break;
987 }
988 if (value != NULL && *value != '\0' &&
989 strcmp(value, ".") != 0) {
990 /* valid index file string */
991 if (export->ex_index != NULL) {
992 /* left over from "default" */
993 free(export->ex_index);
994 }
995 /* remember to free */
996 export->ex_index = strdup(value);
997 if (export->ex_index == NULL) {
998 (void) printf(dgettext(TEXT_DOMAIN,
999 "NFS: out of memory setting "
1000 "index property\n"));
1001 break;
1002 }
1003 export->ex_flags |= EX_INDEX;
1004 }
1005 break;
1006 case OPT_LOG:
1007 if (value == NULL)
1008 value = strdup("global");
1009 if (value != NULL)
1010 configlog(export,
1011 strlen(value) ? value : "global");
1012 break;
1013 case OPT_CHARSET_MAP:
1014 /*
1015 * Set EX_CHARMAP when there is at least one
1016 * charmap conversion property. This will get
1017 * checked by the nfs server when it needs to.
1018 */
1019 export->ex_flags |= EX_CHARMAP;
1020 break;
1021 case OPT_NOACLFAB:
1022 if (value != NULL && (strcasecmp(value, "true") == 0 ||
1023 strcmp(value, "1") == 0))
1024 export->ex_flags |= EX_NOACLFAB;
1025 else
1026 export->ex_flags &= ~EX_NOACLFAB;
1027 break;
1028 default:
1029 /* have a syntactic error */
1030 (void) printf(dgettext(TEXT_DOMAIN,
1031 "NFS: unrecognized option %s=%s\n"),
1032 name != NULL ? name : "",
1033 value != NULL ? value : "");
1034 break;
1035 }
1036 if (name != NULL)
1037 sa_free_attr_string(name);
1038 if (value != NULL)
1039 sa_free_attr_string(value);
1040 }
1041 return (ret);
1042 }
1043
1044 /*
1045 * cleanup_export(export)
1046 *
1047 * Cleanup the allocated areas so we don't leak memory
1048 */
1049
1050 static void
cleanup_export(struct exportdata * export)1051 cleanup_export(struct exportdata *export)
1052 {
1053 int i;
1054
1055 free(export->ex_index);
1056
1057 for (i = 0; i < export->ex_seccnt; i++) {
1058 struct secinfo *s = &export->ex_secinfo[i];
1059
1060 while (s->s_rootcnt > 0)
1061 free(s->s_rootnames[--s->s_rootcnt]);
1062
1063 free(s->s_rootnames);
1064 }
1065 free(export->ex_secinfo);
1066 }
1067
1068 /*
1069 * Given a seconfig entry and a colon-separated
1070 * list of names, allocate an array big enough
1071 * to hold the root list, then convert each name to
1072 * a principal name according to the security
1073 * info and assign it to an array element.
1074 * Return the array and its size.
1075 */
1076 static caddr_t *
get_rootnames(seconfig_t * sec,char * list,int * count)1077 get_rootnames(seconfig_t *sec, char *list, int *count)
1078 {
1079 caddr_t *a;
1080 int c, i;
1081 char *host, *p;
1082
1083 /*
1084 * Count the number of strings in the list.
1085 * This is the number of colon separators + 1.
1086 */
1087 c = 1;
1088 for (p = list; *p; p++)
1089 if (*p == ':')
1090 c++;
1091 *count = c;
1092
1093 a = (caddr_t *)malloc(c * sizeof (char *));
1094 if (a == NULL) {
1095 (void) printf(dgettext(TEXT_DOMAIN,
1096 "get_rootnames: no memory\n"));
1097 *count = 0;
1098 } else {
1099 for (i = 0; i < c; i++) {
1100 host = strtok(list, ":");
1101 if (!nfs_get_root_principal(sec, host, &a[i])) {
1102 while (i > 0)
1103 free(a[--i]);
1104 free(a);
1105 a = NULL;
1106 *count = 0;
1107 break;
1108 }
1109 list = NULL;
1110 }
1111 }
1112
1113 return (a);
1114 }
1115
1116 /*
1117 * fill_security_from_secopts(sp, secopts)
1118 *
1119 * Fill the secinfo structure from the secopts optionset.
1120 */
1121
1122 static int
fill_security_from_secopts(struct secinfo * sp,sa_security_t secopts)1123 fill_security_from_secopts(struct secinfo *sp, sa_security_t secopts)
1124 {
1125 sa_property_t prop;
1126 char *type;
1127 int longform;
1128 int err = SC_NOERROR;
1129 uint32_t val;
1130
1131 type = sa_get_security_attr(secopts, "sectype");
1132 if (type != NULL) {
1133 /* named security type needs secinfo to be filled in */
1134 err = nfs_getseconfig_byname(type, &sp->s_secinfo);
1135 sa_free_attr_string(type);
1136 if (err != SC_NOERROR)
1137 return (err);
1138 } else {
1139 /* default case */
1140 err = nfs_getseconfig_default(&sp->s_secinfo);
1141 if (err != SC_NOERROR)
1142 return (err);
1143 }
1144
1145 err = SA_OK;
1146 for (prop = sa_get_property(secopts, NULL);
1147 prop != NULL && err == SA_OK;
1148 prop = sa_get_next_property(prop)) {
1149 char *name;
1150 char *value;
1151
1152 name = sa_get_property_attr(prop, "type");
1153 value = sa_get_property_attr(prop, "value");
1154
1155 longform = value != NULL && strcmp(value, "*") != 0;
1156
1157 switch (findopt(name)) {
1158 case OPT_RO:
1159 sp->s_flags |= longform ? M_ROL : M_RO;
1160 break;
1161 case OPT_RW:
1162 sp->s_flags |= longform ? M_RWL : M_RW;
1163 break;
1164 case OPT_ROOT:
1165 sp->s_flags |= M_ROOT;
1166 /*
1167 * if we are using AUTH_UNIX, handle like other things
1168 * such as RO/RW
1169 */
1170 if (sp->s_secinfo.sc_rpcnum == AUTH_UNIX)
1171 break;
1172 /* not AUTH_UNIX */
1173 if (value != NULL) {
1174 sp->s_rootnames = get_rootnames(&sp->s_secinfo,
1175 value, &sp->s_rootcnt);
1176 if (sp->s_rootnames == NULL) {
1177 err = SA_BAD_VALUE;
1178 (void) fprintf(stderr,
1179 dgettext(TEXT_DOMAIN,
1180 "Bad root list\n"));
1181 }
1182 }
1183 break;
1184 case OPT_NONE:
1185 sp->s_flags |= M_NONE;
1186 break;
1187 case OPT_WINDOW:
1188 if (value != NULL) {
1189 sp->s_window = atoi(value);
1190 /* just in case */
1191 if (sp->s_window < 0)
1192 sp->s_window = DEF_WIN;
1193 }
1194 break;
1195 case OPT_ROOT_MAPPING:
1196 if (value != NULL && is_a_number(value)) {
1197 val = strtoul(value, NULL, 0);
1198 } else {
1199 struct passwd *pw;
1200 pw = getpwnam(value != NULL ? value : "nobody");
1201 if (pw != NULL) {
1202 val = pw->pw_uid;
1203 } else {
1204 val = UID_NOBODY;
1205 }
1206 endpwent();
1207 }
1208 sp->s_rootid = val;
1209 break;
1210 case OPT_UIDMAP:
1211 case OPT_GIDMAP:
1212 sp->s_flags |= M_MAP;
1213 break;
1214 default:
1215 break;
1216 }
1217 if (name != NULL)
1218 sa_free_attr_string(name);
1219 if (value != NULL)
1220 sa_free_attr_string(value);
1221 }
1222 /* if rw/ro options not set, use default of RW */
1223 if ((sp->s_flags & NFS_RWMODES) == 0)
1224 sp->s_flags |= M_RW;
1225 return (err);
1226 }
1227
1228 /*
1229 * This is for testing only
1230 * It displays the export structure that
1231 * goes into the kernel.
1232 */
1233 static void
printarg(char * path,struct exportdata * ep)1234 printarg(char *path, struct exportdata *ep)
1235 {
1236 int i, j;
1237 struct secinfo *sp;
1238
1239 if (debug == 0)
1240 return;
1241
1242 (void) printf("%s:\n", path);
1243 (void) printf("\tex_version = %d\n", ep->ex_version);
1244 (void) printf("\tex_path = %s\n", ep->ex_path);
1245 (void) printf("\tex_pathlen = %ld\n", (ulong_t)ep->ex_pathlen);
1246 (void) printf("\tex_flags: (0x%02x) ", ep->ex_flags);
1247 if (ep->ex_flags & EX_NOSUID)
1248 (void) printf("NOSUID ");
1249 if (ep->ex_flags & EX_ACLOK)
1250 (void) printf("ACLOK ");
1251 if (ep->ex_flags & EX_PUBLIC)
1252 (void) printf("PUBLIC ");
1253 if (ep->ex_flags & EX_NOSUB)
1254 (void) printf("NOSUB ");
1255 if (ep->ex_flags & EX_LOG)
1256 (void) printf("LOG ");
1257 if (ep->ex_flags & EX_CHARMAP)
1258 (void) printf("CHARMAP ");
1259 if (ep->ex_flags & EX_LOG_ALLOPS)
1260 (void) printf("LOG_ALLOPS ");
1261 if (ep->ex_flags == 0)
1262 (void) printf("(none)");
1263 (void) printf("\n");
1264 if (ep->ex_flags & EX_LOG) {
1265 (void) printf("\tex_log_buffer = %s\n",
1266 (ep->ex_log_buffer ? ep->ex_log_buffer : "(NULL)"));
1267 (void) printf("\tex_tag = %s\n",
1268 (ep->ex_tag ? ep->ex_tag : "(NULL)"));
1269 }
1270 (void) printf("\tex_anon = %d\n", ep->ex_anon);
1271 (void) printf("\tex_seccnt = %d\n", ep->ex_seccnt);
1272 (void) printf("\n");
1273 for (i = 0; i < ep->ex_seccnt; i++) {
1274 sp = &ep->ex_secinfo[i];
1275 (void) printf("\t\ts_secinfo = %s\n", sp->s_secinfo.sc_name);
1276 (void) printf("\t\ts_flags: (0x%02x) ", sp->s_flags);
1277 if (sp->s_flags & M_ROOT) (void) printf("M_ROOT ");
1278 if (sp->s_flags & M_RO) (void) printf("M_RO ");
1279 if (sp->s_flags & M_ROL) (void) printf("M_ROL ");
1280 if (sp->s_flags & M_RW) (void) printf("M_RW ");
1281 if (sp->s_flags & M_RWL) (void) printf("M_RWL ");
1282 if (sp->s_flags & M_NONE) (void) printf("M_NONE ");
1283 if (sp->s_flags & M_MAP) (void) printf("M_MAP ");
1284 if (sp->s_flags == 0) (void) printf("(none)");
1285 (void) printf("\n");
1286 (void) printf("\t\ts_window = %d\n", sp->s_window);
1287 (void) printf("\t\ts_rootid = %d\n", sp->s_rootid);
1288 (void) printf("\t\ts_rootcnt = %d ", sp->s_rootcnt);
1289 (void) fflush(stdout);
1290 for (j = 0; j < sp->s_rootcnt; j++)
1291 (void) printf("%s ", sp->s_rootnames[j] ?
1292 sp->s_rootnames[j] : "<null>");
1293 (void) printf("\n\n");
1294 }
1295 }
1296
1297 /*
1298 * count_security(opts)
1299 *
1300 * Count the number of security types (flavors). The optionset has
1301 * been populated with the security flavors as a holding mechanism.
1302 * We later use this number to allocate data structures.
1303 */
1304
1305 static int
count_security(sa_optionset_t opts)1306 count_security(sa_optionset_t opts)
1307 {
1308 int count = 0;
1309 sa_property_t prop;
1310 if (opts != NULL) {
1311 for (prop = sa_get_property(opts, NULL); prop != NULL;
1312 prop = sa_get_next_property(prop)) {
1313 count++;
1314 }
1315 }
1316 return (count);
1317 }
1318
1319 /*
1320 * nfs_sprint_option(rbuff, rbuffsize, incr, prop, sep)
1321 *
1322 * provides a mechanism to format NFS properties into legacy output
1323 * format. If the buffer would overflow, it is reallocated and grown
1324 * as appropriate. Special cases of converting internal form of values
1325 * to those used by "share" are done. this function does one property
1326 * at a time.
1327 */
1328
1329 static int
nfs_sprint_option(char ** rbuff,size_t * rbuffsize,size_t incr,sa_property_t prop,int sep)1330 nfs_sprint_option(char **rbuff, size_t *rbuffsize, size_t incr,
1331 sa_property_t prop, int sep)
1332 {
1333 char *name;
1334 char *value;
1335 int curlen;
1336 char *buff = *rbuff;
1337 size_t buffsize = *rbuffsize;
1338 int printed = B_FALSE;
1339
1340 name = sa_get_property_attr(prop, "type");
1341 value = sa_get_property_attr(prop, "value");
1342 if (buff != NULL)
1343 curlen = strlen(buff);
1344 else
1345 curlen = 0;
1346 if (name != NULL) {
1347 int len;
1348 len = strlen(name) + sep;
1349
1350 /*
1351 * A future RFE would be to replace this with more
1352 * generic code and to possibly handle more types.
1353 */
1354 switch (gettype(name)) {
1355 case OPT_TYPE_BOOLEAN:
1356 /*
1357 * For NFS, boolean value of FALSE means it
1358 * doesn't show up in the option list at all.
1359 */
1360 if (value != NULL && strcasecmp(value, "false") == 0)
1361 goto skip;
1362 if (value != NULL) {
1363 sa_free_attr_string(value);
1364 value = NULL;
1365 }
1366 break;
1367 case OPT_TYPE_ACCLIST:
1368 if (value != NULL && strcmp(value, "*") == 0) {
1369 sa_free_attr_string(value);
1370 value = NULL;
1371 } else {
1372 if (value != NULL)
1373 len += 1 + strlen(value);
1374 }
1375 break;
1376 case OPT_TYPE_LOGTAG:
1377 if (value != NULL && strlen(value) == 0) {
1378 sa_free_attr_string(value);
1379 value = NULL;
1380 } else {
1381 if (value != NULL)
1382 len += 1 + strlen(value);
1383 }
1384 break;
1385 default:
1386 if (value != NULL)
1387 len += 1 + strlen(value);
1388 break;
1389 }
1390 while (buffsize <= (curlen + len)) {
1391 /* need more room */
1392 buffsize += incr;
1393 buff = realloc(buff, buffsize);
1394 if (buff == NULL) {
1395 /* realloc failed so free everything */
1396 if (*rbuff != NULL)
1397 free(*rbuff);
1398 }
1399 *rbuff = buff;
1400 *rbuffsize = buffsize;
1401 if (buff == NULL)
1402 goto skip;
1403
1404 }
1405
1406 if (buff == NULL)
1407 goto skip;
1408
1409 if (value == NULL) {
1410 (void) snprintf(buff + curlen, buffsize - curlen,
1411 "%s%s", sep ? "," : "", name);
1412 } else {
1413 (void) snprintf(buff + curlen, buffsize - curlen,
1414 "%s%s=%s", sep ? "," : "",
1415 name, value != NULL ? value : "");
1416 }
1417 printed = B_TRUE;
1418 }
1419 skip:
1420 if (name != NULL)
1421 sa_free_attr_string(name);
1422 if (value != NULL)
1423 sa_free_attr_string(value);
1424 return (printed);
1425 }
1426
1427 /*
1428 * nfs_format_options(group, hier)
1429 *
1430 * format all the options on the group into an old-style option
1431 * string. If hier is non-zero, walk up the tree to get inherited
1432 * options.
1433 */
1434
1435 static char *
nfs_format_options(sa_group_t group,int hier)1436 nfs_format_options(sa_group_t group, int hier)
1437 {
1438 sa_optionset_t options = NULL;
1439 sa_optionset_t secoptions = NULL;
1440 sa_property_t prop, secprop;
1441 sa_security_t security = NULL;
1442 char *buff;
1443 size_t buffsize;
1444 char *sectype = NULL;
1445 int sep = 0;
1446
1447
1448 buff = malloc(OPT_CHUNK);
1449 if (buff == NULL) {
1450 return (NULL);
1451 }
1452
1453 buff[0] = '\0';
1454 buffsize = OPT_CHUNK;
1455
1456 /*
1457 * We may have a an optionset relative to this item. format
1458 * these if we find them and then add any security definitions.
1459 */
1460
1461 options = sa_get_derived_optionset(group, "nfs", hier);
1462
1463 /*
1464 * do the default set first but skip any option that is also
1465 * in the protocol specific optionset.
1466 */
1467 if (options != NULL) {
1468 for (prop = sa_get_property(options, NULL);
1469 prop != NULL; prop = sa_get_next_property(prop)) {
1470 /*
1471 * use this one since we skipped any
1472 * of these that were also in
1473 * optdefault
1474 */
1475 if (nfs_sprint_option(&buff, &buffsize, OPT_CHUNK,
1476 prop, sep))
1477 sep = 1;
1478 if (buff == NULL) {
1479 /*
1480 * buff could become NULL if there
1481 * isn't enough memory for
1482 * nfs_sprint_option to realloc()
1483 * as necessary. We can't really
1484 * do anything about it at this
1485 * point so we return NULL. The
1486 * caller should handle the
1487 * failure.
1488 */
1489 if (options != NULL)
1490 sa_free_derived_optionset(
1491 options);
1492 return (buff);
1493 }
1494 }
1495 }
1496 secoptions = (sa_optionset_t)sa_get_all_security_types(group,
1497 "nfs", hier);
1498 if (secoptions != NULL) {
1499 for (secprop = sa_get_property(secoptions, NULL);
1500 secprop != NULL;
1501 secprop = sa_get_next_property(secprop)) {
1502 sectype = sa_get_property_attr(secprop, "type");
1503 security =
1504 (sa_security_t)sa_get_derived_security(
1505 group, sectype, "nfs", hier);
1506 if (security != NULL) {
1507 if (sectype != NULL) {
1508 prop = sa_create_property(
1509 "sec", sectype);
1510 if (prop == NULL)
1511 goto err;
1512 if (nfs_sprint_option(&buff,
1513 &buffsize, OPT_CHUNK, prop, sep))
1514 sep = 1;
1515 (void) sa_remove_property(prop);
1516 if (buff == NULL)
1517 goto err;
1518 }
1519 for (prop = sa_get_property(security,
1520 NULL); prop != NULL;
1521 prop = sa_get_next_property(prop)) {
1522 if (nfs_sprint_option(&buff,
1523 &buffsize, OPT_CHUNK, prop, sep))
1524 sep = 1;
1525 if (buff == NULL)
1526 goto err;
1527 }
1528 sa_free_derived_optionset(security);
1529 }
1530 if (sectype != NULL)
1531 sa_free_attr_string(sectype);
1532 }
1533 sa_free_derived_optionset(secoptions);
1534 }
1535
1536 if (options != NULL)
1537 sa_free_derived_optionset(options);
1538 return (buff);
1539
1540 err:
1541 /*
1542 * If we couldn't allocate memory for option printing, we need
1543 * to break out of the nested loops, cleanup and return NULL.
1544 */
1545 if (secoptions != NULL)
1546 sa_free_derived_optionset(secoptions);
1547 if (security != NULL)
1548 sa_free_derived_optionset(security);
1549 if (sectype != NULL)
1550 sa_free_attr_string(sectype);
1551 if (options != NULL)
1552 sa_free_derived_optionset(options);
1553 return (buff);
1554 }
1555
1556 /*
1557 * Append an entry to the nfslogtab file
1558 */
1559 static int
nfslogtab_add(dir,buffer,tag)1560 nfslogtab_add(dir, buffer, tag)
1561 char *dir, *buffer, *tag;
1562 {
1563 FILE *f;
1564 struct logtab_ent lep;
1565 int error = 0;
1566
1567 /*
1568 * Open the file for update and create it if necessary.
1569 * This may leave the I/O offset at the end of the file,
1570 * so rewind back to the beginning of the file.
1571 */
1572 f = fopen(NFSLOGTAB, "a+");
1573 if (f == NULL) {
1574 error = errno;
1575 goto out;
1576 }
1577 rewind(f);
1578
1579 if (lockf(fileno(f), F_LOCK, 0L) < 0) {
1580 (void) fprintf(stderr, dgettext(TEXT_DOMAIN,
1581 "share complete, however failed to lock %s "
1582 "for update: %s\n"), NFSLOGTAB, strerror(errno));
1583 error = -1;
1584 goto out;
1585 }
1586
1587 if (logtab_deactivate_after_boot(f) == -1) {
1588 (void) fprintf(stderr, dgettext(TEXT_DOMAIN,
1589 "share complete, however could not deactivate "
1590 "entries in %s\n"), NFSLOGTAB);
1591 error = -1;
1592 goto out;
1593 }
1594
1595 /*
1596 * Remove entries matching buffer and sharepoint since we're
1597 * going to replace it with perhaps an entry with a new tag.
1598 */
1599 if (logtab_rement(f, buffer, dir, NULL, -1)) {
1600 (void) fprintf(stderr, dgettext(TEXT_DOMAIN,
1601 "share complete, however could not remove matching "
1602 "entries in %s\n"), NFSLOGTAB);
1603 error = -1;
1604 goto out;
1605 }
1606
1607 /*
1608 * Deactivate all active entries matching this sharepoint
1609 */
1610 if (logtab_deactivate(f, NULL, dir, NULL)) {
1611 (void) fprintf(stderr, dgettext(TEXT_DOMAIN,
1612 "share complete, however could not deactivate matching "
1613 "entries in %s\n"), NFSLOGTAB);
1614 error = -1;
1615 goto out;
1616 }
1617
1618 lep.le_buffer = buffer;
1619 lep.le_path = dir;
1620 lep.le_tag = tag;
1621 lep.le_state = LES_ACTIVE;
1622
1623 /*
1624 * Add new sharepoint / buffer location to nfslogtab
1625 */
1626 if (logtab_putent(f, &lep) < 0) {
1627 (void) fprintf(stderr, dgettext(TEXT_DOMAIN,
1628 "share complete, however could not add %s to %s\n"),
1629 dir, NFSLOGTAB);
1630 error = -1;
1631 }
1632
1633 out:
1634 if (f != NULL)
1635 (void) fclose(f);
1636 return (error);
1637 }
1638
1639 /*
1640 * Deactivate an entry from the nfslogtab file
1641 */
1642 static int
nfslogtab_deactivate(path)1643 nfslogtab_deactivate(path)
1644 char *path;
1645 {
1646 FILE *f;
1647 int error = 0;
1648
1649 f = fopen(NFSLOGTAB, "r+");
1650 if (f == NULL) {
1651 error = errno;
1652 goto out;
1653 }
1654 if (lockf(fileno(f), F_LOCK, 0L) < 0) {
1655 error = errno;
1656 (void) fprintf(stderr, dgettext(TEXT_DOMAIN,
1657 "share complete, however could not lock %s for "
1658 "update: %s\n"), NFSLOGTAB, strerror(error));
1659 goto out;
1660 }
1661 if (logtab_deactivate(f, NULL, path, NULL) == -1) {
1662 error = -1;
1663 (void) fprintf(stderr,
1664 dgettext(TEXT_DOMAIN,
1665 "share complete, however could not "
1666 "deactivate %s in %s\n"), path, NFSLOGTAB);
1667 goto out;
1668 }
1669
1670 out: if (f != NULL)
1671 (void) fclose(f);
1672
1673 return (error);
1674 }
1675
1676 /*
1677 * check_public(group, skipshare)
1678 *
1679 * Check the group for any shares that have the public property
1680 * enabled. We skip "skipshare" since that is the one we are
1681 * working with. This is a separate function to make handling
1682 * subgroups simpler. Returns true if there is a share with public.
1683 */
1684 static int
check_public(sa_group_t group,sa_share_t skipshare)1685 check_public(sa_group_t group, sa_share_t skipshare)
1686 {
1687 int exists = B_FALSE;
1688 sa_share_t share;
1689 sa_optionset_t opt;
1690 sa_property_t prop;
1691 char *shared;
1692
1693 for (share = sa_get_share(group, NULL); share != NULL;
1694 share = sa_get_next_share(share)) {
1695 if (share == skipshare)
1696 continue;
1697
1698 opt = sa_get_optionset(share, "nfs");
1699 if (opt == NULL)
1700 continue;
1701 prop = sa_get_property(opt, "public");
1702 if (prop == NULL)
1703 continue;
1704 shared = sa_get_share_attr(share, "shared");
1705 if (shared != NULL) {
1706 exists = strcmp(shared, "true") == 0;
1707 sa_free_attr_string(shared);
1708 if (exists == B_TRUE)
1709 break;
1710 }
1711 }
1712
1713 return (exists);
1714 }
1715
1716 /*
1717 * public_exists(handle, skipshare)
1718 *
1719 * check to see if public option is set on any other share than the
1720 * one specified. Need to check zfs sub-groups as well as the top
1721 * level groups.
1722 */
1723 static int
public_exists(sa_handle_t handle,sa_share_t skipshare)1724 public_exists(sa_handle_t handle, sa_share_t skipshare)
1725 {
1726 sa_group_t group = NULL;
1727
1728 /*
1729 * If we don't have a handle, we can only do syntax check. We
1730 * can't check against other shares so we assume OK and will
1731 * catch the problem only when we actually try to apply it.
1732 */
1733 if (handle == NULL)
1734 return (SA_OK);
1735
1736 if (skipshare != NULL) {
1737 group = sa_get_parent_group(skipshare);
1738 if (group == NULL)
1739 return (SA_NO_SUCH_GROUP);
1740 }
1741
1742 for (group = sa_get_group(handle, NULL); group != NULL;
1743 group = sa_get_next_group(group)) {
1744 /* Walk any ZFS subgroups as well as all standard groups */
1745 if (sa_group_is_zfs(group)) {
1746 sa_group_t subgroup;
1747 for (subgroup = sa_get_sub_group(group);
1748 subgroup != NULL;
1749 subgroup = sa_get_next_group(subgroup)) {
1750 if (check_public(subgroup, skipshare))
1751 return (B_TRUE);
1752 }
1753 } else {
1754 if (check_public(group, skipshare))
1755 return (B_TRUE);
1756 }
1757 }
1758 return (B_FALSE);
1759 }
1760
1761 /*
1762 * sa_enable_share at the protocol level, enable_share must tell the
1763 * implementation that it is to enable the share. This entails
1764 * converting the path and options into the appropriate ioctl
1765 * calls. It is assumed that all error checking of paths, etc. were
1766 * done earlier.
1767 */
1768 static int
nfs_enable_share(sa_share_t share)1769 nfs_enable_share(sa_share_t share)
1770 {
1771 struct exportdata export;
1772 sa_optionset_t secoptlist;
1773 struct secinfo *sp;
1774 int num_secinfo;
1775 sa_optionset_t opt;
1776 sa_security_t sec;
1777 sa_property_t prop;
1778 char *path;
1779 int err = SA_OK;
1780 int i;
1781 int iszfs;
1782 sa_handle_t handle;
1783
1784 /* Don't drop core if the NFS module isn't loaded. */
1785 (void) signal(SIGSYS, SIG_IGN);
1786
1787 /* get the path since it is important in several places */
1788 path = sa_get_share_attr(share, "path");
1789 if (path == NULL)
1790 return (SA_NO_SUCH_PATH);
1791
1792 iszfs = sa_path_is_zfs(path);
1793 /*
1794 * find the optionsets and security sets. There may not be
1795 * any or there could be one or two for each of optionset and
1796 * security may have multiple, one per security type per
1797 * protocol type.
1798 */
1799 opt = sa_get_derived_optionset(share, "nfs", 1);
1800 secoptlist = (sa_optionset_t)sa_get_all_security_types(share, "nfs", 1);
1801 if (secoptlist != NULL)
1802 num_secinfo = MAX(1, count_security(secoptlist));
1803 else
1804 num_secinfo = 1;
1805
1806 /*
1807 * walk through the options and fill in the structure
1808 * appropriately.
1809 */
1810
1811 (void) memset(&export, '\0', sizeof (export));
1812
1813 /*
1814 * do non-security options first since there is only one after
1815 * the derived group is constructed.
1816 */
1817 export.ex_version = EX_CURRENT_VERSION;
1818 export.ex_anon = UID_NOBODY; /* this is our default value */
1819 export.ex_index = NULL;
1820 export.ex_path = path;
1821 export.ex_pathlen = strlen(path) + 1;
1822
1823 if (opt != NULL)
1824 err = fill_export_from_optionset(&export, opt);
1825
1826 /*
1827 * check to see if "public" is set. If it is, then make sure
1828 * no other share has it set. If it is already used, fail.
1829 */
1830
1831 handle = sa_find_group_handle((sa_group_t)share);
1832 if (export.ex_flags & EX_PUBLIC && public_exists(handle, share)) {
1833 (void) printf(dgettext(TEXT_DOMAIN,
1834 "NFS: Cannot share more than one file "
1835 "system with 'public' property\n"));
1836 err = SA_NOT_ALLOWED;
1837 goto out;
1838 }
1839
1840 sp = calloc(num_secinfo, sizeof (struct secinfo));
1841 if (sp == NULL) {
1842 err = SA_NO_MEMORY;
1843 (void) printf(dgettext(TEXT_DOMAIN,
1844 "NFS: NFS: no memory for security\n"));
1845 goto out;
1846 }
1847 export.ex_secinfo = sp;
1848 /* get default secinfo */
1849 export.ex_seccnt = num_secinfo;
1850 /*
1851 * since we must have one security option defined, we
1852 * init to the default and then override as we find
1853 * defined security options. This handles the case
1854 * where we have no defined options but we need to set
1855 * up one.
1856 */
1857 sp[0].s_window = DEF_WIN;
1858 sp[0].s_rootnames = NULL;
1859 /* setup a default in case no properties defined */
1860 if (nfs_getseconfig_default(&sp[0].s_secinfo)) {
1861 (void) printf(dgettext(TEXT_DOMAIN,
1862 "NFS: nfs_getseconfig_default: failed to "
1863 "get default security mode\n"));
1864 err = SA_CONFIG_ERR;
1865 }
1866 if (secoptlist != NULL) {
1867 for (i = 0, prop = sa_get_property(secoptlist, NULL);
1868 prop != NULL && i < num_secinfo;
1869 prop = sa_get_next_property(prop), i++) {
1870 char *sectype;
1871 sectype = sa_get_property_attr(prop, "type");
1872 /*
1873 * if sectype is NULL, we probably
1874 * have a memory problem and can't get
1875 * the correct values. Rather than
1876 * exporting with incorrect security,
1877 * don't share it.
1878 */
1879 if (sectype == NULL) {
1880 err = SA_NO_MEMORY;
1881 (void) printf(dgettext(TEXT_DOMAIN,
1882 "NFS: Cannot share %s: "
1883 "no memory\n"), path);
1884 goto out;
1885 }
1886 sec = (sa_security_t)sa_get_derived_security(
1887 share, sectype, "nfs", 1);
1888 sp[i].s_window = DEF_WIN;
1889 sp[i].s_rootcnt = 0;
1890 sp[i].s_rootnames = NULL;
1891 (void) fill_security_from_secopts(&sp[i], sec);
1892 if (sec != NULL)
1893 sa_free_derived_security(sec);
1894 if (sectype != NULL)
1895 sa_free_attr_string(sectype);
1896 }
1897 }
1898 /*
1899 * when we get here, we can do the exportfs system call and
1900 * initiate things. We probably want to enable the
1901 * svc:/network/nfs/server service first if it isn't running.
1902 */
1903 /* check svc:/network/nfs/server status and start if needed */
1904 /* now add the share to the internal tables */
1905 printarg(path, &export);
1906 /*
1907 * call the exportfs system call which is implemented
1908 * via the nfssys() call as the EXPORTFS subfunction.
1909 */
1910 if (iszfs) {
1911 struct exportfs_args ea;
1912 share_t sh;
1913 char *str;
1914 priv_set_t *priv_effective;
1915 int privileged;
1916
1917 /*
1918 * If we aren't a privileged user
1919 * and NFS server service isn't running
1920 * then print out an error message
1921 * and return EPERM
1922 */
1923
1924 priv_effective = priv_allocset();
1925 (void) getppriv(PRIV_EFFECTIVE, priv_effective);
1926
1927 privileged = (priv_isfullset(priv_effective) == B_TRUE);
1928 priv_freeset(priv_effective);
1929
1930 if (!privileged &&
1931 (str = smf_get_state(NFS_SERVER_SVC)) != NULL) {
1932 err = 0;
1933 if (strcmp(str, SCF_STATE_STRING_ONLINE) != 0) {
1934 (void) printf(dgettext(TEXT_DOMAIN,
1935 "NFS: Cannot share remote "
1936 "filesystem: %s\n"), path);
1937 (void) printf(dgettext(TEXT_DOMAIN,
1938 "NFS: Service needs to be enabled "
1939 "by a privileged user\n"));
1940 err = SA_SYSTEM_ERR;
1941 errno = EPERM;
1942 }
1943 free(str);
1944 }
1945
1946 if (err == 0) {
1947 ea.dname = path;
1948 ea.uex = &export;
1949
1950 (void) sa_sharetab_fill_zfs(share, &sh, "nfs");
1951 err = sa_share_zfs(share, NULL, path, &sh,
1952 &ea, ZFS_SHARE_NFS);
1953 if (err != SA_OK) {
1954 errno = err;
1955 err = -1;
1956 }
1957 sa_emptyshare(&sh);
1958 }
1959 } else {
1960 err = exportfs(path, &export);
1961 }
1962
1963 if (err < 0) {
1964 err = SA_SYSTEM_ERR;
1965 switch (errno) {
1966 case EREMOTE:
1967 (void) printf(dgettext(TEXT_DOMAIN,
1968 "NFS: Cannot share filesystems "
1969 "in non-global zones: %s\n"), path);
1970 err = SA_NOT_SUPPORTED;
1971 break;
1972 case EPERM:
1973 if (getzoneid() != GLOBAL_ZONEID) {
1974 (void) printf(dgettext(TEXT_DOMAIN,
1975 "NFS: Cannot share file systems "
1976 "in non-global zones: %s\n"), path);
1977 err = SA_NOT_SUPPORTED;
1978 break;
1979 }
1980 err = SA_NO_PERMISSION;
1981 break;
1982 case EEXIST:
1983 err = SA_SHARE_EXISTS;
1984 break;
1985 default:
1986 break;
1987 }
1988 } else {
1989 /* update sharetab with an add/modify */
1990 if (!iszfs) {
1991 (void) sa_update_sharetab(share, "nfs");
1992 }
1993 }
1994
1995 if (err == SA_OK) {
1996 /*
1997 * enable services as needed. This should probably be
1998 * done elsewhere in order to minimize the calls to
1999 * check services.
2000 */
2001 /*
2002 * check to see if logging and other services need to
2003 * be triggered, but only if there wasn't an
2004 * error. This is probably where sharetab should be
2005 * updated with the NFS specific entry.
2006 */
2007 if (export.ex_flags & EX_LOG) {
2008 /* enable logging */
2009 if (nfslogtab_add(path, export.ex_log_buffer,
2010 export.ex_tag) != 0) {
2011 (void) fprintf(stderr, dgettext(TEXT_DOMAIN,
2012 "Could not enable logging for %s\n"),
2013 path);
2014 }
2015 _check_services(service_list_logging);
2016 } else {
2017 /*
2018 * don't have logging so remove it from file. It might
2019 * not be thre, but that doesn't matter.
2020 */
2021 (void) nfslogtab_deactivate(path);
2022 _check_services(service_list_default);
2023 }
2024 }
2025
2026 out:
2027 if (path != NULL)
2028 free(path);
2029
2030 cleanup_export(&export);
2031 if (opt != NULL)
2032 sa_free_derived_optionset(opt);
2033 if (secoptlist != NULL)
2034 (void) sa_destroy_optionset(secoptlist);
2035 return (err);
2036 }
2037
2038 /*
2039 * nfs_disable_share(share, path)
2040 *
2041 * Unshare the specified share. Note that "path" is the same path as
2042 * what is in the "share" object. It is passed in to avoid an
2043 * additional lookup. A missing "path" value makes this a no-op
2044 * function.
2045 */
2046 static int
nfs_disable_share(sa_share_t share,char * path)2047 nfs_disable_share(sa_share_t share, char *path)
2048 {
2049 int err;
2050 int ret = SA_OK;
2051 int iszfs;
2052 sa_group_t parent;
2053 sa_handle_t handle;
2054
2055 if (path == NULL)
2056 return (ret);
2057
2058 /*
2059 * If the share is in a ZFS group we need to handle it
2060 * differently. Just being on a ZFS file system isn't
2061 * enough since we may be in a legacy share case.
2062 */
2063 parent = sa_get_parent_group(share);
2064 iszfs = sa_group_is_zfs(parent);
2065 if (iszfs) {
2066 struct exportfs_args ea;
2067 share_t sh = { 0 };
2068 ea.dname = path;
2069 ea.uex = NULL;
2070 sh.sh_path = path;
2071 sh.sh_fstype = "nfs";
2072
2073 err = sa_share_zfs(share, NULL, path, &sh,
2074 &ea, ZFS_UNSHARE_NFS);
2075 if (err != SA_OK) {
2076 errno = err;
2077 err = -1;
2078 }
2079 } else {
2080 err = exportfs(path, NULL);
2081 }
2082 if (err < 0) {
2083 /*
2084 * TBD: only an error in some
2085 * cases - need better analysis
2086 */
2087 switch (errno) {
2088 case EPERM:
2089 case EACCES:
2090 ret = SA_NO_PERMISSION;
2091 if (getzoneid() != GLOBAL_ZONEID) {
2092 ret = SA_NOT_SUPPORTED;
2093 }
2094 break;
2095 case EINVAL:
2096 case ENOENT:
2097 ret = SA_NO_SUCH_PATH;
2098 break;
2099 default:
2100 ret = SA_SYSTEM_ERR;
2101 break;
2102 }
2103 }
2104 if (ret == SA_OK || ret == SA_NO_SUCH_PATH) {
2105 handle = sa_find_group_handle((sa_group_t)share);
2106 if (!iszfs)
2107 (void) sa_delete_sharetab(handle, path, "nfs");
2108 /* just in case it was logged */
2109 (void) nfslogtab_deactivate(path);
2110 }
2111 return (ret);
2112 }
2113
2114 static int
check_user(char * value)2115 check_user(char *value)
2116 {
2117 int ret = SA_OK;
2118
2119 if (!is_a_number(value)) {
2120 struct passwd *pw;
2121 /*
2122 * in this case it would have to be a
2123 * user name
2124 */
2125 pw = getpwnam(value);
2126 if (pw == NULL)
2127 ret = SA_BAD_VALUE;
2128 endpwent();
2129 } else {
2130 uint64_t intval;
2131 intval = strtoull(value, NULL, 0);
2132 if (intval > UID_MAX && intval != -1)
2133 ret = SA_BAD_VALUE;
2134 }
2135
2136 return (ret);
2137 }
2138
2139 static int
check_group(char * value)2140 check_group(char *value)
2141 {
2142 int ret = SA_OK;
2143
2144 if (!is_a_number(value)) {
2145 struct group *gr;
2146 /*
2147 * in this case it would have to be a
2148 * group name
2149 */
2150 gr = getgrnam(value);
2151 if (gr == NULL)
2152 ret = SA_BAD_VALUE;
2153 endgrent();
2154 } else {
2155 uint64_t intval;
2156 intval = strtoull(value, NULL, 0);
2157 if (intval > UID_MAX && intval != -1)
2158 ret = SA_BAD_VALUE;
2159 }
2160
2161 return (ret);
2162 }
2163
2164 /*
2165 * check_rorwnone(v1, v2, v3)
2166 *
2167 * check ro vs rw vs none values. Over time this may get beefed up.
2168 * for now it just does simple checks. v1 is never NULL but v2 or v3
2169 * could be.
2170 */
2171
2172 static int
check_rorwnone(char * v1,char * v2,char * v3)2173 check_rorwnone(char *v1, char *v2, char *v3)
2174 {
2175 int ret = SA_OK;
2176 if (v2 != NULL && strcmp(v1, v2) == 0)
2177 ret = SA_VALUE_CONFLICT;
2178 else if (v3 != NULL && strcmp(v1, v3) == 0)
2179 ret = SA_VALUE_CONFLICT;
2180
2181 return (ret);
2182 }
2183
2184 /*
2185 * nfs_validate_property(handle, property, parent)
2186 *
2187 * Check that the property has a legitimate value for its type.
2188 */
2189
2190 static int
nfs_validate_property(sa_handle_t handle,sa_property_t property,sa_optionset_t parent)2191 nfs_validate_property(sa_handle_t handle, sa_property_t property,
2192 sa_optionset_t parent)
2193 {
2194 int ret = SA_OK;
2195 char *propname;
2196 char *other1;
2197 char *other2;
2198 int optindex;
2199 nfsl_config_t *configlist;
2200 sa_group_t parent_group;
2201 char *value;
2202
2203 propname = sa_get_property_attr(property, "type");
2204
2205 if ((optindex = findopt(propname)) < 0)
2206 ret = SA_NO_SUCH_PROP;
2207
2208 /* need to validate value range here as well */
2209
2210 if (ret == SA_OK) {
2211 parent_group = sa_get_parent_group((sa_share_t)parent);
2212 if (optdefs[optindex].share && parent_group != NULL &&
2213 !sa_is_share(parent_group))
2214 ret = SA_PROP_SHARE_ONLY;
2215 }
2216 if (ret == SA_OK) {
2217 if (optdefs[optindex].index == OPT_PUBLIC) {
2218 /*
2219 * Public is special in that only one instance can
2220 * be in the repository at the same time.
2221 */
2222 if (public_exists(handle, parent_group)) {
2223 sa_free_attr_string(propname);
2224 return (SA_VALUE_CONFLICT);
2225 }
2226 }
2227 value = sa_get_property_attr(property, "value");
2228 if (value != NULL) {
2229 /* first basic type checking */
2230 switch (optdefs[optindex].type) {
2231
2232 case OPT_TYPE_NUMBER:
2233 /* check that the value is all digits */
2234 if (!is_a_number(value))
2235 ret = SA_BAD_VALUE;
2236 break;
2237
2238 case OPT_TYPE_BOOLEAN:
2239 if (strlen(value) == 0 ||
2240 strcasecmp(value, "true") == 0 ||
2241 strcmp(value, "1") == 0 ||
2242 strcasecmp(value, "false") == 0 ||
2243 strcmp(value, "0") == 0) {
2244 ret = SA_OK;
2245 } else {
2246 ret = SA_BAD_VALUE;
2247 }
2248 break;
2249
2250 case OPT_TYPE_USER:
2251 ret = check_user(value);
2252 break;
2253
2254 case OPT_TYPE_FILE:
2255 if (strcmp(value, "..") == 0 ||
2256 strchr(value, '/') != NULL) {
2257 ret = SA_BAD_VALUE;
2258 }
2259 break;
2260
2261 case OPT_TYPE_ACCLIST: {
2262 sa_property_t oprop1;
2263 sa_property_t oprop2;
2264 char *ovalue1 = NULL;
2265 char *ovalue2 = NULL;
2266
2267 if (parent == NULL)
2268 break;
2269 /*
2270 * access list handling. Should eventually
2271 * validate that all the values make sense.
2272 * Also, ro and rw may have cross value
2273 * conflicts.
2274 */
2275 if (strcmp(propname, SHOPT_RO) == 0) {
2276 other1 = SHOPT_RW;
2277 other2 = SHOPT_NONE;
2278 } else if (strcmp(propname, SHOPT_RW) == 0) {
2279 other1 = SHOPT_RO;
2280 other2 = SHOPT_NONE;
2281 } else if (strcmp(propname, SHOPT_NONE) == 0) {
2282 other1 = SHOPT_RO;
2283 other2 = SHOPT_RW;
2284 } else {
2285 other1 = NULL;
2286 other2 = NULL;
2287 }
2288 if (other1 == NULL && other2 == NULL)
2289 break;
2290
2291 /* compare rw(ro) with ro(rw) */
2292
2293 oprop1 = sa_get_property(parent, other1);
2294 oprop2 = sa_get_property(parent, other2);
2295 if (oprop1 == NULL && oprop2 == NULL)
2296 break;
2297 /*
2298 * Only potential confusion if other1
2299 * or other2 exists. Check the values
2300 * and run the check if there is a
2301 * value other than the one we are
2302 * explicitly looking at.
2303 */
2304 ovalue1 = sa_get_property_attr(oprop1, "value");
2305 ovalue2 = sa_get_property_attr(oprop2, "value");
2306 if (ovalue1 != NULL || ovalue2 != NULL)
2307 ret = check_rorwnone(value, ovalue1,
2308 ovalue2);
2309
2310 if (ovalue1 != NULL)
2311 sa_free_attr_string(ovalue1);
2312 if (ovalue2 != NULL)
2313 sa_free_attr_string(ovalue2);
2314 break;
2315 }
2316
2317 case OPT_TYPE_LOGTAG:
2318 if (nfsl_getconfig_list(&configlist) == 0) {
2319 int error;
2320 if (value == NULL ||
2321 strlen(value) == 0) {
2322 if (value != NULL)
2323 sa_free_attr_string(
2324 value);
2325 value = strdup("global");
2326 }
2327 if (value != NULL &&
2328 nfsl_findconfig(configlist, value,
2329 &error) == NULL) {
2330 ret = SA_BAD_VALUE;
2331 }
2332 /* Must always free when done */
2333 nfsl_freeconfig_list(&configlist);
2334 } else {
2335 ret = SA_CONFIG_ERR;
2336 }
2337 break;
2338
2339 case OPT_TYPE_STRING:
2340 /* whatever is here should be ok */
2341 break;
2342
2343 case OPT_TYPE_SECURITY:
2344 /*
2345 * The "sec" property isn't used in the
2346 * non-legacy parts of sharemgr. We need to
2347 * reject it here. For legacy, it is pulled
2348 * out well before we get here.
2349 */
2350 ret = SA_NO_SUCH_PROP;
2351 break;
2352
2353 case OPT_TYPE_MAPPING: {
2354 char *p;
2355 char *n;
2356 char *c;
2357 int (*f)(char *);
2358
2359 sa_security_t security;
2360
2361 /*
2362 * mapping is only supported for sec=sys
2363 */
2364 ret = SA_CONFIG_ERR;
2365 if (parent_group == NULL)
2366 break;
2367
2368 for (security = sa_get_security(parent_group,
2369 NULL, NULL); security != NULL;
2370 security = sa_get_next_security(security)) {
2371 char *type;
2372 char *sectype;
2373
2374 type = sa_get_security_attr(security,
2375 "type");
2376 if (type == NULL)
2377 continue;
2378
2379 if (strcmp(type, "nfs") != 0) {
2380 sa_free_attr_string(type);
2381 continue;
2382 }
2383 sa_free_attr_string(type);
2384
2385 sectype = sa_get_security_attr(security,
2386 "sectype");
2387 if (sectype == NULL)
2388 continue;
2389
2390 if (strcmp(sectype, "sys") != 0) {
2391 sa_free_attr_string(sectype);
2392 ret = SA_CONFIG_ERR;
2393 break;
2394 }
2395 sa_free_attr_string(sectype);
2396 ret = SA_OK;
2397 }
2398
2399 if (ret != SA_OK)
2400 break;
2401
2402 assert(optindex == OPT_UIDMAP ||
2403 optindex == OPT_GIDMAP);
2404 f = optindex == OPT_UIDMAP ? check_user :
2405 check_group;
2406
2407
2408 p = strdup(value);
2409 if (p == NULL)
2410 ret = SA_BAD_VALUE;
2411
2412 for (c = p; ret == SA_OK && c != NULL; c = n) {
2413 char *s;
2414 char *t;
2415
2416 n = strchr(c, '~');
2417 if (n != NULL)
2418 *n++ = '\0';
2419
2420 s = strchr(c, ':');
2421 if (s != NULL) {
2422 *s++ = '\0';
2423 t = strchr(s, ':');
2424 if (t != NULL)
2425 *t = '\0';
2426 }
2427
2428 if (s == NULL || t == NULL)
2429 ret = SA_BAD_VALUE;
2430
2431 if (ret == SA_OK && *c != '\0' &&
2432 strcmp(c, "*") != 0)
2433 ret = f(c);
2434
2435 if (ret == SA_OK && *s != '\0' &&
2436 strcmp(s, "-1") != 0)
2437 ret = f(s);
2438 }
2439
2440 free(p);
2441
2442 break;
2443 }
2444
2445 default:
2446 break;
2447 }
2448
2449 if (value != NULL)
2450 sa_free_attr_string(value);
2451
2452 if (ret == SA_OK && optdefs[optindex].check != NULL) {
2453 /* do the property specific check */
2454 ret = optdefs[optindex].check(handle, property);
2455 }
2456 }
2457 }
2458
2459 if (propname != NULL)
2460 sa_free_attr_string(propname);
2461 return (ret);
2462 }
2463
2464 /*
2465 * Protocol management functions
2466 *
2467 * Properties defined in the default files are defined in
2468 * proto_option_defs for parsing and validation. If "other" and
2469 * "compare" are set, then the value for this property should be
2470 * compared against the property specified in "other" using the
2471 * "compare" check (either <= or >=) in order to ensure that the
2472 * values are in the correct range. E.g. setting server_versmin
2473 * higher than server_versmax should not be allowed.
2474 */
2475
2476 struct proto_option_defs {
2477 char *tag;
2478 char *name; /* display name -- remove protocol identifier */
2479 int index;
2480 int type;
2481 union {
2482 int intval;
2483 char *string;
2484 } defvalue;
2485 uint32_t svcs;
2486 int32_t minval;
2487 int32_t maxval;
2488 char *other;
2489 int compare;
2490 #define OPT_CMP_GE 0
2491 #define OPT_CMP_LE 1
2492 int (*check)(char *);
2493 } proto_options[] = {
2494 #define PROTO_OPT_NFSD_SERVERS 0
2495 {"nfsd_servers",
2496 "servers", PROTO_OPT_NFSD_SERVERS, OPT_TYPE_NUMBER, 16, SVC_NFSD,
2497 1, INT32_MAX},
2498 #define PROTO_OPT_LOCKD_LISTEN_BACKLOG 1
2499 {"lockd_listen_backlog",
2500 "lockd_listen_backlog", PROTO_OPT_LOCKD_LISTEN_BACKLOG,
2501 OPT_TYPE_NUMBER, 32, SVC_LOCKD, 32, INT32_MAX},
2502 #define PROTO_OPT_LOCKD_SERVERS 2
2503 {"lockd_servers",
2504 "lockd_servers", PROTO_OPT_LOCKD_SERVERS, OPT_TYPE_NUMBER, 20,
2505 SVC_LOCKD, 1, INT32_MAX},
2506 #define PROTO_OPT_LOCKD_RETRANSMIT_TIMEOUT 3
2507 {"lockd_retransmit_timeout",
2508 "lockd_retransmit_timeout", PROTO_OPT_LOCKD_RETRANSMIT_TIMEOUT,
2509 OPT_TYPE_NUMBER, 5, SVC_LOCKD, 0, INT32_MAX},
2510 #define PROTO_OPT_GRACE_PERIOD 4
2511 {"grace_period",
2512 "grace_period", PROTO_OPT_GRACE_PERIOD, OPT_TYPE_NUMBER, 90,
2513 SVC_LOCKD, 0, INT32_MAX},
2514 #define PROTO_OPT_NFS_SERVER_VERSMIN 5
2515 {"nfs_server_versmin",
2516 "server_versmin", PROTO_OPT_NFS_SERVER_VERSMIN, OPT_TYPE_NUMBER,
2517 (int)NFS_VERSMIN_DEFAULT, SVC_NFSD|SVC_MOUNTD, NFS_VERSMIN,
2518 NFS_VERSMAX, "server_versmax", OPT_CMP_LE},
2519 #define PROTO_OPT_NFS_SERVER_VERSMAX 6
2520 {"nfs_server_versmax",
2521 "server_versmax", PROTO_OPT_NFS_SERVER_VERSMAX, OPT_TYPE_NUMBER,
2522 (int)NFS_VERSMAX_DEFAULT, SVC_NFSD|SVC_MOUNTD, NFS_VERSMIN,
2523 NFS_VERSMAX, "server_versmin", OPT_CMP_GE},
2524 #define PROTO_OPT_NFS_CLIENT_VERSMIN 7
2525 {"nfs_client_versmin",
2526 "client_versmin", PROTO_OPT_NFS_CLIENT_VERSMIN, OPT_TYPE_NUMBER,
2527 (int)NFS_VERSMIN_DEFAULT, SVC_CLIENT, NFS_VERSMIN, NFS_VERSMAX,
2528 "client_versmax", OPT_CMP_LE},
2529 #define PROTO_OPT_NFS_CLIENT_VERSMAX 8
2530 {"nfs_client_versmax",
2531 "client_versmax", PROTO_OPT_NFS_CLIENT_VERSMAX, OPT_TYPE_NUMBER,
2532 (int)NFS_VERSMAX_DEFAULT, SVC_CLIENT, NFS_VERSMIN, NFS_VERSMAX,
2533 "client_versmin", OPT_CMP_GE},
2534 #define PROTO_OPT_NFS_SERVER_DELEGATION 9
2535 {"nfs_server_delegation",
2536 "server_delegation", PROTO_OPT_NFS_SERVER_DELEGATION,
2537 OPT_TYPE_ONOFF, NFS_SERVER_DELEGATION_DEFAULT, SVC_NFSD, 0, 0},
2538 #define PROTO_OPT_NFSMAPID_DOMAIN 10
2539 {"nfsmapid_domain",
2540 "nfsmapid_domain", PROTO_OPT_NFSMAPID_DOMAIN, OPT_TYPE_DOMAIN,
2541 NULL, SVC_NFSMAPID, 0, 0},
2542 #define PROTO_OPT_NFSD_MAX_CONNECTIONS 11
2543 {"nfsd_max_connections",
2544 "max_connections", PROTO_OPT_NFSD_MAX_CONNECTIONS,
2545 OPT_TYPE_NUMBER, -1, SVC_NFSD, -1, INT32_MAX},
2546 #define PROTO_OPT_NFSD_PROTOCOL 12
2547 {"nfsd_protocol",
2548 "protocol", PROTO_OPT_NFSD_PROTOCOL, OPT_TYPE_PROTOCOL, 0,
2549 SVC_NFSD, 0, 0},
2550 #define PROTO_OPT_NFSD_LISTEN_BACKLOG 13
2551 {"nfsd_listen_backlog",
2552 "listen_backlog", PROTO_OPT_NFSD_LISTEN_BACKLOG,
2553 OPT_TYPE_NUMBER, 0, SVC_NFSD, 0, INT32_MAX},
2554 #define PROTO_OPT_NFSD_DEVICE 14
2555 {"nfsd_device",
2556 "device", PROTO_OPT_NFSD_DEVICE,
2557 OPT_TYPE_STRING, NULL, SVC_NFSD, 0, 0},
2558 #define PROTO_OPT_MOUNTD_LISTEN_BACKLOG 15
2559 {"mountd_listen_backlog",
2560 "mountd_listen_backlog", PROTO_OPT_MOUNTD_LISTEN_BACKLOG,
2561 OPT_TYPE_NUMBER, 64, SVC_NFSD|SVC_MOUNTD, 1, INT32_MAX},
2562 #define PROTO_OPT_MOUNTD_MAX_THREADS 16
2563 {"mountd_max_threads",
2564 "mountd_max_threads", PROTO_OPT_MOUNTD_MAX_THREADS,
2565 OPT_TYPE_NUMBER, 16, SVC_NFSD|SVC_MOUNTD, 1, INT32_MAX},
2566 {NULL}
2567 };
2568
2569 /*
2570 * the protoset holds the defined options so we don't have to read
2571 * them multiple times
2572 */
2573 static sa_protocol_properties_t protoset;
2574
2575 static int
findprotoopt(char * name,int whichname)2576 findprotoopt(char *name, int whichname)
2577 {
2578 int i;
2579 for (i = 0; proto_options[i].tag != NULL; i++) {
2580 if (whichname == 1) {
2581 if (strcasecmp(proto_options[i].name, name) == 0)
2582 return (i);
2583 } else {
2584 if (strcasecmp(proto_options[i].tag, name) == 0)
2585 return (i);
2586 }
2587 }
2588 return (-1);
2589 }
2590
2591 /*
2592 * fixcaselower(str)
2593 *
2594 * convert a string to lower case (inplace).
2595 */
2596
2597 static void
fixcaselower(char * str)2598 fixcaselower(char *str)
2599 {
2600 while (*str) {
2601 *str = tolower(*str);
2602 str++;
2603 }
2604 }
2605
2606 /*
2607 * skipwhitespace(str)
2608 *
2609 * Skip leading white space. It is assumed that it is called with a
2610 * valid pointer.
2611 */
2612
2613 static char *
skipwhitespace(char * str)2614 skipwhitespace(char *str)
2615 {
2616 while (*str && isspace(*str))
2617 str++;
2618
2619 return (str);
2620 }
2621
2622 /*
2623 * extractprop()
2624 *
2625 * Extract the property and value out of the line and create the
2626 * property in the optionset.
2627 */
2628 static int
extractprop(char * name,char * value)2629 extractprop(char *name, char *value)
2630 {
2631 sa_property_t prop;
2632 int index;
2633 int ret = SA_OK;
2634 /*
2635 * Remove any leading
2636 * white space.
2637 */
2638 name = skipwhitespace(name);
2639
2640 index = findprotoopt(name, 1);
2641 if (index >= 0) {
2642 fixcaselower(name);
2643 prop = sa_create_property(proto_options[index].name, value);
2644 if (prop != NULL)
2645 ret = sa_add_protocol_property(protoset, prop);
2646 else
2647 ret = SA_NO_MEMORY;
2648 }
2649 return (ret);
2650 }
2651
2652 scf_type_t
getscftype(int type)2653 getscftype(int type)
2654 {
2655 scf_type_t ret;
2656
2657 switch (type) {
2658 case OPT_TYPE_NUMBER:
2659 ret = SCF_TYPE_INTEGER;
2660 break;
2661 case OPT_TYPE_BOOLEAN:
2662 ret = SCF_TYPE_BOOLEAN;
2663 break;
2664 default:
2665 ret = SCF_TYPE_ASTRING;
2666 }
2667 return (ret);
2668 }
2669
2670 char *
getsvcname(uint32_t svcs)2671 getsvcname(uint32_t svcs)
2672 {
2673 char *service;
2674 switch (svcs) {
2675 case SVC_LOCKD:
2676 service = LOCKD;
2677 break;
2678 case SVC_STATD:
2679 service = STATD;
2680 break;
2681 case SVC_NFSD:
2682 service = NFSD;
2683 break;
2684 case SVC_CLIENT:
2685 service = NFS_CLIENT_SVC;
2686 break;
2687 case SVC_NFS4CBD:
2688 service = NFS4CBD;
2689 break;
2690 case SVC_NFSMAPID:
2691 service = NFSMAPID;
2692 break;
2693 case SVC_RQUOTAD:
2694 service = RQUOTAD;
2695 break;
2696 case SVC_NFSLOGD:
2697 service = NFSLOGD;
2698 break;
2699 case SVC_REPARSED:
2700 service = REPARSED;
2701 break;
2702 default:
2703 service = NFSD;
2704 }
2705 return (service);
2706 }
2707
2708 /*
2709 * initprotofromsmf()
2710 *
2711 * Read NFS SMF properties and add the defined values to the
2712 * protoset. Note that default values are known from the built in
2713 * table in case SMF doesn't have a definition. Not having
2714 * SMF properties is OK since we have builtin default
2715 * values.
2716 */
2717 static int
initprotofromsmf()2718 initprotofromsmf()
2719 {
2720 char name[PATH_MAX];
2721 char value[PATH_MAX];
2722 int ret = SA_OK, bufsz = 0, i;
2723
2724 protoset = sa_create_protocol_properties("nfs");
2725 if (protoset != NULL) {
2726 for (i = 0; proto_options[i].tag != NULL; i++) {
2727 scf_type_t ptype;
2728 char *svc_name;
2729
2730 bzero(value, PATH_MAX);
2731 (void) strncpy(name, proto_options[i].name, PATH_MAX);
2732 /* Replace NULL with the correct instance */
2733 ptype = getscftype(proto_options[i].type);
2734 svc_name = getsvcname(proto_options[i].svcs);
2735 bufsz = PATH_MAX;
2736 ret = nfs_smf_get_prop(name, value,
2737 (char *)DEFAULT_INSTANCE, ptype,
2738 svc_name, &bufsz);
2739 if (ret == SA_OK) {
2740 ret = extractprop(name, value);
2741 }
2742 }
2743 } else {
2744 ret = SA_NO_MEMORY;
2745 }
2746
2747 return (ret);
2748 }
2749
2750 /*
2751 * add_defaults()
2752 *
2753 * Add the default values for any property not defined
2754 * in NFS SMF repository.
2755 * Values are set according to their defined types.
2756 */
2757
2758 static void
add_defaults()2759 add_defaults()
2760 {
2761 int i;
2762 char number[MAXDIGITS];
2763
2764 for (i = 0; proto_options[i].tag != NULL; i++) {
2765 sa_property_t prop;
2766 prop = sa_get_protocol_property(protoset,
2767 proto_options[i].name);
2768 if (prop == NULL) {
2769 /* add the default value */
2770 switch (proto_options[i].type) {
2771 case OPT_TYPE_NUMBER:
2772 (void) snprintf(number, sizeof (number), "%d",
2773 proto_options[i].defvalue.intval);
2774 prop = sa_create_property(proto_options[i].name,
2775 number);
2776 break;
2777
2778 case OPT_TYPE_BOOLEAN:
2779 prop = sa_create_property(proto_options[i].name,
2780 proto_options[i].defvalue.intval ?
2781 "true" : "false");
2782 break;
2783
2784 case OPT_TYPE_ONOFF:
2785 prop = sa_create_property(proto_options[i].name,
2786 proto_options[i].defvalue.intval ?
2787 "on" : "off");
2788 break;
2789
2790 default:
2791 /* treat as strings of zero length */
2792 prop = sa_create_property(proto_options[i].name,
2793 "");
2794 break;
2795 }
2796 if (prop != NULL)
2797 (void) sa_add_protocol_property(protoset, prop);
2798 }
2799 }
2800 }
2801
2802 static void
free_protoprops()2803 free_protoprops()
2804 {
2805 if (protoset != NULL) {
2806 xmlFreeNode(protoset);
2807 protoset = NULL;
2808 }
2809 }
2810
2811 /*
2812 * nfs_init()
2813 *
2814 * Initialize the NFS plugin.
2815 */
2816
2817 static int
nfs_init()2818 nfs_init()
2819 {
2820 int ret = SA_OK;
2821
2822 if (sa_plugin_ops.sa_init != nfs_init) {
2823 (void) printf(dgettext(TEXT_DOMAIN,
2824 "NFS plugin not properly initialized\n"));
2825 return (SA_CONFIG_ERR);
2826 }
2827
2828 ret = initprotofromsmf();
2829 if (ret != SA_OK) {
2830 (void) printf(dgettext(TEXT_DOMAIN,
2831 "NFS plugin problem with SMF repository: %s\n"),
2832 sa_errorstr(ret));
2833 ret = SA_OK;
2834 }
2835 add_defaults();
2836
2837 return (ret);
2838 }
2839
2840 /*
2841 * nfs_fini()
2842 *
2843 * uninitialize the NFS plugin. Want to avoid memory leaks.
2844 */
2845
2846 static void
nfs_fini()2847 nfs_fini()
2848 {
2849 free_protoprops();
2850 }
2851
2852 /*
2853 * nfs_get_proto_set()
2854 *
2855 * Return an optionset with all the protocol specific properties in
2856 * it.
2857 */
2858
2859 static sa_protocol_properties_t
nfs_get_proto_set()2860 nfs_get_proto_set()
2861 {
2862 return (protoset);
2863 }
2864
2865 /*
2866 * service_in_state(service, chkstate)
2867 *
2868 * Want to know if the specified service is in the desired state
2869 * (chkstate) or not. Return true (1) if it is and false (0) if it
2870 * isn't.
2871 */
2872 static int
service_in_state(char * service,const char * chkstate)2873 service_in_state(char *service, const char *chkstate)
2874 {
2875 char *state;
2876 int ret = B_FALSE;
2877
2878 state = smf_get_state(service);
2879 if (state != NULL) {
2880 /* got the state so get the equality for the return value */
2881 ret = strcmp(state, chkstate) == 0 ? B_TRUE : B_FALSE;
2882 free(state);
2883 }
2884 return (ret);
2885 }
2886
2887 /*
2888 * restart_service(svcs)
2889 *
2890 * Walk through the bit mask of services that need to be restarted in
2891 * order to use the new property values. Some properties affect
2892 * multiple daemons. Should only restart a service if it is currently
2893 * enabled (online).
2894 */
2895
2896 static void
restart_service(uint32_t svcs)2897 restart_service(uint32_t svcs)
2898 {
2899 uint32_t mask;
2900 int ret;
2901 char *service;
2902
2903 for (mask = 1; svcs != 0; mask <<= 1) {
2904 switch (svcs & mask) {
2905 case SVC_LOCKD:
2906 service = LOCKD;
2907 break;
2908 case SVC_STATD:
2909 service = STATD;
2910 break;
2911 case SVC_NFSD:
2912 service = NFSD;
2913 break;
2914 case SVC_MOUNTD:
2915 service = MOUNTD;
2916 break;
2917 case SVC_NFS4CBD:
2918 service = NFS4CBD;
2919 break;
2920 case SVC_NFSMAPID:
2921 service = NFSMAPID;
2922 break;
2923 case SVC_RQUOTAD:
2924 service = RQUOTAD;
2925 break;
2926 case SVC_NFSLOGD:
2927 service = NFSLOGD;
2928 break;
2929 case SVC_REPARSED:
2930 service = REPARSED;
2931 break;
2932 case SVC_CLIENT:
2933 service = NFS_CLIENT_SVC;
2934 break;
2935 default:
2936 continue;
2937 }
2938
2939 /*
2940 * Only attempt to restart the service if it is
2941 * currently running. In the future, it may be
2942 * desirable to use smf_refresh_instance if the NFS
2943 * services ever implement the refresh method.
2944 */
2945 if (service_in_state(service, SCF_STATE_STRING_ONLINE)) {
2946 ret = smf_restart_instance(service);
2947 /*
2948 * There are only a few SMF errors at this point, but
2949 * it is also possible that a bad value may have put
2950 * the service into maintenance if there wasn't an
2951 * SMF level error.
2952 */
2953 if (ret != 0) {
2954 (void) fprintf(stderr,
2955 dgettext(TEXT_DOMAIN,
2956 "%s failed to restart: %s\n"),
2957 service, scf_strerror(scf_error()));
2958 } else {
2959 /*
2960 * Check whether it has gone to "maintenance"
2961 * mode or not. Maintenance implies something
2962 * went wrong.
2963 */
2964 if (service_in_state(service,
2965 SCF_STATE_STRING_MAINT)) {
2966 (void) fprintf(stderr,
2967 dgettext(TEXT_DOMAIN,
2968 "%s failed to restart\n"),
2969 service);
2970 }
2971 }
2972 }
2973 svcs &= ~mask;
2974 }
2975 }
2976
2977 /*
2978 * nfs_minmax_check(name, value)
2979 *
2980 * Verify that the value for the property specified by index is valid
2981 * relative to the opposite value in the case of a min/max variable.
2982 * Currently, server_minvers/server_maxvers and
2983 * client_minvers/client_maxvers are the only ones to check.
2984 */
2985
2986 static int
nfs_minmax_check(int index,int value)2987 nfs_minmax_check(int index, int value)
2988 {
2989 int val;
2990 char *pval;
2991 sa_property_t prop;
2992 sa_optionset_t opts;
2993 int ret = B_TRUE;
2994
2995 if (proto_options[index].other != NULL) {
2996 /* have a property to compare against */
2997 opts = nfs_get_proto_set();
2998 prop = sa_get_property(opts, proto_options[index].other);
2999 /*
3000 * If we don't find the property, assume default
3001 * values which will work since the max will be at the
3002 * max and the min at the min.
3003 */
3004 if (prop != NULL) {
3005 pval = sa_get_property_attr(prop, "value");
3006 if (pval != NULL) {
3007 val = strtoul(pval, NULL, 0);
3008 if (proto_options[index].compare ==
3009 OPT_CMP_LE) {
3010 ret = value <= val ? B_TRUE : B_FALSE;
3011 } else if (proto_options[index].compare ==
3012 OPT_CMP_GE) {
3013 ret = value >= val ? B_TRUE : B_FALSE;
3014 }
3015 sa_free_attr_string(pval);
3016 }
3017 }
3018 }
3019 return (ret);
3020 }
3021
3022 /*
3023 * nfs_validate_proto_prop(index, name, value)
3024 *
3025 * Verify that the property specified by name can take the new
3026 * value. This is a sanity check to prevent bad values getting into
3027 * the default files. All values need to be checked against what is
3028 * allowed by their defined type. If a type isn't explicitly defined
3029 * here, it is treated as a string.
3030 *
3031 * Note that OPT_TYPE_NUMBER will additionally check that the value is
3032 * within the range specified and potentially against another property
3033 * value as well as specified in the proto_options members other and
3034 * compare.
3035 */
3036
3037 static int
nfs_validate_proto_prop(int index,char * name,char * value)3038 nfs_validate_proto_prop(int index, char *name, char *value)
3039 {
3040 int ret = SA_OK;
3041 char *cp;
3042 #ifdef lint
3043 name = name;
3044 #endif
3045 switch (proto_options[index].type) {
3046 case OPT_TYPE_NUMBER:
3047 if (!is_a_number(value))
3048 ret = SA_BAD_VALUE;
3049 else {
3050 int val;
3051 val = strtoul(value, NULL, 0);
3052 if (val < proto_options[index].minval ||
3053 val > proto_options[index].maxval)
3054 ret = SA_BAD_VALUE;
3055 /*
3056 * For server_versmin/server_versmax and
3057 * client_versmin/client_versmax, the value of the
3058 * min(max) should be checked to be correct relative
3059 * to the current max(min).
3060 */
3061 if (!nfs_minmax_check(index, val)) {
3062 ret = SA_BAD_VALUE;
3063 }
3064 }
3065 break;
3066
3067 case OPT_TYPE_DOMAIN:
3068 /*
3069 * needs to be a qualified domain so will have at
3070 * least one period and other characters on either
3071 * side of it. A zero length string is also allowed
3072 * and is the way to turn off the override.
3073 */
3074 if (strlen(value) == 0)
3075 break;
3076 cp = strchr(value, '.');
3077 if (cp == NULL || cp == value || strchr(value, '@') != NULL)
3078 ret = SA_BAD_VALUE;
3079 break;
3080
3081 case OPT_TYPE_BOOLEAN:
3082 if (strlen(value) == 0 ||
3083 strcasecmp(value, "true") == 0 ||
3084 strcmp(value, "1") == 0 ||
3085 strcasecmp(value, "false") == 0 ||
3086 strcmp(value, "0") == 0) {
3087 ret = SA_OK;
3088 } else {
3089 ret = SA_BAD_VALUE;
3090 }
3091 break;
3092
3093 case OPT_TYPE_ONOFF:
3094 if (strcasecmp(value, "on") != 0 &&
3095 strcasecmp(value, "off") != 0) {
3096 ret = SA_BAD_VALUE;
3097 }
3098 break;
3099
3100 case OPT_TYPE_PROTOCOL:
3101 if (strlen(value) != 0 &&
3102 strcasecmp(value, "all") != 0 &&
3103 strcasecmp(value, "tcp") != 0 &&
3104 strcasecmp(value, "udp") != 0)
3105 ret = SA_BAD_VALUE;
3106 break;
3107
3108 default:
3109 /* treat as a string */
3110 break;
3111 }
3112 return (ret);
3113 }
3114
3115 /*
3116 * nfs_set_proto_prop(prop)
3117 *
3118 * check that prop is valid.
3119 */
3120
3121 static int
nfs_set_proto_prop(sa_property_t prop)3122 nfs_set_proto_prop(sa_property_t prop)
3123 {
3124 int ret = SA_OK;
3125 char *name;
3126 char *value;
3127
3128 name = sa_get_property_attr(prop, "type");
3129 value = sa_get_property_attr(prop, "value");
3130 if (name != NULL && value != NULL) {
3131 scf_type_t sctype;
3132 char *svc_name;
3133 char *instance = NULL;
3134 int index = findprotoopt(name, 1);
3135
3136 ret = nfs_validate_proto_prop(index, name, value);
3137 if (ret == SA_OK) {
3138 sctype = getscftype(proto_options[index].type);
3139 svc_name = getsvcname(proto_options[index].svcs);
3140 if (sctype == SCF_TYPE_BOOLEAN) {
3141 if (value != NULL)
3142 sa_free_attr_string(value);
3143 if (string_to_boolean(value) == 0)
3144 value = strdup("0");
3145 else
3146 value = strdup("1");
3147 }
3148 ret = nfs_smf_set_prop(name, value, instance, sctype,
3149 svc_name);
3150 if (ret == SA_OK) {
3151 restart_service(proto_options[index].svcs);
3152 } else {
3153 (void) printf(dgettext(TEXT_DOMAIN,
3154 "Cannot restart NFS services : %s\n"),
3155 sa_errorstr(ret));
3156 }
3157 }
3158 }
3159 if (name != NULL)
3160 sa_free_attr_string(name);
3161 if (value != NULL)
3162 sa_free_attr_string(value);
3163 return (ret);
3164 }
3165
3166 /*
3167 * nfs_get_status()
3168 *
3169 * What is the current status of the nfsd? We use the SMF state here.
3170 * Caller must free the returned value.
3171 */
3172
3173 static char *
nfs_get_status()3174 nfs_get_status()
3175 {
3176 return (smf_get_state(NFSD));
3177 }
3178
3179 /*
3180 * nfs_space_alias(alias)
3181 *
3182 * Lookup the space (security) name. If it is default, convert to the
3183 * real name.
3184 */
3185
3186 static char *
nfs_space_alias(char * space)3187 nfs_space_alias(char *space)
3188 {
3189 char *name = space;
3190 seconfig_t secconf;
3191
3192 /*
3193 * Only the space named "default" is special. If it is used,
3194 * the default needs to be looked up and the real name used.
3195 * This is normally "sys" but could be changed. We always
3196 * change default to the real name.
3197 */
3198 if (strcmp(space, "default") == 0 &&
3199 nfs_getseconfig_default(&secconf) == 0) {
3200 if (nfs_getseconfig_bynumber(secconf.sc_nfsnum, &secconf) == 0)
3201 name = secconf.sc_name;
3202 }
3203 return (strdup(name));
3204 }
3205
3206 /*
3207 * nfs_features()
3208 *
3209 * Return a mask of the features required.
3210 */
3211
3212 static uint64_t
nfs_features()3213 nfs_features()
3214 {
3215 return ((uint64_t)SA_FEATURE_DFSTAB | SA_FEATURE_SERVER);
3216 }
3217