Merge branch 'drm-patches' of git://git.kernel.org/pub/scm/linux/kernel/git/airlied...
[pandora-kernel.git] / 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 create_options = CREATE_NOT_DIR;
123         int oplock = 0;
124         int desiredAccess = GENERIC_READ | GENERIC_WRITE;
125         __u16 fileHandle;
126         struct cifs_sb_info *cifs_sb;
127         struct cifsTconInfo *pTcon;
128         char *full_path = NULL;
129         FILE_ALL_INFO *buf = NULL;
130         struct inode *newinode = NULL;
131         struct cifsFileInfo *pCifsFile = NULL;
132         struct cifsInodeInfo *pCifsInode;
133         int disposition = FILE_OVERWRITE_IF;
134         bool write_only = false;
135
136         xid = GetXid();
137
138         cifs_sb = CIFS_SB(inode->i_sb);
139         pTcon = cifs_sb->tcon;
140
141         full_path = build_path_from_dentry(direntry);
142         if (full_path == NULL) {
143                 FreeXid(xid);
144                 return -ENOMEM;
145         }
146
147         if (nd && (nd->flags & LOOKUP_OPEN)) {
148                 int oflags = nd->intent.open.flags;
149
150                 desiredAccess = 0;
151                 if (oflags & FMODE_READ)
152                         desiredAccess |= GENERIC_READ;
153                 if (oflags & FMODE_WRITE) {
154                         desiredAccess |= GENERIC_WRITE;
155                         if (!(oflags & FMODE_READ))
156                                 write_only = true;
157                 }
158
159                 if ((oflags & (O_CREAT | O_EXCL)) == (O_CREAT | O_EXCL))
160                         disposition = FILE_CREATE;
161                 else if ((oflags & (O_CREAT | O_TRUNC)) == (O_CREAT | O_TRUNC))
162                         disposition = FILE_OVERWRITE_IF;
163                 else if ((oflags & O_CREAT) == O_CREAT)
164                         disposition = FILE_OPEN_IF;
165                 else
166                         cFYI(1, ("Create flag not set in create function"));
167         }
168
169         /* BB add processing to set equivalent of mode - e.g. via CreateX with
170            ACLs */
171         if (oplockEnabled)
172                 oplock = REQ_OPLOCK;
173
174         buf = kmalloc(sizeof(FILE_ALL_INFO), GFP_KERNEL);
175         if (buf == NULL) {
176                 kfree(full_path);
177                 FreeXid(xid);
178                 return -ENOMEM;
179         }
180
181         mode &= ~current->fs->umask;
182
183         /*
184          * if we're not using unix extensions, see if we need to set
185          * ATTR_READONLY on the create call
186          */
187         if (!pTcon->unix_ext && (mode & S_IWUGO) == 0)
188                 create_options |= CREATE_OPTION_READONLY;
189
190         if (cifs_sb->tcon->ses->capabilities & CAP_NT_SMBS)
191                 rc = CIFSSMBOpen(xid, pTcon, full_path, disposition,
192                          desiredAccess, create_options,
193                          &fileHandle, &oplock, buf, cifs_sb->local_nls,
194                          cifs_sb->mnt_cifs_flags & CIFS_MOUNT_MAP_SPECIAL_CHR);
195         else
196                 rc = -EIO; /* no NT SMB support fall into legacy open below */
197
198         if (rc == -EIO) {
199                 /* old server, retry the open legacy style */
200                 rc = SMBLegacyOpen(xid, pTcon, full_path, disposition,
201                         desiredAccess, create_options,
202                         &fileHandle, &oplock, buf, cifs_sb->local_nls,
203                         cifs_sb->mnt_cifs_flags & CIFS_MOUNT_MAP_SPECIAL_CHR);
204         }
205         if (rc) {
206                 cFYI(1, ("cifs_create returned 0x%x", rc));
207         } else {
208                 /* If Open reported that we actually created a file
209                 then we now have to set the mode if possible */
210                 if ((pTcon->unix_ext) && (oplock & CIFS_CREATE_ACTION)) {
211                         if (cifs_sb->mnt_cifs_flags & CIFS_MOUNT_SET_UID) {
212                                 CIFSSMBUnixSetPerms(xid, pTcon, full_path, mode,
213                                         (__u64)current->fsuid,
214                                         (__u64)current->fsgid,
215                                         0 /* dev */,
216                                         cifs_sb->local_nls,
217                                         cifs_sb->mnt_cifs_flags &
218                                                 CIFS_MOUNT_MAP_SPECIAL_CHR);
219                         } else {
220                                 CIFSSMBUnixSetPerms(xid, pTcon, full_path, mode,
221                                         (__u64)-1,
222                                         (__u64)-1,
223                                         0 /* dev */,
224                                         cifs_sb->local_nls,
225                                         cifs_sb->mnt_cifs_flags &
226                                                 CIFS_MOUNT_MAP_SPECIAL_CHR);
227                         }
228                 } else {
229                         /* BB implement mode setting via Windows security
230                            descriptors e.g. */
231                         /* CIFSSMBWinSetPerms(xid,pTcon,path,mode,-1,-1,nls);*/
232
233                         /* Could set r/o dos attribute if mode & 0222 == 0 */
234                 }
235
236                 /* server might mask mode so we have to query for it */
237                 if (pTcon->unix_ext)
238                         rc = cifs_get_inode_info_unix(&newinode, full_path,
239                                                  inode->i_sb, xid);
240                 else {
241                         rc = cifs_get_inode_info(&newinode, full_path,
242                                                  buf, inode->i_sb, xid,
243                                                  &fileHandle);
244                         if (newinode) {
245                                 newinode->i_mode = mode;
246                                 if ((oplock & CIFS_CREATE_ACTION) &&
247                                     (cifs_sb->mnt_cifs_flags &
248                                      CIFS_MOUNT_SET_UID)) {
249                                         newinode->i_uid = current->fsuid;
250                                         newinode->i_gid = current->fsgid;
251                                 }
252                         }
253                 }
254
255                 if (rc != 0) {
256                         cFYI(1,
257                              ("Create worked but get_inode_info failed rc = %d",
258                               rc));
259                 } else {
260                         if (pTcon->nocase)
261                                 direntry->d_op = &cifs_ci_dentry_ops;
262                         else
263                                 direntry->d_op = &cifs_dentry_ops;
264                         d_instantiate(direntry, newinode);
265                 }
266                 if ((nd == NULL /* nfsd case - nfs srv does not set nd */) ||
267                         (!(nd->flags & LOOKUP_OPEN))) {
268                         /* mknod case - do not leave file open */
269                         CIFSSMBClose(xid, pTcon, fileHandle);
270                 } else if (newinode) {
271                         pCifsFile =
272                            kzalloc(sizeof(struct cifsFileInfo), GFP_KERNEL);
273
274                         if (pCifsFile == NULL)
275                                 goto cifs_create_out;
276                         pCifsFile->netfid = fileHandle;
277                         pCifsFile->pid = current->tgid;
278                         pCifsFile->pInode = newinode;
279                         pCifsFile->invalidHandle = false;
280                         pCifsFile->closePend     = false;
281                         init_MUTEX(&pCifsFile->fh_sem);
282                         mutex_init(&pCifsFile->lock_mutex);
283                         INIT_LIST_HEAD(&pCifsFile->llist);
284                         atomic_set(&pCifsFile->wrtPending, 0);
285
286                         /* set the following in open now
287                                 pCifsFile->pfile = file; */
288                         write_lock(&GlobalSMBSeslock);
289                         list_add(&pCifsFile->tlist, &pTcon->openFileList);
290                         pCifsInode = CIFS_I(newinode);
291                         if (pCifsInode) {
292                                 /* if readable file instance put first in list*/
293                                 if (write_only) {
294                                         list_add_tail(&pCifsFile->flist,
295                                                 &pCifsInode->openFileList);
296                                 } else {
297                                         list_add(&pCifsFile->flist,
298                                                 &pCifsInode->openFileList);
299                                 }
300                                 if ((oplock & 0xF) == OPLOCK_EXCLUSIVE) {
301                                         pCifsInode->clientCanCacheAll = true;
302                                         pCifsInode->clientCanCacheRead = true;
303                                         cFYI(1, ("Exclusive Oplock inode %p",
304                                                 newinode));
305                                 } else if ((oplock & 0xF) == OPLOCK_READ)
306                                         pCifsInode->clientCanCacheRead = true;
307                         }
308                         write_unlock(&GlobalSMBSeslock);
309                 }
310         }
311 cifs_create_out:
312         kfree(buf);
313         kfree(full_path);
314         FreeXid(xid);
315         return rc;
316 }
317
318 int cifs_mknod(struct inode *inode, struct dentry *direntry, int mode,
319                 dev_t device_number)
320 {
321         int rc = -EPERM;
322         int xid;
323         struct cifs_sb_info *cifs_sb;
324         struct cifsTconInfo *pTcon;
325         char *full_path = NULL;
326         struct inode *newinode = NULL;
327
328         if (!old_valid_dev(device_number))
329                 return -EINVAL;
330
331         xid = GetXid();
332
333         cifs_sb = CIFS_SB(inode->i_sb);
334         pTcon = cifs_sb->tcon;
335
336         full_path = build_path_from_dentry(direntry);
337         if (full_path == NULL)
338                 rc = -ENOMEM;
339         else if (pTcon->unix_ext) {
340                 mode &= ~current->fs->umask;
341                 if (cifs_sb->mnt_cifs_flags & CIFS_MOUNT_SET_UID) {
342                         rc = CIFSSMBUnixSetPerms(xid, pTcon, full_path,
343                                 mode, (__u64)current->fsuid,
344                                 (__u64)current->fsgid,
345                                 device_number, cifs_sb->local_nls,
346                                 cifs_sb->mnt_cifs_flags &
347                                         CIFS_MOUNT_MAP_SPECIAL_CHR);
348                 } else {
349                         rc = CIFSSMBUnixSetPerms(xid, pTcon,
350                                 full_path, mode, (__u64)-1, (__u64)-1,
351                                 device_number, cifs_sb->local_nls,
352                                 cifs_sb->mnt_cifs_flags &
353                                         CIFS_MOUNT_MAP_SPECIAL_CHR);
354                 }
355
356                 if (!rc) {
357                         rc = cifs_get_inode_info_unix(&newinode, full_path,
358                                                 inode->i_sb, xid);
359                         if (pTcon->nocase)
360                                 direntry->d_op = &cifs_ci_dentry_ops;
361                         else
362                                 direntry->d_op = &cifs_dentry_ops;
363                         if (rc == 0)
364                                 d_instantiate(direntry, newinode);
365                 }
366         } else {
367                 if (cifs_sb->mnt_cifs_flags & CIFS_MOUNT_UNX_EMUL) {
368                         int oplock = 0;
369                         u16 fileHandle;
370                         FILE_ALL_INFO *buf;
371
372                         cFYI(1, ("sfu compat create special file"));
373
374                         buf = kmalloc(sizeof(FILE_ALL_INFO), GFP_KERNEL);
375                         if (buf == NULL) {
376                                 kfree(full_path);
377                                 FreeXid(xid);
378                                 return -ENOMEM;
379                         }
380
381                         rc = CIFSSMBOpen(xid, pTcon, full_path,
382                                          FILE_CREATE, /* fail if exists */
383                                          GENERIC_WRITE /* BB would
384                                           WRITE_OWNER | WRITE_DAC be better? */,
385                                          /* Create a file and set the
386                                             file attribute to SYSTEM */
387                                          CREATE_NOT_DIR | CREATE_OPTION_SPECIAL,
388                                          &fileHandle, &oplock, buf,
389                                          cifs_sb->local_nls,
390                                          cifs_sb->mnt_cifs_flags &
391                                             CIFS_MOUNT_MAP_SPECIAL_CHR);
392
393                         /* BB FIXME - add handling for backlevel servers
394                            which need legacy open and check for all
395                            calls to SMBOpen for fallback to SMBLeagcyOpen */
396                         if (!rc) {
397                                 /* BB Do not bother to decode buf since no
398                                    local inode yet to put timestamps in,
399                                    but we can reuse it safely */
400                                 unsigned int bytes_written;
401                                 struct win_dev *pdev;
402                                 pdev = (struct win_dev *)buf;
403                                 if (S_ISCHR(mode)) {
404                                         memcpy(pdev->type, "IntxCHR", 8);
405                                         pdev->major =
406                                               cpu_to_le64(MAJOR(device_number));
407                                         pdev->minor =
408                                               cpu_to_le64(MINOR(device_number));
409                                         rc = CIFSSMBWrite(xid, pTcon,
410                                                 fileHandle,
411                                                 sizeof(struct win_dev),
412                                                 0, &bytes_written, (char *)pdev,
413                                                 NULL, 0);
414                                 } else if (S_ISBLK(mode)) {
415                                         memcpy(pdev->type, "IntxBLK", 8);
416                                         pdev->major =
417                                               cpu_to_le64(MAJOR(device_number));
418                                         pdev->minor =
419                                               cpu_to_le64(MINOR(device_number));
420                                         rc = CIFSSMBWrite(xid, pTcon,
421                                                 fileHandle,
422                                                 sizeof(struct win_dev),
423                                                 0, &bytes_written, (char *)pdev,
424                                                 NULL, 0);
425                                 } /* else if(S_ISFIFO */
426                                 CIFSSMBClose(xid, pTcon, fileHandle);
427                                 d_drop(direntry);
428                         }
429                         kfree(buf);
430                         /* add code here to set EAs */
431                 }
432         }
433
434         kfree(full_path);
435         FreeXid(xid);
436         return rc;
437 }
438
439
440 struct dentry *
441 cifs_lookup(struct inode *parent_dir_inode, struct dentry *direntry,
442             struct nameidata *nd)
443 {
444         int xid;
445         int rc = 0; /* to get around spurious gcc warning, set to zero here */
446         struct cifs_sb_info *cifs_sb;
447         struct cifsTconInfo *pTcon;
448         struct inode *newInode = NULL;
449         char *full_path = NULL;
450
451         xid = GetXid();
452
453         cFYI(1, (" parent inode = 0x%p name is: %s and dentry = 0x%p",
454               parent_dir_inode, direntry->d_name.name, direntry));
455
456         /* check whether path exists */
457
458         cifs_sb = CIFS_SB(parent_dir_inode->i_sb);
459         pTcon = cifs_sb->tcon;
460
461         /*
462          * Don't allow the separator character in a path component.
463          * The VFS will not allow "/", but "\" is allowed by posix.
464          */
465         if (!(cifs_sb->mnt_cifs_flags & CIFS_MOUNT_POSIX_PATHS)) {
466                 int i;
467                 for (i = 0; i < direntry->d_name.len; i++)
468                         if (direntry->d_name.name[i] == '\\') {
469                                 cFYI(1, ("Invalid file name"));
470                                 FreeXid(xid);
471                                 return ERR_PTR(-EINVAL);
472                         }
473         }
474
475         /* can not grab the rename sem here since it would
476         deadlock in the cases (beginning of sys_rename itself)
477         in which we already have the sb rename sem */
478         full_path = build_path_from_dentry(direntry);
479         if (full_path == NULL) {
480                 FreeXid(xid);
481                 return ERR_PTR(-ENOMEM);
482         }
483
484         if (direntry->d_inode != NULL) {
485                 cFYI(1, (" non-NULL inode in lookup"));
486         } else {
487                 cFYI(1, (" NULL inode in lookup"));
488         }
489         cFYI(1,
490              (" Full path: %s inode = 0x%p", full_path, direntry->d_inode));
491
492         if (pTcon->unix_ext)
493                 rc = cifs_get_inode_info_unix(&newInode, full_path,
494                                               parent_dir_inode->i_sb, xid);
495         else
496                 rc = cifs_get_inode_info(&newInode, full_path, NULL,
497                                          parent_dir_inode->i_sb, xid, NULL);
498
499         if ((rc == 0) && (newInode != NULL)) {
500                 if (pTcon->nocase)
501                         direntry->d_op = &cifs_ci_dentry_ops;
502                 else
503                         direntry->d_op = &cifs_dentry_ops;
504                 d_add(direntry, newInode);
505
506                 /* since paths are not looked up by component - the parent
507                    directories are presumed to be good here */
508                 renew_parental_timestamps(direntry);
509
510         } else if (rc == -ENOENT) {
511                 rc = 0;
512                 direntry->d_time = jiffies;
513                 if (pTcon->nocase)
514                         direntry->d_op = &cifs_ci_dentry_ops;
515                 else
516                         direntry->d_op = &cifs_dentry_ops;
517                 d_add(direntry, NULL);
518         /*      if it was once a directory (but how can we tell?) we could do
519                 shrink_dcache_parent(direntry); */
520         } else if (rc != -EACCES) {
521                 cERROR(1, ("Unexpected lookup error %d", rc));
522                 /* We special case check for Access Denied - since that
523                 is a common return code */
524         }
525
526         kfree(full_path);
527         FreeXid(xid);
528         return ERR_PTR(rc);
529 }
530
531 static int
532 cifs_d_revalidate(struct dentry *direntry, struct nameidata *nd)
533 {
534         int isValid = 1;
535
536         if (direntry->d_inode) {
537                 if (cifs_revalidate(direntry))
538                         return 0;
539         } else {
540                 cFYI(1, ("neg dentry 0x%p name = %s",
541                          direntry, direntry->d_name.name));
542                 if (time_after(jiffies, direntry->d_time + HZ) ||
543                         !lookupCacheEnabled) {
544                         d_drop(direntry);
545                         isValid = 0;
546                 }
547         }
548
549         return isValid;
550 }
551
552 /* static int cifs_d_delete(struct dentry *direntry)
553 {
554         int rc = 0;
555
556         cFYI(1, ("In cifs d_delete, name = %s", direntry->d_name.name));
557
558         return rc;
559 }     */
560
561 struct dentry_operations cifs_dentry_ops = {
562         .d_revalidate = cifs_d_revalidate,
563 /* d_delete:       cifs_d_delete,      */ /* not needed except for debugging */
564 };
565
566 static int cifs_ci_hash(struct dentry *dentry, struct qstr *q)
567 {
568         struct nls_table *codepage = CIFS_SB(dentry->d_inode->i_sb)->local_nls;
569         unsigned long hash;
570         int i;
571
572         hash = init_name_hash();
573         for (i = 0; i < q->len; i++)
574                 hash = partial_name_hash(nls_tolower(codepage, q->name[i]),
575                                          hash);
576         q->hash = end_name_hash(hash);
577
578         return 0;
579 }
580
581 static int cifs_ci_compare(struct dentry *dentry, struct qstr *a,
582                            struct qstr *b)
583 {
584         struct nls_table *codepage = CIFS_SB(dentry->d_inode->i_sb)->local_nls;
585
586         if ((a->len == b->len) &&
587             (nls_strnicmp(codepage, a->name, b->name, a->len) == 0)) {
588                 /*
589                  * To preserve case, don't let an existing negative dentry's
590                  * case take precedence.  If a is not a negative dentry, this
591                  * should have no side effects
592                  */
593                 memcpy(a->name, b->name, a->len);
594                 return 0;
595         }
596         return 1;
597 }
598
599 struct dentry_operations cifs_ci_dentry_ops = {
600         .d_revalidate = cifs_d_revalidate,
601         .d_hash = cifs_ci_hash,
602         .d_compare = cifs_ci_compare,
603 };