s3-popt: Only include popt-common.h when needed.
[nivanova/samba-autobuild/.git] / source3 / utils / sharesec.c
index 45bde5cf8e335c41f884c71156f652862dbbe9ab..79078b234ab86f2f3e56e81676795eda340b4692 100644 (file)
 
 
 #include "includes.h"
+#include "popt_common.h"
 
 static TALLOC_CTX *ctx;
 
-enum acl_mode {SMB_ACL_DELETE, SMB_ACL_MODIFY, SMB_ACL_ADD, SMB_ACL_SET, SMB_ACL_VIEW };
+enum acl_mode { SMB_ACL_DELETE,
+               SMB_ACL_MODIFY,
+               SMB_ACL_ADD,
+               SMB_ACL_SET,
+               SMB_SD_DELETE,
+               SMB_ACL_VIEW };
 
 struct perm_value {
        const char *perm;
@@ -45,7 +51,8 @@ static const struct perm_value special_values[] = {
        { NULL, 0 },
 };
 
-#define SEC_RIGHTS_DIR_CHANGE ( SEC_RIGHTS_DIR_READ|SEC_STD_DELETE|SEC_RIGHTS_DIR_WRITE|SEC_DIR_TRAVERSE )
+#define SEC_RIGHTS_DIR_CHANGE ( SEC_RIGHTS_DIR_READ|SEC_STD_DELETE|\
+                               SEC_RIGHTS_DIR_WRITE|SEC_DIR_TRAVERSE )
 
 static const struct perm_value standard_values[] = {
        { "READ",   SEC_RIGHTS_DIR_READ|SEC_DIR_TRAVERSE },
@@ -58,13 +65,13 @@ static const struct perm_value standard_values[] = {
  print an ACE on a FILE
 ********************************************************************/
 
-static void print_ace(FILE *f, SEC_ACE *ace)
+static void print_ace(FILE *f, struct security_ace *ace)
 {
        const struct perm_value *v;
        int do_print = 0;
        uint32 got_mask;
 
-       fprintf(f, "%s:", sid_string_static(&ace->trustee));
+       fprintf(f, "%s:", sid_string_tos(&ace->trustee));
 
        /* Ace type */
 
@@ -115,10 +122,10 @@ static void print_ace(FILE *f, SEC_ACE *ace)
 }
 
 /********************************************************************
- print a ascii version of a security descriptor on a FILE handle
+ print an ascii version of a security descriptor on a FILE handle
 ********************************************************************/
 
-static void sec_desc_print(FILE *f, SEC_DESC *sd)
+static void sec_desc_print(FILE *f, struct security_descriptor *sd)
 {
        uint32 i;
 
@@ -126,46 +133,48 @@ static void sec_desc_print(FILE *f, SEC_DESC *sd)
 
        /* Print owner and group sid */
 
-       fprintf(f, "OWNER:%s\n", sid_string_static(sd->owner_sid));
+       fprintf(f, "OWNER:%s\n", sid_string_tos(sd->owner_sid));
 
-       fprintf(f, "GROUP:%s\n", sid_string_static(sd->group_sid));
+       fprintf(f, "GROUP:%s\n", sid_string_tos(sd->group_sid));
 
        /* Print aces */
        for (i = 0; sd->dacl && i < sd->dacl->num_aces; i++) {
-               SEC_ACE *ace = &sd->dacl->aces[i];
+               struct security_ace *ace = &sd->dacl->aces[i];
                fprintf(f, "ACL:");
                print_ace(f, ace);
                fprintf(f, "\n");
        }
-
 }
 
 /********************************************************************
   parse an ACE in the same format as print_ace()
+ parse an ACE in the same format as print_ace()
 ********************************************************************/
 
-static BOOL parse_ace(SEC_ACE *ace, const char *orig_str)
+static bool parse_ace(struct security_ace *ace, const char *orig_str)
 {
        char *p;
        const char *cp;
-       fstring tok;
+       char *tok;
        unsigned int atype = 0;
        unsigned int aflags = 0;
        unsigned int amask = 0;
-       DOM_SID sid;
-       SEC_ACCESS mask;
+       struct dom_sid sid;
+       uint32_t mask;
        const struct perm_value *v;
        char *str = SMB_STRDUP(orig_str);
+       TALLOC_CTX *frame = talloc_stackframe();
 
        if (!str) {
+               TALLOC_FREE(frame);
                return False;
        }
 
        ZERO_STRUCTP(ace);
        p = strchr_m(str,':');
        if (!p) {
-               printf("ACE '%s': missing ':'.\n", orig_str);
+               fprintf(stderr, "ACE '%s': missing ':'.\n", orig_str);
                SAFE_FREE(str);
+               TALLOC_FREE(frame);
                return False;
        }
        *p = '\0';
@@ -180,17 +189,19 @@ static BOOL parse_ace(SEC_ACE *ace, const char *orig_str)
        /* Try to parse text form */
 
        if (!string_to_sid(&sid, str)) {
-               printf("ACE '%s': failed to convert '%s' to SID\n",
+               fprintf(stderr, "ACE '%s': failed to convert '%s' to SID\n",
                        orig_str, str);
                SAFE_FREE(str);
+               TALLOC_FREE(frame);
                return False;
        }
 
        cp = p;
-       if (!next_token(&cp, tok, "/", sizeof(fstring))) {
-               printf("ACE '%s': failed to find '/' character.\n",
+       if (!next_token_talloc(frame, &cp, &tok, "/")) {
+               fprintf(stderr, "ACE '%s': failed to find '/' character.\n",
                        orig_str);
                SAFE_FREE(str);
+               TALLOC_FREE(frame);
                return False;
        }
 
@@ -199,34 +210,38 @@ static BOOL parse_ace(SEC_ACE *ace, const char *orig_str)
        } else if (strncmp(tok, "DENIED", strlen("DENIED")) == 0) {
                atype = SEC_ACE_TYPE_ACCESS_DENIED;
        } else {
-               printf("ACE '%s': missing 'ALLOWED' or 'DENIED' entry at '%s'\n",
-                       orig_str, tok);
+               fprintf(stderr, "ACE '%s': missing 'ALLOWED' or 'DENIED' "
+                       "entry at '%s'\n", orig_str, tok);
                SAFE_FREE(str);
+               TALLOC_FREE(frame);
                return False;
        }
 
        /* Only numeric form accepted for flags at present */
        /* no flags on share permissions */
 
-       if (!(next_token(&cp, tok, "/", sizeof(fstring)) &&
+       if (!(next_token_talloc(frame, &cp, &tok, "/") &&
              sscanf(tok, "%i", &aflags) && aflags == 0)) {
-               printf("ACE '%s': bad integer flags entry at '%s'\n",
+               fprintf(stderr, "ACE '%s': bad integer flags entry at '%s'\n",
                        orig_str, tok);
                SAFE_FREE(str);
+               TALLOC_FREE(frame);
                return False;
        }
 
-       if (!next_token(&cp, tok, "/", sizeof(fstring))) {
-               printf("ACE '%s': missing / at '%s'\n",
+       if (!next_token_talloc(frame, &cp, &tok, "/")) {
+               fprintf(stderr, "ACE '%s': missing / at '%s'\n",
                        orig_str, tok);
                SAFE_FREE(str);
+               TALLOC_FREE(frame);
                return False;
        }
 
        if (strncmp(tok, "0x", 2) == 0) {
                if (sscanf(tok, "%i", &amask) != 1) {
-                       printf("ACE '%s': bad hex number at '%s'\n",
+                       fprintf(stderr, "ACE '%s': bad hex number at '%s'\n",
                                orig_str, tok);
+                       TALLOC_FREE(frame);
                        SAFE_FREE(str);
                        return False;
                }
@@ -243,7 +258,7 @@ static BOOL parse_ace(SEC_ACE *ace, const char *orig_str)
        p = tok;
 
        while(*p) {
-               BOOL found = False;
+               bool found = False;
 
                for (v = special_values; v->perm; v++) {
                        if (v->perm[0] == *p) {
@@ -253,15 +268,17 @@ static BOOL parse_ace(SEC_ACE *ace, const char *orig_str)
                }
 
                if (!found) {
-                       printf("ACE '%s': bad permission value at '%s'\n",
-                               orig_str, p);
+                       fprintf(stderr, "ACE '%s': bad permission value at "
+                               "'%s'\n", orig_str, p);
+                       TALLOC_FREE(frame);
                        SAFE_FREE(str);
-                       return False;
+                       return False;
                }
                p++;
        }
 
        if (*p) {
+               TALLOC_FREE(frame);
                SAFE_FREE(str);
                return False;
        }
@@ -270,6 +287,7 @@ static BOOL parse_ace(SEC_ACE *ace, const char *orig_str)
        mask = amask;
        init_sec_ace(ace, &sid, atype, mask, aflags);
        SAFE_FREE(str);
+       TALLOC_FREE(frame);
        return True;
 }
 
@@ -277,61 +295,62 @@ static BOOL parse_ace(SEC_ACE *ace, const char *orig_str)
 /********************************************************************
 ********************************************************************/
 
-static SEC_DESC* parse_acl_string(TALLOC_CTX *mem_ctx, const char *szACL, size_t *sd_size )
+static struct security_descriptor* parse_acl_string(TALLOC_CTX *mem_ctx, const char *szACL, size_t *sd_size )
 {
-       SEC_DESC *sd = NULL;
-       SEC_ACE *ace;
-       SEC_ACL *acl;
+       struct security_descriptor *sd = NULL;
+       struct security_ace *ace;
+       struct security_acl *theacl;
        int num_ace;
        const char *pacl;
        int i;
-       
+
        if ( !szACL )
                return NULL;
 
        pacl = szACL;
        num_ace = count_chars( pacl, ',' ) + 1;
-       
-       if ( !(ace = TALLOC_ZERO_ARRAY( mem_ctx, SEC_ACE, num_ace )) ) 
+
+       if ( !(ace = TALLOC_ZERO_ARRAY( mem_ctx, struct security_ace, num_ace )) )
                return NULL;
-       
+
        for ( i=0; i<num_ace; i++ ) {
                char *end_acl = strchr_m( pacl, ',' );
                fstring acl_string;
 
                strncpy( acl_string, pacl, MIN( PTR_DIFF( end_acl, pacl ), sizeof(fstring)-1) );
                acl_string[MIN( PTR_DIFF( end_acl, pacl ), sizeof(fstring)-1)] = '\0';
-               
+
                if ( !parse_ace( &ace[i], acl_string ) )
                        return NULL;
 
                pacl = end_acl;
                pacl++;
        }
-       
-       if ( !(acl = make_sec_acl( mem_ctx, NT4_ACL_REVISION, num_ace, ace )) )
+
+       if ( !(theacl = make_sec_acl( mem_ctx, NT4_ACL_REVISION, num_ace, ace )) )
                return NULL;
-               
-       sd = make_sec_desc( mem_ctx, SEC_DESC_REVISION, SEC_DESC_SELF_RELATIVE, 
-               NULL, NULL, NULL, acl, sd_size);
+
+       sd = make_sec_desc( mem_ctx, SD_REVISION, SEC_DESC_SELF_RELATIVE,
+               NULL, NULL, NULL, theacl, sd_size);
 
        return sd;
 }
 
-/* add an ACE to a list of ACEs in a SEC_ACL */
-static BOOL add_ace(TALLOC_CTX *mem_ctx, SEC_ACL **the_acl, SEC_ACE *ace)
+/* add an ACE to a list of ACEs in a struct security_acl */
+static bool add_ace(TALLOC_CTX *mem_ctx, struct security_acl **the_acl, struct security_ace *ace)
 {
-       SEC_ACL *new_ace;
-       SEC_ACE *aces;
+       struct security_acl *new_ace;
+       struct security_ace *aces;
        if (! *the_acl) {
                return (((*the_acl) = make_sec_acl(mem_ctx, 3, 1, ace)) != NULL);
        }
 
-       if (!(aces = SMB_CALLOC_ARRAY(SEC_ACE, 1+(*the_acl)->num_aces))) {
+       if (!(aces = SMB_CALLOC_ARRAY(struct security_ace, 1+(*the_acl)->num_aces))) {
                return False;
        }
-       memcpy(aces, (*the_acl)->aces, (*the_acl)->num_aces * sizeof(SEC_ACE));
-       memcpy(aces+(*the_acl)->num_aces, ace, sizeof(SEC_ACE));
+       memcpy(aces, (*the_acl)->aces, (*the_acl)->num_aces * sizeof(struct
+       security_ace));
+       memcpy(aces+(*the_acl)->num_aces, ace, sizeof(struct security_ace));
        new_ace = make_sec_acl(mem_ctx,(*the_acl)->revision,1+(*the_acl)->num_aces, aces);
        SAFE_FREE(aces);
        (*the_acl) = new_ace;
@@ -343,35 +362,35 @@ static BOOL add_ace(TALLOC_CTX *mem_ctx, SEC_ACL **the_acl, SEC_ACE *ace)
    computer running Windows NT 5.0" if denied ACEs do not appear before
    allowed ACEs. */
 
-static int ace_compare(SEC_ACE *ace1, SEC_ACE *ace2)
+static int ace_compare(struct security_ace *ace1, struct security_ace *ace2)
 {
-       if (sec_ace_equal(ace1, ace2)) 
+       if (sec_ace_equal(ace1, ace2))
                return 0;
 
-       if (ace1->type != ace2->type) 
+       if (ace1->type != ace2->type)
                return ace2->type - ace1->type;
 
-       if (sid_compare(&ace1->trustee, &ace2->trustee)) 
+       if (sid_compare(&ace1->trustee, &ace2->trustee))
                return sid_compare(&ace1->trustee, &ace2->trustee);
 
-       if (ace1->flags != ace2->flags) 
+       if (ace1->flags != ace2->flags)
                return ace1->flags - ace2->flags;
 
-       if (ace1->access_mask != ace2->access_mask) 
+       if (ace1->access_mask != ace2->access_mask)
                return ace1->access_mask - ace2->access_mask;
 
-       if (ace1->size != ace2->size) 
+       if (ace1->size != ace2->size)
                return ace1->size - ace2->size;
 
-       return memcmp(ace1, ace2, sizeof(SEC_ACE));
+       return memcmp(ace1, ace2, sizeof(struct security_ace));
 }
 
-static void sort_acl(SEC_ACL *the_acl)
+static void sort_acl(struct security_acl *the_acl)
 {
        uint32 i;
        if (!the_acl) return;
 
-       qsort(the_acl->aces, the_acl->num_aces, sizeof(the_acl->aces[0]), QSORT_CAST ace_compare);
+       TYPESAFE_QSORT(the_acl->aces, the_acl->num_aces, ace_compare);
 
        for (i=1;i<the_acl->num_aces;) {
                if (sec_ace_equal(&the_acl->aces[i-1], &the_acl->aces[i])) {
@@ -389,30 +408,32 @@ static void sort_acl(SEC_ACL *the_acl)
 
 static int change_share_sec(TALLOC_CTX *mem_ctx, const char *sharename, char *the_acl, enum acl_mode mode)
 {
-       SEC_DESC *sd;
-       SEC_DESC *old = NULL;
+       struct security_descriptor *sd = NULL;
+       struct security_descriptor *old = NULL;
        size_t sd_size = 0;
        uint32 i, j;
-       
-       if (mode != SMB_ACL_SET) {
+
+       if (mode != SMB_ACL_SET && mode != SMB_SD_DELETE) {
            if (!(old = get_share_security( mem_ctx, sharename, &sd_size )) ) {
-               fprintf(stderr, "Unable to retrieve permissions for share [%s]\n", sharename);
+               fprintf(stderr, "Unable to retrieve permissions for share "
+                       "[%s]\n", sharename);
                return -1;
            }
        }
 
-       if ( (mode != SMB_ACL_VIEW) && !(sd = parse_acl_string(mem_ctx, the_acl, &sd_size )) ) {
+       if ( (mode != SMB_ACL_VIEW && mode != SMB_SD_DELETE) &&
+           !(sd = parse_acl_string(mem_ctx, the_acl, &sd_size )) ) {
                fprintf( stderr, "Failed to parse acl\n");
                return -1;
        }
-       
+
        switch (mode) {
        case SMB_ACL_VIEW:
                sec_desc_print( stdout, old);
                return 0;
        case SMB_ACL_DELETE:
            for (i=0;sd->dacl && i<sd->dacl->num_aces;i++) {
-               BOOL found = False;
+               bool found = False;
 
                for (j=0;old->dacl && j<old->dacl->num_aces;j++) {
                    if (sec_ace_equal(&sd->dacl->aces[i], &old->dacl->aces[j])) {
@@ -432,11 +453,10 @@ static int change_share_sec(TALLOC_CTX *mem_ctx, const char *sharename, char *th
                printf(" not found\n");
                }
            }
-
            break;
        case SMB_ACL_MODIFY:
            for (i=0;sd->dacl && i<sd->dacl->num_aces;i++) {
-               BOOL found = False;
+               bool found = False;
 
                for (j=0;old->dacl && j<old->dacl->num_aces;j++) {
                    if (sid_equal(&sd->dacl->aces[i].trustee,
@@ -447,7 +467,8 @@ static int change_share_sec(TALLOC_CTX *mem_ctx, const char *sharename, char *th
                }
 
                if (!found) {
-                   printf("ACL for SID %s not found\n", sid_string_static(&sd->dacl->aces[i].trustee));
+                   printf("ACL for SID %s not found\n",
+                          sid_string_tos(&sd->dacl->aces[i].trustee));
                }
            }
 
@@ -467,6 +488,13 @@ static int change_share_sec(TALLOC_CTX *mem_ctx, const char *sharename, char *th
        case SMB_ACL_SET:
            old = sd;
            break;
+       case SMB_SD_DELETE:
+           if (!delete_share_security(sharename)) {
+               fprintf( stderr, "Failed to delete security descriptor for "
+                        "share [%s]\n", sharename );
+               return -1;
+           }
+           return 0;
        }
 
        /* Denied ACE entries must come before allowed ones */
@@ -490,16 +518,17 @@ int main(int argc, const char *argv[])
        enum acl_mode mode = SMB_ACL_SET;
        static char *the_acl = NULL;
        fstring sharename;
-       BOOL force_acl = False;
+       bool force_acl = False;
        int snum;
        poptContext pc;
-       BOOL initialize_sid = False;
+       bool initialize_sid = False;
        struct poptOption long_options[] = {
                POPT_AUTOHELP
-               { "remove", 'r', POPT_ARG_STRING, &the_acl, 'r', "Delete an ACE", "ACL" },
-               { "modify", 'm', POPT_ARG_STRING, &the_acl, 'm', "Modify an acl", "ACL" },
-               { "add", 'a', POPT_ARG_STRING, &the_acl, 'a', "Add an ACE", "ACL" },
-               { "replace", 'R', POPT_ARG_STRING, &the_acl, 'R', "Set share mission ACL", "ACLS" },
+               { "remove", 'r', POPT_ARG_STRING, &the_acl, 'r', "Remove ACEs", "ACL" },
+               { "modify", 'm', POPT_ARG_STRING, &the_acl, 'm', "Modify existing ACEs", "ACL" },
+               { "add", 'a', POPT_ARG_STRING, &the_acl, 'a', "Add ACEs", "ACL" },
+               { "replace", 'R', POPT_ARG_STRING, &the_acl, 'R', "Overwrite share permission ACL", "ACLS" },
+               { "delete", 'D', POPT_ARG_NONE, NULL, 'D', "Delete the entire security descriptor" },
                { "view", 'v', POPT_ARG_NONE, NULL, 'v', "View current share permissions" },
                { "machine-sid", 'M', POPT_ARG_NONE, NULL, 'M', "Initialize the machine SID" },
                { "force", 'F', POPT_ARG_NONE, NULL, 'F', "Force storing the ACL", "ACLS" },
@@ -519,7 +548,7 @@ int main(int argc, const char *argv[])
        x_setbuf( x_stderr, NULL );
 
        pc = poptGetContext("sharesec", argc, argv, long_options, 0);
-       
+
        poptSetOtherOptionHelp(pc, "sharename\n");
 
        while ((opt = poptGetNextOpt(pc)) != -1) {
@@ -538,11 +567,16 @@ int main(int argc, const char *argv[])
                        the_acl = smb_xstrdup(poptGetOptArg(pc));
                        mode = SMB_ACL_ADD;
                        break;
+
                case 'R':
                        the_acl = smb_xstrdup(poptGetOptArg(pc));
                        mode = SMB_ACL_SET;
                        break;
 
+               case 'D':
+                       mode = SMB_SD_DELETE;
+                       break;
+
                case 'v':
                        mode = SMB_ACL_VIEW;
                        break;
@@ -550,30 +584,30 @@ int main(int argc, const char *argv[])
                case 'F':
                        force_acl = True;
                        break;
-                       
+
                case 'M':
                        initialize_sid = True;
                        break;
                }
        }
-       
+
        setlinebuf(stdout);
 
        load_case_tables();
 
-       lp_load( dyn_CONFIGFILE, False, False, False, True );
+       lp_load( get_dyn_CONFIGFILE(), False, False, False, True );
 
        /* check for initializing secrets.tdb first */
-       
+
        if ( initialize_sid ) {
-               DOM_SID *sid = get_global_sam_sid();
-               
+               struct dom_sid *sid = get_global_sam_sid();
+
                if ( !sid ) {
                        fprintf( stderr, "Failed to retrieve Machine SID!\n");
                        return 3;
                }
-               
-               printf ("%s\n", sid_string_static( sid ) );
+
+               printf ("%s\n", sid_string_tos( sid ) );
                return 0;
        }
 
@@ -584,22 +618,22 @@ int main(int argc, const char *argv[])
 
        /* get the sharename */
 
-       if(!poptPeekArg(pc)) { 
-               poptPrintUsage(pc, stderr, 0);  
+       if(!poptPeekArg(pc)) {
+               poptPrintUsage(pc, stderr, 0);
                return -1;
        }
-       
+
        fstrcpy(sharename, poptGetArg(pc));
-       
+
        snum = lp_servicenumber( sharename );
-       
+
        if ( snum == -1 && !force_acl ) {
                fprintf( stderr, "Invalid sharename: %s\n", sharename);
                return -1;
        }
-               
+
        retval = change_share_sec(ctx, sharename, the_acl, mode);
-       
+
        talloc_destroy(ctx);
 
        return retval;