python/samba/descriptor.py

   1
   2 # Unix SMB/CIFS implementation.
   3 # backend code for provisioning a Samba4 server
   4
   5 # Copyright (C) Jelmer Vernooij <jelmer@samba.org> 2007-2010
   6 # Copyright (C) Andrew Bartlett <abartlet@samba.org> 2008-2009
   7 # Copyright (C) Oliver Liebel <oliver@itc.li> 2008-2009
   8 # Copyright (C) Amitay Isaacs <amitay@samba.org> 2011
   9 #
  10 # Based on the original in EJS:
  11 # Copyright (C) Andrew Tridgell <tridge@samba.org> 2005
  12 #
  13 # This program is free software; you can redistribute it and/or modify
  14 # it under the terms of the GNU General Public License as published by
  15 # the Free Software Foundation; either version 3 of the License, or
  16 # (at your option) any later version.
  17 #
  18 # This program is distributed in the hope that it will be useful,
  19 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  20 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21 # GNU General Public License for more details.
  22 #
  23 # You should have received a copy of the GNU General Public License
  24 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
  25 #
  26
  27 """Functions for setting up a Samba configuration (security descriptors)."""
  28
  29 from samba.dcerpc import security
  30 from samba.ndr import ndr_pack
  31 from samba.schema import get_schema_descriptor
  32 import ldb
  33 import re
  34
  35 # Descriptors of naming contexts and other important objects
  36
  37
  38 def sddl2binary(sddl_in, domain_sid, name_map):
  39     sddl = "%s" % sddl_in
  40
  41     for [name, sid] in name_map.items():
  42         sddl = sddl.replace(name, sid)
  43
  44     sec = security.descriptor.from_sddl(sddl, domain_sid)
  45     return ndr_pack(sec)
  46
  47
  48 def get_empty_descriptor(domain_sid, name_map=None):
  49     if name_map is None:
  50         name_map = {}
  51
  52     sddl = ""
  53     return sddl2binary(sddl, domain_sid, name_map)
  54
  55 # "get_schema_descriptor" is located in "schema.py"
  56
  57
  58 def get_deletedobjects_descriptor(domain_sid, name_map=None):
  59     if name_map is None:
  60         name_map = {}
  61
  62     sddl = "O:SYG:SYD:PAI" \
  63         "(A;;RPWPCCDCLCRCWOWDSDSW;;;SY)" \
  64         "(A;;RPLC;;;BA)"
  65     return sddl2binary(sddl, domain_sid, name_map)
  66
  67
  68 def get_config_descriptor(domain_sid, name_map=None):
  69     if name_map is None:
  70         name_map = {}
  71
  72     sddl = "O:EAG:EAD:(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
  73            "(OA;;CR;1131f6ab-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
  74            "(OA;;CR;1131f6ac-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
  75            "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
  76            "(OA;;CR;1131f6ab-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
  77            "(OA;;CR;1131f6ac-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
  78            "(A;;RPLCLORC;;;AU)(A;CI;RPWPCRCCDCLCLORCWOWDSDDTSW;;;EA)" \
  79            "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)(A;CIIO;RPWPCRCCLCLORCWOWDSDSW;;;DA)" \
  80            "(OA;;CR;1131f6ad-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
  81            "(OA;;CR;89e95b76-444d-4c62-991a-0facbeda640c;;ED)" \
  82            "(OA;;CR;1131f6ad-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
  83            "(OA;;CR;89e95b76-444d-4c62-991a-0facbeda640c;;BA)" \
  84            "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;RO)" \
  85            "S:(AU;SA;WPWOWD;;;WD)(AU;SA;CR;;;BA)(AU;SA;CR;;;DU)" \
  86            "(OU;SA;CR;45ec5156-db7e-47bb-b53f-dbeb2d03c40f;;WD)"
  87     return sddl2binary(sddl, domain_sid, name_map)
  88
  89
  90 def get_config_partitions_descriptor(domain_sid, name_map=None):
  91     if name_map is None:
  92         name_map = {}
  93
  94     sddl = "D:" \
  95         "(A;;LCLORC;;;AU)" \
  96         "(OA;;RP;e48d0154-bcf8-11d1-8702-00c04fb96050;;AU)" \
  97         "(OA;;RP;d31a8757-2447-4545-8081-3bb610cacbf2;;AU)" \
  98         "(OA;;RP;66171887-8f3c-11d0-afda-00c04fd930c9;;AU)" \
  99         "(OA;;RP;032160bf-9824-11d1-aec0-0000f80367c1;;AU)" \
 100         "(OA;;RP;789ee1eb-8c8e-4e4c-8cec-79b31b7617b5;;AU)" \
 101         "(OA;;RP;5706aeaf-b940-4fb2-bcfc-5268683ad9fe;;AU)" \
 102         "(A;;RPWPCRCCLCLORCWOWDSW;;;EA)" \
 103         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 104         "(A;;CC;;;ED)" \
 105         "(OA;CIIO;WP;3df793df-9858-4417-a701-735a1ecebf74;bf967a8d-0de6-11d0-a285-00aa003049e2;BA)" \
 106         "S:" \
 107         "(AU;CISA;WPCRCCDCWOWDSDDT;;;WD)"
 108     return sddl2binary(sddl, domain_sid, name_map)
 109
 110
 111 def get_config_sites_descriptor(domain_sid, name_map=None):
 112     if name_map is None:
 113         name_map = {}
 114
 115     sddl = "D:" \
 116         "(A;;RPLCLORC;;;AU)" \
 117         "(OA;CIIO;SW;d31a8757-2447-4545-8081-3bb610cacbf2;f0f8ffab-1191-11d0-a060-00aa006c33ed;RO)" \
 118         "(A;;RPWPCRCCLCLORCWOWDSW;;;EA)" \
 119         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 120         "S:" \
 121         "(AU;CISA;CCDCSDDT;;;WD)" \
 122         "(OU;CIIOSA;CR;;f0f8ffab-1191-11d0-a060-00aa006c33ed;WD)" \
 123         "(OU;CIIOSA;WP;f30e3bbe-9ff0-11d1-b603-0000f80367c1;bf967ab3-0de6-11d0-a285-00aa003049e2;WD)" \
 124         "(OU;CIIOSA;WP;f30e3bbf-9ff0-11d1-b603-0000f80367c1;bf967ab3-0de6-11d0-a285-00aa003049e2;WD)" \
 125         "(OU;CIIOSA;WP;3e10944c-c354-11d0-aff8-0000f80367c1;b7b13124-b82e-11d0-afee-0000f80367c1;WD)"
 126     return sddl2binary(sddl, domain_sid, name_map)
 127
 128
 129 def get_config_ntds_quotas_descriptor(domain_sid, name_map=None):
 130     if name_map is None:
 131         name_map = {}
 132
 133     sddl = "D:" \
 134         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;EA)" \
 135         "(A;;RPLCLORC;;;BA)" \
 136         "(OA;;CR;4ecc03fe-ffc0-4947-b630-eb672a8a9dbc;;WD)"
 137     return sddl2binary(sddl, domain_sid, name_map)
 138
 139
 140 def get_config_delete_protected1_descriptor(domain_sid, name_map=None):
 141     if name_map is None:
 142         name_map = {}
 143
 144     sddl = "D:AI" \
 145         "(A;;RPLCLORC;;;AU)" \
 146         "(A;;RPWPCRCCLCLORCWOWDSW;;;EA)" \
 147         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)"
 148     return sddl2binary(sddl, domain_sid, name_map)
 149
 150
 151 def get_config_delete_protected1wd_descriptor(domain_sid, name_map=None):
 152     if name_map is None:
 153         name_map = {}
 154
 155     sddl = "D:AI" \
 156         "(A;;RPLCLORC;;;WD)" \
 157         "(A;;RPWPCRCCLCLORCWOWDSW;;;EA)" \
 158         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)"
 159     return sddl2binary(sddl, domain_sid, name_map)
 160
 161
 162 def get_config_delete_protected2_descriptor(domain_sid, name_map=None):
 163     if name_map is None:
 164         name_map = {}
 165
 166     sddl = "D:AI" \
 167         "(A;;RPLCLORC;;;AU)" \
 168         "(A;;RPWPCRCCDCLCLORCWOWDSW;;;EA)" \
 169         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)"
 170     return sddl2binary(sddl, domain_sid, name_map)
 171
 172
 173 def get_domain_descriptor(domain_sid, name_map=None):
 174     if name_map is None:
 175         name_map = {}
 176
 177     sddl = "O:BAG:BAD:AI(OA;CIIO;RP;4c164200-20c0-11d0-a768-00aa006e0529;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 178         "(OA;CIIO;RP;4c164200-20c0-11d0-a768-00aa006e0529;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 179         "(OA;CIIO;RP;5f202010-79a5-11d0-9020-00c04fc2d4cf;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 180         "(OA;CIIO;RP;5f202010-79a5-11d0-9020-00c04fc2d4cf;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 181         "(OA;CIIO;RP;bc0ac240-79a9-11d0-9020-00c04fc2d4cf;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 182         "(OA;CIIO;RP;bc0ac240-79a9-11d0-9020-00c04fc2d4cf;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 183         "(OA;CIIO;RP;59ba2f42-79a2-11d0-9020-00c04fc2d3cf;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 184         "(OA;CIIO;RP;59ba2f42-79a2-11d0-9020-00c04fc2d3cf;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 185         "(OA;CIIO;RP;037088f8-0ae1-11d2-b422-00a0c968f939;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 186         "(OA;CIIO;RP;037088f8-0ae1-11d2-b422-00a0c968f939;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 187         "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;RO)" \
 188         "(OA;;CR;1131f6ad-9c07-11d1-f79f-00c04fc2dcd2;;DD)" \
 189         "(OA;CIIO;RP;b7c69e6d-2cc7-11d2-854e-00a0c983f608;bf967a86-0de6-11d0-a285-00aa003049e2;ED)" \
 190         "(OA;CIIO;RP;b7c69e6d-2cc7-11d2-854e-00a0c983f608;bf967a9c-0de6-11d0-a285-00aa003049e2;ED)" \
 191         "(OA;CIIO;RP;b7c69e6d-2cc7-11d2-854e-00a0c983f608;bf967aba-0de6-11d0-a285-00aa003049e2;ED)" \
 192         "(OA;;CR;89e95b76-444d-4c62-991a-0facbeda640c;;BA)" \
 193         "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 194         "(OA;;CR;1131f6ab-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 195         "(OA;;CR;1131f6ac-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 196         "(OA;;CR;1131f6ad-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 197         "(OA;;CR;1131f6ae-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 198         "(OA;;CR;e2a36dc9-ae17-47c3-b58b-be34c55ba633;;S-1-5-32-557)" \
 199         "(OA;;RP;c7407360-20bf-11d0-a768-00aa006e0529;;RU)" \
 200         "(OA;;RP;b8119fd0-04f6-4762-ab7a-4986c76b3f9a;;RU)" \
 201         "(OA;CIIO;RPLCLORC;;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 202         "(OA;CIIO;RPLCLORC;;bf967a9c-0de6-11d0-a285-00aa003049e2;RU)" \
 203         "(OA;CIIO;RPLCLORC;;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 204         "(OA;;CR;05c74c5e-4deb-43b4-bd9f-86664c2a7fd5;;AU)" \
 205         "(OA;;CR;89e95b76-444d-4c62-991a-0facbeda640c;;ED)" \
 206         "(OA;;CR;ccc2dc7d-a6ad-4a7a-8846-c04e3cc53501;;AU)" \
 207         "(OA;;CR;280f369c-67c7-438e-ae98-1d46f3c6f541;;AU)" \
 208         "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 209         "(OA;;CR;1131f6ab-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 210         "(OA;;CR;1131f6ac-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 211         "(OA;;CR;1131f6ae-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 212         "(OA;;RP;b8119fd0-04f6-4762-ab7a-4986c76b3f9a;;AU)" \
 213         "(OA;CIIO;RPWPCR;91e647de-d96f-4b70-9557-d63ff4f3ccd8;;PS)" \
 214         "(OA;CIIO;WP;ea1b7b93-5e48-46d5-bc6c-4df4fda78a35;bf967a86-0de6-11d0-a285-00aa003049e2;PS)" \
 215         "(OA;;CR;3e0f7e18-2c7a-4c10-ba82-4d926db99a3e;;CN)" \
 216         "(OA;OICI;RPWP;3f78c3e5-f79a-46bd-a0b8-9d18116ddc79;;PS)" \
 217         "(OA;CI;RPWP;5b47d60f-6090-40b2-9f37-2a4de88f3063;;KA)" \
 218         "(OA;CI;RPWP;5b47d60f-6090-40b2-9f37-2a4de88f3063;;EK)" \
 219         "(OA;CIIO;SW;9b026da6-0d3c-465c-8bee-5199d7165cba;bf967a86-0de6-11d0-a285-00aa003049e2;PS)" \
 220         "(OA;CIIO;SW;9b026da6-0d3c-465c-8bee-5199d7165cba;bf967a86-0de6-11d0-a285-00aa003049e2;CO)" \
 221         "(A;;RPWPCRCCLCLORCWOWDSW;;;DA)" \
 222         "(A;CI;RPWPCRCCDCLCLORCWOWDSDDTSW;;;EA)" \
 223         "(A;;RPRC;;;RU)" \
 224         "(A;CI;LC;;;RU)" \
 225         "(A;CI;RPWPCRCCLCLORCWOWDSDSW;;;BA)" \
 226         "(A;;RP;;;WD)" \
 227         "(A;;RPLCLORC;;;ED)" \
 228         "(A;;RPLCLORC;;;AU)" \
 229         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 230         "S:AI(OU;CISA;WP;f30e3bbe-9ff0-11d1-b603-0000f80367c1;bf967aa5-0de6-11d0-a285-00aa003049e2;WD)" \
 231         "(OU;CISA;WP;f30e3bbf-9ff0-11d1-b603-0000f80367c1;bf967aa5-0de6-11d0-a285-00aa003049e2;WD)" \
 232         "(AU;SA;CR;;;DU)(AU;SA;CR;;;BA)(AU;SA;WPWOWD;;;WD)"
 233     return sddl2binary(sddl, domain_sid, name_map)
 234
 235
 236 def get_domain_infrastructure_descriptor(domain_sid, name_map=None):
 237     if name_map is None:
 238         name_map = {}
 239
 240     sddl = "D:" \
 241         "(A;;RPLCLORC;;;AU)" \
 242         "(A;;RPWPCRCCLCLORCWOWDSW;;;DA)" \
 243         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 244         "S:" \
 245         "(AU;SA;WPCR;;;WD)"
 246     return sddl2binary(sddl, domain_sid, name_map)
 247
 248
 249 def get_domain_builtin_descriptor(domain_sid, name_map=None):
 250     if name_map is None:
 251         name_map = {}
 252
 253     sddl = "D:" \
 254         "(OA;CIIO;RP;4c164200-20c0-11d0-a768-00aa006e0529;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 255         "(OA;CIIO;RP;4c164200-20c0-11d0-a768-00aa006e0529;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 256         "(OA;CIIO;RP;5f202010-79a5-11d0-9020-00c04fc2d4cf;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 257         "(OA;CIIO;RP;5f202010-79a5-11d0-9020-00c04fc2d4cf;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 258         "(OA;CIIO;RP;bc0ac240-79a9-11d0-9020-00c04fc2d4cf;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 259         "(OA;CIIO;RP;bc0ac240-79a9-11d0-9020-00c04fc2d4cf;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 260         "(OA;CIIO;RP;59ba2f42-79a2-11d0-9020-00c04fc2d3cf;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 261         "(OA;CIIO;RP;59ba2f42-79a2-11d0-9020-00c04fc2d3cf;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 262         "(OA;CIIO;RP;037088f8-0ae1-11d2-b422-00a0c968f939;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 263         "(OA;CIIO;RP;037088f8-0ae1-11d2-b422-00a0c968f939;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 264         "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;RO)" \
 265         "(OA;;CR;1131f6ad-9c07-11d1-f79f-00c04fc2dcd2;;DD)" \
 266         "(OA;CIIO;RP;b7c69e6d-2cc7-11d2-854e-00a0c983f608;bf967a86-0de6-11d0-a285-00aa003049e2;ED)" \
 267         "(OA;CIIO;RP;b7c69e6d-2cc7-11d2-854e-00a0c983f608;bf967a9c-0de6-11d0-a285-00aa003049e2;ED)" \
 268         "(OA;CIIO;RP;b7c69e6d-2cc7-11d2-854e-00a0c983f608;bf967aba-0de6-11d0-a285-00aa003049e2;ED)" \
 269         "(OA;;CR;89e95b76-444d-4c62-991a-0facbeda640c;;BA)" \
 270         "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 271         "(OA;;CR;1131f6ab-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 272         "(OA;;CR;1131f6ac-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 273         "(OA;;CR;1131f6ad-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 274         "(OA;;CR;1131f6ae-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 275         "(OA;;CR;e2a36dc9-ae17-47c3-b58b-be34c55ba633;;S-1-5-32-557)" \
 276         "(OA;;RP;c7407360-20bf-11d0-a768-00aa006e0529;;RU)" \
 277         "(OA;;RP;b8119fd0-04f6-4762-ab7a-4986c76b3f9a;;RU)" \
 278         "(OA;CIIO;RPLCLORC;;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 279         "(OA;CIIO;RPLCLORC;;bf967a9c-0de6-11d0-a285-00aa003049e2;RU)" \
 280         "(OA;CIIO;RPLCLORC;;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 281         "(OA;;CR;05c74c5e-4deb-43b4-bd9f-86664c2a7fd5;;AU)" \
 282         "(OA;;CR;89e95b76-444d-4c62-991a-0facbeda640c;;ED)" \
 283         "(OA;;CR;ccc2dc7d-a6ad-4a7a-8846-c04e3cc53501;;AU)" \
 284         "(OA;;CR;280f369c-67c7-438e-ae98-1d46f3c6f541;;AU)" \
 285         "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 286         "(OA;;CR;1131f6ab-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 287         "(OA;;CR;1131f6ac-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 288         "(OA;;CR;1131f6ae-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 289         "(OA;;RP;b8119fd0-04f6-4762-ab7a-4986c76b3f9a;;AU)" \
 290         "(OA;CIIO;RPWPCR;91e647de-d96f-4b70-9557-d63ff4f3ccd8;;PS)" \
 291         "(OA;CIIO;SW;9b026da6-0d3c-465c-8bee-5199d7165cba;bf967a86-0de6-11d0-a285-00aa003049e2;CO)" \
 292         "(OA;OICI;RPWP;3f78c3e5-f79a-46bd-a0b8-9d18116ddc79;;PS)" \
 293         "(OA;CIIO;SW;9b026da6-0d3c-465c-8bee-5199d7165cba;bf967a86-0de6-11d0-a285-00aa003049e2;PS)" \
 294         "(OA;CIIO;WP;ea1b7b93-5e48-46d5-bc6c-4df4fda78a35;bf967a86-0de6-11d0-a285-00aa003049e2;PS)" \
 295         "(A;;RPWPCRCCLCLORCWOWDSW;;;DA)" \
 296         "(A;CI;RPWPCRCCDCLCLORCWOWDSDDTSW;;;EA)" \
 297         "(A;;RPRC;;;RU)" \
 298         "(A;CI;LC;;;RU)" \
 299         "(A;CI;RPWPCRCCLCLORCWOWDSDSW;;;BA)" \
 300         "(A;;RP;;;WD)" \
 301         "(A;;RPLCLORC;;;ED)" \
 302         "(A;;RPLCLORC;;;AU)" \
 303         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 304         "S:" \
 305         "(OU;CISA;WP;f30e3bbe-9ff0-11d1-b603-0000f80367c1;bf967aa5-0de6-11d0-a285-00aa003049e2;WD)" \
 306         "(OU;CISA;WP;f30e3bbf-9ff0-11d1-b603-0000f80367c1;bf967aa5-0de6-11d0-a285-00aa003049e2;WD)" \
 307         "(AU;SA;CR;;;DU)" \
 308         "(AU;SA;CR;;;BA)" \
 309         "(AU;SA;WPWOWD;;;WD)"
 310     return sddl2binary(sddl, domain_sid, name_map)
 311
 312
 313 def get_domain_computers_descriptor(domain_sid, name_map=None):
 314     if name_map is None:
 315         name_map = {}
 316
 317     sddl = "D:" \
 318         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 319         "(A;;RPWPCRCCDCLCLORCWOWDSW;;;DA)" \
 320         "(OA;;CCDC;bf967a86-0de6-11d0-a285-00aa003049e2;;AO)" \
 321         "(OA;;CCDC;bf967aba-0de6-11d0-a285-00aa003049e2;;AO)" \
 322         "(OA;;CCDC;bf967a9c-0de6-11d0-a285-00aa003049e2;;AO)" \
 323         "(OA;;CCDC;bf967aa8-0de6-11d0-a285-00aa003049e2;;PO)" \
 324         "(A;;RPLCLORC;;;AU)" \
 325         "(OA;;CCDC;4828cc14-1437-45bc-9b07-ad6f015e5f28;;AO)" \
 326         "S:"
 327     return sddl2binary(sddl, domain_sid, name_map)
 328
 329
 330 def get_domain_users_descriptor(domain_sid, name_map=None):
 331     if name_map is None:
 332         name_map = {}
 333
 334     sddl = "D:" \
 335         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 336         "(A;;RPWPCRCCDCLCLORCWOWDSW;;;DA)" \
 337         "(OA;;CCDC;bf967aba-0de6-11d0-a285-00aa003049e2;;AO)" \
 338         "(OA;;CCDC;bf967a9c-0de6-11d0-a285-00aa003049e2;;AO)" \
 339         "(OA;;CCDC;bf967aa8-0de6-11d0-a285-00aa003049e2;;PO)" \
 340         "(A;;RPLCLORC;;;AU)" \
 341         "(OA;;CCDC;4828cc14-1437-45bc-9b07-ad6f015e5f28;;AO)" \
 342         "S:"
 343     return sddl2binary(sddl, domain_sid, name_map)
 344
 345
 346 def get_managed_service_accounts_descriptor(domain_sid, name_map=None):
 347     if name_map is None:
 348         name_map = {}
 349
 350     sddl = "D:" \
 351         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 352         "(A;;RPWPCRCCDCLCLORCWOWDSW;;;DA)" \
 353         "(OA;;CCDC;ce206244-5827-4a86-ba1c-1c0c386c1b64;;AO)" \
 354         "(OA;;CCDC;bf967aba-0de6-11d0-a285-00aa003049e2;;AO)" \
 355         "(OA;;CCDC;bf967a9c-0de6-11d0-a285-00aa003049e2;;AO)" \
 356         "(A;;RPLCLORC;;;AU)" \
 357         "S:"
 358     return sddl2binary(sddl, domain_sid, name_map)
 359
 360
 361 def get_domain_controllers_descriptor(domain_sid, name_map=None):
 362     if name_map is None:
 363         name_map = {}
 364
 365     sddl = "D:" \
 366         "(A;;RPLCLORC;;;AU)" \
 367         "(A;;RPWPCRCCLCLORCWOWDSW;;;DA)" \
 368         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 369         "(A;;RPLCLORC;;;ED)" \
 370         "S:" \
 371         "(AU;SA;CCDCWOWDSDDT;;;WD)" \
 372         "(AU;CISA;WP;;;WD)"
 373     return sddl2binary(sddl, domain_sid, name_map)
 374
 375
 376 def get_domain_delete_protected1_descriptor(domain_sid, name_map=None):
 377     if name_map is None:
 378         name_map = {}
 379
 380     sddl = "D:AI" \
 381         "(A;;RPLCLORC;;;AU)" \
 382         "(A;;RPWPCRCCLCLORCWOWDSW;;;DA)" \
 383         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)"
 384     return sddl2binary(sddl, domain_sid, name_map)
 385
 386
 387 def get_domain_delete_protected2_descriptor(domain_sid, name_map=None):
 388     if name_map is None:
 389         name_map = {}
 390
 391     sddl = "D:AI" \
 392         "(A;;RPLCLORC;;;AU)" \
 393         "(A;;RPWPCRCCDCLCLORCWOWDSW;;;DA)" \
 394         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)"
 395     return sddl2binary(sddl, domain_sid, name_map)
 396
 397
 398 def get_dns_partition_descriptor(domain_sid, name_map=None):
 399     if name_map is None:
 400         name_map = {}
 401
 402     sddl = "O:SYG:BAD:AI" \
 403         "(OA;CIIO;RP;4c164200-20c0-11d0-a768-00aa006e0529;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 404         "(OA;CIIO;RP;4c164200-20c0-11d0-a768-00aa006e0529;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 405         "(OA;CIIO;RP;5f202010-79a5-11d0-9020-00c04fc2d4cf;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 406         "(OA;CIIO;RP;5f202010-79a5-11d0-9020-00c04fc2d4cf;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 407         "(OA;CIIO;RP;bc0ac240-79a9-11d0-9020-00c04fc2d4cf;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 408         "(OA;CIIO;RP;bc0ac240-79a9-11d0-9020-00c04fc2d4cf;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 409         "(OA;CIIO;RP;59ba2f42-79a2-11d0-9020-00c04fc2d3cf;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 410         "(OA;CIIO;RP;59ba2f42-79a2-11d0-9020-00c04fc2d3cf;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 411         "(OA;CIIO;RP;037088f8-0ae1-11d2-b422-00a0c968f939;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 412         "(OA;CIIO;RP;037088f8-0ae1-11d2-b422-00a0c968f939;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 413         "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;RO)" \
 414         "(OA;CIIO;RP;b7c69e6d-2cc7-11d2-854e-00a0c983f608;bf967a86-0de6-11d0-a285-00aa003049e2;ED)" \
 415         "(OA;CIIO;RP;b7c69e6d-2cc7-11d2-854e-00a0c983f608;bf967a9c-0de6-11d0-a285-00aa003049e2;ED)" \
 416         "(OA;CIIO;RP;b7c69e6d-2cc7-11d2-854e-00a0c983f608;bf967aba-0de6-11d0-a285-00aa003049e2;ED)" \
 417         "(OA;;CR;89e95b76-444d-4c62-991a-0facbeda640c;;BA)" \
 418         "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 419         "(OA;;CR;1131f6ab-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 420         "(OA;;CR;1131f6ac-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 421         "(OA;;CR;1131f6ad-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 422         "(OA;;CR;1131f6ae-9c07-11d1-f79f-00c04fc2dcd2;;BA)" \
 423         "(OA;;CR;e2a36dc9-ae17-47c3-b58b-be34c55ba633;;S-1-5-32-557)" \
 424         "(OA;;RP;c7407360-20bf-11d0-a768-00aa006e0529;;RU)" \
 425         "(OA;;RP;b8119fd0-04f6-4762-ab7a-4986c76b3f9a;;RU)" \
 426         "(OA;CIIO;RPLCLORC;;4828cc14-1437-45bc-9b07-ad6f015e5f28;RU)" \
 427         "(OA;CIIO;RPLCLORC;;bf967a9c-0de6-11d0-a285-00aa003049e2;RU)" \
 428         "(OA;CIIO;RPLCLORC;;bf967aba-0de6-11d0-a285-00aa003049e2;RU)" \
 429         "(OA;;CR;05c74c5e-4deb-43b4-bd9f-86664c2a7fd5;;AU)" \
 430         "(OA;;CR;89e95b76-444d-4c62-991a-0facbeda640c;;ED)" \
 431         "(OA;;CR;ccc2dc7d-a6ad-4a7a-8846-c04e3cc53501;;AU)" \
 432         "(OA;;CR;280f369c-67c7-438e-ae98-1d46f3c6f541;;AU)" \
 433         "(OA;;CR;1131f6aa-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 434         "(OA;;CR;1131f6ab-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 435         "(OA;;CR;1131f6ac-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 436         "(OA;;CR;1131f6ad-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 437         "(OA;;CR;1131f6ae-9c07-11d1-f79f-00c04fc2dcd2;;ED)" \
 438         "(OA;;RP;b8119fd0-04f6-4762-ab7a-4986c76b3f9a;;AU)" \
 439         "(OA;CIIO;RPWPCR;91e647de-d96f-4b70-9557-d63ff4f3ccd8;;PS)" \
 440         "(OA;CIIO;SW;9b026da6-0d3c-465c-8bee-5199d7165cba;bf967a86-0de6-11d0-a285-00aa003049e2;CO)" \
 441         "(OA;OICI;RPWP;3f78c3e5-f79a-46bd-a0b8-9d18116ddc79;;PS)" \
 442         "(OA;CIIO;SW;9b026da6-0d3c-465c-8bee-5199d7165cba;bf967a86-0de6-11d0-a285-00aa003049e2;PS)" \
 443         "(OA;CIIO;WP;ea1b7b93-5e48-46d5-bc6c-4df4fda78a35;bf967a86-0de6-11d0-a285-00aa003049e2;PS)" \
 444         "(A;;RPWPCRCCLCLORCWOWDSW;;;DA)" \
 445         "(A;CI;RPWPCRCCDCLCLORCWOWDSDDTSW;;;EA)" \
 446         "(A;;RPRC;;;RU)" \
 447         "(A;CI;LC;;;RU)" \
 448         "(A;CI;RPWPCRCCLCLORCWOWDSDSW;;;BA)" \
 449         "(A;;RP;;;WD)" \
 450         "(A;;RPLCLORC;;;ED)" \
 451         "(A;;RPLCLORC;;;AU)" \
 452         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 453         "S:AI" \
 454         "(OU;CISA;WP;f30e3bbe-9ff0-11d1-b603-0000f80367c1;bf967aa5-0de6-11d0-a285-00aa003049e2;WD)" \
 455         "(OU;CISA;WP;f30e3bbf-9ff0-11d1-b603-0000f80367c1;bf967aa5-0de6-11d0-a285-00aa003049e2;WD)" \
 456         "(AU;SA;CR;;;DU)(AU;SA;CR;;;BA)(AU;SA;WPWOWD;;;WD)"
 457     return sddl2binary(sddl, domain_sid, name_map)
 458
 459
 460 def get_dns_forest_microsoft_dns_descriptor(domain_sid, name_map=None):
 461     if name_map is None:
 462         name_map = {}
 463
 464     sddl = "O:SYG:SYD:AI" \
 465         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 466         "(A;CI;RPWPCRCCDCLCRCWOWDSDDTSW;;;ED)"
 467     return sddl2binary(sddl, domain_sid, name_map)
 468
 469
 470 def get_dns_domain_microsoft_dns_descriptor(domain_sid, name_map=None):
 471     if name_map is None:
 472         name_map = {}
 473
 474     sddl = "O:SYG:SYD:AI" \
 475         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;DA)" \
 476         "(A;CI;RPWPCRCCDCLCRCWOWDSDDTSW;;;DnsAdmins)" \
 477         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)" \
 478         "(A;CI;RPWPCRCCDCLCRCWOWDSDDTSW;;;ED)"
 479     return sddl2binary(sddl, domain_sid, name_map)
 480
 481
 482 def get_paritions_crossref_subdomain_descriptor(domain_sid, name_map=None):
 483     if name_map is None:
 484         name_map = {}
 485
 486     sddl = "O:SubdomainAdminsG:SubdomainAdminsD:AI" \
 487         "(A;;RPWPCRCCLCLORCWOWDSW;;;SubdomainAdmins)" \
 488         "(A;;RPLCLORC;;;AU)" \
 489         "(A;;RPWPCRCCDCLCLORCWOWDSDDTSW;;;SY)"
 490     return sddl2binary(sddl, domain_sid, name_map)
 491
 492
 493 def get_wellknown_sds(samdb):
 494
 495     # Then subcontainers
 496     subcontainers = [
 497         (ldb.Dn(samdb, "%s" % str(samdb.domain_dn())), get_domain_descriptor),
 498         (ldb.Dn(samdb, "CN=LostAndFound,%s" % str(samdb.domain_dn())), get_domain_delete_protected2_descriptor),
 499         (ldb.Dn(samdb, "CN=System,%s" % str(samdb.domain_dn())), get_domain_delete_protected1_descriptor),
 500         (ldb.Dn(samdb, "CN=Infrastructure,%s" % str(samdb.domain_dn())), get_domain_infrastructure_descriptor),
 501         (ldb.Dn(samdb, "CN=Builtin,%s" % str(samdb.domain_dn())), get_domain_builtin_descriptor),
 502         (ldb.Dn(samdb, "CN=Computers,%s" % str(samdb.domain_dn())), get_domain_computers_descriptor),
 503         (ldb.Dn(samdb, "CN=Users,%s" % str(samdb.domain_dn())), get_domain_users_descriptor),
 504         (ldb.Dn(samdb, "OU=Domain Controllers,%s" % str(samdb.domain_dn())), get_domain_controllers_descriptor),
 505         (ldb.Dn(samdb, "CN=MicrosoftDNS,CN=System,%s" % str(samdb.domain_dn())), get_dns_domain_microsoft_dns_descriptor),
 506
 507         (ldb.Dn(samdb, "%s" % str(samdb.get_config_basedn())), get_config_descriptor),
 508         (ldb.Dn(samdb, "CN=NTDS Quotas,%s" % str(samdb.get_config_basedn())), get_config_ntds_quotas_descriptor),
 509         (ldb.Dn(samdb, "CN=LostAndFoundConfig,%s" % str(samdb.get_config_basedn())), get_config_delete_protected1wd_descriptor),
 510         (ldb.Dn(samdb, "CN=Services,%s" % str(samdb.get_config_basedn())), get_config_delete_protected1_descriptor),
 511         (ldb.Dn(samdb, "CN=Physical Locations,%s" % str(samdb.get_config_basedn())), get_config_delete_protected1wd_descriptor),
 512         (ldb.Dn(samdb, "CN=WellKnown Security Principals,%s" % str(samdb.get_config_basedn())), get_config_delete_protected1wd_descriptor),
 513         (ldb.Dn(samdb, "CN=ForestUpdates,%s" % str(samdb.get_config_basedn())), get_config_delete_protected1wd_descriptor),
 514         (ldb.Dn(samdb, "CN=DisplaySpecifiers,%s" % str(samdb.get_config_basedn())), get_config_delete_protected2_descriptor),
 515         (ldb.Dn(samdb, "CN=Extended-Rights,%s" % str(samdb.get_config_basedn())), get_config_delete_protected2_descriptor),
 516         (ldb.Dn(samdb, "CN=Partitions,%s" % str(samdb.get_config_basedn())), get_config_partitions_descriptor),
 517         (ldb.Dn(samdb, "CN=Sites,%s" % str(samdb.get_config_basedn())), get_config_sites_descriptor),
 518
 519         (ldb.Dn(samdb, "%s" % str(samdb.get_schema_basedn())), get_schema_descriptor),
 520     ]
 521
 522     current = samdb.search(expression="(objectClass=*)",
 523                            base="", scope=ldb.SCOPE_BASE,
 524                            attrs=["namingContexts"])
 525
 526     for nc in current[0]["namingContexts"]:
 527
 528         dnsforestdn = ldb.Dn(samdb, "DC=ForestDnsZones,%s" % (str(samdb.get_root_basedn())))
 529         if ldb.Dn(samdb, nc.decode('utf8')) == dnsforestdn:
 530             c = (ldb.Dn(samdb, "%s" % str(dnsforestdn)), get_dns_partition_descriptor)
 531             subcontainers.append(c)
 532             c = (ldb.Dn(samdb, "CN=Infrastructure,%s" % str(dnsforestdn)),
 533                  get_domain_delete_protected1_descriptor)
 534             subcontainers.append(c)
 535             c = (ldb.Dn(samdb, "CN=LostAndFound,%s" % str(dnsforestdn)),
 536                  get_domain_delete_protected2_descriptor)
 537             subcontainers.append(c)
 538             c = (ldb.Dn(samdb, "CN=MicrosoftDNS,%s" % str(dnsforestdn)),
 539                  get_dns_forest_microsoft_dns_descriptor)
 540             subcontainers.append(c)
 541             continue
 542
 543         dnsdomaindn = ldb.Dn(samdb, "DC=DomainDnsZones,%s" % (str(samdb.domain_dn())))
 544         if ldb.Dn(samdb, nc.decode('utf8')) == dnsdomaindn:
 545             c = (ldb.Dn(samdb, "%s" % str(dnsdomaindn)), get_dns_partition_descriptor)
 546             subcontainers.append(c)
 547             c = (ldb.Dn(samdb, "CN=Infrastructure,%s" % str(dnsdomaindn)),
 548                  get_domain_delete_protected1_descriptor)
 549             subcontainers.append(c)
 550             c = (ldb.Dn(samdb, "CN=LostAndFound,%s" % str(dnsdomaindn)),
 551                  get_domain_delete_protected2_descriptor)
 552             subcontainers.append(c)
 553             c = (ldb.Dn(samdb, "CN=MicrosoftDNS,%s" % str(dnsdomaindn)),
 554                  get_dns_domain_microsoft_dns_descriptor)
 555             subcontainers.append(c)
 556
 557     return subcontainers
 558
 559
 560 def chunck_acl(acl):
 561     """Return separate ACE of an ACL
 562
 563     :param acl: A string representing the ACL
 564     :return: A hash with different parts
 565     """
 566
 567     p = re.compile(r'(\w+)?(\(.*?\))')
 568     tab = p.findall(acl)
 569
 570     hash = {}
 571     hash["aces"] = []
 572     for e in tab:
 573         if len(e[0]) > 0:
 574             hash["flags"] = e[0]
 575         hash["aces"].append(e[1])
 576
 577     return hash
 578
 579
 580 def chunck_sddl(sddl):
 581     """ Return separate parts of the SDDL (owner, group, ...)
 582
 583     :param sddl: An string containing the SDDL to chunk
 584     :return: A hash with the different chunk
 585     """
 586
 587     p = re.compile(r'([OGDS]:)(.*?)(?=(?:[GDS]:|$))')
 588     tab = p.findall(sddl)
 589
 590     hash = {}
 591     for e in tab:
 592         if e[0] == "O:":
 593             hash["owner"] = e[1]
 594         if e[0] == "G:":
 595             hash["group"] = e[1]
 596         if e[0] == "D:":
 597             hash["dacl"] = e[1]
 598         if e[0] == "S:":
 599             hash["sacl"] = e[1]
 600
 601     return hash
 602
 603
 604 def get_clean_sd(sd):
 605     """Get the SD without any inherited ACEs
 606
 607     :param sd: SD to strip
 608     :return: An SD with inherited ACEs stripped
 609     """
 610
 611     sd_clean = security.descriptor()
 612     sd_clean.owner_sid = sd.owner_sid
 613     sd_clean.group_sid = sd.group_sid
 614     sd_clean.type = sd.type
 615     sd_clean.revision = sd.revision
 616
 617     aces = []
 618     if sd.sacl is not None:
 619         aces = sd.sacl.aces
 620     for i in range(0, len(aces)):
 621         ace = aces[i]
 622
 623         if not ace.flags & security.SEC_ACE_FLAG_INHERITED_ACE:
 624             sd_clean.sacl_add(ace)
 625             continue
 626
 627     aces = []
 628     if sd.dacl is not None:
 629         aces = sd.dacl.aces
 630     for i in range(0, len(aces)):
 631         ace = aces[i]
 632
 633         if not ace.flags & security.SEC_ACE_FLAG_INHERITED_ACE:
 634             sd_clean.dacl_add(ace)
 635             continue
 636     return sd_clean
 637
 638
 639 def get_diff_sds(refsd, cursd, domainsid, checkSacl=True):
 640     """Get the difference between 2 sd
 641
 642     This function split the textual representation of ACL into smaller
 643     chunk in order to not to report a simple permutation as a difference
 644
 645     :param refsddl: First sddl to compare
 646     :param cursddl: Second sddl to compare
 647     :param checkSacl: If false we skip the sacl checks
 648     :return: A string that explain difference between sddls
 649     """
 650
 651     cursddl = get_clean_sd(cursd).as_sddl(domainsid)
 652     refsddl = get_clean_sd(refsd).as_sddl(domainsid)
 653
 654     txt = ""
 655     hash_cur = chunck_sddl(cursddl)
 656     hash_ref = chunck_sddl(refsddl)
 657
 658     if "owner" not in hash_cur:
 659         txt = "\tNo owner in current SD"
 660     elif "owner" in hash_ref and hash_cur["owner"] != hash_ref["owner"]:
 661         txt = "\tOwner mismatch: %s (in ref) %s" \
 662               "(in current)\n" % (hash_ref["owner"], hash_cur["owner"])
 663
 664     if "group" not in hash_cur:
 665         txt = "%s\tNo group in current SD" % txt
 666     elif "group" in hash_ref and hash_cur["group"] != hash_ref["group"]:
 667         txt = "%s\tGroup mismatch: %s (in ref) %s" \
 668               "(in current)\n" % (txt, hash_ref["group"], hash_cur["group"])
 669
 670     parts = ["dacl"]
 671     if checkSacl:
 672         parts.append("sacl")
 673     for part in parts:
 674         if part in hash_cur and part in hash_ref:
 675
 676             # both are present, check if they contain the same ACE
 677             h_cur = set()
 678             h_ref = set()
 679             c_cur = chunck_acl(hash_cur[part])
 680             c_ref = chunck_acl(hash_ref[part])
 681
 682             for elem in c_cur["aces"]:
 683                 h_cur.add(elem)
 684
 685             for elem in c_ref["aces"]:
 686                 h_ref.add(elem)
 687
 688             for k in set(h_ref):
 689                 if k in h_cur:
 690                     h_cur.remove(k)
 691                     h_ref.remove(k)
 692
 693             if len(h_cur) + len(h_ref) > 0:
 694                 txt = "%s\tPart %s is different between reference" \
 695                       " and current here is the detail:\n" % (txt, part)
 696
 697                 for item in h_cur:
 698                     txt = "%s\t\t%s ACE is not present in the" \
 699                           " reference\n" % (txt, item)
 700
 701                 for item in h_ref:
 702                     txt = "%s\t\t%s ACE is not present in the" \
 703                           " current\n" % (txt, item)
 704
 705         elif part in hash_cur and part not in hash_ref:
 706             txt = "%s\tReference ACL hasn't a %s part\n" % (txt, part)
 707         elif part not in hash_cur and part in hash_ref:
 708             txt = "%s\tCurrent ACL hasn't a %s part\n" % (txt, part)
 709
 710     return txt