Merge branch 'master' of /pub/scm/linux/kernel/git/torvalds/linux-2.6
[linux-2.6] / fs / cifs / dir.c
1 /*
2  *   fs/cifs/dir.c
3  *
4  *   vfs operations that deal with dentries
5  *
6  *   Copyright (C) International Business Machines  Corp., 2002,2008
7  *   Author(s): Steve French (sfrench@us.ibm.com)
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 #include <linux/fs.h>
24 #include <linux/stat.h>
25 #include <linux/slab.h>
26 #include <linux/namei.h>
27 #include "cifsfs.h"
28 #include "cifspdu.h"
29 #include "cifsglob.h"
30 #include "cifsproto.h"
31 #include "cifs_debug.h"
32 #include "cifs_fs_sb.h"
33
34 static void
35 renew_parental_timestamps(struct dentry *direntry)
36 {
37         /* BB check if there is a way to get the kernel to do this or if we
38            really need this */
39         do {
40                 direntry->d_time = jiffies;
41                 direntry = direntry->d_parent;
42         } while (!IS_ROOT(direntry));
43 }
44
45 /* Note: caller must free return buffer */
46 char *
47 build_path_from_dentry(struct dentry *direntry)
48 {
49         struct dentry *temp;
50         int namelen;
51         int pplen;
52         char *full_path;
53         char dirsep;
54
55         if (direntry == NULL)
56                 return NULL;  /* not much we can do if dentry is freed and
57                 we need to reopen the file after it was closed implicitly
58                 when the server crashed */
59
60         dirsep = CIFS_DIR_SEP(CIFS_SB(direntry->d_sb));
61         pplen = CIFS_SB(direntry->d_sb)->prepathlen;
62 cifs_bp_rename_retry:
63         namelen = pplen;
64         for (temp = direntry; !IS_ROOT(temp);) {
65                 namelen += (1 + temp->d_name.len);
66                 temp = temp->d_parent;
67                 if (temp == NULL) {
68                         cERROR(1, ("corrupt dentry"));
69                         return NULL;
70                 }
71         }
72
73         full_path = kmalloc(namelen+1, GFP_KERNEL);
74         if (full_path == NULL)
75                 return full_path;
76         full_path[namelen] = 0; /* trailing null */
77         for (temp = direntry; !IS_ROOT(temp);) {
78                 namelen -= 1 + temp->d_name.len;
79                 if (namelen < 0) {
80                         break;
81                 } else {
82                         full_path[namelen] = dirsep;
83                         strncpy(full_path + namelen + 1, temp->d_name.name,
84                                 temp->d_name.len);
85                         cFYI(0, ("name: %s", full_path + namelen));
86                 }
87                 temp = temp->d_parent;
88                 if (temp == NULL) {
89                         cERROR(1, ("corrupt dentry"));
90                         kfree(full_path);
91                         return NULL;
92                 }
93         }
94         if (namelen != pplen) {
95                 cERROR(1,
96                        ("did not end path lookup where expected namelen is %d",
97                         namelen));
98                 /* presumably this is only possible if racing with a rename
99                 of one of the parent directories  (we can not lock the dentries
100                 above us to prevent this, but retrying should be harmless) */
101                 kfree(full_path);
102                 goto cifs_bp_rename_retry;
103         }
104         /* DIR_SEP already set for byte  0 / vs \ but not for
105            subsequent slashes in prepath which currently must
106            be entered the right way - not sure if there is an alternative
107            since the '\' is a valid posix character so we can not switch
108            those safely to '/' if any are found in the middle of the prepath */
109         /* BB test paths to Windows with '/' in the midst of prepath */
110         strncpy(full_path, CIFS_SB(direntry->d_sb)->prepath, pplen);
111         return full_path;
112 }
113
114 /* Inode operations in similar order to how they appear in Linux file fs.h */
115
116 int
117 cifs_create(struct inode *inode, struct dentry *direntry, int mode,
118                 struct nameidata *nd)
119 {
120         int rc = -ENOENT;
121         int xid;
122         int oplock = 0;
123         int desiredAccess = GENERIC_READ | GENERIC_WRITE;
124         __u16 fileHandle;
125         struct cifs_sb_info *cifs_sb;
126         struct cifsTconInfo *pTcon;
127         char *full_path = NULL;
128         FILE_ALL_INFO *buf = NULL;
129         struct inode *newinode = NULL;
130         struct cifsFileInfo *pCifsFile = NULL;
131         struct cifsInodeInfo *pCifsInode;
132         int disposition = FILE_OVERWRITE_IF;
133         int write_only = FALSE;
134
135         xid = GetXid();
136
137         cifs_sb = CIFS_SB(inode->i_sb);
138         pTcon = cifs_sb->tcon;
139
140         full_path = build_path_from_dentry(direntry);
141         if (full_path == NULL) {
142                 FreeXid(xid);
143                 return -ENOMEM;
144         }
145
146         if (nd && (nd->flags & LOOKUP_OPEN)) {
147                 int oflags = nd->intent.open.flags;
148
149                 desiredAccess = 0;
150                 if (oflags & FMODE_READ)
151                         desiredAccess |= GENERIC_READ;
152                 if (oflags & FMODE_WRITE) {
153                         desiredAccess |= GENERIC_WRITE;
154                         if (!(oflags & FMODE_READ))
155                                 write_only = TRUE;
156                 }
157
158                 if ((oflags & (O_CREAT | O_EXCL)) == (O_CREAT | O_EXCL))
159                         disposition = FILE_CREATE;
160                 else if ((oflags & (O_CREAT | O_TRUNC)) == (O_CREAT | O_TRUNC))
161                         disposition = FILE_OVERWRITE_IF;
162                 else if ((oflags & O_CREAT) == O_CREAT)
163                         disposition = FILE_OPEN_IF;
164                 else
165                         cFYI(1, ("Create flag not set in create function"));
166         }
167
168         /* BB add processing to set equivalent of mode - e.g. via CreateX with
169            ACLs */
170         if (oplockEnabled)
171                 oplock = REQ_OPLOCK;
172
173         buf = kmalloc(sizeof(FILE_ALL_INFO), GFP_KERNEL);
174         if (buf == NULL) {
175                 kfree(full_path);
176                 FreeXid(xid);
177                 return -ENOMEM;
178         }
179         if (cifs_sb->tcon->ses->capabilities & CAP_NT_SMBS)
180                 rc = CIFSSMBOpen(xid, pTcon, full_path, disposition,
181                          desiredAccess, CREATE_NOT_DIR,
182                          &fileHandle, &oplock, buf, cifs_sb->local_nls,
183                          cifs_sb->mnt_cifs_flags & CIFS_MOUNT_MAP_SPECIAL_CHR);
184         else
185                 rc = -EIO; /* no NT SMB support fall into legacy open below */
186
187         if (rc == -EIO) {
188                 /* old server, retry the open legacy style */
189                 rc = SMBLegacyOpen(xid, pTcon, full_path, disposition,
190                         desiredAccess, CREATE_NOT_DIR,
191                         &fileHandle, &oplock, buf, cifs_sb->local_nls,
192                         cifs_sb->mnt_cifs_flags & CIFS_MOUNT_MAP_SPECIAL_CHR);
193         }
194         if (rc) {
195                 cFYI(1, ("cifs_create returned 0x%x", rc));
196         } else {
197                 /* If Open reported that we actually created a file
198                 then we now have to set the mode if possible */
199                 if ((pTcon->unix_ext) && (oplock & CIFS_CREATE_ACTION)) {
200                         mode &= ~current->fs->umask;
201                         if (cifs_sb->mnt_cifs_flags & CIFS_MOUNT_SET_UID) {
202                                 CIFSSMBUnixSetPerms(xid, pTcon, full_path, mode,
203                                         (__u64)current->fsuid,
204                                         (__u64)current->fsgid,
205                                         0 /* dev */,
206                                         cifs_sb->local_nls,
207                                         cifs_sb->mnt_cifs_flags &
208                                                 CIFS_MOUNT_MAP_SPECIAL_CHR);
209                         } else {
210                                 CIFSSMBUnixSetPerms(xid, pTcon, full_path, mode,
211                                         (__u64)-1,
212                                         (__u64)-1,
213                                         0 /* dev */,
214                                         cifs_sb->local_nls,
215                                         cifs_sb->mnt_cifs_flags &
216                                                 CIFS_MOUNT_MAP_SPECIAL_CHR);
217                         }
218                 } else {
219                         /* BB implement mode setting via Windows security
220                            descriptors e.g. */
221                         /* CIFSSMBWinSetPerms(xid,pTcon,path,mode,-1,-1,nls);*/
222
223                         /* Could set r/o dos attribute if mode & 0222 == 0 */
224                 }
225
226                 /* server might mask mode so we have to query for it */
227                 if (pTcon->unix_ext)
228                         rc = cifs_get_inode_info_unix(&newinode, full_path,
229                                                  inode->i_sb, xid);
230                 else {
231                         rc = cifs_get_inode_info(&newinode, full_path,
232                                                  buf, inode->i_sb, xid,
233                                                  &fileHandle);
234                         if (newinode) {
235                                 newinode->i_mode = mode;
236                                 if ((oplock & CIFS_CREATE_ACTION) &&
237                                     (cifs_sb->mnt_cifs_flags &
238                                      CIFS_MOUNT_SET_UID)) {
239                                         newinode->i_uid = current->fsuid;
240                                         newinode->i_gid = current->fsgid;
241                                 }
242                         }
243                 }
244
245                 if (rc != 0) {
246                         cFYI(1,
247                              ("Create worked but get_inode_info failed rc = %d",
248                               rc));
249                 } else {
250                         if (pTcon->nocase)
251                                 direntry->d_op = &cifs_ci_dentry_ops;
252                         else
253                                 direntry->d_op = &cifs_dentry_ops;
254                         d_instantiate(direntry, newinode);
255                 }
256                 if ((nd == NULL /* nfsd case - nfs srv does not set nd */) ||
257                         ((nd->flags & LOOKUP_OPEN) == FALSE)) {
258                         /* mknod case - do not leave file open */
259                         CIFSSMBClose(xid, pTcon, fileHandle);
260                 } else if (newinode) {
261                         pCifsFile =
262                            kzalloc(sizeof(struct cifsFileInfo), GFP_KERNEL);
263
264                         if (pCifsFile == NULL)
265                                 goto cifs_create_out;
266                         pCifsFile->netfid = fileHandle;
267                         pCifsFile->pid = current->tgid;
268                         pCifsFile->pInode = newinode;
269                         pCifsFile->invalidHandle = FALSE;
270                         pCifsFile->closePend     = FALSE;
271                         init_MUTEX(&pCifsFile->fh_sem);
272                         mutex_init(&pCifsFile->lock_mutex);
273                         INIT_LIST_HEAD(&pCifsFile->llist);
274                         atomic_set(&pCifsFile->wrtPending, 0);
275
276                         /* set the following in open now
277                                 pCifsFile->pfile = file; */
278                         write_lock(&GlobalSMBSeslock);
279                         list_add(&pCifsFile->tlist, &pTcon->openFileList);
280                         pCifsInode = CIFS_I(newinode);
281                         if (pCifsInode) {
282                                 /* if readable file instance put first in list*/
283                                 if (write_only == TRUE) {
284                                         list_add_tail(&pCifsFile->flist,
285                                                 &pCifsInode->openFileList);
286                                 } else {
287                                         list_add(&pCifsFile->flist,
288                                                 &pCifsInode->openFileList);
289                                 }
290                                 if ((oplock & 0xF) == OPLOCK_EXCLUSIVE) {
291                                         pCifsInode->clientCanCacheAll = TRUE;
292                                         pCifsInode->clientCanCacheRead = TRUE;
293                                         cFYI(1, ("Exclusive Oplock inode %p",
294                                                 newinode));
295                                 } else if ((oplock & 0xF) == OPLOCK_READ)
296                                         pCifsInode->clientCanCacheRead = TRUE;
297                         }
298                         write_unlock(&GlobalSMBSeslock);
299                 }
300         }
301 cifs_create_out:
302         kfree(buf);
303         kfree(full_path);
304         FreeXid(xid);
305         return rc;
306 }
307
308 int cifs_mknod(struct inode *inode, struct dentry *direntry, int mode,
309                 dev_t device_number)
310 {
311         int rc = -EPERM;
312         int xid;
313         struct cifs_sb_info *cifs_sb;
314         struct cifsTconInfo *pTcon;
315         char *full_path = NULL;
316         struct inode *newinode = NULL;
317
318         if (!old_valid_dev(device_number))
319                 return -EINVAL;
320
321         xid = GetXid();
322
323         cifs_sb = CIFS_SB(inode->i_sb);
324         pTcon = cifs_sb->tcon;
325
326         full_path = build_path_from_dentry(direntry);
327         if (full_path == NULL)
328                 rc = -ENOMEM;
329         else if (pTcon->unix_ext) {
330                 mode &= ~current->fs->umask;
331                 if (cifs_sb->mnt_cifs_flags & CIFS_MOUNT_SET_UID) {
332                         rc = CIFSSMBUnixSetPerms(xid, pTcon, full_path,
333                                 mode, (__u64)current->fsuid,
334                                 (__u64)current->fsgid,
335                                 device_number, cifs_sb->local_nls,
336                                 cifs_sb->mnt_cifs_flags &
337                                         CIFS_MOUNT_MAP_SPECIAL_CHR);
338                 } else {
339                         rc = CIFSSMBUnixSetPerms(xid, pTcon,
340                                 full_path, mode, (__u64)-1, (__u64)-1,
341                                 device_number, cifs_sb->local_nls,
342                                 cifs_sb->mnt_cifs_flags &
343                                         CIFS_MOUNT_MAP_SPECIAL_CHR);
344                 }
345
346                 if (!rc) {
347                         rc = cifs_get_inode_info_unix(&newinode, full_path,
348                                                 inode->i_sb, xid);
349                         if (pTcon->nocase)
350                                 direntry->d_op = &cifs_ci_dentry_ops;
351                         else
352                                 direntry->d_op = &cifs_dentry_ops;
353                         if (rc == 0)
354                                 d_instantiate(direntry, newinode);
355                 }
356         } else {
357                 if (cifs_sb->mnt_cifs_flags & CIFS_MOUNT_UNX_EMUL) {
358                         int oplock = 0;
359                         u16 fileHandle;
360                         FILE_ALL_INFO *buf;
361
362                         cFYI(1, ("sfu compat create special file"));
363
364                         buf = kmalloc(sizeof(FILE_ALL_INFO), GFP_KERNEL);
365                         if (buf == NULL) {
366                                 kfree(full_path);
367                                 FreeXid(xid);
368                                 return -ENOMEM;
369                         }
370
371                         rc = CIFSSMBOpen(xid, pTcon, full_path,
372                                          FILE_CREATE, /* fail if exists */
373                                          GENERIC_WRITE /* BB would
374                                           WRITE_OWNER | WRITE_DAC be better? */,
375                                          /* Create a file and set the
376                                             file attribute to SYSTEM */
377                                          CREATE_NOT_DIR | CREATE_OPTION_SPECIAL,
378                                          &fileHandle, &oplock, buf,
379                                          cifs_sb->local_nls,
380                                          cifs_sb->mnt_cifs_flags &
381                                             CIFS_MOUNT_MAP_SPECIAL_CHR);
382
383                         /* BB FIXME - add handling for backlevel servers
384                            which need legacy open and check for all
385                            calls to SMBOpen for fallback to SMBLeagcyOpen */
386                         if (!rc) {
387                                 /* BB Do not bother to decode buf since no
388                                    local inode yet to put timestamps in,
389                                    but we can reuse it safely */
390                                 unsigned int bytes_written;
391                                 struct win_dev *pdev;
392                                 pdev = (struct win_dev *)buf;
393                                 if (S_ISCHR(mode)) {
394                                         memcpy(pdev->type, "IntxCHR", 8);
395                                         pdev->major =
396                                               cpu_to_le64(MAJOR(device_number));
397                                         pdev->minor =
398                                               cpu_to_le64(MINOR(device_number));
399                                         rc = CIFSSMBWrite(xid, pTcon,
400                                                 fileHandle,
401                                                 sizeof(struct win_dev),
402                                                 0, &bytes_written, (char *)pdev,
403                                                 NULL, 0);
404                                 } else if (S_ISBLK(mode)) {
405                                         memcpy(pdev->type, "IntxBLK", 8);
406                                         pdev->major =
407                                               cpu_to_le64(MAJOR(device_number));
408                                         pdev->minor =
409                                               cpu_to_le64(MINOR(device_number));
410                                         rc = CIFSSMBWrite(xid, pTcon,
411                                                 fileHandle,
412                                                 sizeof(struct win_dev),
413                                                 0, &bytes_written, (char *)pdev,
414                                                 NULL, 0);
415                                 } /* else if(S_ISFIFO */
416                                 CIFSSMBClose(xid, pTcon, fileHandle);
417                                 d_drop(direntry);
418                         }
419                         kfree(buf);
420                         /* add code here to set EAs */
421                 }
422         }
423
424         kfree(full_path);
425         FreeXid(xid);
426         return rc;
427 }
428
429
430 struct dentry *
431 cifs_lookup(struct inode *parent_dir_inode, struct dentry *direntry,
432             struct nameidata *nd)
433 {
434         int xid;
435         int rc = 0; /* to get around spurious gcc warning, set to zero here */
436         struct cifs_sb_info *cifs_sb;
437         struct cifsTconInfo *pTcon;
438         struct inode *newInode = NULL;
439         char *full_path = NULL;
440
441         xid = GetXid();
442
443         cFYI(1, (" parent inode = 0x%p name is: %s and dentry = 0x%p",
444               parent_dir_inode, direntry->d_name.name, direntry));
445
446         /* check whether path exists */
447
448         cifs_sb = CIFS_SB(parent_dir_inode->i_sb);
449         pTcon = cifs_sb->tcon;
450
451         /*
452          * Don't allow the separator character in a path component.
453          * The VFS will not allow "/", but "\" is allowed by posix.
454          */
455         if (!(cifs_sb->mnt_cifs_flags & CIFS_MOUNT_POSIX_PATHS)) {
456                 int i;
457                 for (i = 0; i < direntry->d_name.len; i++)
458                         if (direntry->d_name.name[i] == '\\') {
459                                 cFYI(1, ("Invalid file name"));
460                                 FreeXid(xid);
461                                 return ERR_PTR(-EINVAL);
462                         }
463         }
464
465         /* can not grab the rename sem here since it would
466         deadlock in the cases (beginning of sys_rename itself)
467         in which we already have the sb rename sem */
468         full_path = build_path_from_dentry(direntry);
469         if (full_path == NULL) {
470                 FreeXid(xid);
471                 return ERR_PTR(-ENOMEM);
472         }
473
474         if (direntry->d_inode != NULL) {
475                 cFYI(1, (" non-NULL inode in lookup"));
476         } else {
477                 cFYI(1, (" NULL inode in lookup"));
478         }
479         cFYI(1,
480              (" Full path: %s inode = 0x%p", full_path, direntry->d_inode));
481
482         if (pTcon->unix_ext)
483                 rc = cifs_get_inode_info_unix(&newInode, full_path,
484                                               parent_dir_inode->i_sb, xid);
485         else
486                 rc = cifs_get_inode_info(&newInode, full_path, NULL,
487                                          parent_dir_inode->i_sb, xid, NULL);
488
489         if ((rc == 0) && (newInode != NULL)) {
490                 if (pTcon->nocase)
491                         direntry->d_op = &cifs_ci_dentry_ops;
492                 else
493                         direntry->d_op = &cifs_dentry_ops;
494                 d_add(direntry, newInode);
495
496                 /* since paths are not looked up by component - the parent
497                    directories are presumed to be good here */
498                 renew_parental_timestamps(direntry);
499
500         } else if (rc == -ENOENT) {
501                 rc = 0;
502                 direntry->d_time = jiffies;
503                 if (pTcon->nocase)
504                         direntry->d_op = &cifs_ci_dentry_ops;
505                 else
506                         direntry->d_op = &cifs_dentry_ops;
507                 d_add(direntry, NULL);
508         /*      if it was once a directory (but how can we tell?) we could do
509                 shrink_dcache_parent(direntry); */
510         } else if (rc != -EACCES) {
511                 cERROR(1, ("Unexpected lookup error %d", rc));
512                 /* We special case check for Access Denied - since that
513                 is a common return code */
514         }
515
516         kfree(full_path);
517         FreeXid(xid);
518         return ERR_PTR(rc);
519 }
520
521 static int
522 cifs_d_revalidate(struct dentry *direntry, struct nameidata *nd)
523 {
524         int isValid = 1;
525
526         if (direntry->d_inode) {
527                 if (cifs_revalidate(direntry))
528                         return 0;
529         } else {
530                 cFYI(1, ("neg dentry 0x%p name = %s",
531                          direntry, direntry->d_name.name));
532                 if (time_after(jiffies, direntry->d_time + HZ) ||
533                         !lookupCacheEnabled) {
534                         d_drop(direntry);
535                         isValid = 0;
536                 }
537         }
538
539         return isValid;
540 }
541
542 /* static int cifs_d_delete(struct dentry *direntry)
543 {
544         int rc = 0;
545
546         cFYI(1, ("In cifs d_delete, name = %s", direntry->d_name.name));
547
548         return rc;
549 }     */
550
551 struct dentry_operations cifs_dentry_ops = {
552         .d_revalidate = cifs_d_revalidate,
553 /* d_delete:       cifs_d_delete,      */ /* not needed except for debugging */
554 };
555
556 static int cifs_ci_hash(struct dentry *dentry, struct qstr *q)
557 {
558         struct nls_table *codepage = CIFS_SB(dentry->d_inode->i_sb)->local_nls;
559         unsigned long hash;
560         int i;
561
562         hash = init_name_hash();
563         for (i = 0; i < q->len; i++)
564                 hash = partial_name_hash(nls_tolower(codepage, q->name[i]),
565                                          hash);
566         q->hash = end_name_hash(hash);
567
568         return 0;
569 }
570
571 static int cifs_ci_compare(struct dentry *dentry, struct qstr *a,
572                            struct qstr *b)
573 {
574         struct nls_table *codepage = CIFS_SB(dentry->d_inode->i_sb)->local_nls;
575
576         if ((a->len == b->len) &&
577             (nls_strnicmp(codepage, a->name, b->name, a->len) == 0)) {
578                 /*
579                  * To preserve case, don't let an existing negative dentry's
580                  * case take precedence.  If a is not a negative dentry, this
581                  * should have no side effects
582                  */
583                 memcpy(a->name, b->name, a->len);
584                 return 0;
585         }
586         return 1;
587 }
588
589 struct dentry_operations cifs_ci_dentry_ops = {
590         .d_revalidate = cifs_d_revalidate,
591         .d_hash = cifs_ci_hash,
592         .d_compare = cifs_ci_compare,
593 };