38d09fa8c1e6ee5191ca025a3c0af2d7ded3e741
[safe/jmp/linux-2.6] / 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, 1}, {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         if (ace_flags & GENERIC_ALL) {
142                 *pmode |= (S_IRWXUGO & bits_to_set);
143 #ifdef CONFIG_CIFS_DEBUG2
144                 cFYI(1, ("all perms"));
145 #endif
146                 return;
147         }
148         if ((ace_flags & GENERIC_WRITE) ||
149                         ((ace_flags & FILE_WRITE_RIGHTS) == FILE_WRITE_RIGHTS))
150                 *pmode |= (S_IWUGO & bits_to_set);
151         if ((ace_flags & GENERIC_READ) ||
152                         ((ace_flags & FILE_READ_RIGHTS) == FILE_READ_RIGHTS))
153                 *pmode |= (S_IRUGO & bits_to_set);
154         if ((ace_flags & GENERIC_EXECUTE) ||
155                         ((ace_flags & FILE_EXEC_RIGHTS) == FILE_EXEC_RIGHTS))
156                 *pmode |= (S_IXUGO & bits_to_set);
157
158 #ifdef CONFIG_CIFS_DEBUG2
159         cFYI(1, ("access flags 0x%x mode now 0x%x", ace_flags, *pmode));
160 #endif
161         return;
162 }
163
164
165 #ifdef CONFIG_CIFS_DEBUG2
166 static void dump_ace(struct cifs_ace *pace, char *end_of_acl)
167 {
168         int num_subauth;
169
170         /* validate that we do not go past end of acl */
171
172         if (le16_to_cpu(pace->size) < 16) {
173                 cERROR(1, ("ACE too small, %d", le16_to_cpu(pace->size)));
174                 return;
175         }
176
177         if (end_of_acl < (char *)pace + le16_to_cpu(pace->size)) {
178                 cERROR(1, ("ACL too small to parse ACE"));
179                 return;
180         }
181
182         num_subauth = pace->sid.num_subauth;
183         if (num_subauth) {
184                 int i;
185                 cFYI(1, ("ACE revision %d num_auth %d type %d flags %d size %d",
186                         pace->sid.revision, pace->sid.num_subauth, pace->type,
187                         pace->flags, pace->size));
188                 for (i = 0; i < num_subauth; ++i) {
189                         cFYI(1, ("ACE sub_auth[%d]: 0x%x", i,
190                                 le32_to_cpu(pace->sid.sub_auth[i])));
191                 }
192
193                 /* BB add length check to make sure that we do not have huge
194                         num auths and therefore go off the end */
195         }
196
197         return;
198 }
199 #endif
200
201
202 static void parse_dacl(struct cifs_acl *pdacl, char *end_of_acl,
203                        struct cifs_sid *pownersid, struct cifs_sid *pgrpsid,
204                        struct inode *inode)
205 {
206         int i;
207         int num_aces = 0;
208         int acl_size;
209         char *acl_base;
210         struct cifs_ace **ppace;
211
212         /* BB need to add parm so we can store the SID BB */
213
214         /* validate that we do not go past end of acl */
215         if (end_of_acl < (char *)pdacl + le16_to_cpu(pdacl->size)) {
216                 cERROR(1, ("ACL too small to parse DACL"));
217                 return;
218         }
219
220 #ifdef CONFIG_CIFS_DEBUG2
221         cFYI(1, ("DACL revision %d size %d num aces %d",
222                 le16_to_cpu(pdacl->revision), le16_to_cpu(pdacl->size),
223                 le32_to_cpu(pdacl->num_aces)));
224 #endif
225
226         /* reset rwx permissions for user/group/other.
227            Also, if num_aces is 0 i.e. DACL has no ACEs,
228            user/group/other have no permissions */
229         inode->i_mode &= ~(S_IRWXUGO);
230
231         if (!pdacl) {
232                 /* no DACL in the security descriptor, set
233                    all the permissions for user/group/other */
234                 inode->i_mode |= S_IRWXUGO;
235                 return;
236         }
237         acl_base = (char *)pdacl;
238         acl_size = sizeof(struct cifs_acl);
239
240         num_aces = le32_to_cpu(pdacl->num_aces);
241         if (num_aces  > 0) {
242                 ppace = kmalloc(num_aces * sizeof(struct cifs_ace *),
243                                 GFP_KERNEL);
244
245 /*              cifscred->cecount = pdacl->num_aces;
246                 cifscred->aces = kmalloc(num_aces *
247                         sizeof(struct cifs_ace *), GFP_KERNEL);*/
248
249                 for (i = 0; i < num_aces; ++i) {
250                         ppace[i] = (struct cifs_ace *) (acl_base + acl_size);
251 #ifdef CONFIG_CIFS_DEBUG2
252                         dump_ace(ppace[i], end_of_acl);
253 #endif
254                         if (compare_sids(&(ppace[i]->sid), pownersid))
255                                 access_flags_to_mode(ppace[i]->access_req,
256                                                 &(inode->i_mode), S_IRWXU);
257                         if (compare_sids(&(ppace[i]->sid), pgrpsid))
258                                 access_flags_to_mode(ppace[i]->access_req,
259                                                 &(inode->i_mode), S_IRWXG);
260                         if (compare_sids(&(ppace[i]->sid), &sid_everyone))
261                                 access_flags_to_mode(ppace[i]->access_req,
262                                                 &(inode->i_mode), S_IRWXO);
263
264 /*                      memcpy((void *)(&(cifscred->aces[i])),
265                                 (void *)ppace[i],
266                                 sizeof(struct cifs_ace)); */
267
268                         acl_base = (char *)ppace[i];
269                         acl_size = le16_to_cpu(ppace[i]->size);
270                 }
271
272                 kfree(ppace);
273         }
274
275         return;
276 }
277
278
279 static int parse_sid(struct cifs_sid *psid, char *end_of_acl)
280 {
281         /* BB need to add parm so we can store the SID BB */
282
283         /* validate that we do not go past end of ACL - sid must be at least 8
284            bytes long (assuming no sub-auths - e.g. the null SID */
285         if (end_of_acl < (char *)psid + 8) {
286                 cERROR(1, ("ACL too small to parse SID %p", psid));
287                 return -EINVAL;
288         }
289
290         if (psid->num_subauth) {
291 #ifdef CONFIG_CIFS_DEBUG2
292                 int i;
293                 cFYI(1, ("SID revision %d num_auth %d",
294                         psid->revision, psid->num_subauth));
295
296                 for (i = 0; i < psid->num_subauth; i++) {
297                         cFYI(1, ("SID sub_auth[%d]: 0x%x ", i,
298                                 le32_to_cpu(psid->sub_auth[i])));
299                 }
300
301                 /* BB add length check to make sure that we do not have huge
302                         num auths and therefore go off the end */
303                 cFYI(1, ("RID 0x%x",
304                         le32_to_cpu(psid->sub_auth[psid->num_subauth-1])));
305 #endif
306         }
307
308         return 0;
309 }
310
311
312 /* Convert CIFS ACL to POSIX form */
313 static int parse_sec_desc(struct cifs_ntsd *pntsd, int acl_len,
314                           struct inode *inode)
315 {
316         int rc;
317         struct cifs_sid *owner_sid_ptr, *group_sid_ptr;
318         struct cifs_acl *dacl_ptr; /* no need for SACL ptr */
319         char *end_of_acl = ((char *)pntsd) + acl_len;
320         __u32 dacloffset;
321
322         if ((inode == NULL) || (pntsd == NULL))
323                 return -EIO;
324
325         owner_sid_ptr = (struct cifs_sid *)((char *)pntsd +
326                                 le32_to_cpu(pntsd->osidoffset));
327         group_sid_ptr = (struct cifs_sid *)((char *)pntsd +
328                                 le32_to_cpu(pntsd->gsidoffset));
329         dacloffset = le32_to_cpu(pntsd->dacloffset);
330         dacl_ptr = (struct cifs_acl *)((char *)pntsd + dacloffset);
331 #ifdef CONFIG_CIFS_DEBUG2
332         cFYI(1, ("revision %d type 0x%x ooffset 0x%x goffset 0x%x "
333                  "sacloffset 0x%x dacloffset 0x%x",
334                  pntsd->revision, pntsd->type, le32_to_cpu(pntsd->osidoffset),
335                  le32_to_cpu(pntsd->gsidoffset),
336                  le32_to_cpu(pntsd->sacloffset), dacloffset));
337 #endif
338 /*      cifs_dump_mem("owner_sid: ", owner_sid_ptr, 64); */
339         rc = parse_sid(owner_sid_ptr, end_of_acl);
340         if (rc)
341                 return rc;
342
343         rc = parse_sid(group_sid_ptr, end_of_acl);
344         if (rc)
345                 return rc;
346
347         if (dacloffset)
348                 parse_dacl(dacl_ptr, end_of_acl, owner_sid_ptr,
349                            group_sid_ptr, inode);
350         else
351                 cFYI(1, ("no ACL")); /* BB grant all or default perms? */
352
353 /*      cifscred->uid = owner_sid_ptr->rid;
354         cifscred->gid = group_sid_ptr->rid;
355         memcpy((void *)(&(cifscred->osid)), (void *)owner_sid_ptr,
356                         sizeof(struct cifs_sid));
357         memcpy((void *)(&(cifscred->gsid)), (void *)group_sid_ptr,
358                         sizeof(struct cifs_sid)); */
359
360
361         return (0);
362 }
363
364
365 /* Retrieve an ACL from the server */
366 static struct cifs_ntsd *get_cifs_acl(u32 *pacllen, struct inode *inode,
367                                        const char *path)
368 {
369         struct cifsFileInfo *open_file;
370         int unlock_file = FALSE;
371         int xid;
372         int rc = -EIO;
373         __u16 fid;
374         struct super_block *sb;
375         struct cifs_sb_info *cifs_sb;
376         struct cifs_ntsd *pntsd = NULL;
377
378         cFYI(1, ("get mode from ACL for %s", path));
379
380         if (inode == NULL)
381                 return NULL;
382
383         xid = GetXid();
384         open_file = find_readable_file(CIFS_I(inode));
385         sb = inode->i_sb;
386         if (sb == NULL) {
387                 FreeXid(xid);
388                 return NULL;
389         }
390         cifs_sb = CIFS_SB(sb);
391
392         if (open_file) {
393                 unlock_file = TRUE;
394                 fid = open_file->netfid;
395         } else {
396                 int oplock = FALSE;
397                 /* open file */
398                 rc = CIFSSMBOpen(xid, cifs_sb->tcon, path, FILE_OPEN,
399                                 READ_CONTROL, 0, &fid, &oplock, NULL,
400                                 cifs_sb->local_nls, cifs_sb->mnt_cifs_flags &
401                                         CIFS_MOUNT_MAP_SPECIAL_CHR);
402                 if (rc != 0) {
403                         cERROR(1, ("Unable to open file to get ACL"));
404                         FreeXid(xid);
405                         return NULL;
406                 }
407         }
408
409         rc = CIFSSMBGetCIFSACL(xid, cifs_sb->tcon, fid, &pntsd, pacllen);
410         cFYI(1, ("GetCIFSACL rc = %d ACL len %d", rc, *pacllen));
411         if (unlock_file == TRUE)
412                 atomic_dec(&open_file->wrtPending);
413         else
414                 CIFSSMBClose(xid, cifs_sb->tcon, fid);
415
416         FreeXid(xid);
417         return pntsd;
418 }
419
420 /* Translate the CIFS ACL (simlar to NTFS ACL) for a file into mode bits */
421 void acl_to_uid_mode(struct inode *inode, const char *path)
422 {
423         struct cifs_ntsd *pntsd = NULL;
424         u32 acllen = 0;
425         int rc = 0;
426
427 #ifdef CONFIG_CIFS_DEBUG2
428         cFYI(1, ("converting ACL to mode for %s", path));
429 #endif
430         pntsd = get_cifs_acl(&acllen, inode, path);
431
432         /* if we can retrieve the ACL, now parse Access Control Entries, ACEs */
433         if (pntsd)
434                 rc = parse_sec_desc(pntsd, acllen, inode);
435         if (rc)
436                 cFYI(1, ("parse sec desc failed rc = %d", rc));
437
438         kfree(pntsd);
439         return;
440 }
441
442 /* Convert mode bits to an ACL so we can update the ACL on the server */
443 int mode_to_acl(struct inode *inode, const char *path)
444 {
445         int rc = 0;
446         __u32 acllen = 0;
447         struct cifs_ntsd *pntsd = NULL;
448
449         cFYI(1, ("set ACL from mode for %s", path));
450
451         /* Get the security descriptor */
452         pntsd = get_cifs_acl(&acllen, inode, path);
453
454         /* Add/Modify the three ACEs for owner, group, everyone
455            while retaining the other ACEs */
456
457         /* Set the security descriptor */
458
459
460         kfree(pntsd);
461         return rc;
462 }
463 #endif /* CONFIG_CIFS_EXPERIMENTAL */