s3-registry: remove last sec_io_desc() caller.
[metze/samba/wip.git] / source3 / rpc_parse / parse_sec.c
index a78627650ada3c21faca56f927d0a0c18828a402..91d8591a05d3dba41e98ab28b7b78e3c71a118c2 100644 (file)
@@ -3,13 +3,13 @@
  *  Version 1.9.
  *  RPC Pipe client / server routines
  *  Copyright (C) Andrew Tridgell              1992-1998,
- *  Copyright (C) Jeremy R. Allison            1995-2003.
+ *  Copyright (C) Jeremy R. Allison            1995-2005.
  *  Copyright (C) Luke Kenneth Casson Leighton 1996-1998,
  *  Copyright (C) Paul Ashton                  1997-1998.
  *  
  *  This program is free software; you can redistribute it and/or modify
  *  it under the terms of the GNU General Public License as published by
- *  the Free Software Foundation; either version 2 of the License, or
+ *  the Free Software Foundation; either version 3 of the License, or
  *  (at your option) any later version.
  *  
  *  This program is distributed in the hope that it will be useful,
@@ -18,8 +18,7 @@
  *  GNU General Public License for more details.
  *  
  *  You should have received a copy of the GNU General Public License
- *  along with this program; if not, write to the Free Software
- *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *  along with this program; if not, see <http://www.gnu.org/licenses/>.
  */
 
 #include "includes.h"
 #undef DBGC_CLASS
 #define DBGC_CLASS DBGC_RPC_PARSE
 
-/*******************************************************************
- Reads or writes a SEC_ACCESS structure.
-********************************************************************/
-
-BOOL sec_io_access(const char *desc, SEC_ACCESS *t, prs_struct *ps, int depth)
-{
-       if (t == NULL)
-               return False;
-
-       prs_debug(ps, depth, desc, "sec_io_access");
-       depth++;
-       
-       if(!prs_uint32("mask", ps, depth, &t->mask))
-               return False;
-
-       return True;
-}
-
 /*******************************************************************
  Reads or writes a SEC_ACE structure.
 ********************************************************************/
 
-BOOL sec_io_ace(const char *desc, SEC_ACE *psa, prs_struct *ps, int depth)
+static bool sec_io_ace(const char *desc, SEC_ACE *psa, prs_struct *ps,
+                      int depth)
 {
        uint32 old_offset;
        uint32 offset_ace_size;
+       uint8 type;
 
        if (psa == NULL)
                return False;
@@ -62,16 +45,24 @@ BOOL sec_io_ace(const char *desc, SEC_ACE *psa, prs_struct *ps, int depth)
        
        old_offset = prs_offset(ps);
 
-       if(!prs_uint8("type ", ps, depth, &psa->type))
+       if (MARSHALLING(ps)) {
+               type = (uint8)psa->type;
+       }
+
+       if(!prs_uint8("type ", ps, depth, &type))
                return False;
 
+       if (UNMARSHALLING(ps)) {
+               psa->type = (enum security_ace_type)type;
+       }
+
        if(!prs_uint8("flags", ps, depth, &psa->flags))
                return False;
 
        if(!prs_uint16_pre("size ", ps, depth, &psa->size, &offset_ace_size))
                return False;
 
-       if(!sec_io_access("info ", &psa->info, ps, depth))
+       if(!prs_uint32("access_mask", ps, depth, &psa->access_mask))
                return False;
 
        /* check whether object access is present */
@@ -79,23 +70,39 @@ BOOL sec_io_ace(const char *desc, SEC_ACE *psa, prs_struct *ps, int depth)
                if (!smb_io_dom_sid("trustee  ", &psa->trustee , ps, depth))
                        return False;
        } else {
-               if (!prs_uint32("obj_flags", ps, depth, &psa->obj_flags))
+               if (!prs_uint32("obj_flags", ps, depth, &psa->object.object.flags))
                        return False;
 
-               if (psa->obj_flags & SEC_ACE_OBJECT_PRESENT)
-                       if (!smb_io_uuid("obj_guid", &psa->obj_guid, ps,depth))
+               if (psa->object.object.flags & SEC_ACE_OBJECT_TYPE_PRESENT)
+                       if (!smb_io_uuid("obj_guid", &psa->object.object.type.type, ps,depth))
                                return False;
 
-               if (psa->obj_flags & SEC_ACE_OBJECT_INHERITED_PRESENT)
-                       if (!smb_io_uuid("inh_guid", &psa->inh_guid, ps,depth))
+               if (psa->object.object.flags & SEC_ACE_INHERITED_OBJECT_TYPE_PRESENT)
+                       if (!smb_io_uuid("inh_guid", &psa->object.object.inherited_type.inherited_type, ps,depth))
                                return False;
 
                if(!smb_io_dom_sid("trustee  ", &psa->trustee , ps, depth))
                        return False;
        }
 
