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/>.
26 static int test_args
= False
;
28 #define CREATE_ACCESS_READ READ_CONTROL_ACCESS
30 /* numeric is set when the user wants numeric SIDs and ACEs rather
31 than going via LSA calls to resolve them */
32 static int numeric
= False
;
34 enum acl_mode
{SMB_ACL_SET
, SMB_ACL_DELETE
, SMB_ACL_MODIFY
, SMB_ACL_ADD
};
35 enum chown_mode
{REQUEST_NONE
, REQUEST_CHOWN
, REQUEST_CHGRP
};
36 enum exit_values
{EXIT_OK
, EXIT_FAILED
, EXIT_PARSE_ERROR
};
43 /* These values discovered by inspection */
45 static const struct perm_value special_values
[] = {
55 static const struct perm_value standard_values
[] = {
56 { "READ", 0x001200a9 },
57 { "CHANGE", 0x001301bf },
58 { "FULL", 0x001f01ff },
62 /* Open cli connection and policy handle */
64 static NTSTATUS
cli_lsa_lookup_sid(struct cli_state
*cli
,
67 enum lsa_SidType
*type
,
68 char **domain
, char **name
)
70 uint16 orig_cnum
= cli
->cnum
;
71 struct rpc_pipe_client
*p
;
72 struct policy_handle handle
;
74 TALLOC_CTX
*frame
= talloc_stackframe();
75 enum lsa_SidType
*types
;
79 if (!cli_send_tconX(cli
, "IPC$", "?????", "", 0)) {
80 return cli_nt_error(cli
);
83 p
= cli_rpc_pipe_open_noauth(cli
, PI_LSARPC
, &status
);
88 status
= rpccli_lsa_open_policy(p
, talloc_tos(), True
,
89 GENERIC_EXECUTE_ACCESS
, &handle
);
90 if (!NT_STATUS_IS_OK(status
)) {
94 status
= rpccli_lsa_lookup_sids(p
, talloc_tos(), &handle
, 1, sid
,
95 &domains
, &names
, &types
);
96 if (!NT_STATUS_IS_OK(status
)) {
101 *domain
= talloc_move(mem_ctx
, &domains
[0]);
102 *name
= talloc_move(mem_ctx
, &names
[0]);
104 status
= NT_STATUS_OK
;
107 cli_rpc_pipe_close(p
);
110 cli
->cnum
= orig_cnum
;
115 static NTSTATUS
cli_lsa_lookup_name(struct cli_state
*cli
,
117 enum lsa_SidType
*type
,
120 uint16 orig_cnum
= cli
->cnum
;
121 struct rpc_pipe_client
*p
;
122 struct policy_handle handle
;
124 TALLOC_CTX
*frame
= talloc_stackframe();
126 enum lsa_SidType
*types
;
128 if (!cli_send_tconX(cli
, "IPC$", "?????", "", 0)) {
129 return cli_nt_error(cli
);
132 p
= cli_rpc_pipe_open_noauth(cli
, PI_LSARPC
, &status
);
137 status
= rpccli_lsa_open_policy(p
, talloc_tos(), True
,
138 GENERIC_EXECUTE_ACCESS
, &handle
);
139 if (!NT_STATUS_IS_OK(status
)) {
143 status
= rpccli_lsa_lookup_names(p
, talloc_tos(), &handle
, 1, &name
,
144 NULL
, 1, &sids
, &types
);
145 if (!NT_STATUS_IS_OK(status
)) {
152 status
= NT_STATUS_OK
;
155 cli_rpc_pipe_close(p
);
158 cli
->cnum
= orig_cnum
;
163 /* convert a SID to a string, either numeric or username/group */
164 static void SidToString(struct cli_state
*cli
, fstring str
, const DOM_SID
*sid
)
168 enum lsa_SidType type
;
171 sid_to_fstring(str
, sid
);
177 status
= cli_lsa_lookup_sid(cli
, sid
, talloc_tos(), &type
,
180 if (!NT_STATUS_IS_OK(status
)) {
184 slprintf(str
, sizeof(fstring
) - 1, "%s%s%s",
185 domain
, lp_winbind_separator(), name
);
189 /* convert a string to a SID, either numeric or username/group */
190 static bool StringToSid(struct cli_state
*cli
, DOM_SID
*sid
, const char *str
)
192 enum lsa_SidType type
;
194 if (strncmp(str
, "S-", 2) == 0) {
195 return string_to_sid(sid
, str
);
198 return NT_STATUS_IS_OK(cli_lsa_lookup_name(cli
, str
, &type
, sid
));
202 /* print an ACE on a FILE, using either numeric or ascii representation */
203 static void print_ace(struct cli_state
*cli
, FILE *f
, SEC_ACE
*ace
)
205 const struct perm_value
*v
;
210 SidToString(cli
, sidstr
, &ace
->trustee
);
212 fprintf(f
, "%s:", sidstr
);
215 fprintf(f
, "%d/%d/0x%08x",
216 ace
->type
, ace
->flags
, ace
->access_mask
);
222 if (ace
->type
== SEC_ACE_TYPE_ACCESS_ALLOWED
) {
223 fprintf(f
, "ALLOWED");
224 } else if (ace
->type
== SEC_ACE_TYPE_ACCESS_DENIED
) {
225 fprintf(f
, "DENIED");
227 fprintf(f
, "%d", ace
->type
);
230 /* Not sure what flags can be set in a file ACL */
232 fprintf(f
, "/%d/", ace
->flags
);
234 /* Standard permissions */
236 for (v
= standard_values
; v
->perm
; v
++) {
237 if (ace
->access_mask
== v
->mask
) {
238 fprintf(f
, "%s", v
->perm
);
243 /* Special permissions. Print out a hex value if we have
244 leftover bits in the mask. */
246 got_mask
= ace
->access_mask
;
249 for (v
= special_values
; v
->perm
; v
++) {
250 if ((ace
->access_mask
& v
->mask
) == v
->mask
) {
252 fprintf(f
, "%s", v
->perm
);
254 got_mask
&= ~v
->mask
;
260 fprintf(f
, "0x%08x", ace
->access_mask
);
269 /* parse an ACE in the same format as print_ace() */
270 static bool parse_ace(struct cli_state
*cli
, SEC_ACE
*ace
,
271 const char *orig_str
)
276 unsigned int atype
= 0;
277 unsigned int aflags
= 0;
278 unsigned int amask
= 0;
281 const struct perm_value
*v
;
282 char *str
= SMB_STRDUP(orig_str
);
283 TALLOC_CTX
*frame
= talloc_stackframe();
291 p
= strchr_m(str
,':');
293 printf("ACE '%s': missing ':'.\n", orig_str
);
300 /* Try to parse numeric form */
302 if (sscanf(p
, "%i/%i/%i", &atype
, &aflags
, &amask
) == 3 &&
303 StringToSid(cli
, &sid
, str
)) {
307 /* Try to parse text form */
309 if (!StringToSid(cli
, &sid
, str
)) {
310 printf("ACE '%s': failed to convert '%s' to SID\n",
318 if (!next_token_talloc(frame
, &cp
, &tok
, "/")) {
319 printf("ACE '%s': failed to find '/' character.\n",
326 if (strncmp(tok
, "ALLOWED", strlen("ALLOWED")) == 0) {
327 atype
= SEC_ACE_TYPE_ACCESS_ALLOWED
;
328 } else if (strncmp(tok
, "DENIED", strlen("DENIED")) == 0) {
329 atype
= SEC_ACE_TYPE_ACCESS_DENIED
;
331 printf("ACE '%s': missing 'ALLOWED' or 'DENIED' entry at '%s'\n",
338 /* Only numeric form accepted for flags at present */
340 if (!(next_token_talloc(frame
, &cp
, &tok
, "/") &&
341 sscanf(tok
, "%i", &aflags
))) {
342 printf("ACE '%s': bad integer flags entry at '%s'\n",
349 if (!next_token_talloc(frame
, &cp
, &tok
, "/")) {
350 printf("ACE '%s': missing / at '%s'\n",
357 if (strncmp(tok
, "0x", 2) == 0) {
358 if (sscanf(tok
, "%i", &amask
) != 1) {
359 printf("ACE '%s': bad hex number at '%s'\n",
368 for (v
= standard_values
; v
->perm
; v
++) {
369 if (strcmp(tok
, v
->perm
) == 0) {
380 for (v
= special_values
; v
->perm
; v
++) {
381 if (v
->perm
[0] == *p
) {
388 printf("ACE '%s': bad permission value at '%s'\n",
405 init_sec_ace(ace
, &sid
, atype
, mask
, aflags
);
411 /* add an ACE to a list of ACEs in a SEC_ACL */
412 static bool add_ace(SEC_ACL
**the_acl
, SEC_ACE
*ace
)
417 return (((*the_acl
) = make_sec_acl(talloc_tos(), 3, 1, ace
))
421 if (!(aces
= SMB_CALLOC_ARRAY(SEC_ACE
, 1+(*the_acl
)->num_aces
))) {
424 memcpy(aces
, (*the_acl
)->aces
, (*the_acl
)->num_aces
* sizeof(SEC_ACE
));
425 memcpy(aces
+(*the_acl
)->num_aces
, ace
, sizeof(SEC_ACE
));
426 new_ace
= make_sec_acl(talloc_tos(),(*the_acl
)->revision
,1+(*the_acl
)->num_aces
, aces
);
428 (*the_acl
) = new_ace
;
432 /* parse a ascii version of a security descriptor */
433 static SEC_DESC
*sec_desc_parse(TALLOC_CTX
*ctx
, struct cli_state
*cli
, char *str
)
437 SEC_DESC
*ret
= NULL
;
439 DOM_SID
*grp_sid
=NULL
, *owner_sid
=NULL
;
443 while (next_token_talloc(ctx
, &p
, &tok
, "\t,\r\n")) {
444 if (strncmp(tok
,"REVISION:", 9) == 0) {
445 revision
= strtol(tok
+9, NULL
, 16);
449 if (strncmp(tok
,"OWNER:", 6) == 0) {
451 printf("Only specify owner once\n");
454 owner_sid
= SMB_CALLOC_ARRAY(DOM_SID
, 1);
456 !StringToSid(cli
, owner_sid
, tok
+6)) {
457 printf("Failed to parse owner sid\n");
463 if (strncmp(tok
,"GROUP:", 6) == 0) {
465 printf("Only specify group once\n");
468 grp_sid
= SMB_CALLOC_ARRAY(DOM_SID
, 1);
470 !StringToSid(cli
, grp_sid
, tok
+6)) {
471 printf("Failed to parse group sid\n");
477 if (strncmp(tok
,"ACL:", 4) == 0) {
479 if (!parse_ace(cli
, &ace
, tok
+4)) {
482 if(!add_ace(&dacl
, &ace
)) {
483 printf("Failed to add ACL %s\n", tok
);
489 printf("Failed to parse token '%s' in security descriptor,\n", tok
);
493 ret
= make_sec_desc(ctx
,revision
, SEC_DESC_SELF_RELATIVE
, owner_sid
, grp_sid
,
494 NULL
, dacl
, &sd_size
);
498 SAFE_FREE(owner_sid
);
504 /* print a ascii version of a security descriptor on a FILE handle */
505 static void sec_desc_print(struct cli_state
*cli
, FILE *f
, SEC_DESC
*sd
)
510 fprintf(f
, "REVISION:%d\n", sd
->revision
);
512 /* Print owner and group sid */
515 SidToString(cli
, sidstr
, sd
->owner_sid
);
520 fprintf(f
, "OWNER:%s\n", sidstr
);
523 SidToString(cli
, sidstr
, sd
->group_sid
);
528 fprintf(f
, "GROUP:%s\n", sidstr
);
531 for (i
= 0; sd
->dacl
&& i
< sd
->dacl
->num_aces
; i
++) {
532 SEC_ACE
*ace
= &sd
->dacl
->aces
[i
];
534 print_ace(cli
, f
, ace
);
540 /*****************************************************
541 dump the acls for a file
542 *******************************************************/
543 static int cacl_dump(struct cli_state
*cli
, char *filename
)
545 int result
= EXIT_FAILED
;
552 fnum
= cli_nt_create(cli
, filename
, CREATE_ACCESS_READ
);
555 printf("Failed to open %s: %s\n", filename
, cli_errstr(cli
));
559 sd
= cli_query_secdesc(cli
, fnum
, talloc_tos());
562 printf("ERROR: secdesc query failed: %s\n", cli_errstr(cli
));
566 sec_desc_print(cli
, stdout
, sd
);
572 cli_close(cli
, fnum
);
577 /*****************************************************
578 Change the ownership or group ownership of a file. Just
579 because the NT docs say this can't be done :-). JRA.
580 *******************************************************/
582 static int owner_set(struct cli_state
*cli
, enum chown_mode change_mode
,
583 const char *filename
, const char *new_username
)
590 fnum
= cli_nt_create(cli
, filename
, CREATE_ACCESS_READ
);
593 printf("Failed to open %s: %s\n", filename
, cli_errstr(cli
));
597 if (!StringToSid(cli
, &sid
, new_username
))
598 return EXIT_PARSE_ERROR
;
600 old
= cli_query_secdesc(cli
, fnum
, talloc_tos());
602 cli_close(cli
, fnum
);
605 printf("owner_set: Failed to query old descriptor\n");
609 sd
= make_sec_desc(talloc_tos(),old
->revision
, old
->type
,
610 (change_mode
== REQUEST_CHOWN
) ? &sid
: NULL
,
611 (change_mode
== REQUEST_CHGRP
) ? &sid
: NULL
,
612 NULL
, NULL
, &sd_size
);
614 fnum
= cli_nt_create(cli
, filename
, WRITE_OWNER_ACCESS
);
617 printf("Failed to open %s: %s\n", filename
, cli_errstr(cli
));
621 if (!cli_set_secdesc(cli
, fnum
, sd
)) {
622 printf("ERROR: secdesc set failed: %s\n", cli_errstr(cli
));
625 cli_close(cli
, fnum
);
631 /* The MSDN is contradictory over the ordering of ACE entries in an ACL.
632 However NT4 gives a "The information may have been modified by a
633 computer running Windows NT 5.0" if denied ACEs do not appear before
636 static int ace_compare(SEC_ACE
*ace1
, SEC_ACE
*ace2
)
638 if (sec_ace_equal(ace1
, ace2
))
641 if (ace1
->type
!= ace2
->type
)
642 return ace2
->type
- ace1
->type
;
644 if (sid_compare(&ace1
->trustee
, &ace2
->trustee
))
645 return sid_compare(&ace1
->trustee
, &ace2
->trustee
);
647 if (ace1
->flags
!= ace2
->flags
)
648 return ace1
->flags
- ace2
->flags
;
650 if (ace1
->access_mask
!= ace2
->access_mask
)
651 return ace1
->access_mask
- ace2
->access_mask
;
653 if (ace1
->size
!= ace2
->size
)
654 return ace1
->size
- ace2
->size
;
656 return memcmp(ace1
, ace2
, sizeof(SEC_ACE
));
659 static void sort_acl(SEC_ACL
*the_acl
)
662 if (!the_acl
) return;
664 qsort(the_acl
->aces
, the_acl
->num_aces
, sizeof(the_acl
->aces
[0]), QSORT_CAST ace_compare
);
666 for (i
=1;i
<the_acl
->num_aces
;) {
667 if (sec_ace_equal(&the_acl
->aces
[i
-1], &the_acl
->aces
[i
])) {
669 for (j
=i
; j
<the_acl
->num_aces
-1; j
++) {
670 the_acl
->aces
[j
] = the_acl
->aces
[j
+1];
679 /*****************************************************
680 set the ACLs on a file given an ascii description
681 *******************************************************/
682 static int cacl_set(struct cli_state
*cli
, char *filename
,
683 char *the_acl
, enum acl_mode mode
)
689 int result
= EXIT_OK
;
691 sd
= sec_desc_parse(talloc_tos(), cli
, the_acl
);
693 if (!sd
) return EXIT_PARSE_ERROR
;
694 if (test_args
) return EXIT_OK
;
696 /* The desired access below is the only one I could find that works
697 with NT4, W2KP and Samba */
699 fnum
= cli_nt_create(cli
, filename
, CREATE_ACCESS_READ
);
702 printf("cacl_set failed to open %s: %s\n", filename
, cli_errstr(cli
));
706 old
= cli_query_secdesc(cli
, fnum
, talloc_tos());
709 printf("calc_set: Failed to query old descriptor\n");
713 cli_close(cli
, fnum
);
715 /* the logic here is rather more complex than I would like */
718 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
721 for (j
=0;old
->dacl
&& j
<old
->dacl
->num_aces
;j
++) {
722 if (sec_ace_equal(&sd
->dacl
->aces
[i
],
723 &old
->dacl
->aces
[j
])) {
725 for (k
=j
; k
<old
->dacl
->num_aces
-1;k
++) {
726 old
->dacl
->aces
[k
] = old
->dacl
->aces
[k
+1];
728 old
->dacl
->num_aces
--;
735 printf("ACL for ACE:");
736 print_ace(cli
, stdout
, &sd
->dacl
->aces
[i
]);
737 printf(" not found\n");
743 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
746 for (j
=0;old
->dacl
&& j
<old
->dacl
->num_aces
;j
++) {
747 if (sid_equal(&sd
->dacl
->aces
[i
].trustee
,
748 &old
->dacl
->aces
[j
].trustee
)) {
749 old
->dacl
->aces
[j
] = sd
->dacl
->aces
[i
];
757 SidToString(cli
, str
,
758 &sd
->dacl
->aces
[i
].trustee
);
759 printf("ACL for SID %s not found\n", str
);
764 old
->owner_sid
= sd
->owner_sid
;
768 old
->group_sid
= sd
->group_sid
;
774 for (i
=0;sd
->dacl
&& i
<sd
->dacl
->num_aces
;i
++) {
775 add_ace(&old
->dacl
, &sd
->dacl
->aces
[i
]);
784 /* Denied ACE entries must come before allowed ones */
787 /* Create new security descriptor and set it */
789 /* We used to just have "WRITE_DAC_ACCESS" without WRITE_OWNER.
790 But if we're sending an owner, even if it's the same as the one
791 that already exists then W2K3 insists we open with WRITE_OWNER access.
792 I need to check that setting a SD with no owner set works against WNT
796 sd
= make_sec_desc(talloc_tos(),old
->revision
, old
->type
,
797 old
->owner_sid
, old
->group_sid
,
798 NULL
, old
->dacl
, &sd_size
);
800 fnum
= cli_nt_create(cli
, filename
, WRITE_DAC_ACCESS
|WRITE_OWNER_ACCESS
);
803 printf("cacl_set failed to open %s: %s\n", filename
, cli_errstr(cli
));
807 if (!cli_set_secdesc(cli
, fnum
, sd
)) {
808 printf("ERROR: secdesc set failed: %s\n", cli_errstr(cli
));
809 result
= EXIT_FAILED
;
814 cli_close(cli
, fnum
);
820 /*****************************************************
821 Return a connection to a server.
822 *******************************************************/
823 static struct cli_state
*connect_one(const char *server
, const char *share
)
825 struct cli_state
*c
= NULL
;
826 struct sockaddr_storage ss
;
830 if (!get_cmdline_auth_info_got_pass()) {
831 char *pass
= getpass("Password: ");
833 set_cmdline_auth_info_password(pass
);
837 nt_status
= cli_full_connection(&c
, global_myname(), server
,
840 get_cmdline_auth_info_username(),
842 get_cmdline_auth_info_password(),
843 get_cmdline_auth_info_use_kerberos() ? CLI_FULL_CONNECTION_USE_KERBEROS
: 0,
844 get_cmdline_auth_info_signing_state(),
846 if (!NT_STATUS_IS_OK(nt_status
)) {
847 DEBUG(0,("cli_full_connection failed! (%s)\n", nt_errstr(nt_status
)));
851 if (get_cmdline_auth_info_smb_encrypt()) {
852 nt_status
= cli_cm_force_encryption(c
,
853 get_cmdline_auth_info_username(),
854 get_cmdline_auth_info_password(),
857 if (!NT_STATUS_IS_OK(nt_status
)) {
866 /****************************************************************************
868 ****************************************************************************/
869 int main(int argc
, const char *argv
[])
873 enum acl_mode mode
= SMB_ACL_SET
;
874 static char *the_acl
= NULL
;
875 enum chown_mode change_mode
= REQUEST_NONE
;
878 char *filename
= NULL
;
880 struct poptOption long_options
[] = {
882 { "delete", 'D', POPT_ARG_STRING
, NULL
, 'D', "Delete an acl", "ACL" },
883 { "modify", 'M', POPT_ARG_STRING
, NULL
, 'M', "Modify an acl", "ACL" },
884 { "add", 'a', POPT_ARG_STRING
, NULL
, 'a', "Add an acl", "ACL" },
885 { "set", 'S', POPT_ARG_STRING
, NULL
, 'S', "Set acls", "ACLS" },
886 { "chown", 'C', POPT_ARG_STRING
, NULL
, 'C', "Change ownership of a file", "USERNAME" },
887 { "chgrp", 'G', POPT_ARG_STRING
, NULL
, 'G', "Change group ownership of a file", "GROUPNAME" },
888 { "numeric", 0, POPT_ARG_NONE
, &numeric
, True
, "Don't resolve sids or masks to names" },
889 { "test-args", 't', POPT_ARG_NONE
, &test_args
, True
, "Test arguments"},
891 POPT_COMMON_CREDENTIALS
895 struct cli_state
*cli
;
896 TALLOC_CTX
*frame
= talloc_stackframe();
897 const char *owner_username
= "";
903 /* set default debug level to 1 regardless of what smb.conf sets */
904 setup_logging( "smbcacls", True
);
905 DEBUGLEVEL_CLASS
[DBGC_ALL
] = 1;
907 x_setbuf( x_stderr
, NULL
);
911 lp_load(get_dyn_CONFIGFILE(),True
,False
,False
,True
);
914 pc
= poptGetContext("smbcacls", argc
, argv
, long_options
, 0);
916 poptSetOtherOptionHelp(pc
, "//server1/share1 filename\nACLs look like: "
917 "'ACL:user:[ALLOWED|DENIED]/flags/permissions'");
919 while ((opt
= poptGetNextOpt(pc
)) != -1) {
922 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
927 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
928 mode
= SMB_ACL_DELETE
;
932 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
933 mode
= SMB_ACL_MODIFY
;
937 the_acl
= smb_xstrdup(poptGetOptArg(pc
));
942 owner_username
= poptGetOptArg(pc
);
943 change_mode
= REQUEST_CHOWN
;
947 owner_username
= poptGetOptArg(pc
);
948 change_mode
= REQUEST_CHGRP
;
953 /* Make connection to server */
954 if(!poptPeekArg(pc
)) {
955 poptPrintUsage(pc
, stderr
, 0);
959 path
= talloc_strdup(frame
, poptGetArg(pc
));
964 if(!poptPeekArg(pc
)) {
965 poptPrintUsage(pc
, stderr
, 0);
969 filename
= talloc_strdup(frame
, poptGetArg(pc
));
974 string_replace(path
,'/','\\');
976 server
= talloc_strdup(frame
, path
+2);
980 share
= strchr_m(server
,'\\');
982 printf("Invalid argument: %s\n", share
);
990 cli
= connect_one(server
, share
);
998 string_replace(filename
, '/', '\\');
999 if (filename
[0] != '\\') {
1000 filename
= talloc_asprintf(frame
,
1008 /* Perform requested action */
1010 if (change_mode
!= REQUEST_NONE
) {
1011 result
= owner_set(cli
, change_mode
, filename
, owner_username
);
1012 } else if (the_acl
) {
1013 result
= cacl_set(cli
, filename
, the_acl
, mode
);
1015 result
= cacl_dump(cli
, filename
);