fs/cifs/cifsacl.c

   1 /*
   2  *   fs/cifs/cifsacl.c
   3  *
   4  *   Copyright (C) International Business Machines  Corp., 2007
   5  *   Author(s): Steve French (sfrench@us.ibm.com)
   6  *
   7  *   Contains the routines for mapping CIFS/NTFS ACLs
   8  *
   9  *   This library is free software; you can redistribute it and/or modify
  10  *   it under the terms of the GNU Lesser General Public License as published
  11  *   by the Free Software Foundation; either version 2.1 of the License, or
  12  *   (at your option) any later version.
  13  *
  14  *   This library is distributed in the hope that it will be useful,
  15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
  17  *   the GNU Lesser General Public License for more details.
  18  *
  19  *   You should have received a copy of the GNU Lesser General Public License
  20  *   along with this library; if not, write to the Free Software
  21  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  22  */
  23
  24 #include <linux/fs.h>
  25 #include "cifspdu.h"
  26 #include "cifsglob.h"
  27 #include "cifsacl.h"
  28 #include "cifsproto.h"
  29 #include "cifs_debug.h"
  30
  31
  32 #ifdef CONFIG_CIFS_EXPERIMENTAL
  33
  34 static struct cifs_wksid wksidarr[NUM_WK_SIDS] = {
  35         {{1, 0, {0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0} }, "null user"},
  36         {{1, 1, {0, 0, 0, 0, 0, 1}, {0, 0, 0, 0, 0} }, "nobody"},
  37         {{1, 1, {0, 0, 0, 0, 0, 5}, {cpu_to_le32(11), 0, 0, 0, 0} }, "net-users"},
  38         {{1, 1, {0, 0, 0, 0, 0, 5}, {cpu_to_le32(18), 0, 0, 0, 0} }, "sys"},
  39         {{1, 2, {0, 0, 0, 0, 0, 5}, {cpu_to_le32(32), cpu_to_le32(544), 0, 0, 0} }, "root"},
  40         {{1, 2, {0, 0, 0, 0, 0, 5}, {cpu_to_le32(32), cpu_to_le32(545), 0, 0, 0} }, "users"},
  41         {{1, 2, {0, 0, 0, 0, 0, 5}, {cpu_to_le32(32), cpu_to_le32(546), 0, 0, 0} }, "guest"} }
  42 ;
  43
  44
  45 /* security id for everyone */
  46 static const struct cifs_sid sid_everyone =
  47                 {1, 1, {0, 0, 0, 0, 0, 0}, {} };
  48 /* group users */
  49 static const struct cifs_sid sid_user =
  50                 {1, 2 , {0, 0, 0, 0, 0, 5}, {} };
  51
  52
  53 int match_sid(struct cifs_sid *ctsid)
  54 {
  55         int i, j;
  56         int num_subauth, num_sat, num_saw;
  57         struct cifs_sid *cwsid;
  58
  59         if (!ctsid)
  60                 return (-1);
  61
  62         for (i = 0; i < NUM_WK_SIDS; ++i) {
  63                 cwsid = &(wksidarr[i].cifssid);
  64
  65                 /* compare the revision */
  66                 if (ctsid->revision != cwsid->revision)
  67                         continue;
  68
  69                 /* compare all of the six auth values */
  70                 for (j = 0; j < 6; ++j) {
  71                         if (ctsid->authority[j] != cwsid->authority[j])
  72                                 break;
  73                 }
  74                 if (j < 6)
  75                         continue; /* all of the auth values did not match */
  76
  77                 /* compare all of the subauth values if any */
  78                 num_sat = ctsid->num_subauth;
  79                 num_saw = cwsid->num_subauth;
  80                 num_subauth = num_sat < num_saw ? num_sat : num_saw;
  81                 if (num_subauth) {
  82                         for (j = 0; j < num_subauth; ++j) {
  83                                 if (ctsid->sub_auth[j] != cwsid->sub_auth[j])
  84                                         break;
  85                         }
  86                         if (j < num_subauth)
  87                                 continue; /* all sub_auth values do not match */
  88                 }
  89
  90                 cFYI(1, ("matching sid: %s\n", wksidarr[i].sidname));
  91                 return (0); /* sids compare/match */
  92         }
  93
  94         cFYI(1, ("No matching sid"));
  95         return (-1);
  96 }
  97
  98 /* if the two SIDs (roughly equivalent to a UUID for a user or group) are
  99    the same returns 1, if they do not match returns 0 */
 100 int compare_sids(const struct cifs_sid *ctsid, const struct cifs_sid *cwsid)
 101 {
 102         int i;
 103         int num_subauth, num_sat, num_saw;
 104
 105         if ((!ctsid) || (!cwsid))
 106                 return (0);
 107
 108         /* compare the revision */
 109         if (ctsid->revision != cwsid->revision)
 110                 return (0);
 111
 112         /* compare all of the six auth values */
 113         for (i = 0; i < 6; ++i) {
 114                 if (ctsid->authority[i] != cwsid->authority[i])
 115                         return (0);
 116         }
 117
 118         /* compare all of the subauth values if any */
 119         num_sat = ctsid->num_subauth;
 120         num_saw = cwsid->num_subauth;
 121         num_subauth = num_sat < num_saw ? num_sat : num_saw;
 122         if (num_subauth) {
 123                 for (i = 0; i < num_subauth; ++i) {
 124                         if (ctsid->sub_auth[i] != cwsid->sub_auth[i])
 125                                 return (0);
 126                 }
 127         }
 128
 129         return (1); /* sids compare/match */
 130 }
 131
 132 /*
 133    change posix mode to reflect permissions
 134    pmode is the existing mode (we only want to overwrite part of this
 135    bits to set can be: S_IRWXU, S_IRWXG or S_IRWXO ie 00700 or 00070 or 00007
 136 */
 137 static void access_flags_to_mode(__u32 ace_flags, umode_t *pmode,
 138                                  umode_t bits_to_set)
 139 {
 140
 141         *pmode &= ~bits_to_set;
 142
 143         if (ace_flags & GENERIC_ALL) {
 144                 *pmode |= (S_IRWXUGO & bits_to_set);
 145 #ifdef CONFIG_CIFS_DEBUG2
 146                 cFYI(1, ("all perms"));
 147 #endif
 148                 return;
 149         }
 150         if ((ace_flags & GENERIC_WRITE) || (ace_flags & FILE_WRITE_RIGHTS))
 151                 *pmode |= (S_IWUGO & bits_to_set);
 152         if ((ace_flags & GENERIC_READ) || (ace_flags & FILE_READ_RIGHTS))
 153                 *pmode |= (S_IRUGO & bits_to_set);
 154         if ((ace_flags & GENERIC_EXECUTE) || (ace_flags & FILE_EXEC_RIGHTS))
 155                 *pmode |= (S_IXUGO & bits_to_set);
 156
 157 #ifdef CONFIG_CIFS_DEBUG2
 158         cFYI(1, ("access flags 0x%x mode now 0x%x", ace_flags, *pmode));
 159 #endif
 160         return;
 161 }
 162
 163
 164 static void parse_ace(struct cifs_ace *pace, char *end_of_acl)
 165 {
 166         int num_subauth;
 167
 168         /* validate that we do not go past end of acl */
 169
 170         if (le16_to_cpu(pace->size) < 16) {
 171                 cERROR(1, ("ACE too small, %d", le16_to_cpu(pace->size)));
 172                 return;
 173         }
 174
 175         if (end_of_acl < (char *)pace + le16_to_cpu(pace->size)) {
 176                 cERROR(1, ("ACL too small to parse ACE"));
 177                 return;
 178         }
 179
 180         num_subauth = pace->sid.num_subauth;
 181         if (num_subauth) {
 182 #ifdef CONFIG_CIFS_DEBUG2
 183                 int i;
 184                 cFYI(1, ("ACE revision %d num_auth %d type %d flags %d size %d",
 185                         pace->sid.revision, pace->sid.num_subauth, pace->type,
 186                         pace->flags, pace->size));
 187                 for (i = 0; i < num_subauth; ++i) {
 188                         cFYI(1, ("ACE sub_auth[%d]: 0x%x", i,
 189                                 le32_to_cpu(pace->sid.sub_auth[i])));
 190                 }
 191
 192                 /* BB add length check to make sure that we do not have huge
 193                         num auths and therefore go off the end */
 194 #endif
 195         }
 196
 197         return;
 198 }
 199
 200
 201 static void parse_dacl(struct cifs_acl *pdacl, char *end_of_acl,
 202                        struct cifs_sid *pownersid, struct cifs_sid *pgrpsid,
 203                        struct inode *inode)
 204 {
 205         int i;
 206         int num_aces = 0;
 207         int acl_size;
 208         char *acl_base;
 209         struct cifs_ace **ppace;
 210
 211         /* BB need to add parm so we can store the SID BB */
 212
 213         /* validate that we do not go past end of acl */
 214         if (end_of_acl < (char *)pdacl + le16_to_cpu(pdacl->size)) {
 215                 cERROR(1, ("ACL too small to parse DACL"));
 216                 return;
 217         }
 218
 219 #ifdef CONFIG_CIFS_DEBUG2
 220         cFYI(1, ("DACL revision %d size %d num aces %d",
 221                 le16_to_cpu(pdacl->revision), le16_to_cpu(pdacl->size),
 222                 le32_to_cpu(pdacl->num_aces)));
 223 #endif
 224
 225         acl_base = (char *)pdacl;
 226         acl_size = sizeof(struct cifs_acl);
 227
 228         num_aces = le32_to_cpu(pdacl->num_aces);
 229         if (num_aces  > 0) {
 230                 ppace = kmalloc(num_aces * sizeof(struct cifs_ace *),
 231                                 GFP_KERNEL);
 232
 233 /*              cifscred->cecount = pdacl->num_aces;
 234                 cifscred->aces = kmalloc(num_aces *
 235                         sizeof(struct cifs_ace *), GFP_KERNEL);*/
 236
 237                 for (i = 0; i < num_aces; ++i) {
 238                         ppace[i] = (struct cifs_ace *) (acl_base + acl_size);
 239
 240                         parse_ace(ppace[i], end_of_acl);
 241
 242 /*                      memcpy((void *)(&(cifscred->aces[i])),
 243                                 (void *)ppace[i],
 244                                 sizeof(struct cifs_ace)); */
 245
 246                         acl_base = (char *)ppace[i];
 247                         acl_size = le16_to_cpu(ppace[i]->size);
 248                 }
 249
 250                 kfree(ppace);
 251         }
 252
 253         return;
 254 }
 255
 256
 257 static int parse_sid(struct cifs_sid *psid, char *end_of_acl)
 258 {
 259         /* BB need to add parm so we can store the SID BB */
 260
 261         /* validate that we do not go past end of ACL - sid must be at least 8
 262            bytes long (assuming no sub-auths - e.g. the null SID */
 263         if (end_of_acl < (char *)psid + 8) {
 264                 cERROR(1, ("ACL too small to parse SID %p", psid));
 265                 return -EINVAL;
 266         }
 267
 268         if (psid->num_subauth) {
 269 #ifdef CONFIG_CIFS_DEBUG2
 270                 int i;
 271                 cFYI(1, ("SID revision %d num_auth %d",
 272                         psid->revision, psid->num_subauth));
 273
 274                 for (i = 0; i < psid->num_subauth; i++) {
 275                         cFYI(1, ("SID sub_auth[%d]: 0x%x ", i,
 276                                 le32_to_cpu(psid->sub_auth[i])));
 277                 }
 278
 279                 /* BB add length check to make sure that we do not have huge
 280                         num auths and therefore go off the end */
 281                 cFYI(1, ("RID 0x%x",
 282                         le32_to_cpu(psid->sub_auth[psid->num_subauth-1])));
 283 #endif
 284         }
 285
 286         return 0;
 287 }
 288
 289
 290 /* Convert CIFS ACL to POSIX form */
 291 static int parse_sec_desc(struct cifs_ntsd *pntsd, int acl_len,
 292                           struct inode *inode)
 293 {
 294         int rc;
 295         struct cifs_sid *owner_sid_ptr, *group_sid_ptr;
 296         struct cifs_acl *dacl_ptr; /* no need for SACL ptr */
 297         char *end_of_acl = ((char *)pntsd) + acl_len;
 298
 299         if ((inode == NULL) || (pntsd == NULL))
 300                 return -EIO;
 301
 302         owner_sid_ptr = (struct cifs_sid *)((char *)pntsd +
 303                                 le32_to_cpu(pntsd->osidoffset));
 304         group_sid_ptr = (struct cifs_sid *)((char *)pntsd +
 305                                 le32_to_cpu(pntsd->gsidoffset));
 306         dacl_ptr = (struct cifs_acl *)((char *)pntsd +
 307                                 le32_to_cpu(pntsd->dacloffset));
 308 #ifdef CONFIG_CIFS_DEBUG2
 309         cFYI(1, ("revision %d type 0x%x ooffset 0x%x goffset 0x%x "
 310                  "sacloffset 0x%x dacloffset 0x%x",
 311                  pntsd->revision, pntsd->type, le32_to_cpu(pntsd->osidoffset),
 312                  le32_to_cpu(pntsd->gsidoffset),
 313                  le32_to_cpu(pntsd->sacloffset),
 314                  le32_to_cpu(pntsd->dacloffset)));
 315 #endif
 316 /*      cifs_dump_mem("owner_sid: ", owner_sid_ptr, 64); */
 317         rc = parse_sid(owner_sid_ptr, end_of_acl);
 318         if (rc)
 319                 return rc;
 320
 321         rc = parse_sid(group_sid_ptr, end_of_acl);
 322         if (rc)
 323                 return rc;
 324
 325         parse_dacl(dacl_ptr, end_of_acl, owner_sid_ptr, group_sid_ptr, inode);
 326
 327 /*      cifscred->uid = owner_sid_ptr->rid;
 328         cifscred->gid = group_sid_ptr->rid;
 329         memcpy((void *)(&(cifscred->osid)), (void *)owner_sid_ptr,
 330                         sizeof(struct cifs_sid));
 331         memcpy((void *)(&(cifscred->gsid)), (void *)group_sid_ptr,
 332                         sizeof(struct cifs_sid)); */
 333
 334
 335         return (0);
 336 }
 337
 338
 339 /* Translate the CIFS ACL (simlar to NTFS ACL) for a file into mode bits */
 340
 341 void acl_to_uid_mode(struct inode *inode, const char *path)
 342 {
 343         struct cifsFileInfo *open_file;
 344         int unlock_file = FALSE;
 345         int xid;
 346         int rc = -EIO;
 347         __u16 fid;
 348         struct super_block *sb;
 349         struct cifs_sb_info *cifs_sb;
 350         struct cifs_ntsd *pntsd = NULL;
 351         __u32 acllen;
 352
 353         cFYI(1, ("get mode from ACL for %s", path));
 354
 355         if (inode == NULL)
 356                 return;
 357
 358         xid = GetXid();
 359         open_file = find_readable_file(CIFS_I(inode));
 360         sb = inode->i_sb;
 361         if (sb == NULL) {
 362                 FreeXid(xid);
 363                 return;
 364         }
 365         cifs_sb = CIFS_SB(sb);
 366
 367         if (open_file) {
 368                 unlock_file = TRUE;
 369                 fid = open_file->netfid;
 370         } else {
 371                 int oplock = FALSE;
 372                 /* open file */
 373                 rc = CIFSSMBOpen(xid, cifs_sb->tcon, path, FILE_OPEN,
 374                                 GENERIC_READ, 0, &fid, &oplock, NULL,
 375                                 cifs_sb->local_nls, cifs_sb->mnt_cifs_flags &
 376                                         CIFS_MOUNT_MAP_SPECIAL_CHR);
 377                 if (rc != 0) {
 378                         cERROR(1, ("Unable to open file to get ACL"));
 379                         FreeXid(xid);
 380                         return;
 381                 }
 382         }
 383
 384         rc = CIFSSMBGetCIFSACL(xid, cifs_sb->tcon, fid, &pntsd, &acllen);
 385         cFYI(1, ("GetCIFSACL rc = %d ACL len %d", rc, acllen));
 386         if (unlock_file == TRUE)
 387                 atomic_dec(&open_file->wrtPending);
 388         else
 389                 CIFSSMBClose(xid, cifs_sb->tcon, fid);
 390
 391         /* parse ACEs */
 392         if (!rc)
 393                 rc = parse_sec_desc(pntsd, acllen, inode);
 394         kfree(pntsd);
 395         FreeXid(xid);
 396         return;
 397 }
 398 #endif /* CONFIG_CIFS_EXPERIMENTAL */