+       /* Theorectically an ACE can have a size greater than the
+          sum of its components. When marshalling, pad with extra null bytes up to the
+          correct size. */
+
+       if (MARSHALLING(ps) && (psa->size > prs_offset(ps) - old_offset)) {
+               uint32 extra_len = psa->size - (prs_offset(ps) - old_offset);
+               uint32 i;
+               uint8 c = 0;
+
+               for (i = 0; i < extra_len; i++) {
+                       if (!prs_uint8("ace extra space", ps, depth, &c))
+                               return False;
+               }
+       }
+
        if(!prs_uint16_post("size ", ps, depth, &psa->size, offset_ace_size, old_offset))
                return False;
+
        return True;
 }
 
@@ -106,18 +113,20 @@ BOOL sec_io_ace(const char *desc, SEC_ACE *psa, prs_struct *ps, int depth)
  for you as it reads them.
 ********************************************************************/
 
-BOOL sec_io_acl(const char *desc, SEC_ACL **ppsa, prs_struct *ps, int depth)
+static bool sec_io_acl(const char *desc, SEC_ACL **ppsa, prs_struct *ps,
+                      int depth)
 {
        unsigned int i;
        uint32 old_offset;
        uint32 offset_acl_size;
        SEC_ACL *psa;
+       uint16 revision;
 
        /*
         * Note that the size is always a multiple of 4 bytes due to the
         * nature of the data structure.  Therefore the prs_align() calls
         * have been removed as they through us off when doing two-layer
-        * marshalling such as in the printing code (NEW_BUFFER).  --jerry
+        * marshalling such as in the printing code (RPC_BUFFER).  --jerry
         */
 
        if (ppsa == NULL)
@@ -129,7 +138,7 @@ BOOL sec_io_acl(const char *desc, SEC_ACL **ppsa, prs_struct *ps, int depth)
                /*
                 * This is a read and we must allocate the stuct to read into.
                 */
-               if((psa = (SEC_ACL *)prs_alloc_mem(ps, sizeof(SEC_ACL))) == NULL)
+               if((psa = PRS_ALLOC_MEM(ps, SEC_ACL, 1)) == NULL)
                        return False;
                *ppsa = psa;
        }
@@ -139,9 +148,17 @@ BOOL sec_io_acl(const char *desc, SEC_ACL **ppsa, prs_struct *ps, int depth)
        
        old_offset = prs_offset(ps);
 
-       if(!prs_uint16("revision", ps, depth, &psa->revision))
+       if (MARSHALLING(ps)) {
+               revision = (uint16)psa->revision;
+       }
+
+       if(!prs_uint16("revision", ps, depth, &revision))
                return False;
 
+       if (UNMARSHALLING(ps)) {
+               psa->revision = (enum security_acl_revision)revision;
+       }
+
        if(!prs_uint16_pre("size     ", ps, depth, &psa->size, &offset_acl_size))
                return False;
 
@@ -149,22 +166,35 @@ BOOL sec_io_acl(const char *desc, SEC_ACL **ppsa, prs_struct *ps, int depth)
                return False;
 
        if (UNMARSHALLING(ps)) {
-               /*
-                * Even if the num_aces is zero, allocate memory as there's a difference
-                * between a non-present DACL (allow all access) and a DACL with no ACE's
-                * (allow no access).
-                */
-               if((psa->ace = (SEC_ACE *)prs_alloc_mem(ps,sizeof(psa->ace[0]) * (psa->num_aces+1))) == NULL)
-                       return False;
+               if (psa->num_aces) {
+                       if((psa->aces = PRS_ALLOC_MEM(ps, SEC_ACE, psa->num_aces)) == NULL)
+                               return False;
+               } else {
+                       psa->aces = NULL;
+               }
        }
 
        for (i = 0; i < psa->num_aces; i++) {
                fstring tmp;
                slprintf(tmp, sizeof(tmp)-1, "ace_list[%02d]: ", i);
-               if(!sec_io_ace(tmp, &psa->ace[i], ps, depth))
+               if(!sec_io_ace(tmp, &psa->aces[i], ps, depth))
                        return False;
        }
 
