2 * Unix SMB/Netbios implementation.
3 * Utility for managing share permissions
5 * Copyright (C) Tim Potter 2000
6 * Copyright (C) Jeremy Allison 2000
7 * Copyright (C) Jelmer Vernooij 2003
8 * Copyright (C) Gerald (Jerry) Carter 2005.
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 3 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, see <http://www.gnu.org/licenses/>.
26 #include "popt_common.h"
27 #include "../libcli/security/security.h"
28 #include "passdb/machine_sid.h"
30 static TALLOC_CTX
*ctx
;
32 enum acl_mode
{ SMB_ACL_DELETE
,
47 /* These values discovered by inspection */
49 static const struct perm_value special_values
[] = {
50 { "R", SEC_RIGHTS_FILE_READ
},
51 { "W", SEC_RIGHTS_FILE_WRITE
},
52 { "X", SEC_RIGHTS_FILE_EXECUTE
},
53 { "D", SEC_STD_DELETE
},
54 { "P", SEC_STD_WRITE_DAC
},
55 { "O", SEC_STD_WRITE_OWNER
},
59 #define SEC_RIGHTS_DIR_CHANGE ( SEC_RIGHTS_DIR_READ|SEC_STD_DELETE|\
60 SEC_RIGHTS_DIR_WRITE|SEC_DIR_TRAVERSE )
62 static const struct perm_value standard_values
[] = {
63 { "READ", SEC_RIGHTS_DIR_READ
|SEC_DIR_TRAVERSE
},
64 { "CHANGE", SEC_RIGHTS_DIR_CHANGE
},
65 { "FULL", SEC_RIGHTS_DIR_ALL
},
69 /********************************************************************
70 print an ACE on a FILE
71 ********************************************************************/
73 static void print_ace(FILE *f
, struct security_ace
*ace
)
75 const struct perm_value
*v
;
79 fprintf(f
, "%s:", sid_string_tos(&ace
->trustee
));
83 if (ace
->type
== SEC_ACE_TYPE_ACCESS_ALLOWED
) {
84 fprintf(f
, "ALLOWED");
85 } else if (ace
->type
== SEC_ACE_TYPE_ACCESS_DENIED
) {
88 fprintf(f
, "%d", ace
->type
);
91 /* Not sure what flags can be set in a file ACL */
93 fprintf(f
, "/%d/", ace
->flags
);
95 /* Standard permissions */
97 for (v
= standard_values
; v
->perm
; v
++) {
98 if (ace
->access_mask
== v
->mask
) {
99 fprintf(f
, "%s", v
->perm
);
104 /* Special permissions. Print out a hex value if we have
105 leftover bits in the mask. */
107 got_mask
= ace
->access_mask
;
110 for (v
= special_values
; v
->perm
; v
++) {
111 if ((ace
->access_mask
& v
->mask
) == v
->mask
) {
113 fprintf(f
, "%s", v
->perm
);
115 got_mask
&= ~v
->mask
;
121 fprintf(f
, "0x%08x", ace
->access_mask
);
129 /********************************************************************
130 print an ascii version of a security descriptor on a FILE handle
131 ********************************************************************/
133 static void sec_desc_print(FILE *f
, struct security_descriptor
*sd
)
137 fprintf(f
, "REVISION:%d\n", sd
->revision
);
139 /* Print owner and group sid */
141 fprintf(f
, "OWNER:%s\n", sid_string_tos(sd
->owner_sid
));
143 fprintf(f
, "GROUP:%s\n", sid_string_tos(sd
->group_sid
));
146 for (i
= 0; sd
->dacl
&& i
< sd
->dacl
->num_aces
; i
++) {
147 struct security_ace
*ace
= &sd
->dacl
->aces
[i
];
154 /********************************************************************
155 parse an ACE in the same format as print_ace()
156 ********************************************************************/
158 static bool parse_ace(struct security_ace
*ace
, const char *orig_str
)
163 unsigned int atype
= 0;
164 unsigned int aflags
= 0;
165 unsigned int amask
= 0;
168 const struct perm_value
*v
;
169 char *str
= SMB_STRDUP(orig_str
);
170 TALLOC_CTX
*frame
= talloc_stackframe();
178 p
= strchr_m(str
,':');
180 fprintf(stderr
, "ACE '%s': missing ':'.\n", orig_str
);
187 /* Try to parse numeric form */
189 if (sscanf(p
, "%i/%i/%i", &atype
, &aflags
, &amask
) == 3 &&
190 string_to_sid(&sid
, str
)) {
194 /* Try to parse text form */
196 if (!string_to_sid(&sid
, str
)) {
197 fprintf(stderr
, "ACE '%s': failed to convert '%s' to SID\n",
205 if (!next_token_talloc(frame
, &cp
, &tok
, "/")) {
206 fprintf(stderr
, "ACE '%s': failed to find '/' character.\n",
213 if (strncmp(tok
, "ALLOWED", strlen("ALLOWED")) == 0) {
214 atype
= SEC_ACE_TYPE_ACCESS_ALLOWED
;
215 } else if (strncmp(tok
, "DENIED", strlen("DENIED")) == 0) {
216 atype
= SEC_ACE_TYPE_ACCESS_DENIED
;
218 fprintf(stderr
, "ACE '%s': missing 'ALLOWED' or 'DENIED' "
219 "entry at '%s'\n", orig_str
, tok
);
225 /* Only numeric form accepted for flags at present */
226 /* no flags on share permissions */
228 if (!(next_token_talloc(frame
, &cp
, &tok
, "/") &&
229 sscanf(tok
, "%i", &aflags
) && aflags
== 0)) {
230 fprintf(stderr
, "ACE '%s': bad integer flags entry at '%s'\n",
237 if (!next_token_talloc(frame
, &cp
, &tok
, "/")) {
238 fprintf(stderr
, "ACE '%s': missing / at '%s'\n",
245 if (strncmp(tok
, "0x", 2) == 0) {
246 if (sscanf(tok
, "%i", &amask
) != 1) {
247 fprintf(stderr
, "ACE '%s': bad hex number at '%s'\n",
256 for (v
= standard_values
; v
->perm
; v
++) {
257 if (strcmp(tok
, v
->perm
) == 0) {
268 for (v
= special_values
; v
->perm
; v
++) {
269 if (v
->perm
[0] == *p
) {
276 fprintf(stderr
, "ACE '%s': bad permission value at "
277 "'%s'\n", orig_str
, p
);
293 init_sec_ace(ace
, &sid
, atype
, mask
, aflags
);
300 /********************************************************************
301 ********************************************************************/
303 static struct security_descriptor
* parse_acl_string(TALLOC_CTX
*mem_ctx
, const char *szACL
, size_t *sd_size
)
305 struct security_descriptor
*sd
= NULL
;
306 struct security_ace
*ace
;
307 struct security_acl
*theacl
;
316 num_ace
= count_chars( pacl
, ',' ) + 1;
318 if ( !(ace
= talloc_zero_array( mem_ctx
, struct security_ace
, num_ace
)) )
321 for ( i
=0; i
<num_ace
; i
++ ) {
322 char *end_acl
= strchr_m( pacl
, ',' );
325 strncpy( acl_string
, pacl
, MIN( PTR_DIFF( end_acl
, pacl
), sizeof(fstring
)-1) );
326 acl_string
[MIN( PTR_DIFF( end_acl
, pacl
), sizeof(fstring
)-1)] = '\0';
328 if ( !parse_ace( &ace
[i
], acl_string
) )
335 if ( !(theacl
= make_sec_acl( mem_ctx
, NT4_ACL_REVISION
, num_ace
, ace
)) )
338 sd
= make_sec_desc( mem_ctx
, SD_REVISION
, SEC_DESC_SELF_RELATIVE
,
339 NULL
, NULL
, NULL
, theacl
, sd_size
);
344 /* add an ACE to a list of ACEs in a struct security_acl */
345 static bool add_ace(TALLOC_CTX
*mem_ctx
, struct security_acl
**the_acl
, struct security_ace
*ace
)
347 struct security_acl
*new_ace
;
348 struct security_ace
*aces
;
350 return (((*the_acl
) = make_sec_acl(mem_ctx
, 3, 1, ace
)) != NULL
);
353 if (!(aces
= SMB_CALLOC_ARRAY(struct security_ace
, 1+(*the_acl
)->num_aces
))) {
356 memcpy(aces
, (*the_acl
)->aces
, (*the_acl
)->num_aces
* sizeof(struct
358 memcpy(aces
+(*the_acl
)->num_aces
, ace
, sizeof(struct security_ace
));
359 new_ace
= make_sec_acl(mem_ctx
,(*the_acl
)->revision
,1+(*the_acl
)->num_aces
, aces
);
361 (*the_acl
) = new_ace
;
365 /* The MSDN is contradictory over the ordering of ACE entries in an ACL.
366 However NT4 gives a "The information may have been modified by a
367 computer running Windows NT 5.0" if denied ACEs do not appear before
370 static int ace_compare(struct security_ace
*ace1
, struct security_ace
*ace2
)
372 if (sec_ace_equal(ace1
, ace2
))
375 if (ace1
->type
!= ace2
->type
)
376 return ace2
->type
- ace1
->type
;
378 if (dom_sid_compare(&ace1
->trustee
, &ace2
->trustee
))
379 return dom_sid_compare(&ace1
->trustee
, &ace2
->trustee
);
381 if (ace1
->flags
!= ace2
->flags
)
382 return ace1
->flags
- ace2
->flags
;
384 if (ace1
->access_mask
!= ace2
->access_mask
)
385 return ace1
->access_mask
- ace2
->access_mask
;
387 if (ace1
->size
!= ace2
->size
)
388 return ace1
->size
- ace2
->size
;
390 return memcmp(ace1
, ace2
, sizeof(struct security_ace
));
393 static void sort_acl(struct security_acl
*the_acl
)
396 if (!the_acl
) return;
398 TYPESAFE_QSORT(the_acl
->aces
, the_acl
->num_aces
, ace_compare
);
400 for (i
=1;i
<the_acl
->num_aces
;) {
401 if (sec_ace_equal(&the_acl
->aces
[i
-1], &the_acl
->aces
[i
])) {
403 for (j
=i
; j
<the_acl
->num_aces
-1; j
++) {
404 the_acl
->aces
[j
] = the_acl
->aces
[j
+1];
414 static int change_share_sec(TALLOC_CTX
*mem_ctx
, const char *sharename
, char *the_acl
, enum acl_mode mode
)
416 struct security_descriptor
*sd
= NULL
;
417 struct security_descriptor
*old
= NULL
;
421 if (mode
!= SMB_ACL_SET
&& mode
!= SMB_SD_DELETE
) {
422 if (!(old
= get_share_security( mem_ctx
, sharename
, &sd_size
)) ) {
423 fprintf(stderr
, "Unable to retrieve permissions for share "
424 "[%s]\n", sharename
);
429 if ( (mode
!= SMB_ACL_VIEW
&& mode
!= SMB_SD_DELETE
) &&
430 !(sd
= parse_acl_string(mem_ctx
, the_acl
, &sd_size
)) ) {
431 fprintf( stderr
, "Failed to parse acl\n");
436 case SMB_ACL_VIEW_ALL
:
437 /* should not happen */
440 sec_desc_print( stdout
, old
);
443 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
446 for (j
=0;old
->dacl
&& j
<old
->dacl
->num_aces
;j
++) {
447 if (sec_ace_equal(&sd
->dacl
->aces
[i
], &old
->dacl
->aces
[j
])) {
449 for (k
=j
; k
<old
->dacl
->num_aces
-1;k
++) {
450 old
->dacl
->aces
[k
] = old
->dacl
->aces
[k
+1];
452 old
->dacl
->num_aces
--;
459 printf("ACL for ACE:");
460 print_ace(stdout
, &sd
->dacl
->aces
[i
]);
461 printf(" not found\n");
466 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
469 for (j
=0;old
->dacl
&& j
<old
->dacl
->num_aces
;j
++) {
470 if (dom_sid_equal(&sd
->dacl
->aces
[i
].trustee
,
471 &old
->dacl
->aces
[j
].trustee
)) {
472 old
->dacl
->aces
[j
] = sd
->dacl
->aces
[i
];
478 printf("ACL for SID %s not found\n",
479 sid_string_tos(&sd
->dacl
->aces
[i
].trustee
));
484 old
->owner_sid
= sd
->owner_sid
;
488 old
->group_sid
= sd
->group_sid
;
492 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
493 add_ace(mem_ctx
, &old
->dacl
, &sd
->dacl
->aces
[i
]);
500 if (!delete_share_security(sharename
)) {
501 fprintf( stderr
, "Failed to delete security descriptor for "
502 "share [%s]\n", sharename
);
507 fprintf(stderr
, "invalid command\n");
511 /* Denied ACE entries must come before allowed ones */
514 if ( !set_share_security( sharename
, old
) ) {
515 fprintf( stderr
, "Failed to store acl for share [%s]\n", sharename
);
521 static int set_sharesec_sddl(const char *sharename
, const char *sddl
)
523 struct security_descriptor
*sd
;
526 sd
= sddl_decode(talloc_tos(), sddl
, get_global_sam_sid());
528 fprintf(stderr
, "Failed to parse acl\n");
532 ret
= set_share_security(sharename
, sd
);
535 fprintf(stderr
, "Failed to store acl for share [%s]\n",
543 static int view_sharesec_sddl(const char *sharename
)
545 struct security_descriptor
*sd
;
549 sd
= get_share_security(talloc_tos(), sharename
, &sd_size
);
551 fprintf(stderr
, "Unable to retrieve permissions for share "
552 "[%s]\n", sharename
);
556 acl
= sddl_encode(talloc_tos(), sd
, get_global_sam_sid());
559 fprintf(stderr
, "Unable to sddl-encode permissions for share "
560 "[%s]\n", sharename
);
568 /********************************************************************
570 ********************************************************************/
576 int main(int argc
, const char *argv
[])
580 enum acl_mode mode
= SMB_ACL_SET
;
581 static char *the_acl
= NULL
;
583 bool force_acl
= False
;
586 bool initialize_sid
= False
;
587 struct poptOption long_options
[] = {
589 { "remove", 'r', POPT_ARG_STRING
, &the_acl
, 'r', "Remove ACEs", "ACL" },
590 { "modify", 'm', POPT_ARG_STRING
, &the_acl
, 'm', "Modify existing ACEs", "ACL" },
591 { "add", 'a', POPT_ARG_STRING
, &the_acl
, 'a', "Add ACEs", "ACL" },
592 { "replace", 'R', POPT_ARG_STRING
, &the_acl
, 'R', "Overwrite share permission ACL", "ACLS" },
593 { "delete", 'D', POPT_ARG_NONE
, NULL
, 'D', "Delete the entire security descriptor" },
594 { "setsddl", 'S', POPT_ARG_STRING
, the_acl
, 'S',
595 "Set the SD in sddl format" },
596 { "viewsddl", 'V', POPT_ARG_NONE
, the_acl
, 'V',
597 "View the SD in sddl format" },
598 { "view", 'v', POPT_ARG_NONE
, NULL
, 'v', "View current share permissions" },
599 { "view-all", 0, POPT_ARG_NONE
, NULL
, OPT_VIEW_ALL
,
600 "View all current share permissions" },
601 { "machine-sid", 'M', POPT_ARG_NONE
, NULL
, 'M', "Initialize the machine SID" },
602 { "force", 'F', POPT_ARG_NONE
, NULL
, 'F', "Force storing the ACL", "ACLS" },
607 if ( !(ctx
= talloc_stackframe()) ) {
608 fprintf( stderr
, "Failed to initialize talloc context!\n");
612 /* set default debug level to 1 regardless of what smb.conf sets */
613 setup_logging( "sharesec", DEBUG_STDERR
);
617 lp_set_cmdline("log level", "1");
619 pc
= poptGetContext("sharesec", argc
, argv
, long_options
, 0);
621 poptSetOtherOptionHelp(pc
, "sharename\n");
623 while ((opt
= poptGetNextOpt(pc
)) != -1) {
626 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
627 mode
= SMB_ACL_DELETE
;
631 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
632 mode
= SMB_ACL_MODIFY
;
636 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
641 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
646 mode
= SMB_SD_DELETE
;
650 mode
= SMB_SD_SETSDDL
;
651 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
655 mode
= SMB_SD_VIEWSDDL
;
667 initialize_sid
= True
;
670 mode
= SMB_ACL_VIEW_ALL
;
677 lp_load_with_registry_shares( get_dyn_CONFIGFILE(), False
, False
, False
,
680 /* check for initializing secrets.tdb first */
682 if ( initialize_sid
) {
683 struct dom_sid
*sid
= get_global_sam_sid();
686 fprintf( stderr
, "Failed to retrieve Machine SID!\n");
690 printf ("%s\n", sid_string_tos( sid
) );
694 if ( mode
== SMB_ACL_VIEW
&& force_acl
) {
695 fprintf( stderr
, "Invalid combination of -F and -v\n");
699 if (mode
== SMB_ACL_VIEW_ALL
) {
702 for (i
=0; i
<lp_numservices(); i
++) {
703 TALLOC_CTX
*frame
= talloc_stackframe();
704 const char *service
= lp_servicename(frame
, i
);
706 if (service
== NULL
) {
710 printf("[%s]\n", service
);
711 change_share_sec(frame
, service
, NULL
, SMB_ACL_VIEW
);
718 /* get the sharename */
720 if(!poptPeekArg(pc
)) {
721 poptPrintUsage(pc
, stderr
, 0);
725 fstrcpy(sharename
, poptGetArg(pc
));
727 snum
= lp_servicenumber( sharename
);
729 if ( snum
== -1 && !force_acl
) {
730 fprintf( stderr
, "Invalid sharename: %s\n", sharename
);
736 retval
= set_sharesec_sddl(sharename
, the_acl
);
738 case SMB_SD_VIEWSDDL
:
739 retval
= view_sharesec_sddl(sharename
);
742 retval
= change_share_sec(ctx
, sharename
, the_acl
, mode
);