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 };