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 /* Translate the CIFS ACL (simlar to NTFS ACL) for a file into mode bits */
 164
 165 void acl_to_uid_mode(struct inode *inode, const char *path)
 166 {
 167         struct cifsFileInfo *open_file;
 168         int unlock_file = FALSE;
 169         int xid;
 170         int rc = -EIO;
 171         __u16 fid;
 172         struct super_block *sb;
 173         struct cifs_sb_info *cifs_sb;
 174
 175         cFYI(1, ("get mode from ACL for %s", path));
 176
 177         if (inode == NULL)
 178                 return;
 179
 180         xid = GetXid();
 181         open_file = find_readable_file(CIFS_I(inode));
 182         if (open_file) {
 183                 unlock_file = TRUE;
 184                 fid = open_file->netfid;
 185         } else {
 186                 int oplock = FALSE;
 187                 /* open file */
 188                 sb = inode->i_sb;
 189                 if (sb == NULL) {
 190                         FreeXid(xid);
 191                         return;
 192                 }
 193                 cifs_sb = CIFS_SB(sb);
 194                 rc = CIFSSMBOpen(xid, cifs_sb->tcon, path, FILE_OPEN,
 195                                 GENERIC_READ, 0, &fid, &oplock, NULL,
 196                                 cifs_sb->local_nls, cifs_sb->mnt_cifs_flags &
 197                                         CIFS_MOUNT_MAP_SPECIAL_CHR);
 198                 if (rc != 0) {
 199                         cERROR(1, ("Unable to open file to get ACL"));
 200                         FreeXid(xid);
 201                         return;
 202                 }
 203         }
 204
 205         /*   rc = CIFSSMBGetCIFSACL(xid, cifs_sb->tcon, fid, pntsd, acllen,
 206                                     ACL_TYPE_ACCESS); */
 207
 208         if (unlock_file == TRUE)
 209                 atomic_dec(&open_file->wrtPending);
 210         else
 211                 CIFSSMBClose(xid, cifs_sb->tcon, fid);
 212
 213 /* parse ACEs e.g.
 214         rc = parse_sec_desc(pntsd, acllen, inode);
 215 */
 216
 217         FreeXid(xid);
 218         return;
 219 }
 220
 221
 222 static void parse_ace(struct cifs_ace *pace, char *end_of_acl)
 223 {
 224         int num_subauth;
 225
 226         /* validate that we do not go past end of acl */
 227
 228         if (le16_to_cpu(pace->size) < 16) {
 229                 cERROR(1, ("ACE too small, %d", le16_to_cpu(pace->size)));
 230                 return;
 231         }
 232
 233         if (end_of_acl < (char *)pace + le16_to_cpu(pace->size)) {
 234                 cERROR(1, ("ACL too small to parse ACE"));
 235                 return;
 236         }
 237
 238         num_subauth = pace->sid.num_subauth;
 239         if (num_subauth) {
 240 #ifdef CONFIG_CIFS_DEBUG2
 241                 int i;
 242                 cFYI(1, ("ACE revision %d num_auth %d type %d flags %d size %d",
 243                         pace->sid.revision, pace->sid.num_subauth, pace->type,
 244                         pace->flags, pace->size));
 245                 for (i = 0; i < num_subauth; ++i) {
 246                         cFYI(1, ("ACE sub_auth[%d]: 0x%x", i,
 247                                 le32_to_cpu(pace->sid.sub_auth[i])));
 248                 }
 249
 250                 /* BB add length check to make sure that we do not have huge
 251                         num auths and therefore go off the end */
 252 #endif
 253         }
 254
 255         return;
 256 }
 257
 258
 259 static void parse_dacl(struct cifs_acl *pdacl, char *end_of_acl,
 260                        struct cifs_sid *pownersid, struct cifs_sid *pgrpsid,
 261                        struct inode *inode)
 262 {
 263         int i;
 264         int num_aces = 0;
 265         int acl_size;
 266         char *acl_base;
 267         struct cifs_ace **ppace;
 268
 269         /* BB need to add parm so we can store the SID BB */
 270
 271         /* validate that we do not go past end of acl */
 272         if (end_of_acl < (char *)pdacl + le16_to_cpu(pdacl->size)) {
 273                 cERROR(1, ("ACL too small to parse DACL"));
 274                 return;
 275         }
 276
 277 #ifdef CONFIG_CIFS_DEBUG2
 278         cFYI(1, ("DACL revision %d size %d num aces %d",
 279                 le16_to_cpu(pdacl->revision), le16_to_cpu(pdacl->size),
 280                 le32_to_cpu(pdacl->num_aces)));
 281 #endif
 282
 283         acl_base = (char *)pdacl;
 284         acl_size = sizeof(struct cifs_acl);
 285
 286         num_aces = le32_to_cpu(pdacl->num_aces);
 287         if (num_aces  > 0) {
 288                 ppace = kmalloc(num_aces * sizeof(struct cifs_ace *),
 289                                 GFP_KERNEL);
 290
 291 /*              cifscred->cecount = pdacl->num_aces;
 292                 cifscred->aces = kmalloc(num_aces *
 293                         sizeof(struct cifs_ace *), GFP_KERNEL);*/
 294
 295                 for (i = 0; i < num_aces; ++i) {
 296                         ppace[i] = (struct cifs_ace *) (acl_base + acl_size);
 297
 298                         parse_ace(ppace[i], end_of_acl);
 299
 300 /*                      memcpy((void *)(&(cifscred->aces[i])),
 301                                 (void *)ppace[i],
 302                                 sizeof(struct cifs_ace)); */
 303
 304                         acl_base = (char *)ppace[i];
 305                         acl_size = le16_to_cpu(ppace[i]->size);
 306                 }
 307
 308                 kfree(ppace);
 309         }
 310
 311         return;
 312 }
 313
 314
 315 static int parse_sid(struct cifs_sid *psid, char *end_of_acl)
 316 {
 317
 318         /* BB need to add parm so we can store the SID BB */
 319
 320         /* validate that we do not go past end of acl */
 321         if (end_of_acl < (char *)psid + sizeof(struct cifs_sid)) {
 322                 cERROR(1, ("ACL too small to parse SID"));
 323                 return -EINVAL;
 324         }
 325
 326         if (psid->num_subauth) {
 327 #ifdef CONFIG_CIFS_DEBUG2
 328                 int i;
 329                 cFYI(1, ("SID revision %d num_auth %d",
 330                         psid->revision, psid->num_subauth));
 331
 332                 for (i = 0; i < psid->num_subauth; i++) {
 333                         cFYI(1, ("SID sub_auth[%d]: 0x%x ", i,
 334                                 le32_to_cpu(psid->sub_auth[i])));
 335                 }
 336
 337                 /* BB add length check to make sure that we do not have huge
 338                         num auths and therefore go off the end */
 339                 cFYI(1, ("RID 0x%x",
 340                         le32_to_cpu(psid->sub_auth[psid->num_subauth-1])));
 341 #endif
 342         }
 343
 344         return 0;
 345 }
 346
 347
 348 /* Convert CIFS ACL to POSIX form */
 349 static int parse_sec_desc(struct cifs_ntsd *pntsd, int acl_len,
 350                           struct inode *inode)
 351 {
 352         int rc;
 353         struct cifs_sid *owner_sid_ptr, *group_sid_ptr;
 354         struct cifs_acl *dacl_ptr; /* no need for SACL ptr */
 355         char *end_of_acl = ((char *)pntsd) + acl_len;
 356
 357         owner_sid_ptr = (struct cifs_sid *)((char *)pntsd +
 358                                 le32_to_cpu(pntsd->osidoffset));
 359         group_sid_ptr = (struct cifs_sid *)((char *)pntsd +
 360                                 le32_to_cpu(pntsd->gsidoffset));
 361         dacl_ptr = (struct cifs_acl *)((char *)pntsd +
 362                                 le32_to_cpu(pntsd->dacloffset));
 363 #ifdef CONFIG_CIFS_DEBUG2
 364         cFYI(1, ("revision %d type 0x%x ooffset 0x%x goffset 0x%x "
 365                  "sacloffset 0x%x dacloffset 0x%x",
 366                  pntsd->revision, pntsd->type, le32_to_cpu(pntsd->osidoffset),
 367                  le32_to_cpu(pntsd->gsidoffset),
 368                  le32_to_cpu(pntsd->sacloffset),
 369                  le32_to_cpu(pntsd->dacloffset)));
 370 #endif
 371         rc = parse_sid(owner_sid_ptr, end_of_acl);
 372         if (rc)
 373                 return rc;
 374
 375         rc = parse_sid(group_sid_ptr, end_of_acl);
 376         if (rc)
 377                 return rc;
 378
 379         parse_dacl(dacl_ptr, end_of_acl, owner_sid_ptr, group_sid_ptr, inode);
 380
 381 /*      cifscred->uid = owner_sid_ptr->rid;
 382         cifscred->gid = group_sid_ptr->rid;
 383         memcpy((void *)(&(cifscred->osid)), (void *)owner_sid_ptr,
 384                         sizeof(struct cifs_sid));
 385         memcpy((void *)(&(cifscred->gsid)), (void *)group_sid_ptr,
 386                         sizeof(struct cifs_sid)); */
 387
 388
 389         return (0);
 390 }
 391 #endif /* CONFIG_CIFS_EXPERIMENTAL */