+       /* Theorectically an ACL can have a size greater than the
+          sum of its components. When marshalling, pad with extra null bytes up to the
+          correct size. */
+
+       if (MARSHALLING(ps) && (psa->size > prs_offset(ps) - old_offset)) {
+               uint32 extra_len = psa->size - (prs_offset(ps) - old_offset);
+               uint8 c = 0;
+
+               for (i = 0; i < extra_len; i++) {
+                       if (!prs_uint8("acl extra space", ps, depth, &c))
+                               return False;
+               }
+       }
+
        if(!prs_uint16_post("size     ", ps, depth, &psa->size, offset_acl_size, old_offset))
                return False;
 
@@ -176,12 +206,14 @@ BOOL sec_io_acl(const char *desc, SEC_ACL **ppsa, prs_struct *ps, int depth)
  If reading and the *ppsd = NULL, allocates the structure.
 ********************************************************************/
 
-BOOL sec_io_desc(const char *desc, SEC_DESC **ppsd, prs_struct *ps, int depth)
+bool sec_io_desc(const char *desc, SEC_DESC **ppsd, prs_struct *ps, int depth)
 {
        uint32 old_offset;
        uint32 max_offset = 0; /* after we're done, move offset to end */
        uint32 tmp_offset = 0;
-       
+       uint32 off_sacl, off_dacl, off_owner_sid, off_grp_sid;
+       uint16 revision;
+
        SEC_DESC *psd;
 
        if (ppsd == NULL)
@@ -191,7 +223,7 @@ BOOL sec_io_desc(const char *desc, SEC_DESC **ppsd, prs_struct *ps, int depth)
 
        if (psd == NULL) {
                if(UNMARSHALLING(ps)) {
-                       if((psd = (SEC_DESC *)prs_alloc_mem(ps,sizeof(SEC_DESC))) == NULL)
+                       if((psd = PRS_ALLOC_MEM(ps,SEC_DESC,1)) == NULL)
                                return False;
                        *ppsd = psd;
                } else {
@@ -203,48 +235,82 @@ BOOL sec_io_desc(const char *desc, SEC_DESC **ppsd, prs_struct *ps, int depth)
        prs_debug(ps, depth, desc, "sec_io_desc");
        depth++;
 
-#if 0  
-       /*
-        * if alignment is needed, should be done by the the 
-        * caller.  Not here.  This caused me problems when marshalling
-        * printer info into a buffer.   --jerry
-        */
-       if(!prs_align(ps))
-               return False;
-#endif
-       
        /* start of security descriptor stored for back-calc offset purposes */
        old_offset = prs_offset(ps);
 
-       if(!prs_uint16("revision ", ps, depth, &psd->revision))
+       if (MARSHALLING(ps)) {
+               revision = (uint16)psd->revision;
+       }
+
+       if(!prs_uint16("revision", ps, depth, &revision))
                return False;
 
+       if (UNMARSHALLING(ps)) {
+               psd->revision = (enum security_descriptor_revision)revision;
+       }
+
        if(!prs_uint16("type     ", ps, depth, &psd->type))
                return False;
 
-       if(!prs_uint32("off_owner_sid", ps, depth, &psd->off_owner_sid))
+       if (MARSHALLING(ps)) {
+               uint32 offset = SEC_DESC_HEADER_SIZE;
+
+               /*
+                * Work out the offsets here, as we write it out.
+                */
+
+               if (psd->sacl != NULL) {
+                       off_sacl = offset;
+                       offset += psd->sacl->size;
+               } else {
+                       off_sacl = 0;
+               }
+
+               if (psd->dacl != NULL) {
+                       off_dacl = offset;
+                       offset += psd->dacl->size;
+               } else {
+                       off_dacl = 0;
+               }
+
+               if (psd->owner_sid != NULL) {
+                       off_owner_sid = offset;
+                       offset += ndr_size_dom_sid(psd->owner_sid, NULL, 0);
+               } else {
+                       off_owner_sid = 0;
+               }
+
+               if (psd->group_sid != NULL) {
+                       off_grp_sid = offset;
+                       offset += ndr_size_dom_sid(psd->group_sid, NULL, 0);
+               } else {
+                       off_grp_sid = 0;
+               }
+       }
+
+       if(!prs_uint32("off_owner_sid", ps, depth, &off_owner_sid))
                return False;
 
-       if(!prs_uint32("off_grp_sid  ", ps, depth, &psd->off_grp_sid))
+       if(!prs_uint32("off_grp_sid  ", ps, depth, &off_grp_sid))
                return False;
 
-       if(!prs_uint32("off_sacl     ", ps, depth, &psd->off_sacl))
+       if(!prs_uint32("off_sacl     ", ps, depth, &off_sacl))
                return False;
 
-       if(!prs_uint32("off_dacl     ", ps, depth, &psd->off_dacl))
+       if(!prs_uint32("off_dacl     ", ps, depth, &off_dacl))
                return False;
 
        max_offset = MAX(max_offset, prs_offset(ps));
 
-       if (psd->off_owner_sid != 0) {
+       if (off_owner_sid != 0) {
 
                tmp_offset = prs_offset(ps);
-               if(!prs_set_offset(ps, old_offset + psd->off_owner_sid))
+               if(!prs_set_offset(ps, old_offset + off_owner_sid))
                        return False;
 
                if (UNMARSHALLING(ps)) {
                        /* reading */
-                       if((psd->owner_sid = (DOM_SID *)prs_alloc_mem(ps,sizeof(*psd->owner_sid))) == NULL)
+                       if((psd->owner_sid = PRS_ALLOC_MEM(ps,DOM_SID,1)) == NULL)
                                return False;
                }
 
@@ -257,19 +323,19 @@ BOOL sec_io_desc(const char *desc, SEC_DESC **ppsd, prs_struct *ps, int depth)
                        return False;
        }
 
-       if (psd->off_grp_sid != 0) {
+       if (psd->group_sid != 0) {
 
                tmp_offset = prs_offset(ps);
-               if(!prs_set_offset(ps, old_offset + psd->off_grp_sid))
+               if(!prs_set_offset(ps, old_offset + off_grp_sid))
                        return False;
 
                if (UNMARSHALLING(ps)) {
                        /* reading */
-                       if((psd->grp_sid = (DOM_SID *)prs_alloc_mem(ps,sizeof(*psd->grp_sid))) == NULL)
+                       if((psd->group_sid = PRS_ALLOC_MEM(ps,DOM_SID,1)) == NULL)
                                return False;
                }
 
-               if(!smb_io_dom_sid("grp_sid", psd->grp_sid, ps, depth))
+               if(!smb_io_dom_sid("grp_sid", psd->group_sid, ps, depth))
                        return False;
                        
                max_offset = MAX(max_offset, prs_offset(ps));
@@ -278,9 +344,9 @@ BOOL sec_io_desc(const char *desc, SEC_DESC **ppsd, prs_struct *ps, int depth)
                        return False;
        }
 
-       if ((psd->type & SEC_DESC_SACL_PRESENT) && psd->off_sacl) {
+       if ((psd->type & SEC_DESC_SACL_PRESENT) && off_sacl) {
                tmp_offset = prs_offset(ps);
-               if(!prs_set_offset(ps, old_offset + psd->off_sacl))
+               if(!prs_set_offset(ps, old_offset + off_sacl))
                        return False;
                if(!sec_io_acl("sacl", &psd->sacl, ps, depth))
                        return False;
@@ -289,10 +355,9 @@ BOOL sec_io_desc(const char *desc, SEC_DESC **ppsd, prs_struct *ps, int depth)
                        return False;
        }
 
-
-       if ((psd->type & SEC_DESC_DACL_PRESENT) && psd->off_dacl != 0) {
+       if ((psd->type & SEC_DESC_DACL_PRESENT) && off_dacl != 0) {
                tmp_offset = prs_offset(ps);
-               if(!prs_set_offset(ps, old_offset + psd->off_dacl))
+               if(!prs_set_offset(ps, old_offset + off_dacl))
                        return False;
                if(!sec_io_acl("dacl", &psd->dacl, ps, depth))
                        return False;
@@ -303,6 +368,7 @@ BOOL sec_io_desc(const char *desc, SEC_DESC **ppsd, prs_struct *ps, int depth)
 
        if(!prs_set_offset(ps, max_offset))
                return False;
+
        return True;
 }
 
@@ -310,13 +376,15 @@ BOOL sec_io_desc(const char *desc, SEC_DESC **ppsd, prs_struct *ps, int depth)
  Reads or writes a SEC_DESC_BUF structure.
 ********************************************************************/
 
-BOOL sec_io_desc_buf(const char *desc, SEC_DESC_BUF **ppsdb, prs_struct *ps, int depth)
+bool sec_io_desc_buf(const char *desc, SEC_DESC_BUF **ppsdb, prs_struct *ps, int depth)
 {
        uint32 off_len;
        uint32 off_max_len;
        uint32 old_offset;
        uint32 size;
+       uint32 len;
        SEC_DESC_BUF *psdb;
+       uint32 ptr;
 
        if (ppsdb == NULL)
                return False;
@@ -324,7 +392,7 @@ BOOL sec_io_desc_buf(const char *desc, SEC_DESC_BUF **ppsdb, prs_struct *ps, int
        psdb = *ppsdb;
 
        if (UNMARSHALLING(ps) && psdb == NULL) {
-               if((psdb = (SEC_DESC_BUF *)prs_alloc_mem(ps,sizeof(SEC_DESC_BUF))) == NULL)
+               if((psdb = PRS_ALLOC_MEM(ps,SEC_DESC_BUF,1)) == NULL)
                        return False;
                *ppsdb = psdb;
        }
@@ -335,20 +403,22 @@ BOOL sec_io_desc_buf(const char *desc, SEC_DESC_BUF **ppsdb, prs_struct *ps, int
        if(!prs_align(ps))
                return False;
        
-       if(!prs_uint32_pre("max_len", ps, depth, &psdb->max_len, &off_max_len))
+       if(!prs_uint32_pre("max_len", ps, depth, &psdb->sd_size, &off_max_len))
                return False;
 
-       if(!prs_uint32    ("ptr  ", ps, depth, &psdb->ptr))
+       ptr = 1;
+       if(!prs_uint32    ("ptr  ", ps, depth, &ptr))
                return False;
 
-       if(!prs_uint32_pre("len    ", ps, depth, &psdb->len, &off_len))
+       len = ndr_size_security_descriptor(psdb->sd, NULL, 0);
+       if(!prs_uint32_pre("len    ", ps, depth, &len, &off_len))
                return False;
 
        old_offset = prs_offset(ps);
 
        /* reading, length is non-zero; writing, descriptor is non-NULL */
-       if ((UNMARSHALLING(ps) && psdb->len != 0) || (MARSHALLING(ps) && psdb->sec != NULL)) {
-               if(!sec_io_desc("sec   ", &psdb->sec, ps, depth))
+       if ((UNMARSHALLING(ps) && psdb->sd_size != 0) || (MARSHALLING(ps) && psdb->sd != NULL)) {
+               if(!sec_io_desc("sec   ", &psdb->sd, ps, depth))
                        return False;
        }
 
@@ -356,10 +426,10 @@ BOOL sec_io_desc_buf(const char *desc, SEC_DESC_BUF **ppsdb, prs_struct *ps, int
                return False;
        
        size = prs_offset(ps) - old_offset;
-       if(!prs_uint32_post("max_len", ps, depth, &psdb->max_len, off_max_len, size == 0 ? psdb->max_len : size))
+       if(!prs_uint32_post("max_len", ps, depth, &psdb->sd_size, off_max_len, size == 0 ? psdb->sd_size : size))
                return False;
 
-       if(!prs_uint32_post("len    ", ps, depth, &psdb->len, off_len, size))
+       if(!prs_uint32_post("len    ", ps, depth, &len, off_len, size))
                return False;
 
        return True;