2 Unix SMB/CIFS implementation.
5 Copyright (C) Andrew Tridgell 2000
6 Copyright (C) Tim Potter 2000
7 Copyright (C) Jeremy Allison 2000
8 Copyright (C) Jelmer Vernooij 2003
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/>.
25 #include "popt_common.h"
26 #include "rpc_client/cli_pipe.h"
27 #include "../librpc/gen_ndr/ndr_lsa.h"
28 #include "rpc_client/cli_lsarpc.h"
29 #include "../libcli/security/security.h"
30 #include "libsmb/libsmb.h"
31 #include "libsmb/clirap.h"
32 #include "passdb/machine_sid.h"
33 #include "../librpc/gen_ndr/ndr_lsa_c.h"
37 #define CREATE_ACCESS_READ READ_CONTROL_ACCESS
39 /* numeric is set when the user wants numeric SIDs and ACEs rather
40 than going via LSA calls to resolve them */
45 static const char *domain_sid
= NULL
;
47 enum acl_mode
{SMB_ACL_SET
, SMB_ACL_DELETE
, SMB_ACL_MODIFY
, SMB_ACL_ADD
};
48 enum chown_mode
{REQUEST_NONE
, REQUEST_CHOWN
, REQUEST_CHGRP
, REQUEST_INHERIT
};
49 enum exit_values
{EXIT_OK
, EXIT_FAILED
, EXIT_PARSE_ERROR
};
56 /* These values discovered by inspection */
58 static const struct perm_value special_values
[] = {
68 static const struct perm_value standard_values
[] = {
69 { "READ", 0x001200a9 },
70 { "CHANGE", 0x001301bf },
71 { "FULL", 0x001f01ff },
75 /* Open cli connection and policy handle */
77 static NTSTATUS
cli_lsa_lookup_sid(struct cli_state
*cli
,
78 const struct dom_sid
*sid
,
80 enum lsa_SidType
*type
,
81 char **domain
, char **name
)
83 uint16 orig_cnum
= cli_state_get_tid(cli
);
84 struct rpc_pipe_client
*p
= NULL
;
85 struct policy_handle handle
;
87 TALLOC_CTX
*frame
= talloc_stackframe();
88 enum lsa_SidType
*types
;
92 status
= cli_tree_connect(cli
, "IPC$", "?????", "", 0);
93 if (!NT_STATUS_IS_OK(status
)) {
97 status
= cli_rpc_pipe_open_noauth(cli
, &ndr_table_lsarpc
.syntax_id
,
99 if (!NT_STATUS_IS_OK(status
)) {
103 status
= rpccli_lsa_open_policy(p
, talloc_tos(), True
,
104 GENERIC_EXECUTE_ACCESS
, &handle
);
105 if (!NT_STATUS_IS_OK(status
)) {
109 status
= rpccli_lsa_lookup_sids(p
, talloc_tos(), &handle
, 1, sid
,
110 &domains
, &names
, &types
);
111 if (!NT_STATUS_IS_OK(status
)) {
116 *domain
= talloc_move(mem_ctx
, &domains
[0]);
117 *name
= talloc_move(mem_ctx
, &names
[0]);
119 status
= NT_STATUS_OK
;
124 cli_state_set_tid(cli
, orig_cnum
);
129 static NTSTATUS
cli_lsa_lookup_name(struct cli_state
*cli
,
131 enum lsa_SidType
*type
,
134 uint16 orig_cnum
= cli_state_get_tid(cli
);
135 struct rpc_pipe_client
*p
;
136 struct policy_handle handle
;
138 TALLOC_CTX
*frame
= talloc_stackframe();
139 struct dom_sid
*sids
;
140 enum lsa_SidType
*types
;
142 status
= cli_tree_connect(cli
, "IPC$", "?????", "", 0);
143 if (!NT_STATUS_IS_OK(status
)) {
147 status
= cli_rpc_pipe_open_noauth(cli
, &ndr_table_lsarpc
.syntax_id
,
149 if (!NT_STATUS_IS_OK(status
)) {
153 status
= rpccli_lsa_open_policy(p
, talloc_tos(), True
,
154 GENERIC_EXECUTE_ACCESS
, &handle
);
155 if (!NT_STATUS_IS_OK(status
)) {
159 status
= rpccli_lsa_lookup_names(p
, talloc_tos(), &handle
, 1, &name
,
160 NULL
, 1, &sids
, &types
);
161 if (!NT_STATUS_IS_OK(status
)) {
168 status
= NT_STATUS_OK
;
173 cli_state_set_tid(cli
, orig_cnum
);
179 static NTSTATUS
cli_lsa_lookup_domain_sid(struct cli_state
*cli
,
182 union lsa_PolicyInformation
*info
= NULL
;
183 uint16 orig_cnum
= cli_state_get_tid(cli
);
184 struct rpc_pipe_client
*rpc_pipe
= NULL
;
185 struct policy_handle handle
;
186 NTSTATUS status
, result
;
187 TALLOC_CTX
*frame
= talloc_stackframe();
188 const struct ndr_syntax_id
*lsarpc_syntax
= &ndr_table_lsarpc
.syntax_id
;
190 status
= cli_tcon_andx(cli
, "IPC$", "?????", "", 0);
191 if (!NT_STATUS_IS_OK(status
)) {
195 status
= cli_rpc_pipe_open_noauth(cli
, lsarpc_syntax
, &rpc_pipe
);
196 if (!NT_STATUS_IS_OK(status
)) {
200 status
= rpccli_lsa_open_policy(rpc_pipe
, frame
, True
,
201 GENERIC_EXECUTE_ACCESS
, &handle
);
202 if (!NT_STATUS_IS_OK(status
)) {
206 status
= dcerpc_lsa_QueryInfoPolicy2(rpc_pipe
->binding_handle
,
208 LSA_POLICY_INFO_DOMAIN
,
211 if (any_nt_status_not_ok(status
, result
, &status
)) {
215 *sid
= *info
->domain
.sid
;
218 TALLOC_FREE(rpc_pipe
);
221 cli_state_set_tid(cli
, orig_cnum
);
226 static struct dom_sid
*get_domain_sid(struct cli_state
*cli
)
230 struct dom_sid
*sid
= talloc(talloc_tos(), struct dom_sid
);
232 DEBUG(0, ("Out of memory\n"));
237 if (!dom_sid_parse(domain_sid
, sid
)) {
238 DEBUG(0,("failed to parse domain sid\n"));
242 status
= cli_lsa_lookup_domain_sid(cli
, sid
);
244 if (!NT_STATUS_IS_OK(status
)) {
245 DEBUG(0,("failed to lookup domain sid: %s\n", nt_errstr(status
)));
251 DEBUG(2,("Domain SID: %s\n", sid_string_dbg(sid
)));
256 /* convert a SID to a string, either numeric or username/group */
257 static void SidToString(struct cli_state
*cli
, fstring str
, const struct dom_sid
*sid
)
261 enum lsa_SidType type
;
264 sid_to_fstring(str
, sid
);
270 status
= cli_lsa_lookup_sid(cli
, sid
, talloc_tos(), &type
,
273 if (!NT_STATUS_IS_OK(status
)) {
278 slprintf(str
, sizeof(fstring
) - 1, "%s%s%s",
279 domain
, lp_winbind_separator(), name
);
285 /* convert a string to a SID, either numeric or username/group */
286 static bool StringToSid(struct cli_state
*cli
, struct dom_sid
*sid
, const char *str
)
288 enum lsa_SidType type
;
290 if (string_to_sid(sid
, str
)) {
294 return NT_STATUS_IS_OK(cli_lsa_lookup_name(cli
, str
, &type
, sid
));
297 static void print_ace_flags(FILE *f
, uint8_t flags
)
299 char *str
= talloc_strdup(NULL
, "");
305 if (flags
& SEC_ACE_FLAG_OBJECT_INHERIT
) {
306 str
= talloc_asprintf(str
, "%s%s",
312 if (flags
& SEC_ACE_FLAG_CONTAINER_INHERIT
) {
313 str
= talloc_asprintf(str
, "%s%s",
319 if (flags
& SEC_ACE_FLAG_NO_PROPAGATE_INHERIT
) {
320 str
= talloc_asprintf(str
, "%s%s",
326 if (flags
& SEC_ACE_FLAG_INHERIT_ONLY
) {
327 str
= talloc_asprintf(str
, "%s%s",
333 if (flags
& SEC_ACE_FLAG_INHERITED_ACE
) {
334 str
= talloc_asprintf(str
, "%s%s",
340 /* Ignore define SEC_ACE_FLAG_SUCCESSFUL_ACCESS ( 0x40 )
341 and SEC_ACE_FLAG_FAILED_ACCESS ( 0x80 ) as they're
344 if (str
[strlen(str
)-1] == '|') {
345 str
[strlen(str
)-1] = '\0';
346 fprintf(f
, "/%s/", str
);
348 fprintf(f
, "/0x%x/", flags
);
354 fprintf(f
, "/0x%x/", flags
);
357 /* print an ACE on a FILE, using either numeric or ascii representation */
358 static void print_ace(struct cli_state
*cli
, FILE *f
, struct security_ace
*ace
)
360 const struct perm_value
*v
;
365 SidToString(cli
, sidstr
, &ace
->trustee
);
367 fprintf(f
, "%s:", sidstr
);
370 fprintf(f
, "%d/0x%x/0x%08x",
371 ace
->type
, ace
->flags
, ace
->access_mask
);
377 if (ace
->type
== SEC_ACE_TYPE_ACCESS_ALLOWED
) {
378 fprintf(f
, "ALLOWED");
379 } else if (ace
->type
== SEC_ACE_TYPE_ACCESS_DENIED
) {
380 fprintf(f
, "DENIED");
382 fprintf(f
, "%d", ace
->type
);
385 print_ace_flags(f
, ace
->flags
);
387 /* Standard permissions */
389 for (v
= standard_values
; v
->perm
; v
++) {
390 if (ace
->access_mask
== v
->mask
) {
391 fprintf(f
, "%s", v
->perm
);
396 /* Special permissions. Print out a hex value if we have
397 leftover bits in the mask. */
399 got_mask
= ace
->access_mask
;
402 for (v
= special_values
; v
->perm
; v
++) {
403 if ((ace
->access_mask
& v
->mask
) == v
->mask
) {
405 fprintf(f
, "%s", v
->perm
);
407 got_mask
&= ~v
->mask
;
413 fprintf(f
, "0x%08x", ace
->access_mask
);
421 static bool parse_ace_flags(const char *str
, unsigned int *pflags
)
427 if (strnequal(p
, "OI", 2)) {
428 *pflags
|= SEC_ACE_FLAG_OBJECT_INHERIT
;
430 } else if (strnequal(p
, "CI", 2)) {
431 *pflags
|= SEC_ACE_FLAG_CONTAINER_INHERIT
;
433 } else if (strnequal(p
, "NP", 2)) {
434 *pflags
|= SEC_ACE_FLAG_NO_PROPAGATE_INHERIT
;
436 } else if (strnequal(p
, "IO", 2)) {
437 *pflags
|= SEC_ACE_FLAG_INHERIT_ONLY
;
439 } else if (*p
== 'I') {
440 *pflags
|= SEC_ACE_FLAG_INHERITED_ACE
;
458 /* parse an ACE in the same format as print_ace() */
459 static bool parse_ace(struct cli_state
*cli
, struct security_ace
*ace
,
460 const char *orig_str
)
465 unsigned int atype
= 0;
466 unsigned int aflags
= 0;
467 unsigned int amask
= 0;
470 const struct perm_value
*v
;
471 char *str
= SMB_STRDUP(orig_str
);
472 TALLOC_CTX
*frame
= talloc_stackframe();
480 p
= strchr_m(str
,':');
482 printf("ACE '%s': missing ':'.\n", orig_str
);
489 /* Try to parse numeric form */
491 if (sscanf(p
, "%i/%i/%i", &atype
, &aflags
, &amask
) == 3 &&
492 StringToSid(cli
, &sid
, str
)) {
496 /* Try to parse text form */
498 if (!StringToSid(cli
, &sid
, str
)) {
499 printf("ACE '%s': failed to convert '%s' to SID\n",
507 if (!next_token_talloc(frame
, &cp
, &tok
, "/")) {
508 printf("ACE '%s': failed to find '/' character.\n",
515 if (strncmp(tok
, "ALLOWED", strlen("ALLOWED")) == 0) {
516 atype
= SEC_ACE_TYPE_ACCESS_ALLOWED
;
517 } else if (strncmp(tok
, "DENIED", strlen("DENIED")) == 0) {
518 atype
= SEC_ACE_TYPE_ACCESS_DENIED
;
520 printf("ACE '%s': missing 'ALLOWED' or 'DENIED' entry at '%s'\n",
527 /* Only numeric form accepted for flags at present */
529 if (!next_token_talloc(frame
, &cp
, &tok
, "/")) {
530 printf("ACE '%s': bad flags entry at '%s'\n",
537 if (tok
[0] < '0' || tok
[0] > '9') {
538 if (!parse_ace_flags(tok
, &aflags
)) {
539 printf("ACE '%s': bad named flags entry at '%s'\n",
545 } else if (strnequal(tok
, "0x", 2)) {
546 if (!sscanf(tok
, "%x", &aflags
)) {
547 printf("ACE '%s': bad hex flags entry at '%s'\n",
554 if (!sscanf(tok
, "%i", &aflags
)) {
555 printf("ACE '%s': bad integer flags entry at '%s'\n",
563 if (!next_token_talloc(frame
, &cp
, &tok
, "/")) {
564 printf("ACE '%s': missing / at '%s'\n",
571 if (strncmp(tok
, "0x", 2) == 0) {
572 if (sscanf(tok
, "%i", &amask
) != 1) {
573 printf("ACE '%s': bad hex number at '%s'\n",
582 for (v
= standard_values
; v
->perm
; v
++) {
583 if (strcmp(tok
, v
->perm
) == 0) {
594 for (v
= special_values
; v
->perm
; v
++) {
595 if (v
->perm
[0] == *p
) {
602 printf("ACE '%s': bad permission value at '%s'\n",
619 init_sec_ace(ace
, &sid
, atype
, mask
, aflags
);
625 /* add an ACE to a list of ACEs in a struct security_acl */
626 static bool add_ace(struct security_acl
**the_acl
, struct security_ace
*ace
)
628 struct security_acl
*new_ace
;
629 struct security_ace
*aces
;
631 return (((*the_acl
) = make_sec_acl(talloc_tos(), 3, 1, ace
))
635 if (!(aces
= SMB_CALLOC_ARRAY(struct security_ace
, 1+(*the_acl
)->num_aces
))) {
638 memcpy(aces
, (*the_acl
)->aces
, (*the_acl
)->num_aces
* sizeof(struct
640 memcpy(aces
+(*the_acl
)->num_aces
, ace
, sizeof(struct security_ace
));
641 new_ace
= make_sec_acl(talloc_tos(),(*the_acl
)->revision
,1+(*the_acl
)->num_aces
, aces
);
643 (*the_acl
) = new_ace
;
647 /* parse a ascii version of a security descriptor */
648 static struct security_descriptor
*sec_desc_parse(TALLOC_CTX
*ctx
, struct cli_state
*cli
, char *str
)
652 struct security_descriptor
*ret
= NULL
;
654 struct dom_sid
*grp_sid
=NULL
, *owner_sid
=NULL
;
655 struct security_acl
*dacl
=NULL
;
658 while (next_token_talloc(ctx
, &p
, &tok
, "\t,\r\n")) {
659 if (strncmp(tok
,"REVISION:", 9) == 0) {
660 revision
= strtol(tok
+9, NULL
, 16);
664 if (strncmp(tok
,"OWNER:", 6) == 0) {
666 printf("Only specify owner once\n");
669 owner_sid
= SMB_CALLOC_ARRAY(struct dom_sid
, 1);
671 !StringToSid(cli
, owner_sid
, tok
+6)) {
672 printf("Failed to parse owner sid\n");
678 if (strncmp(tok
,"GROUP:", 6) == 0) {
680 printf("Only specify group once\n");
683 grp_sid
= SMB_CALLOC_ARRAY(struct dom_sid
, 1);
685 !StringToSid(cli
, grp_sid
, tok
+6)) {
686 printf("Failed to parse group sid\n");
692 if (strncmp(tok
,"ACL:", 4) == 0) {
693 struct security_ace ace
;
694 if (!parse_ace(cli
, &ace
, tok
+4)) {
697 if(!add_ace(&dacl
, &ace
)) {
698 printf("Failed to add ACL %s\n", tok
);
704 printf("Failed to parse token '%s' in security descriptor,\n", tok
);
708 ret
= make_sec_desc(ctx
,revision
, SEC_DESC_SELF_RELATIVE
, owner_sid
, grp_sid
,
709 NULL
, dacl
, &sd_size
);
713 SAFE_FREE(owner_sid
);
718 static const struct {
722 } sec_desc_ctrl_bits
[] = {
723 {SEC_DESC_OWNER_DEFAULTED
, "OD", "Owner Defaulted"},
724 {SEC_DESC_GROUP_DEFAULTED
, "GD", "Group Defaulted"},
725 {SEC_DESC_DACL_PRESENT
, "DP", "DACL Present"},
726 {SEC_DESC_DACL_DEFAULTED
, "DD", "DACL Defaulted"},
727 {SEC_DESC_SACL_PRESENT
, "SP", "SACL Present"},
728 {SEC_DESC_SACL_DEFAULTED
, "SD", "SACL Defaulted"},
729 {SEC_DESC_DACL_TRUSTED
, "DT", "DACL Trusted"},
730 {SEC_DESC_SERVER_SECURITY
, "SS", "Server Security"},
731 {SEC_DESC_DACL_AUTO_INHERIT_REQ
, "DR", "DACL Inheritance Required"},
732 {SEC_DESC_SACL_AUTO_INHERIT_REQ
, "SR", "SACL Inheritance Required"},
733 {SEC_DESC_DACL_AUTO_INHERITED
, "DI", "DACL Auto Inherited"},
734 {SEC_DESC_SACL_AUTO_INHERITED
, "SI", "SACL Auto Inherited"},
735 {SEC_DESC_DACL_PROTECTED
, "PD", "DACL Protected"},
736 {SEC_DESC_SACL_PROTECTED
, "PS", "SACL Protected"},
737 {SEC_DESC_RM_CONTROL_VALID
, "RM", "RM Control Valid"},
738 {SEC_DESC_SELF_RELATIVE
, "SR", "Self Relative"},
741 static void print_acl_ctrl(FILE *file
, uint16_t ctrl
)
744 const char* separator
= "";
746 fprintf(file
, "CONTROL:");
748 fprintf(file
, "0x%x\n", ctrl
);
752 for (i
= ARRAY_SIZE(sec_desc_ctrl_bits
) - 1; i
>= 0; i
--) {
753 if (ctrl
& sec_desc_ctrl_bits
[i
].mask
) {
754 fprintf(file
, "%s%s", separator
, sec_desc_ctrl_bits
[i
].str
);
761 /* print a ascii version of a security descriptor on a FILE handle */
762 static void sec_desc_print(struct cli_state
*cli
, FILE *f
, struct security_descriptor
*sd
)
767 fprintf(f
, "REVISION:%d\n", sd
->revision
);
768 print_acl_ctrl(f
, sd
->type
);
770 /* Print owner and group sid */
773 SidToString(cli
, sidstr
, sd
->owner_sid
);
778 fprintf(f
, "OWNER:%s\n", sidstr
);
781 SidToString(cli
, sidstr
, sd
->group_sid
);
786 fprintf(f
, "GROUP:%s\n", sidstr
);
789 for (i
= 0; sd
->dacl
&& i
< sd
->dacl
->num_aces
; i
++) {
790 struct security_ace
*ace
= &sd
->dacl
->aces
[i
];
792 print_ace(cli
, f
, ace
);
798 /*****************************************************
799 get fileinfo for filename
800 *******************************************************/
801 static uint16
get_fileinfo(struct cli_state
*cli
, const char *filename
)
803 uint16_t fnum
= (uint16_t)-1;
807 /* The desired access below is the only one I could find that works
808 with NT4, W2KP and Samba */
810 status
= cli_ntcreate(cli
, filename
, 0, CREATE_ACCESS_READ
,
811 0, FILE_SHARE_READ
|FILE_SHARE_WRITE
,
812 FILE_OPEN
, 0x0, 0x0, &fnum
);
813 if (!NT_STATUS_IS_OK(status
)) {
814 printf("Failed to open %s: %s\n", filename
, nt_errstr(status
));
818 status
= cli_qfileinfo_basic(cli
, fnum
, &mode
, NULL
, NULL
, NULL
,
820 if (!NT_STATUS_IS_OK(status
)) {
821 printf("Failed to file info %s: %s\n", filename
,
825 cli_close(cli
, fnum
);
830 /*****************************************************
831 get sec desc for filename
832 *******************************************************/
833 static struct security_descriptor
*get_secdesc(struct cli_state
*cli
, const char *filename
)
835 uint16_t fnum
= (uint16_t)-1;
836 struct security_descriptor
*sd
;
839 /* The desired access below is the only one I could find that works
840 with NT4, W2KP and Samba */
842 status
= cli_ntcreate(cli
, filename
, 0, CREATE_ACCESS_READ
,
843 0, FILE_SHARE_READ
|FILE_SHARE_WRITE
,
844 FILE_OPEN
, 0x0, 0x0, &fnum
);
845 if (!NT_STATUS_IS_OK(status
)) {
846 printf("Failed to open %s: %s\n", filename
, nt_errstr(status
));
850 status
= cli_query_secdesc(cli
, fnum
, talloc_tos(), &sd
);
852 cli_close(cli
, fnum
);
854 if (!NT_STATUS_IS_OK(status
)) {
855 printf("Failed to get security descriptor: %s\n",
862 /*****************************************************
863 set sec desc for filename
864 *******************************************************/
865 static bool set_secdesc(struct cli_state
*cli
, const char *filename
,
866 struct security_descriptor
*sd
)
868 uint16_t fnum
= (uint16_t)-1;
872 /* The desired access below is the only one I could find that works
873 with NT4, W2KP and Samba */
875 status
= cli_ntcreate(cli
, filename
, 0,
876 WRITE_DAC_ACCESS
|WRITE_OWNER_ACCESS
,
877 0, FILE_SHARE_READ
|FILE_SHARE_WRITE
,
878 FILE_OPEN
, 0x0, 0x0, &fnum
);
879 if (!NT_STATUS_IS_OK(status
)) {
880 printf("Failed to open %s: %s\n", filename
, nt_errstr(status
));
884 status
= cli_set_secdesc(cli
, fnum
, sd
);
885 if (!NT_STATUS_IS_OK(status
)) {
886 printf("ERROR: security description set failed: %s\n",
891 cli_close(cli
, fnum
);
895 /*****************************************************
896 dump the acls for a file
897 *******************************************************/
898 static int cacl_dump(struct cli_state
*cli
, const char *filename
)
900 struct security_descriptor
*sd
;
906 sd
= get_secdesc(cli
, filename
);
912 char *str
= sddl_encode(talloc_tos(), sd
, get_domain_sid(cli
));
919 sec_desc_print(cli
, stdout
, sd
);
925 /*****************************************************
926 Change the ownership or group ownership of a file. Just
927 because the NT docs say this can't be done :-). JRA.
928 *******************************************************/
930 static int owner_set(struct cli_state
*cli
, enum chown_mode change_mode
,
931 const char *filename
, const char *new_username
)
934 struct security_descriptor
*sd
, *old
;
937 if (!StringToSid(cli
, &sid
, new_username
))
938 return EXIT_PARSE_ERROR
;
940 old
= get_secdesc(cli
, filename
);
946 sd
= make_sec_desc(talloc_tos(),old
->revision
, old
->type
,
947 (change_mode
== REQUEST_CHOWN
) ? &sid
: NULL
,
948 (change_mode
== REQUEST_CHGRP
) ? &sid
: NULL
,
949 NULL
, NULL
, &sd_size
);
951 if (!set_secdesc(cli
, filename
, sd
)) {
959 /* The MSDN is contradictory over the ordering of ACE entries in an
960 ACL. However NT4 gives a "The information may have been modified
961 by a computer running Windows NT 5.0" if denied ACEs do not appear
962 before allowed ACEs. At
963 http://technet.microsoft.com/en-us/library/cc781716.aspx the
964 canonical order is specified as "Explicit Deny, Explicit Allow,
965 Inherited ACEs unchanged" */
967 static int ace_compare(struct security_ace
*ace1
, struct security_ace
*ace2
)
969 if (sec_ace_equal(ace1
, ace2
))
972 if ((ace1
->flags
& SEC_ACE_FLAG_INHERITED_ACE
) &&
973 !(ace2
->flags
& SEC_ACE_FLAG_INHERITED_ACE
))
975 if (!(ace1
->flags
& SEC_ACE_FLAG_INHERITED_ACE
) &&
976 (ace2
->flags
& SEC_ACE_FLAG_INHERITED_ACE
))
978 if ((ace1
->flags
& SEC_ACE_FLAG_INHERITED_ACE
) &&
979 (ace2
->flags
& SEC_ACE_FLAG_INHERITED_ACE
))
982 if (ace1
->type
!= ace2
->type
)
983 return ace2
->type
- ace1
->type
;
985 if (dom_sid_compare(&ace1
->trustee
, &ace2
->trustee
))
986 return dom_sid_compare(&ace1
->trustee
, &ace2
->trustee
);
988 if (ace1
->flags
!= ace2
->flags
)
989 return ace1
->flags
- ace2
->flags
;
991 if (ace1
->access_mask
!= ace2
->access_mask
)
992 return ace1
->access_mask
- ace2
->access_mask
;
994 if (ace1
->size
!= ace2
->size
)
995 return ace1
->size
- ace2
->size
;
997 return memcmp(ace1
, ace2
, sizeof(struct security_ace
));
1000 static void sort_acl(struct security_acl
*the_acl
)
1003 if (!the_acl
) return;
1005 TYPESAFE_QSORT(the_acl
->aces
, the_acl
->num_aces
, ace_compare
);
1007 for (i
=1;i
<the_acl
->num_aces
;) {
1008 if (sec_ace_equal(&the_acl
->aces
[i
-1], &the_acl
->aces
[i
])) {
1010 for (j
=i
; j
<the_acl
->num_aces
-1; j
++) {
1011 the_acl
->aces
[j
] = the_acl
->aces
[j
+1];
1013 the_acl
->num_aces
--;
1020 /*****************************************************
1021 set the ACLs on a file given an ascii description
1022 *******************************************************/
1024 static int cacl_set(struct cli_state
*cli
, const char *filename
,
1025 char *the_acl
, enum acl_mode mode
)
1027 struct security_descriptor
*sd
, *old
;
1030 int result
= EXIT_OK
;
1033 sd
= sddl_decode(talloc_tos(), the_acl
, get_domain_sid(cli
));
1035 sd
= sec_desc_parse(talloc_tos(), cli
, the_acl
);
1038 if (!sd
) return EXIT_PARSE_ERROR
;
1039 if (test_args
) return EXIT_OK
;
1041 old
= get_secdesc(cli
, filename
);
1047 /* the logic here is rather more complex than I would like */
1049 case SMB_ACL_DELETE
:
1050 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
1053 for (j
=0;old
->dacl
&& j
<old
->dacl
->num_aces
;j
++) {
1054 if (sec_ace_equal(&sd
->dacl
->aces
[i
],
1055 &old
->dacl
->aces
[j
])) {
1057 for (k
=j
; k
<old
->dacl
->num_aces
-1;k
++) {
1058 old
->dacl
->aces
[k
] = old
->dacl
->aces
[k
+1];
1060 old
->dacl
->num_aces
--;
1067 printf("ACL for ACE:");
1068 print_ace(cli
, stdout
, &sd
->dacl
->aces
[i
]);
1069 printf(" not found\n");
1074 case SMB_ACL_MODIFY
:
1075 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
1078 for (j
=0;old
->dacl
&& j
<old
->dacl
->num_aces
;j
++) {
1079 if (dom_sid_equal(&sd
->dacl
->aces
[i
].trustee
,
1080 &old
->dacl
->aces
[j
].trustee
)) {
1081 old
->dacl
->aces
[j
] = sd
->dacl
->aces
[i
];
1089 SidToString(cli
, str
,
1090 &sd
->dacl
->aces
[i
].trustee
);
1091 printf("ACL for SID %s not found\n", str
);
1095 if (sd
->owner_sid
) {
1096 old
->owner_sid
= sd
->owner_sid
;
1099 if (sd
->group_sid
) {
1100 old
->group_sid
= sd
->group_sid
;
1106 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
1107 add_ace(&old
->dacl
, &sd
->dacl
->aces
[i
]);
1116 /* Denied ACE entries must come before allowed ones */
1117 sort_acl(old
->dacl
);
1119 /* Create new security descriptor and set it */
1121 /* We used to just have "WRITE_DAC_ACCESS" without WRITE_OWNER.
1122 But if we're sending an owner, even if it's the same as the one
1123 that already exists then W2K3 insists we open with WRITE_OWNER access.
1124 I need to check that setting a SD with no owner set works against WNT
1128 sd
= make_sec_desc(talloc_tos(),old
->revision
, old
->type
,
1129 old
->owner_sid
, old
->group_sid
,
1130 NULL
, old
->dacl
, &sd_size
);
1132 if (!set_secdesc(cli
, filename
, sd
)) {
1133 result
= EXIT_FAILED
;
1139 /*****************************************************
1140 set the inherit on a file
1141 *******************************************************/
1142 static int inherit(struct cli_state
*cli
, const char *filename
,
1145 struct security_descriptor
*old
,*sd
;
1148 int result
= EXIT_OK
;
1150 old
= get_secdesc(cli
, filename
);
1156 oldattr
= get_fileinfo(cli
,filename
);
1158 if (strcmp(type
,"allow")==0) {
1159 if ((old
->type
& SEC_DESC_DACL_PROTECTED
) ==
1160 SEC_DESC_DACL_PROTECTED
) {
1162 char *parentname
,*temp
;
1163 struct security_descriptor
*parent
;
1164 temp
= talloc_strdup(talloc_tos(), filename
);
1166 old
->type
=old
->type
& (~SEC_DESC_DACL_PROTECTED
);
1168 /* look at parent and copy in all its inheritable ACL's. */
1169 string_replace(temp
, '\\', '/');
1170 if (!parent_dirname(talloc_tos(),temp
,&parentname
,NULL
)) {
1173 string_replace(parentname
, '/', '\\');
1174 parent
= get_secdesc(cli
,parentname
);
1175 if (parent
== NULL
) {
1178 for (i
=0;i
<parent
->dacl
->num_aces
;i
++) {
1179 struct security_ace
*ace
=&parent
->dacl
->aces
[i
];
1180 /* Add inherited flag to all aces */
1181 ace
->flags
=ace
->flags
|
1182 SEC_ACE_FLAG_INHERITED_ACE
;
1183 if ((oldattr
& FILE_ATTRIBUTE_DIRECTORY
) == FILE_ATTRIBUTE_DIRECTORY
) {
1184 if ((ace
->flags
& SEC_ACE_FLAG_CONTAINER_INHERIT
) ==
1185 SEC_ACE_FLAG_CONTAINER_INHERIT
) {
1186 add_ace(&old
->dacl
, ace
);
1189 if ((ace
->flags
& SEC_ACE_FLAG_OBJECT_INHERIT
) ==
1190 SEC_ACE_FLAG_OBJECT_INHERIT
) {
1191 /* clear flags for files */
1193 add_ace(&old
->dacl
, ace
);
1198 printf("Already set to inheritable permissions.\n");
1201 } else if (strcmp(type
,"remove")==0) {
1202 if ((old
->type
& SEC_DESC_DACL_PROTECTED
) !=
1203 SEC_DESC_DACL_PROTECTED
) {
1204 old
->type
=old
->type
| SEC_DESC_DACL_PROTECTED
;
1206 /* remove all inherited ACL's. */
1209 struct security_acl
*temp
=old
->dacl
;
1210 old
->dacl
=make_sec_acl(talloc_tos(), 3, 0, NULL
);
1211 for (i
=temp
->num_aces
-1;i
>=0;i
--) {
1212 struct security_ace
*ace
=&temp
->aces
[i
];
1213 /* Remove all ace with INHERITED flag set */
1214 if ((ace
->flags
& SEC_ACE_FLAG_INHERITED_ACE
) !=
1215 SEC_ACE_FLAG_INHERITED_ACE
) {
1216 add_ace(&old
->dacl
,ace
);
1221 printf("Already set to no inheritable permissions.\n");
1224 } else if (strcmp(type
,"copy")==0) {
1225 if ((old
->type
& SEC_DESC_DACL_PROTECTED
) !=
1226 SEC_DESC_DACL_PROTECTED
) {
1227 old
->type
=old
->type
| SEC_DESC_DACL_PROTECTED
;
1229 /* convert all inherited ACL's to non inherated ACL's. */
1232 for (i
=0;i
<old
->dacl
->num_aces
;i
++) {
1233 struct security_ace
*ace
=&old
->dacl
->aces
[i
];
1234 /* Remove INHERITED FLAG from all aces */
1235 ace
->flags
=ace
->flags
&(~SEC_ACE_FLAG_INHERITED_ACE
);
1239 printf("Already set to no inheritable permissions.\n");
1244 /* Denied ACE entries must come before allowed ones */
1245 sort_acl(old
->dacl
);
1247 sd
= make_sec_desc(talloc_tos(),old
->revision
, old
->type
,
1248 old
->owner_sid
, old
->group_sid
,
1249 NULL
, old
->dacl
, &sd_size
);
1251 if (!set_secdesc(cli
, filename
, sd
)) {
1252 result
= EXIT_FAILED
;
1258 /*****************************************************
1259 Return a connection to a server.
1260 *******************************************************/
1261 static struct cli_state
*connect_one(struct user_auth_info
*auth_info
,
1262 const char *server
, const char *share
)
1264 struct cli_state
*c
= NULL
;
1268 if (get_cmdline_auth_info_use_kerberos(auth_info
)) {
1269 flags
|= CLI_FULL_CONNECTION_USE_KERBEROS
|
1270 CLI_FULL_CONNECTION_FALLBACK_AFTER_KERBEROS
;
1273 if (get_cmdline_auth_info_use_machine_account(auth_info
) &&
1274 !set_cmdline_auth_info_machine_account_creds(auth_info
)) {
1278 set_cmdline_auth_info_getpass(auth_info
);
1280 nt_status
= cli_full_connection(&c
, lp_netbios_name(), server
,
1283 get_cmdline_auth_info_username(auth_info
),
1285 get_cmdline_auth_info_password(auth_info
),
1287 get_cmdline_auth_info_signing_state(auth_info
));
1288 if (!NT_STATUS_IS_OK(nt_status
)) {
1289 DEBUG(0,("cli_full_connection failed! (%s)\n", nt_errstr(nt_status
)));
1293 if (get_cmdline_auth_info_smb_encrypt(auth_info
)) {
1294 nt_status
= cli_cm_force_encryption(c
,
1295 get_cmdline_auth_info_username(auth_info
),
1296 get_cmdline_auth_info_password(auth_info
),
1299 if (!NT_STATUS_IS_OK(nt_status
)) {
1308 /****************************************************************************
1310 ****************************************************************************/
1311 int main(int argc
, const char *argv
[])
1315 enum acl_mode mode
= SMB_ACL_SET
;
1316 static char *the_acl
= NULL
;
1317 enum chown_mode change_mode
= REQUEST_NONE
;
1320 char *filename
= NULL
;
1322 struct poptOption long_options
[] = {
1324 { "delete", 'D', POPT_ARG_STRING
, NULL
, 'D', "Delete an acl", "ACL" },
1325 { "modify", 'M', POPT_ARG_STRING
, NULL
, 'M', "Modify an acl", "ACL" },
1326 { "add", 'a', POPT_ARG_STRING
, NULL
, 'a', "Add an acl", "ACL" },
1327 { "set", 'S', POPT_ARG_STRING
, NULL
, 'S', "Set acls", "ACLS" },
1328 { "chown", 'C', POPT_ARG_STRING
, NULL
, 'C', "Change ownership of a file", "USERNAME" },
1329 { "chgrp", 'G', POPT_ARG_STRING
, NULL
, 'G', "Change group ownership of a file", "GROUPNAME" },
1330 { "inherit", 'I', POPT_ARG_STRING
, NULL
, 'I', "Inherit allow|remove|copy" },
1331 { "numeric", 0, POPT_ARG_NONE
, &numeric
, 1, "Don't resolve sids or masks to names" },
1332 { "sddl", 0, POPT_ARG_NONE
, &sddl
, 1, "Output and input acls in sddl format" },
1333 { "test-args", 't', POPT_ARG_NONE
, &test_args
, 1, "Test arguments"},
1334 { "domain-sid", 0, POPT_ARG_STRING
, &domain_sid
, 0, "Domain SID for sddl", "SID"},
1336 POPT_COMMON_CONNECTION
1337 POPT_COMMON_CREDENTIALS
1341 struct cli_state
*cli
;
1342 TALLOC_CTX
*frame
= talloc_stackframe();
1343 const char *owner_username
= "";
1345 struct user_auth_info
*auth_info
;
1349 /* set default debug level to 1 regardless of what smb.conf sets */
1350 setup_logging( "smbcacls", DEBUG_STDERR
);
1351 lp_set_cmdline("log level", "1");
1355 lp_load_global(get_dyn_CONFIGFILE());
1358 auth_info
= user_auth_info_init(frame
);
1359 if (auth_info
== NULL
) {
1362 popt_common_set_auth_info(auth_info
);
1364 pc
= poptGetContext("smbcacls", argc
, argv
, long_options
, 0);
1366 poptSetOtherOptionHelp(pc
, "//server1/share1 filename\nACLs look like: "
1367 "'ACL:user:[ALLOWED|DENIED]/flags/permissions'");
1369 while ((opt
= poptGetNextOpt(pc
)) != -1) {
1372 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
1377 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
1378 mode
= SMB_ACL_DELETE
;
1382 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
1383 mode
= SMB_ACL_MODIFY
;
1387 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
1392 owner_username
= poptGetOptArg(pc
);
1393 change_mode
= REQUEST_CHOWN
;
1397 owner_username
= poptGetOptArg(pc
);
1398 change_mode
= REQUEST_CHGRP
;
1402 owner_username
= poptGetOptArg(pc
);
1403 change_mode
= REQUEST_INHERIT
;
1408 /* Make connection to server */
1409 if(!poptPeekArg(pc
)) {
1410 poptPrintUsage(pc
, stderr
, 0);
1414 path
= talloc_strdup(frame
, poptGetArg(pc
));
1419 if(!poptPeekArg(pc
)) {
1420 poptPrintUsage(pc
, stderr
, 0);
1424 filename
= talloc_strdup(frame
, poptGetArg(pc
));
1429 string_replace(path
,'/','\\');
1431 server
= talloc_strdup(frame
, path
+2);
1435 share
= strchr_m(server
,'\\');
1437 printf("Invalid argument: %s\n", share
);
1445 cli
= connect_one(auth_info
, server
, share
);
1453 string_replace(filename
, '/', '\\');
1454 if (filename
[0] != '\\') {
1455 filename
= talloc_asprintf(frame
,
1463 /* Perform requested action */
1465 if (change_mode
== REQUEST_INHERIT
) {
1466 result
= inherit(cli
, filename
, owner_username
);
1467 } else if (change_mode
!= REQUEST_NONE
) {
1468 result
= owner_set(cli
, change_mode
, filename
, owner_username
);
1469 } else if (the_acl
) {
1470 result
= cacl_set(cli
, filename
, the_acl
, mode
);
1472 result
= cacl_dump(cli
, filename
);