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 */
44 static int query_sec_info
= -1;
45 static int set_sec_info
= -1;
47 static const char *domain_sid
= NULL
;
49 enum acl_mode
{SMB_ACL_SET
, SMB_ACL_DELETE
, SMB_ACL_MODIFY
, SMB_ACL_ADD
};
50 enum chown_mode
{REQUEST_NONE
, REQUEST_CHOWN
, REQUEST_CHGRP
, REQUEST_INHERIT
};
51 enum exit_values
{EXIT_OK
, EXIT_FAILED
, EXIT_PARSE_ERROR
};
58 /* These values discovered by inspection */
60 static const struct perm_value special_values
[] = {
70 static const struct perm_value standard_values
[] = {
71 { "READ", 0x001200a9 },
72 { "CHANGE", 0x001301bf },
73 { "FULL", 0x001f01ff },
77 /* Open cli connection and policy handle */
79 static NTSTATUS
cli_lsa_lookup_sid(struct cli_state
*cli
,
80 const struct dom_sid
*sid
,
82 enum lsa_SidType
*type
,
83 char **domain
, char **name
)
85 uint16 orig_cnum
= cli_state_get_tid(cli
);
86 struct rpc_pipe_client
*p
= NULL
;
87 struct policy_handle handle
;
89 TALLOC_CTX
*frame
= talloc_stackframe();
90 enum lsa_SidType
*types
;
94 status
= cli_tree_connect(cli
, "IPC$", "?????", "", 0);
95 if (!NT_STATUS_IS_OK(status
)) {
99 status
= cli_rpc_pipe_open_noauth(cli
, &ndr_table_lsarpc
,
101 if (!NT_STATUS_IS_OK(status
)) {
105 status
= rpccli_lsa_open_policy(p
, talloc_tos(), True
,
106 GENERIC_EXECUTE_ACCESS
, &handle
);
107 if (!NT_STATUS_IS_OK(status
)) {
111 status
= rpccli_lsa_lookup_sids(p
, talloc_tos(), &handle
, 1, sid
,
112 &domains
, &names
, &types
);
113 if (!NT_STATUS_IS_OK(status
)) {
118 *domain
= talloc_move(mem_ctx
, &domains
[0]);
119 *name
= talloc_move(mem_ctx
, &names
[0]);
121 status
= NT_STATUS_OK
;
126 cli_state_set_tid(cli
, orig_cnum
);
131 static NTSTATUS
cli_lsa_lookup_name(struct cli_state
*cli
,
133 enum lsa_SidType
*type
,
136 uint16 orig_cnum
= cli_state_get_tid(cli
);
137 struct rpc_pipe_client
*p
;
138 struct policy_handle handle
;
140 TALLOC_CTX
*frame
= talloc_stackframe();
141 struct dom_sid
*sids
;
142 enum lsa_SidType
*types
;
144 status
= cli_tree_connect(cli
, "IPC$", "?????", "", 0);
145 if (!NT_STATUS_IS_OK(status
)) {
149 status
= cli_rpc_pipe_open_noauth(cli
, &ndr_table_lsarpc
,
151 if (!NT_STATUS_IS_OK(status
)) {
155 status
= rpccli_lsa_open_policy(p
, talloc_tos(), True
,
156 GENERIC_EXECUTE_ACCESS
, &handle
);
157 if (!NT_STATUS_IS_OK(status
)) {
161 status
= rpccli_lsa_lookup_names(p
, talloc_tos(), &handle
, 1, &name
,
162 NULL
, 1, &sids
, &types
);
163 if (!NT_STATUS_IS_OK(status
)) {
170 status
= NT_STATUS_OK
;
175 cli_state_set_tid(cli
, orig_cnum
);
181 static NTSTATUS
cli_lsa_lookup_domain_sid(struct cli_state
*cli
,
184 union lsa_PolicyInformation
*info
= NULL
;
185 uint16 orig_cnum
= cli_state_get_tid(cli
);
186 struct rpc_pipe_client
*rpc_pipe
= NULL
;
187 struct policy_handle handle
;
188 NTSTATUS status
, result
;
189 TALLOC_CTX
*frame
= talloc_stackframe();
191 status
= cli_tree_connect(cli
, "IPC$", "?????", "", 0);
192 if (!NT_STATUS_IS_OK(status
)) {
196 status
= cli_rpc_pipe_open_noauth(cli
, &ndr_table_lsarpc
, &rpc_pipe
);
197 if (!NT_STATUS_IS_OK(status
)) {
201 status
= rpccli_lsa_open_policy(rpc_pipe
, frame
, True
,
202 GENERIC_EXECUTE_ACCESS
, &handle
);
203 if (!NT_STATUS_IS_OK(status
)) {
207 status
= dcerpc_lsa_QueryInfoPolicy2(rpc_pipe
->binding_handle
,
209 LSA_POLICY_INFO_DOMAIN
,
212 if (any_nt_status_not_ok(status
, result
, &status
)) {
216 *sid
= *info
->domain
.sid
;
219 TALLOC_FREE(rpc_pipe
);
222 cli_state_set_tid(cli
, orig_cnum
);
227 static struct dom_sid
*get_domain_sid(struct cli_state
*cli
)
231 struct dom_sid
*sid
= talloc(talloc_tos(), struct dom_sid
);
233 DEBUG(0, ("Out of memory\n"));
238 if (!dom_sid_parse(domain_sid
, sid
)) {
239 DEBUG(0,("failed to parse domain sid\n"));
243 status
= cli_lsa_lookup_domain_sid(cli
, sid
);
245 if (!NT_STATUS_IS_OK(status
)) {
246 DEBUG(0,("failed to lookup domain sid: %s\n", nt_errstr(status
)));
252 DEBUG(2,("Domain SID: %s\n", sid_string_dbg(sid
)));
257 /* convert a SID to a string, either numeric or username/group */
258 static void SidToString(struct cli_state
*cli
, fstring str
, const struct dom_sid
*sid
)
262 enum lsa_SidType type
;
265 sid_to_fstring(str
, sid
);
271 status
= cli_lsa_lookup_sid(cli
, sid
, talloc_tos(), &type
,
274 if (!NT_STATUS_IS_OK(status
)) {
279 slprintf(str
, sizeof(fstring
) - 1, "%s%s%s",
280 domain
, lp_winbind_separator(), name
);
286 /* convert a string to a SID, either numeric or username/group */
287 static bool StringToSid(struct cli_state
*cli
, struct dom_sid
*sid
, const char *str
)
289 enum lsa_SidType type
;
291 if (string_to_sid(sid
, str
)) {
295 return NT_STATUS_IS_OK(cli_lsa_lookup_name(cli
, str
, &type
, sid
));
298 static void print_ace_flags(FILE *f
, uint8_t flags
)
300 char *str
= talloc_strdup(NULL
, "");
306 if (flags
& SEC_ACE_FLAG_OBJECT_INHERIT
) {
307 str
= talloc_asprintf(str
, "%s%s",
313 if (flags
& SEC_ACE_FLAG_CONTAINER_INHERIT
) {
314 str
= talloc_asprintf(str
, "%s%s",
320 if (flags
& SEC_ACE_FLAG_NO_PROPAGATE_INHERIT
) {
321 str
= talloc_asprintf(str
, "%s%s",
327 if (flags
& SEC_ACE_FLAG_INHERIT_ONLY
) {
328 str
= talloc_asprintf(str
, "%s%s",
334 if (flags
& SEC_ACE_FLAG_INHERITED_ACE
) {
335 str
= talloc_asprintf(str
, "%s%s",
341 /* Ignore define SEC_ACE_FLAG_SUCCESSFUL_ACCESS ( 0x40 )
342 and SEC_ACE_FLAG_FAILED_ACCESS ( 0x80 ) as they're
345 if (str
[strlen(str
)-1] == '|') {
346 str
[strlen(str
)-1] = '\0';
347 fprintf(f
, "/%s/", str
);
349 fprintf(f
, "/0x%x/", flags
);
355 fprintf(f
, "/0x%x/", flags
);
358 /* print an ACE on a FILE, using either numeric or ascii representation */
359 static void print_ace(struct cli_state
*cli
, FILE *f
, struct security_ace
*ace
)
361 const struct perm_value
*v
;
366 SidToString(cli
, sidstr
, &ace
->trustee
);
368 fprintf(f
, "%s:", sidstr
);
371 fprintf(f
, "%d/0x%x/0x%08x",
372 ace
->type
, ace
->flags
, ace
->access_mask
);
378 if (ace
->type
== SEC_ACE_TYPE_ACCESS_ALLOWED
) {
379 fprintf(f
, "ALLOWED");
380 } else if (ace
->type
== SEC_ACE_TYPE_ACCESS_DENIED
) {
381 fprintf(f
, "DENIED");
383 fprintf(f
, "%d", ace
->type
);
386 print_ace_flags(f
, ace
->flags
);
388 /* Standard permissions */
390 for (v
= standard_values
; v
->perm
; v
++) {
391 if (ace
->access_mask
== v
->mask
) {
392 fprintf(f
, "%s", v
->perm
);
397 /* Special permissions. Print out a hex value if we have
398 leftover bits in the mask. */
400 got_mask
= ace
->access_mask
;
403 for (v
= special_values
; v
->perm
; v
++) {
404 if ((ace
->access_mask
& v
->mask
) == v
->mask
) {
406 fprintf(f
, "%s", v
->perm
);
408 got_mask
&= ~v
->mask
;
414 fprintf(f
, "0x%08x", ace
->access_mask
);
422 static bool parse_ace_flags(const char *str
, unsigned int *pflags
)
428 if (strnequal(p
, "OI", 2)) {
429 *pflags
|= SEC_ACE_FLAG_OBJECT_INHERIT
;
431 } else if (strnequal(p
, "CI", 2)) {
432 *pflags
|= SEC_ACE_FLAG_CONTAINER_INHERIT
;
434 } else if (strnequal(p
, "NP", 2)) {
435 *pflags
|= SEC_ACE_FLAG_NO_PROPAGATE_INHERIT
;
437 } else if (strnequal(p
, "IO", 2)) {
438 *pflags
|= SEC_ACE_FLAG_INHERIT_ONLY
;
440 } else if (*p
== 'I') {
441 *pflags
|= SEC_ACE_FLAG_INHERITED_ACE
;
459 /* parse an ACE in the same format as print_ace() */
460 static bool parse_ace(struct cli_state
*cli
, struct security_ace
*ace
,
461 const char *orig_str
)
466 unsigned int atype
= 0;
467 unsigned int aflags
= 0;
468 unsigned int amask
= 0;
471 const struct perm_value
*v
;
472 char *str
= SMB_STRDUP(orig_str
);
473 TALLOC_CTX
*frame
= talloc_stackframe();
481 p
= strchr_m(str
,':');
483 printf("ACE '%s': missing ':'.\n", orig_str
);
490 /* Try to parse numeric form */
492 if (sscanf(p
, "%u/%u/%u", &atype
, &aflags
, &amask
) == 3 &&
493 StringToSid(cli
, &sid
, str
)) {
497 /* Try to parse text form */
499 if (!StringToSid(cli
, &sid
, str
)) {
500 printf("ACE '%s': failed to convert '%s' to SID\n",
508 if (!next_token_talloc(frame
, &cp
, &tok
, "/")) {
509 printf("ACE '%s': failed to find '/' character.\n",
516 if (strncmp(tok
, "ALLOWED", strlen("ALLOWED")) == 0) {
517 atype
= SEC_ACE_TYPE_ACCESS_ALLOWED
;
518 } else if (strncmp(tok
, "DENIED", strlen("DENIED")) == 0) {
519 atype
= SEC_ACE_TYPE_ACCESS_DENIED
;
521 printf("ACE '%s': missing 'ALLOWED' or 'DENIED' entry at '%s'\n",
528 /* Only numeric form accepted for flags at present */
530 if (!next_token_talloc(frame
, &cp
, &tok
, "/")) {
531 printf("ACE '%s': bad flags entry at '%s'\n",
538 if (tok
[0] < '0' || tok
[0] > '9') {
539 if (!parse_ace_flags(tok
, &aflags
)) {
540 printf("ACE '%s': bad named flags entry at '%s'\n",
546 } else if (strnequal(tok
, "0x", 2)) {
547 if (!sscanf(tok
, "%x", &aflags
)) {
548 printf("ACE '%s': bad hex flags entry at '%s'\n",
555 if (!sscanf(tok
, "%u", &aflags
)) {
556 printf("ACE '%s': bad integer flags entry at '%s'\n",
564 if (!next_token_talloc(frame
, &cp
, &tok
, "/")) {
565 printf("ACE '%s': missing / at '%s'\n",
572 if (strncmp(tok
, "0x", 2) == 0) {
573 if (sscanf(tok
, "%u", &amask
) != 1) {
574 printf("ACE '%s': bad hex number at '%s'\n",
583 for (v
= standard_values
; v
->perm
; v
++) {
584 if (strcmp(tok
, v
->perm
) == 0) {
595 for (v
= special_values
; v
->perm
; v
++) {
596 if (v
->perm
[0] == *p
) {
603 printf("ACE '%s': bad permission value at '%s'\n",
620 init_sec_ace(ace
, &sid
, atype
, mask
, aflags
);
626 /* add an ACE to a list of ACEs in a struct security_acl */
627 static bool add_ace(struct security_acl
**the_acl
, struct security_ace
*ace
)
629 struct security_acl
*new_ace
;
630 struct security_ace
*aces
;
632 return (((*the_acl
) = make_sec_acl(talloc_tos(), 3, 1, ace
))
636 if (!(aces
= SMB_CALLOC_ARRAY(struct security_ace
, 1+(*the_acl
)->num_aces
))) {
639 memcpy(aces
, (*the_acl
)->aces
, (*the_acl
)->num_aces
* sizeof(struct
641 memcpy(aces
+(*the_acl
)->num_aces
, ace
, sizeof(struct security_ace
));
642 new_ace
= make_sec_acl(talloc_tos(),(*the_acl
)->revision
,1+(*the_acl
)->num_aces
, aces
);
644 (*the_acl
) = new_ace
;
648 /* parse a ascii version of a security descriptor */
649 static struct security_descriptor
*sec_desc_parse(TALLOC_CTX
*ctx
, struct cli_state
*cli
, char *str
)
653 struct security_descriptor
*ret
= NULL
;
655 struct dom_sid
*grp_sid
=NULL
, *owner_sid
=NULL
;
656 struct security_acl
*dacl
=NULL
;
659 while (next_token_talloc(ctx
, &p
, &tok
, "\t,\r\n")) {
660 if (strncmp(tok
,"REVISION:", 9) == 0) {
661 revision
= strtol(tok
+9, NULL
, 16);
665 if (strncmp(tok
,"OWNER:", 6) == 0) {
667 printf("Only specify owner once\n");
670 owner_sid
= SMB_CALLOC_ARRAY(struct dom_sid
, 1);
672 !StringToSid(cli
, owner_sid
, tok
+6)) {
673 printf("Failed to parse owner sid\n");
679 if (strncmp(tok
,"GROUP:", 6) == 0) {
681 printf("Only specify group once\n");
684 grp_sid
= SMB_CALLOC_ARRAY(struct dom_sid
, 1);
686 !StringToSid(cli
, grp_sid
, tok
+6)) {
687 printf("Failed to parse group sid\n");
693 if (strncmp(tok
,"ACL:", 4) == 0) {
694 struct security_ace ace
;
695 if (!parse_ace(cli
, &ace
, tok
+4)) {
698 if(!add_ace(&dacl
, &ace
)) {
699 printf("Failed to add ACL %s\n", tok
);
705 printf("Failed to parse token '%s' in security descriptor,\n", tok
);
709 ret
= make_sec_desc(ctx
,revision
, SEC_DESC_SELF_RELATIVE
, owner_sid
, grp_sid
,
710 NULL
, dacl
, &sd_size
);
714 SAFE_FREE(owner_sid
);
719 static const struct {
723 } sec_desc_ctrl_bits
[] = {
724 {SEC_DESC_OWNER_DEFAULTED
, "OD", "Owner Defaulted"},
725 {SEC_DESC_GROUP_DEFAULTED
, "GD", "Group Defaulted"},
726 {SEC_DESC_DACL_PRESENT
, "DP", "DACL Present"},
727 {SEC_DESC_DACL_DEFAULTED
, "DD", "DACL Defaulted"},
728 {SEC_DESC_SACL_PRESENT
, "SP", "SACL Present"},
729 {SEC_DESC_SACL_DEFAULTED
, "SD", "SACL Defaulted"},
730 {SEC_DESC_DACL_TRUSTED
, "DT", "DACL Trusted"},
731 {SEC_DESC_SERVER_SECURITY
, "SS", "Server Security"},
732 {SEC_DESC_DACL_AUTO_INHERIT_REQ
, "DR", "DACL Inheritance Required"},
733 {SEC_DESC_SACL_AUTO_INHERIT_REQ
, "SR", "SACL Inheritance Required"},
734 {SEC_DESC_DACL_AUTO_INHERITED
, "DI", "DACL Auto Inherited"},
735 {SEC_DESC_SACL_AUTO_INHERITED
, "SI", "SACL Auto Inherited"},
736 {SEC_DESC_DACL_PROTECTED
, "PD", "DACL Protected"},
737 {SEC_DESC_SACL_PROTECTED
, "PS", "SACL Protected"},
738 {SEC_DESC_RM_CONTROL_VALID
, "RM", "RM Control Valid"},
739 {SEC_DESC_SELF_RELATIVE
, "SR", "Self Relative"},
742 static void print_acl_ctrl(FILE *file
, uint16_t ctrl
)
745 const char* separator
= "";
747 fprintf(file
, "CONTROL:");
749 fprintf(file
, "0x%x\n", ctrl
);
753 for (i
= ARRAY_SIZE(sec_desc_ctrl_bits
) - 1; i
>= 0; i
--) {
754 if (ctrl
& sec_desc_ctrl_bits
[i
].mask
) {
755 fprintf(file
, "%s%s", separator
, sec_desc_ctrl_bits
[i
].str
);
762 /* print a ascii version of a security descriptor on a FILE handle */
763 static void sec_desc_print(struct cli_state
*cli
, FILE *f
, struct security_descriptor
*sd
)
768 fprintf(f
, "REVISION:%d\n", sd
->revision
);
769 print_acl_ctrl(f
, sd
->type
);
771 /* Print owner and group sid */
774 SidToString(cli
, sidstr
, sd
->owner_sid
);
779 fprintf(f
, "OWNER:%s\n", sidstr
);
782 SidToString(cli
, sidstr
, sd
->group_sid
);
787 fprintf(f
, "GROUP:%s\n", sidstr
);
790 for (i
= 0; sd
->dacl
&& i
< sd
->dacl
->num_aces
; i
++) {
791 struct security_ace
*ace
= &sd
->dacl
->aces
[i
];
793 print_ace(cli
, f
, ace
);
799 /*****************************************************
800 get fileinfo for filename
801 *******************************************************/
802 static uint16
get_fileinfo(struct cli_state
*cli
, const char *filename
)
804 uint16_t fnum
= (uint16_t)-1;
808 /* The desired access below is the only one I could find that works
809 with NT4, W2KP and Samba */
811 status
= cli_ntcreate(cli
, filename
, 0, CREATE_ACCESS_READ
,
812 0, FILE_SHARE_READ
|FILE_SHARE_WRITE
,
813 FILE_OPEN
, 0x0, 0x0, &fnum
, NULL
);
814 if (!NT_STATUS_IS_OK(status
)) {
815 printf("Failed to open %s: %s\n", filename
, nt_errstr(status
));
819 status
= cli_qfileinfo_basic(cli
, fnum
, &mode
, NULL
, NULL
, NULL
,
821 if (!NT_STATUS_IS_OK(status
)) {
822 printf("Failed to file info %s: %s\n", filename
,
826 cli_close(cli
, fnum
);
831 /*****************************************************
832 get sec desc for filename
833 *******************************************************/
834 static struct security_descriptor
*get_secdesc(struct cli_state
*cli
, const char *filename
)
836 uint16_t fnum
= (uint16_t)-1;
837 struct security_descriptor
*sd
;
840 uint32_t desired_access
= 0;
842 if (query_sec_info
== -1) {
843 sec_info
= SECINFO_OWNER
| SECINFO_GROUP
| SECINFO_DACL
;
845 sec_info
= query_sec_info
;
848 if (sec_info
& (SECINFO_OWNER
| SECINFO_GROUP
| SECINFO_DACL
)) {
849 desired_access
|= SEC_STD_READ_CONTROL
;
851 if (sec_info
& SECINFO_SACL
) {
852 desired_access
|= SEC_FLAG_SYSTEM_SECURITY
;
855 if (desired_access
== 0) {
856 desired_access
|= SEC_STD_READ_CONTROL
;
859 status
= cli_ntcreate(cli
, filename
, 0, desired_access
,
860 0, FILE_SHARE_READ
|FILE_SHARE_WRITE
,
861 FILE_OPEN
, 0x0, 0x0, &fnum
, NULL
);
862 if (!NT_STATUS_IS_OK(status
)) {
863 printf("Failed to open %s: %s\n", filename
, nt_errstr(status
));
867 status
= cli_query_security_descriptor(cli
, fnum
, sec_info
,
870 cli_close(cli
, fnum
);
872 if (!NT_STATUS_IS_OK(status
)) {
873 printf("Failed to get security descriptor: %s\n",
880 /*****************************************************
881 set sec desc for filename
882 *******************************************************/
883 static bool set_secdesc(struct cli_state
*cli
, const char *filename
,
884 struct security_descriptor
*sd
)
886 uint16_t fnum
= (uint16_t)-1;
889 uint32_t desired_access
= 0;
892 if (set_sec_info
== -1) {
895 if (sd
->dacl
|| (sd
->type
& SEC_DESC_DACL_PRESENT
)) {
896 sec_info
|= SECINFO_DACL
;
898 if (sd
->sacl
|| (sd
->type
& SEC_DESC_SACL_PRESENT
)) {
899 sec_info
|= SECINFO_SACL
;
902 sec_info
|= SECINFO_OWNER
;
905 sec_info
|= SECINFO_GROUP
;
908 sec_info
= set_sec_info
;
911 /* Make the desired_access more specific. */
912 if (sec_info
& SECINFO_DACL
) {
913 desired_access
|= SEC_STD_WRITE_DAC
;
915 if (sec_info
& SECINFO_SACL
) {
916 desired_access
|= SEC_FLAG_SYSTEM_SECURITY
;
918 if (sec_info
& (SECINFO_OWNER
| SECINFO_GROUP
)) {
919 desired_access
|= SEC_STD_WRITE_OWNER
;
922 status
= cli_ntcreate(cli
, filename
, 0,
924 0, FILE_SHARE_READ
|FILE_SHARE_WRITE
,
925 FILE_OPEN
, 0x0, 0x0, &fnum
, NULL
);
926 if (!NT_STATUS_IS_OK(status
)) {
927 printf("Failed to open %s: %s\n", filename
, nt_errstr(status
));
931 status
= cli_set_security_descriptor(cli
, fnum
, sec_info
, sd
);
932 if (!NT_STATUS_IS_OK(status
)) {
933 printf("ERROR: security description set failed: %s\n",
938 cli_close(cli
, fnum
);
942 /*****************************************************
943 dump the acls for a file
944 *******************************************************/
945 static int cacl_dump(struct cli_state
*cli
, const char *filename
)
947 struct security_descriptor
*sd
;
953 sd
= get_secdesc(cli
, filename
);
959 char *str
= sddl_encode(talloc_tos(), sd
, get_domain_sid(cli
));
966 sec_desc_print(cli
, stdout
, sd
);
972 /*****************************************************
973 Change the ownership or group ownership of a file. Just
974 because the NT docs say this can't be done :-). JRA.
975 *******************************************************/
977 static int owner_set(struct cli_state
*cli
, enum chown_mode change_mode
,
978 const char *filename
, const char *new_username
)
981 struct security_descriptor
*sd
, *old
;
984 if (!StringToSid(cli
, &sid
, new_username
))
985 return EXIT_PARSE_ERROR
;
987 old
= get_secdesc(cli
, filename
);
993 sd
= make_sec_desc(talloc_tos(),old
->revision
, SEC_DESC_SELF_RELATIVE
,
994 (change_mode
== REQUEST_CHOWN
) ? &sid
: NULL
,
995 (change_mode
== REQUEST_CHGRP
) ? &sid
: NULL
,
996 NULL
, NULL
, &sd_size
);
998 if (!set_secdesc(cli
, filename
, sd
)) {
1006 /* The MSDN is contradictory over the ordering of ACE entries in an
1007 ACL. However NT4 gives a "The information may have been modified
1008 by a computer running Windows NT 5.0" if denied ACEs do not appear
1009 before allowed ACEs. At
1010 http://technet.microsoft.com/en-us/library/cc781716.aspx the
1011 canonical order is specified as "Explicit Deny, Explicit Allow,
1012 Inherited ACEs unchanged" */
1014 static int ace_compare(struct security_ace
*ace1
, struct security_ace
*ace2
)
1016 if (security_ace_equal(ace1
, ace2
))
1019 if ((ace1
->flags
& SEC_ACE_FLAG_INHERITED_ACE
) &&
1020 !(ace2
->flags
& SEC_ACE_FLAG_INHERITED_ACE
))
1022 if (!(ace1
->flags
& SEC_ACE_FLAG_INHERITED_ACE
) &&
1023 (ace2
->flags
& SEC_ACE_FLAG_INHERITED_ACE
))
1025 if ((ace1
->flags
& SEC_ACE_FLAG_INHERITED_ACE
) &&
1026 (ace2
->flags
& SEC_ACE_FLAG_INHERITED_ACE
))
1029 if (ace1
->type
!= ace2
->type
)
1030 return ace2
->type
- ace1
->type
;
1032 if (dom_sid_compare(&ace1
->trustee
, &ace2
->trustee
))
1033 return dom_sid_compare(&ace1
->trustee
, &ace2
->trustee
);
1035 if (ace1
->flags
!= ace2
->flags
)
1036 return ace1
->flags
- ace2
->flags
;
1038 if (ace1
->access_mask
!= ace2
->access_mask
)
1039 return ace1
->access_mask
- ace2
->access_mask
;
1041 if (ace1
->size
!= ace2
->size
)
1042 return ace1
->size
- ace2
->size
;
1044 return memcmp(ace1
, ace2
, sizeof(struct security_ace
));
1047 static void sort_acl(struct security_acl
*the_acl
)
1050 if (!the_acl
) return;
1052 TYPESAFE_QSORT(the_acl
->aces
, the_acl
->num_aces
, ace_compare
);
1054 for (i
=1;i
<the_acl
->num_aces
;) {
1055 if (security_ace_equal(&the_acl
->aces
[i
-1],
1056 &the_acl
->aces
[i
])) {
1058 for (j
=i
; j
<the_acl
->num_aces
-1; j
++) {
1059 the_acl
->aces
[j
] = the_acl
->aces
[j
+1];
1061 the_acl
->num_aces
--;
1068 /*****************************************************
1069 set the ACLs on a file given an ascii description
1070 *******************************************************/
1072 static int cacl_set(struct cli_state
*cli
, const char *filename
,
1073 char *the_acl
, enum acl_mode mode
)
1075 struct security_descriptor
*sd
, *old
;
1078 int result
= EXIT_OK
;
1081 sd
= sddl_decode(talloc_tos(), the_acl
, get_domain_sid(cli
));
1083 sd
= sec_desc_parse(talloc_tos(), cli
, the_acl
);
1086 if (!sd
) return EXIT_PARSE_ERROR
;
1087 if (test_args
) return EXIT_OK
;
1089 old
= get_secdesc(cli
, filename
);
1095 /* the logic here is rather more complex than I would like */
1097 case SMB_ACL_DELETE
:
1098 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
1101 for (j
=0;old
->dacl
&& j
<old
->dacl
->num_aces
;j
++) {
1102 if (security_ace_equal(&sd
->dacl
->aces
[i
],
1103 &old
->dacl
->aces
[j
])) {
1105 for (k
=j
; k
<old
->dacl
->num_aces
-1;k
++) {
1106 old
->dacl
->aces
[k
] = old
->dacl
->aces
[k
+1];
1108 old
->dacl
->num_aces
--;
1115 printf("ACL for ACE:");
1116 print_ace(cli
, stdout
, &sd
->dacl
->aces
[i
]);
1117 printf(" not found\n");
1122 case SMB_ACL_MODIFY
:
1123 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
1126 for (j
=0;old
->dacl
&& j
<old
->dacl
->num_aces
;j
++) {
1127 if (dom_sid_equal(&sd
->dacl
->aces
[i
].trustee
,
1128 &old
->dacl
->aces
[j
].trustee
)) {
1129 old
->dacl
->aces
[j
] = sd
->dacl
->aces
[i
];
1137 SidToString(cli
, str
,
1138 &sd
->dacl
->aces
[i
].trustee
);
1139 printf("ACL for SID %s not found\n", str
);
1143 if (sd
->owner_sid
) {
1144 old
->owner_sid
= sd
->owner_sid
;
1147 if (sd
->group_sid
) {
1148 old
->group_sid
= sd
->group_sid
;
1154 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
1155 add_ace(&old
->dacl
, &sd
->dacl
->aces
[i
]);
1164 /* Denied ACE entries must come before allowed ones */
1165 sort_acl(old
->dacl
);
1167 /* Create new security descriptor and set it */
1169 /* We used to just have "WRITE_DAC_ACCESS" without WRITE_OWNER.
1170 But if we're sending an owner, even if it's the same as the one
1171 that already exists then W2K3 insists we open with WRITE_OWNER access.
1172 I need to check that setting a SD with no owner set works against WNT
1176 sd
= make_sec_desc(talloc_tos(),old
->revision
, old
->type
,
1177 old
->owner_sid
, old
->group_sid
,
1178 NULL
, old
->dacl
, &sd_size
);
1180 if (!set_secdesc(cli
, filename
, sd
)) {
1181 result
= EXIT_FAILED
;
1187 /*****************************************************
1188 set the inherit on a file
1189 *******************************************************/
1190 static int inherit(struct cli_state
*cli
, const char *filename
,
1193 struct security_descriptor
*old
,*sd
;
1196 int result
= EXIT_OK
;
1198 old
= get_secdesc(cli
, filename
);
1204 oldattr
= get_fileinfo(cli
,filename
);
1206 if (strcmp(type
,"allow")==0) {
1207 if ((old
->type
& SEC_DESC_DACL_PROTECTED
) ==
1208 SEC_DESC_DACL_PROTECTED
) {
1210 char *parentname
,*temp
;
1211 struct security_descriptor
*parent
;
1212 temp
= talloc_strdup(talloc_tos(), filename
);
1214 old
->type
=old
->type
& (~SEC_DESC_DACL_PROTECTED
);
1216 /* look at parent and copy in all its inheritable ACL's. */
1217 string_replace(temp
, '\\', '/');
1218 if (!parent_dirname(talloc_tos(),temp
,&parentname
,NULL
)) {
1221 string_replace(parentname
, '/', '\\');
1222 parent
= get_secdesc(cli
,parentname
);
1223 if (parent
== NULL
) {
1226 for (i
=0;i
<parent
->dacl
->num_aces
;i
++) {
1227 struct security_ace
*ace
=&parent
->dacl
->aces
[i
];
1228 /* Add inherited flag to all aces */
1229 ace
->flags
=ace
->flags
|
1230 SEC_ACE_FLAG_INHERITED_ACE
;
1231 if ((oldattr
& FILE_ATTRIBUTE_DIRECTORY
) == FILE_ATTRIBUTE_DIRECTORY
) {
1232 if ((ace
->flags
& SEC_ACE_FLAG_CONTAINER_INHERIT
) ==
1233 SEC_ACE_FLAG_CONTAINER_INHERIT
) {
1234 add_ace(&old
->dacl
, ace
);
1237 if ((ace
->flags
& SEC_ACE_FLAG_OBJECT_INHERIT
) ==
1238 SEC_ACE_FLAG_OBJECT_INHERIT
) {
1239 /* clear flags for files */
1241 add_ace(&old
->dacl
, ace
);
1246 printf("Already set to inheritable permissions.\n");
1249 } else if (strcmp(type
,"remove")==0) {
1250 if ((old
->type
& SEC_DESC_DACL_PROTECTED
) !=
1251 SEC_DESC_DACL_PROTECTED
) {
1252 old
->type
=old
->type
| SEC_DESC_DACL_PROTECTED
;
1254 /* remove all inherited ACL's. */
1257 struct security_acl
*temp
=old
->dacl
;
1258 old
->dacl
=make_sec_acl(talloc_tos(), 3, 0, NULL
);
1259 for (i
=temp
->num_aces
-1;i
>=0;i
--) {
1260 struct security_ace
*ace
=&temp
->aces
[i
];
1261 /* Remove all ace with INHERITED flag set */
1262 if ((ace
->flags
& SEC_ACE_FLAG_INHERITED_ACE
) !=
1263 SEC_ACE_FLAG_INHERITED_ACE
) {
1264 add_ace(&old
->dacl
,ace
);
1269 printf("Already set to no inheritable permissions.\n");
1272 } else if (strcmp(type
,"copy")==0) {
1273 if ((old
->type
& SEC_DESC_DACL_PROTECTED
) !=
1274 SEC_DESC_DACL_PROTECTED
) {
1275 old
->type
=old
->type
| SEC_DESC_DACL_PROTECTED
;
1277 /* convert all inherited ACL's to non inherated ACL's. */
1280 for (i
=0;i
<old
->dacl
->num_aces
;i
++) {
1281 struct security_ace
*ace
=&old
->dacl
->aces
[i
];
1282 /* Remove INHERITED FLAG from all aces */
1283 ace
->flags
=ace
->flags
&(~SEC_ACE_FLAG_INHERITED_ACE
);
1287 printf("Already set to no inheritable permissions.\n");
1292 /* Denied ACE entries must come before allowed ones */
1293 sort_acl(old
->dacl
);
1295 sd
= make_sec_desc(talloc_tos(),old
->revision
, old
->type
,
1296 old
->owner_sid
, old
->group_sid
,
1297 NULL
, old
->dacl
, &sd_size
);
1299 if (!set_secdesc(cli
, filename
, sd
)) {
1300 result
= EXIT_FAILED
;
1306 /*****************************************************
1307 Return a connection to a server.
1308 *******************************************************/
1309 static struct cli_state
*connect_one(struct user_auth_info
*auth_info
,
1310 const char *server
, const char *share
)
1312 struct cli_state
*c
= NULL
;
1316 if (get_cmdline_auth_info_use_kerberos(auth_info
)) {
1317 flags
|= CLI_FULL_CONNECTION_USE_KERBEROS
|
1318 CLI_FULL_CONNECTION_FALLBACK_AFTER_KERBEROS
;
1321 if (get_cmdline_auth_info_use_machine_account(auth_info
) &&
1322 !set_cmdline_auth_info_machine_account_creds(auth_info
)) {
1326 set_cmdline_auth_info_getpass(auth_info
);
1328 nt_status
= cli_full_connection(&c
, lp_netbios_name(), server
,
1331 get_cmdline_auth_info_username(auth_info
),
1333 get_cmdline_auth_info_password(auth_info
),
1335 get_cmdline_auth_info_signing_state(auth_info
));
1336 if (!NT_STATUS_IS_OK(nt_status
)) {
1337 DEBUG(0,("cli_full_connection failed! (%s)\n", nt_errstr(nt_status
)));
1341 if (get_cmdline_auth_info_smb_encrypt(auth_info
)) {
1342 nt_status
= cli_cm_force_encryption(c
,
1343 get_cmdline_auth_info_username(auth_info
),
1344 get_cmdline_auth_info_password(auth_info
),
1347 if (!NT_STATUS_IS_OK(nt_status
)) {
1356 /****************************************************************************
1358 ****************************************************************************/
1359 int main(int argc
, char *argv
[])
1361 const char **argv_const
= discard_const_p(const char *, argv
);
1364 enum acl_mode mode
= SMB_ACL_SET
;
1365 static char *the_acl
= NULL
;
1366 enum chown_mode change_mode
= REQUEST_NONE
;
1369 char *filename
= NULL
;
1371 struct poptOption long_options
[] = {
1373 { "delete", 'D', POPT_ARG_STRING
, NULL
, 'D', "Delete an acl", "ACL" },
1374 { "modify", 'M', POPT_ARG_STRING
, NULL
, 'M', "Modify an acl", "ACL" },
1375 { "add", 'a', POPT_ARG_STRING
, NULL
, 'a', "Add an acl", "ACL" },
1376 { "set", 'S', POPT_ARG_STRING
, NULL
, 'S', "Set acls", "ACLS" },
1377 { "chown", 'C', POPT_ARG_STRING
, NULL
, 'C', "Change ownership of a file", "USERNAME" },
1378 { "chgrp", 'G', POPT_ARG_STRING
, NULL
, 'G', "Change group ownership of a file", "GROUPNAME" },
1379 { "inherit", 'I', POPT_ARG_STRING
, NULL
, 'I', "Inherit allow|remove|copy" },
1380 { "numeric", 0, POPT_ARG_NONE
, &numeric
, 1, "Don't resolve sids or masks to names" },
1381 { "sddl", 0, POPT_ARG_NONE
, &sddl
, 1, "Output and input acls in sddl format" },
1382 { "query-security-info", 0, POPT_ARG_INT
, &query_sec_info
, 1,
1383 "The security-info flags for queries"
1385 { "set-security-info", 0, POPT_ARG_INT
, &set_sec_info
, 1,
1386 "The security-info flags for modifications"
1388 { "test-args", 't', POPT_ARG_NONE
, &test_args
, 1, "Test arguments"},
1389 { "domain-sid", 0, POPT_ARG_STRING
, &domain_sid
, 0, "Domain SID for sddl", "SID"},
1390 { "max-protocol", 'm', POPT_ARG_STRING
, NULL
, 'm', "Set the max protocol level", "LEVEL" },
1392 POPT_COMMON_CONNECTION
1393 POPT_COMMON_CREDENTIALS
1397 struct cli_state
*cli
;
1398 TALLOC_CTX
*frame
= talloc_stackframe();
1399 const char *owner_username
= "";
1401 struct user_auth_info
*auth_info
;
1405 /* set default debug level to 1 regardless of what smb.conf sets */
1406 setup_logging( "smbcacls", DEBUG_STDERR
);
1407 lp_set_cmdline("log level", "1");
1412 auth_info
= user_auth_info_init(frame
);
1413 if (auth_info
== NULL
) {
1416 popt_common_set_auth_info(auth_info
);
1418 pc
= poptGetContext("smbcacls", argc
, argv_const
, long_options
, 0);
1420 poptSetOtherOptionHelp(pc
, "//server1/share1 filename\nACLs look like: "
1421 "'ACL:user:[ALLOWED|DENIED]/flags/permissions'");
1423 while ((opt
= poptGetNextOpt(pc
)) != -1) {
1426 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
1431 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
1432 mode
= SMB_ACL_DELETE
;
1436 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
1437 mode
= SMB_ACL_MODIFY
;
1441 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
1446 owner_username
= poptGetOptArg(pc
);
1447 change_mode
= REQUEST_CHOWN
;
1451 owner_username
= poptGetOptArg(pc
);
1452 change_mode
= REQUEST_CHGRP
;
1456 owner_username
= poptGetOptArg(pc
);
1457 change_mode
= REQUEST_INHERIT
;
1460 lp_set_cmdline("client max protocol", poptGetOptArg(pc
));
1465 /* Make connection to server */
1466 if(!poptPeekArg(pc
)) {
1467 poptPrintUsage(pc
, stderr
, 0);
1471 path
= talloc_strdup(frame
, poptGetArg(pc
));
1476 if(!poptPeekArg(pc
)) {
1477 poptPrintUsage(pc
, stderr
, 0);
1481 lp_load_global(get_dyn_CONFIGFILE());
1484 filename
= talloc_strdup(frame
, poptGetArg(pc
));
1489 poptFreeContext(pc
);
1490 popt_burn_cmdline_password(argc
, argv
);
1492 string_replace(path
,'/','\\');
1494 server
= talloc_strdup(frame
, path
+2);
1498 share
= strchr_m(server
,'\\');
1500 printf("Invalid argument: %s\n", share
);
1508 cli
= connect_one(auth_info
, server
, share
);
1516 string_replace(filename
, '/', '\\');
1517 if (filename
[0] != '\\') {
1518 filename
= talloc_asprintf(frame
,
1526 /* Perform requested action */
1528 if (change_mode
== REQUEST_INHERIT
) {
1529 result
= inherit(cli
, filename
, owner_username
);
1530 } else if (change_mode
!= REQUEST_NONE
) {
1531 result
= owner_set(cli
, change_mode
, filename
, owner_username
);
1532 } else if (the_acl
) {
1533 result
= cacl_set(cli
, filename
, the_acl
, mode
);
1535 result
= cacl_dump(cli
, filename
);