fs/ncpfs/ncplib_kernel.c

   1 /*
   2  *  ncplib_kernel.c
   3  *
   4  *  Copyright (C) 1995, 1996 by Volker Lendecke
   5  *  Modified for big endian by J.F. Chadima and David S. Miller
   6  *  Modified 1997 Peter Waltenberg, Bill Hawes, David Woodhouse for 2.1 dcache
   7  *  Modified 1999 Wolfram Pienkoss for NLS
   8  *  Modified 2000 Ben Harris, University of Cambridge for NFS NS meta-info
   9  *
  10  */
  11
  12
  13 #include <linux/config.h>
  14
  15 #include "ncplib_kernel.h"
  16
  17 static inline void assert_server_locked(struct ncp_server *server)
  18 {
  19         if (server->lock == 0) {
  20                 DPRINTK("ncpfs: server not locked!\n");
  21         }
  22 }
  23
  24 static void ncp_add_byte(struct ncp_server *server, __u8 x)
  25 {
  26         assert_server_locked(server);
  27         *(__u8 *) (&(server->packet[server->current_size])) = x;
  28         server->current_size += 1;
  29         return;
  30 }
  31
  32 static void ncp_add_word(struct ncp_server *server, __le16 x)
  33 {
  34         assert_server_locked(server);
  35         put_unaligned(x, (__le16 *) (&(server->packet[server->current_size])));
  36         server->current_size += 2;
  37         return;
  38 }
  39
  40 static void ncp_add_be16(struct ncp_server *server, __u16 x)
  41 {
  42         assert_server_locked(server);
  43         put_unaligned(cpu_to_be16(x), (__be16 *) (&(server->packet[server->current_size])));
  44         server->current_size += 2;
  45 }
  46
  47 static void ncp_add_dword(struct ncp_server *server, __le32 x)
  48 {
  49         assert_server_locked(server);
  50         put_unaligned(x, (__le32 *) (&(server->packet[server->current_size])));
  51         server->current_size += 4;
  52         return;
  53 }
  54
  55 static void ncp_add_be32(struct ncp_server *server, __u32 x)
  56 {
  57         assert_server_locked(server);
  58         put_unaligned(cpu_to_be32(x), (__be32 *)(&(server->packet[server->current_size])));
  59         server->current_size += 4;
  60 }
  61
  62 static inline void ncp_add_dword_lh(struct ncp_server *server, __u32 x) {
  63         ncp_add_dword(server, cpu_to_le32(x));
  64 }
  65
  66 static void ncp_add_mem(struct ncp_server *server, const void *source, int size)
  67 {
  68         assert_server_locked(server);
  69         memcpy(&(server->packet[server->current_size]), source, size);
  70         server->current_size += size;
  71         return;
  72 }
  73
  74 static void ncp_add_pstring(struct ncp_server *server, const char *s)
  75 {
  76         int len = strlen(s);
  77         assert_server_locked(server);
  78         if (len > 255) {
  79                 DPRINTK("ncpfs: string too long: %s\n", s);
  80                 len = 255;
  81         }
  82         ncp_add_byte(server, len);
  83         ncp_add_mem(server, s, len);
  84         return;
  85 }
  86
  87 static inline void ncp_init_request(struct ncp_server *server)
  88 {
  89         ncp_lock_server(server);
  90
  91         server->current_size = sizeof(struct ncp_request_header);
  92         server->has_subfunction = 0;
  93 }
  94
  95 static inline void ncp_init_request_s(struct ncp_server *server, int subfunction)
  96 {
  97         ncp_lock_server(server);
  98
  99         server->current_size = sizeof(struct ncp_request_header) + 2;
 100         ncp_add_byte(server, subfunction);
 101
 102         server->has_subfunction = 1;
 103 }
 104
 105 static inline char *
 106  ncp_reply_data(struct ncp_server *server, int offset)
 107 {
 108         return &(server->packet[sizeof(struct ncp_reply_header) + offset]);
 109 }
 110
 111 static inline __u8 BVAL(void* data)
 112 {
 113         return get_unaligned((__u8*)data);
 114 }
 115
 116 static __u8
 117  ncp_reply_byte(struct ncp_server *server, int offset)
 118 {
 119         return get_unaligned((__u8 *) ncp_reply_data(server, offset));
 120 }
 121
 122 static inline __u16 WVAL_LH(void* data)
 123 {
 124         return le16_to_cpu(get_unaligned((__le16*)data));
 125 }
 126
 127 static __u16
 128  ncp_reply_le16(struct ncp_server *server, int offset)
 129 {
 130         return le16_to_cpu(get_unaligned((__le16 *) ncp_reply_data(server, offset)));
 131 }
 132
 133 static __u16
 134  ncp_reply_be16(struct ncp_server *server, int offset)
 135 {
 136         return be16_to_cpu(get_unaligned((__be16 *) ncp_reply_data(server, offset)));
 137 }
 138
 139 static inline __u32 DVAL_LH(void* data)
 140 {
 141         return le32_to_cpu(get_unaligned((__le32*)data));
 142 }
 143
 144 static __le32
 145  ncp_reply_dword(struct ncp_server *server, int offset)
 146 {
 147         return get_unaligned((__le32 *) ncp_reply_data(server, offset));
 148 }
 149
 150 static inline __u32 ncp_reply_dword_lh(struct ncp_server* server, int offset) {
 151         return le32_to_cpu(ncp_reply_dword(server, offset));
 152 }
 153
 154 int
 155 ncp_negotiate_buffersize(struct ncp_server *server, int size, int *target)
 156 {
 157         int result;
 158
 159         ncp_init_request(server);
 160         ncp_add_be16(server, size);
 161
 162         if ((result = ncp_request(server, 33)) != 0) {
 163                 ncp_unlock_server(server);
 164                 return result;
 165         }
 166         *target = min_t(unsigned int, ncp_reply_be16(server, 0), size);
 167
 168         ncp_unlock_server(server);
 169         return 0;
 170 }
 171
 172
 173 /* options:
 174  *      bit 0   ipx checksum
 175  *      bit 1   packet signing
 176  */
 177 int
 178 ncp_negotiate_size_and_options(struct ncp_server *server,
 179         int size, int options, int *ret_size, int *ret_options) {
 180         int result;
 181
 182         /* there is minimum */
 183         if (size < NCP_BLOCK_SIZE) size = NCP_BLOCK_SIZE;
 184
 185         ncp_init_request(server);
 186         ncp_add_be16(server, size);
 187         ncp_add_byte(server, options);
 188
 189         if ((result = ncp_request(server, 0x61)) != 0)
 190         {
 191                 ncp_unlock_server(server);
 192                 return result;
 193         }
 194
 195         /* NCP over UDP returns 0 (!!!) */
 196         result = ncp_reply_be16(server, 0);
 197         if (result >= NCP_BLOCK_SIZE)
 198                 size = min(result, size);
 199         *ret_size = size;
 200         *ret_options = ncp_reply_byte(server, 4);
 201
 202         ncp_unlock_server(server);
 203         return 0;
 204 }
 205
 206 int ncp_get_volume_info_with_number(struct ncp_server* server,
 207                              int n, struct ncp_volume_info* target) {
 208         int result;
 209         int len;
 210
 211         ncp_init_request_s(server, 44);
 212         ncp_add_byte(server, n);
 213
 214         if ((result = ncp_request(server, 22)) != 0) {
 215                 goto out;
 216         }
 217         target->total_blocks = ncp_reply_dword_lh(server, 0);
 218         target->free_blocks = ncp_reply_dword_lh(server, 4);
 219         target->purgeable_blocks = ncp_reply_dword_lh(server, 8);
 220         target->not_yet_purgeable_blocks = ncp_reply_dword_lh(server, 12);
 221         target->total_dir_entries = ncp_reply_dword_lh(server, 16);
 222         target->available_dir_entries = ncp_reply_dword_lh(server, 20);
 223         target->sectors_per_block = ncp_reply_byte(server, 28);
 224
 225         memset(&(target->volume_name), 0, sizeof(target->volume_name));
 226
 227         result = -EIO;
 228         len = ncp_reply_byte(server, 29);
 229         if (len > NCP_VOLNAME_LEN) {
 230                 DPRINTK("ncpfs: volume name too long: %d\n", len);
 231                 goto out;
 232         }
 233         memcpy(&(target->volume_name), ncp_reply_data(server, 30), len);
 234         result = 0;
 235 out:
 236         ncp_unlock_server(server);
 237         return result;
 238 }
 239
 240 int ncp_get_directory_info(struct ncp_server* server, __u8 n,
 241                            struct ncp_volume_info* target) {
 242         int result;
 243         int len;
 244
 245         ncp_init_request_s(server, 45);
 246         ncp_add_byte(server, n);
 247
 248         if ((result = ncp_request(server, 22)) != 0) {
 249                 goto out;
 250         }
 251         target->total_blocks = ncp_reply_dword_lh(server, 0);
 252         target->free_blocks = ncp_reply_dword_lh(server, 4);
 253         target->purgeable_blocks = 0;
 254         target->not_yet_purgeable_blocks = 0;
 255         target->total_dir_entries = ncp_reply_dword_lh(server, 8);
 256         target->available_dir_entries = ncp_reply_dword_lh(server, 12);
 257         target->sectors_per_block = ncp_reply_byte(server, 20);
 258
 259         memset(&(target->volume_name), 0, sizeof(target->volume_name));
 260
 261         result = -EIO;
 262         len = ncp_reply_byte(server, 21);
 263         if (len > NCP_VOLNAME_LEN) {
 264                 DPRINTK("ncpfs: volume name too long: %d\n", len);
 265                 goto out;
 266         }
 267         memcpy(&(target->volume_name), ncp_reply_data(server, 22), len);
 268         result = 0;
 269 out:
 270         ncp_unlock_server(server);
 271         return result;
 272 }
 273
 274 int
 275 ncp_close_file(struct ncp_server *server, const char *file_id)
 276 {
 277         int result;
 278
 279         ncp_init_request(server);
 280         ncp_add_byte(server, 0);
 281         ncp_add_mem(server, file_id, 6);
 282
 283         result = ncp_request(server, 66);
 284         ncp_unlock_server(server);
 285         return result;
 286 }
 287
 288 int
 289 ncp_make_closed(struct inode *inode)
 290 {
 291         int err;
 292
 293         err = 0;
 294         mutex_lock(&NCP_FINFO(inode)->open_mutex);
 295         if (atomic_read(&NCP_FINFO(inode)->opened) == 1) {
 296                 atomic_set(&NCP_FINFO(inode)->opened, 0);
 297                 err = ncp_close_file(NCP_SERVER(inode), NCP_FINFO(inode)->file_handle);
 298
 299                 if (!err)
 300                         PPRINTK("ncp_make_closed: volnum=%d, dirent=%u, error=%d\n",
 301                                 NCP_FINFO(inode)->volNumber,
 302                                 NCP_FINFO(inode)->dirEntNum, err);
 303         }
 304         mutex_unlock(&NCP_FINFO(inode)->open_mutex);
 305         return err;
 306 }
 307
 308 static void ncp_add_handle_path(struct ncp_server *server, __u8 vol_num,
 309                                 __le32 dir_base, int have_dir_base,
 310                                 const char *path)
 311 {
 312         ncp_add_byte(server, vol_num);
 313         ncp_add_dword(server, dir_base);
 314         if (have_dir_base != 0) {
 315                 ncp_add_byte(server, 1);        /* dir_base */
 316         } else {
 317                 ncp_add_byte(server, 0xff);     /* no handle */
 318         }
 319         if (path != NULL) {
 320                 ncp_add_byte(server, 1);        /* 1 component */
 321                 ncp_add_pstring(server, path);
 322         } else {
 323                 ncp_add_byte(server, 0);
 324         }
 325 }
 326
 327 int ncp_dirhandle_alloc(struct ncp_server* server, __u8 volnum, __le32 dirent,
 328                         __u8* dirhandle) {
 329         int result;
 330
 331         ncp_init_request(server);
 332         ncp_add_byte(server, 12);               /* subfunction */
 333         ncp_add_byte(server, NW_NS_DOS);
 334         ncp_add_byte(server, 0);
 335         ncp_add_word(server, 0);
 336         ncp_add_handle_path(server, volnum, dirent, 1, NULL);
 337         if ((result = ncp_request(server, 87)) == 0) {
 338                 *dirhandle = ncp_reply_byte(server, 0);
 339         }
 340         ncp_unlock_server(server);
 341         return result;
 342 }
 343
 344 int ncp_dirhandle_free(struct ncp_server* server, __u8 dirhandle) {
 345         int result;
 346
 347         ncp_init_request_s(server, 20);
 348         ncp_add_byte(server, dirhandle);
 349         result = ncp_request(server, 22);
 350         ncp_unlock_server(server);
 351         return result;
 352 }
 353
 354 void ncp_extract_file_info(void *structure, struct nw_info_struct *target)
 355 {
 356         __u8 *name_len;
 357         const int info_struct_size = offsetof(struct nw_info_struct, nameLen);
 358
 359         memcpy(target, structure, info_struct_size);
 360         name_len = structure + info_struct_size;
 361         target->nameLen = *name_len;
 362         memcpy(target->entryName, name_len + 1, *name_len);
 363         target->entryName[*name_len] = '\0';
 364         target->volNumber = le32_to_cpu(target->volNumber);
 365         return;
 366 }
 367
 368 #ifdef CONFIG_NCPFS_NFS_NS
 369 static inline void ncp_extract_nfs_info(unsigned char *structure,
 370                                  struct nw_nfs_info *target)
 371 {
 372         target->mode = DVAL_LH(structure);
 373         target->rdev = DVAL_LH(structure + 8);
 374 }
 375 #endif
 376
 377 int ncp_obtain_nfs_info(struct ncp_server *server,
 378                         struct nw_info_struct *target)
 379
 380 {
 381         int result = 0;
 382 #ifdef CONFIG_NCPFS_NFS_NS
 383         __u32 volnum = target->volNumber;
 384
 385         if (ncp_is_nfs_extras(server, volnum)) {
 386                 ncp_init_request(server);
 387                 ncp_add_byte(server, 19);       /* subfunction */
 388                 ncp_add_byte(server, server->name_space[volnum]);
 389                 ncp_add_byte(server, NW_NS_NFS);
 390                 ncp_add_byte(server, 0);
 391                 ncp_add_byte(server, volnum);
 392                 ncp_add_dword(server, target->dirEntNum);
 393                 /* We must retrieve both nlinks and rdev, otherwise some server versions
 394                    report zeroes instead of valid data */
 395                 ncp_add_dword_lh(server, NSIBM_NFS_MODE | NSIBM_NFS_NLINKS | NSIBM_NFS_RDEV);
 396
 397                 if ((result = ncp_request(server, 87)) == 0) {
 398                         ncp_extract_nfs_info(ncp_reply_data(server, 0), &target->nfs);
 399                         DPRINTK(KERN_DEBUG
 400                                 "ncp_obtain_nfs_info: (%s) mode=0%o, rdev=0x%x\n",
 401                                 target->entryName, target->nfs.mode,
 402                                 target->nfs.rdev);
 403                 } else {
 404                         target->nfs.mode = 0;
 405                         target->nfs.rdev = 0;
 406                 }
 407                 ncp_unlock_server(server);
 408
 409         } else
 410 #endif
 411         {
 412                 target->nfs.mode = 0;
 413                 target->nfs.rdev = 0;
 414         }
 415         return result;
 416 }
 417
 418 /*
 419  * Returns information for a (one-component) name relative to
 420  * the specified directory.
 421  */
 422 int ncp_obtain_info(struct ncp_server *server, struct inode *dir, char *path,
 423                         struct nw_info_struct *target)
 424 {
 425         __u8  volnum = NCP_FINFO(dir)->volNumber;
 426         __le32 dirent = NCP_FINFO(dir)->dirEntNum;
 427         int result;
 428
 429         if (target == NULL) {
 430                 printk(KERN_ERR "ncp_obtain_info: invalid call\n");
 431                 return -EINVAL;
 432         }
 433         ncp_init_request(server);
 434         ncp_add_byte(server, 6);        /* subfunction */
 435         ncp_add_byte(server, server->name_space[volnum]);
 436         ncp_add_byte(server, server->name_space[volnum]); /* N.B. twice ?? */
 437         ncp_add_word(server, cpu_to_le16(0x8006));      /* get all */
 438         ncp_add_dword(server, RIM_ALL);
 439         ncp_add_handle_path(server, volnum, dirent, 1, path);
 440
 441         if ((result = ncp_request(server, 87)) != 0)
 442                 goto out;
 443         ncp_extract_file_info(ncp_reply_data(server, 0), target);
 444         ncp_unlock_server(server);
 445
 446         result = ncp_obtain_nfs_info(server, target);
 447         return result;
 448
 449 out:
 450         ncp_unlock_server(server);
 451         return result;
 452 }
 453
 454 #ifdef CONFIG_NCPFS_NFS_NS
 455 static int
 456 ncp_obtain_DOS_dir_base(struct ncp_server *server,
 457                 __u8 volnum, __le32 dirent,
 458                 char *path, /* At most 1 component */
 459                 __le32 *DOS_dir_base)
 460 {
 461         int result;
 462
 463         ncp_init_request(server);
 464         ncp_add_byte(server, 6); /* subfunction */
 465         ncp_add_byte(server, server->name_space[volnum]);
 466         ncp_add_byte(server, server->name_space[volnum]);
 467         ncp_add_word(server, cpu_to_le16(0x8006)); /* get all */
 468         ncp_add_dword(server, RIM_DIRECTORY);
 469         ncp_add_handle_path(server, volnum, dirent, 1, path);
 470
 471         if ((result = ncp_request(server, 87)) == 0)
 472         {
 473                 if (DOS_dir_base) *DOS_dir_base=ncp_reply_dword(server, 0x34);
 474         }
 475         ncp_unlock_server(server);
 476         return result;
 477 }
 478 #endif /* CONFIG_NCPFS_NFS_NS */
 479
 480 static inline int
 481 ncp_get_known_namespace(struct ncp_server *server, __u8 volume)
 482 {
 483 #if defined(CONFIG_NCPFS_OS2_NS) || defined(CONFIG_NCPFS_NFS_NS)
 484         int result;
 485         __u8 *namespace;
 486         __u16 no_namespaces;
 487
 488         ncp_init_request(server);
 489         ncp_add_byte(server, 24);       /* Subfunction: Get Name Spaces Loaded */
 490         ncp_add_word(server, 0);
 491         ncp_add_byte(server, volume);
 492
 493         if ((result = ncp_request(server, 87)) != 0) {
 494                 ncp_unlock_server(server);
 495                 return NW_NS_DOS; /* not result ?? */
 496         }
 497
 498         result = NW_NS_DOS;
 499         no_namespaces = ncp_reply_le16(server, 0);
 500         namespace = ncp_reply_data(server, 2);
 501
 502         while (no_namespaces > 0) {
 503                 DPRINTK("get_namespaces: found %d on %d\n", *namespace, volume);
 504
 505 #ifdef CONFIG_NCPFS_NFS_NS
 506                 if ((*namespace == NW_NS_NFS) && !(server->m.flags&NCP_MOUNT_NO_NFS))
 507                 {
 508                         result = NW_NS_NFS;
 509                         break;
 510                 }
 511 #endif  /* CONFIG_NCPFS_NFS_NS */
 512 #ifdef CONFIG_NCPFS_OS2_NS
 513                 if ((*namespace == NW_NS_OS2) && !(server->m.flags&NCP_MOUNT_NO_OS2))
 514                 {
 515                         result = NW_NS_OS2;
 516                 }
 517 #endif  /* CONFIG_NCPFS_OS2_NS */
 518                 namespace += 1;
 519                 no_namespaces -= 1;
 520         }
 521         ncp_unlock_server(server);
 522         return result;
 523 #else   /* neither OS2 nor NFS - only DOS */
 524         return NW_NS_DOS;
 525 #endif  /* defined(CONFIG_NCPFS_OS2_NS) || defined(CONFIG_NCPFS_NFS_NS) */
 526 }
 527
 528 static int
 529 ncp_ObtainSpecificDirBase(struct ncp_server *server,
 530                 __u8 nsSrc, __u8 nsDst, __u8 vol_num, __le32 dir_base,
 531                 char *path, /* At most 1 component */
 532                 __le32 *dirEntNum, __le32 *DosDirNum)
 533 {
 534         int result;
 535
 536         ncp_init_request(server);
 537         ncp_add_byte(server, 6); /* subfunction */
 538         ncp_add_byte(server, nsSrc);
 539         ncp_add_byte(server, nsDst);
 540         ncp_add_word(server, cpu_to_le16(0x8006)); /* get all */
 541         ncp_add_dword(server, RIM_ALL);
 542         ncp_add_handle_path(server, vol_num, dir_base, 1, path);
 543
 544         if ((result = ncp_request(server, 87)) != 0)
 545         {
 546                 ncp_unlock_server(server);
 547                 return result;
 548         }
 549
 550         if (dirEntNum)
 551                 *dirEntNum = ncp_reply_dword(server, 0x30);
 552         if (DosDirNum)
 553                 *DosDirNum = ncp_reply_dword(server, 0x34);
 554         ncp_unlock_server(server);
 555         return 0;
 556 }
 557
 558 int
 559 ncp_mount_subdir(struct ncp_server *server,
 560                  __u8 volNumber, __u8 srcNS, __le32 dirEntNum,
 561                  __u32* volume, __le32* newDirEnt, __le32* newDosEnt)
 562 {
 563         int dstNS;
 564         int result;
 565
 566         dstNS = ncp_get_known_namespace(server, volNumber);
 567         if ((result = ncp_ObtainSpecificDirBase(server, srcNS, dstNS, volNumber,
 568                                       dirEntNum, NULL, newDirEnt, newDosEnt)) != 0)
 569         {
 570                 return result;
 571         }
 572         server->name_space[volNumber] = dstNS;
 573         *volume = volNumber;
 574         server->m.mounted_vol[1] = 0;
 575         server->m.mounted_vol[0] = 'X';
 576         return 0;
 577 }
 578
 579 int
 580 ncp_get_volume_root(struct ncp_server *server, const char *volname,
 581                     __u32* volume, __le32* dirent, __le32* dosdirent)
 582 {
 583         int result;
 584         __u8 volnum;
 585
 586         DPRINTK("ncp_get_volume_root: looking up vol %s\n", volname);
 587
 588         ncp_init_request(server);
 589         ncp_add_byte(server, 22);       /* Subfunction: Generate dir handle */
 590         ncp_add_byte(server, 0);        /* DOS namespace */
 591         ncp_add_byte(server, 0);        /* reserved */
 592         ncp_add_byte(server, 0);        /* reserved */
 593         ncp_add_byte(server, 0);        /* reserved */
 594
 595         ncp_add_byte(server, 0);        /* faked volume number */
 596         ncp_add_dword(server, 0);       /* faked dir_base */
 597         ncp_add_byte(server, 0xff);     /* Don't have a dir_base */
 598         ncp_add_byte(server, 1);        /* 1 path component */
 599         ncp_add_pstring(server, volname);
 600
 601         if ((result = ncp_request(server, 87)) != 0) {
 602                 ncp_unlock_server(server);
 603                 return result;
 604         }
 605         *dirent = *dosdirent = ncp_reply_dword(server, 4);
 606         volnum = ncp_reply_byte(server, 8);
 607         ncp_unlock_server(server);
 608         *volume = volnum;
 609
 610         server->name_space[volnum] = ncp_get_known_namespace(server, volnum);
 611
 612         DPRINTK("lookup_vol: namespace[%d] = %d\n",
 613                 volnum, server->name_space[volnum]);
 614
 615         return 0;
 616 }
 617
 618 int
 619 ncp_lookup_volume(struct ncp_server *server, const char *volname,
 620                   struct nw_info_struct *target)
 621 {
 622         int result;
 623
 624         memset(target, 0, sizeof(*target));
 625         result = ncp_get_volume_root(server, volname,
 626                         &target->volNumber, &target->dirEntNum, &target->DosDirNum);
 627         if (result) {
 628                 return result;
 629         }
 630         target->nameLen = strlen(volname);
 631         memcpy(target->entryName, volname, target->nameLen+1);
 632         target->attributes = aDIR;
 633         /* set dates to Jan 1, 1986  00:00 */
 634         target->creationTime = target->modifyTime = cpu_to_le16(0x0000);
 635         target->creationDate = target->modifyDate = target->lastAccessDate = cpu_to_le16(0x0C21);
 636         target->nfs.mode = 0;
 637         return 0;
 638 }
 639
 640 int ncp_modify_file_or_subdir_dos_info_path(struct ncp_server *server,
 641                                             struct inode *dir,
 642                                             const char *path,
 643                                             __le32 info_mask,
 644                                             const struct nw_modify_dos_info *info)
 645 {
 646         __u8  volnum = NCP_FINFO(dir)->volNumber;
 647         __le32 dirent = NCP_FINFO(dir)->dirEntNum;
 648         int result;
 649
 650         ncp_init_request(server);
 651         ncp_add_byte(server, 7);        /* subfunction */
 652         ncp_add_byte(server, server->name_space[volnum]);
 653         ncp_add_byte(server, 0);        /* reserved */
 654         ncp_add_word(server, cpu_to_le16(0x8006));      /* search attribs: all */
 655
 656         ncp_add_dword(server, info_mask);
 657         ncp_add_mem(server, info, sizeof(*info));
 658         ncp_add_handle_path(server, volnum, dirent, 1, path);
 659
 660         result = ncp_request(server, 87);
 661         ncp_unlock_server(server);
 662         return result;
 663 }
 664
 665 int ncp_modify_file_or_subdir_dos_info(struct ncp_server *server,
 666                                        struct inode *dir,
 667                                        __le32 info_mask,
 668                                        const struct nw_modify_dos_info *info)
 669 {
 670         return ncp_modify_file_or_subdir_dos_info_path(server, dir, NULL,
 671                 info_mask, info);
 672 }
 673
 674 #ifdef CONFIG_NCPFS_NFS_NS
 675 int ncp_modify_nfs_info(struct ncp_server *server, __u8 volnum, __le32 dirent,
 676                                __u32 mode, __u32 rdev)
 677
 678 {
 679         int result = 0;
 680
 681         if (server->name_space[volnum] == NW_NS_NFS) {
 682                 ncp_init_request(server);
 683                 ncp_add_byte(server, 25);       /* subfunction */
 684                 ncp_add_byte(server, server->name_space[volnum]);
 685                 ncp_add_byte(server, NW_NS_NFS);
 686                 ncp_add_byte(server, volnum);
 687                 ncp_add_dword(server, dirent);
 688                 /* we must always operate on both nlinks and rdev, otherwise
 689                    rdev is not set */
 690                 ncp_add_dword_lh(server, NSIBM_NFS_MODE | NSIBM_NFS_NLINKS | NSIBM_NFS_RDEV);
 691                 ncp_add_dword_lh(server, mode);
 692                 ncp_add_dword_lh(server, 1);    /* nlinks */
 693                 ncp_add_dword_lh(server, rdev);
 694                 result = ncp_request(server, 87);
 695                 ncp_unlock_server(server);
 696         }
 697         return result;
 698 }
 699 #endif
 700
 701
 702 static int
 703 ncp_DeleteNSEntry(struct ncp_server *server,
 704                   __u8 have_dir_base, __u8 volnum, __le32 dirent,
 705                   char* name, __u8 ns, __le16 attr)
 706 {
 707         int result;
 708
 709         ncp_init_request(server);
 710         ncp_add_byte(server, 8);        /* subfunction */
 711         ncp_add_byte(server, ns);
 712         ncp_add_byte(server, 0);        /* reserved */
 713         ncp_add_word(server, attr);     /* search attribs: all */
 714         ncp_add_handle_path(server, volnum, dirent, have_dir_base, name);
 715
 716         result = ncp_request(server, 87);
 717         ncp_unlock_server(server);
 718         return result;
 719 }
 720
 721 int
 722 ncp_del_file_or_subdir2(struct ncp_server *server,
 723                         struct dentry *dentry)
 724 {
 725         struct inode *inode = dentry->d_inode;
 726         __u8  volnum;
 727         __le32 dirent;
 728
 729         if (!inode) {
 730 #ifdef CONFIG_NCPFS_DEBUGDENTRY
 731                 PRINTK("ncpfs: ncpdel2: dentry->d_inode == NULL\n");
 732 #endif
 733                 return 0xFF;    /* Any error */
 734         }
 735         volnum = NCP_FINFO(inode)->volNumber;
 736         dirent = NCP_FINFO(inode)->DosDirNum;
 737         return ncp_DeleteNSEntry(server, 1, volnum, dirent, NULL, NW_NS_DOS, cpu_to_le16(0x8006));
 738 }
 739
 740 int
 741 ncp_del_file_or_subdir(struct ncp_server *server,
 742                        struct inode *dir, char *name)
 743 {
 744         __u8  volnum = NCP_FINFO(dir)->volNumber;
 745         __le32 dirent = NCP_FINFO(dir)->dirEntNum;
 746
 747 #ifdef CONFIG_NCPFS_NFS_NS
 748         if (server->name_space[volnum]==NW_NS_NFS)
 749         {
 750                 int result;
 751
 752                 result=ncp_obtain_DOS_dir_base(server, volnum, dirent, name, &dirent);
 753                 if (result) return result;
 754                 return ncp_DeleteNSEntry(server, 1, volnum, dirent, NULL, NW_NS_DOS, cpu_to_le16(0x8006));
 755         }
 756         else
 757 #endif  /* CONFIG_NCPFS_NFS_NS */
 758                 return ncp_DeleteNSEntry(server, 1, volnum, dirent, name, server->name_space[volnum], cpu_to_le16(0x8006));
 759 }
 760
 761 static inline void ConvertToNWfromDWORD(__u16 v0, __u16 v1, __u8 ret[6])
 762 {
 763         __le16 *dest = (__le16 *) ret;
 764         dest[1] = cpu_to_le16(v0);
 765         dest[2] = cpu_to_le16(v1);
 766         dest[0] = cpu_to_le16(v0 + 1);
 767         return;
 768 }
 769
 770 /* If both dir and name are NULL, then in target there's already a
 771    looked-up entry that wants to be opened. */
 772 int ncp_open_create_file_or_subdir(struct ncp_server *server,
 773                                    struct inode *dir, char *name,
 774                                    int open_create_mode,
 775                                    __le32 create_attributes,
 776                                    __le16 desired_acc_rights,
 777                                    struct ncp_entry_info *target)
 778 {
 779         __le16 search_attribs = cpu_to_le16(0x0006);
 780         __u8  volnum;
 781         __le32 dirent;
 782         int result;
 783
 784         volnum = NCP_FINFO(dir)->volNumber;
 785         dirent = NCP_FINFO(dir)->dirEntNum;
 786
 787         if ((create_attributes & aDIR) != 0) {
 788                 search_attribs |= cpu_to_le16(0x8000);
 789         }
 790         ncp_init_request(server);
 791         ncp_add_byte(server, 1);        /* subfunction */
 792         ncp_add_byte(server, server->name_space[volnum]);
 793         ncp_add_byte(server, open_create_mode);
 794         ncp_add_word(server, search_attribs);
 795         ncp_add_dword(server, RIM_ALL);
 796         ncp_add_dword(server, create_attributes);
 797         /* The desired acc rights seem to be the inherited rights mask
 798            for directories */
 799         ncp_add_word(server, desired_acc_rights);
 800         ncp_add_handle_path(server, volnum, dirent, 1, name);
 801
 802         if ((result = ncp_request(server, 87)) != 0)
 803                 goto out;
 804         if (!(create_attributes & aDIR))
 805                 target->opened = 1;
 806
 807         /* in target there's a new finfo to fill */
 808         ncp_extract_file_info(ncp_reply_data(server, 6), &(target->i));
 809         target->volume = target->i.volNumber;
 810         ConvertToNWfromDWORD(ncp_reply_le16(server, 0),
 811                              ncp_reply_le16(server, 2),
 812                              target->file_handle);
 813
 814         ncp_unlock_server(server);
 815
 816         (void)ncp_obtain_nfs_info(server, &(target->i));
 817         return 0;
 818
 819 out:
 820         ncp_unlock_server(server);
 821         return result;
 822 }
 823
 824 int
 825 ncp_initialize_search(struct ncp_server *server, struct inode *dir,
 826                         struct nw_search_sequence *target)
 827 {
 828         __u8  volnum = NCP_FINFO(dir)->volNumber;
 829         __le32 dirent = NCP_FINFO(dir)->dirEntNum;
 830         int result;
 831
 832         ncp_init_request(server);
 833         ncp_add_byte(server, 2);        /* subfunction */
 834         ncp_add_byte(server, server->name_space[volnum]);
 835         ncp_add_byte(server, 0);        /* reserved */
 836         ncp_add_handle_path(server, volnum, dirent, 1, NULL);
 837
 838         result = ncp_request(server, 87);
 839         if (result)
 840                 goto out;
 841         memcpy(target, ncp_reply_data(server, 0), sizeof(*target));
 842
 843 out:
 844         ncp_unlock_server(server);
 845         return result;
 846 }
 847
 848 int ncp_search_for_fileset(struct ncp_server *server,
 849                            struct nw_search_sequence *seq,
 850                            int* more,
 851                            int* cnt,
 852                            char* buffer,
 853                            size_t bufsize,
 854                            char** rbuf,
 855                            size_t* rsize)
 856 {
 857         int result;
 858
 859         ncp_init_request(server);
 860         ncp_add_byte(server, 20);
 861         ncp_add_byte(server, server->name_space[seq->volNumber]);
 862         ncp_add_byte(server, 0);                /* datastream */
 863         ncp_add_word(server, cpu_to_le16(0x8006));
 864         ncp_add_dword(server, RIM_ALL);
 865         ncp_add_word(server, cpu_to_le16(32767));       /* max returned items */
 866         ncp_add_mem(server, seq, 9);
 867 #ifdef CONFIG_NCPFS_NFS_NS
 868         if (server->name_space[seq->volNumber] == NW_NS_NFS) {
 869                 ncp_add_byte(server, 0);        /* 0 byte pattern */
 870         } else
 871 #endif
 872         {
 873                 ncp_add_byte(server, 2);        /* 2 byte pattern */
 874                 ncp_add_byte(server, 0xff);     /* following is a wildcard */
 875                 ncp_add_byte(server, '*');
 876         }
 877         result = ncp_request2(server, 87, buffer, bufsize);
 878         if (result) {
 879                 ncp_unlock_server(server);
 880                 return result;
 881         }
 882         if (server->ncp_reply_size < 12) {
 883                 ncp_unlock_server(server);
 884                 return 0xFF;
 885         }
 886         *rsize = server->ncp_reply_size - 12;
 887         ncp_unlock_server(server);
 888         buffer = buffer + sizeof(struct ncp_reply_header);
 889         *rbuf = buffer + 12;
 890         *cnt = WVAL_LH(buffer + 10);
 891         *more = BVAL(buffer + 9);
 892         memcpy(seq, buffer, 9);
 893         return 0;
 894 }
 895
 896 static int
 897 ncp_RenameNSEntry(struct ncp_server *server,
 898                   struct inode *old_dir, char *old_name, __le16 old_type,
 899                   struct inode *new_dir, char *new_name)
 900 {
 901         int result = -EINVAL;
 902
 903         if ((old_dir == NULL) || (old_name == NULL) ||
 904             (new_dir == NULL) || (new_name == NULL))
 905                 goto out;
 906
 907         ncp_init_request(server);
 908         ncp_add_byte(server, 4);        /* subfunction */
 909         ncp_add_byte(server, server->name_space[NCP_FINFO(old_dir)->volNumber]);
 910         ncp_add_byte(server, 1);        /* rename flag */
 911         ncp_add_word(server, old_type); /* search attributes */
 912
 913         /* source Handle Path */
 914         ncp_add_byte(server, NCP_FINFO(old_dir)->volNumber);
 915         ncp_add_dword(server, NCP_FINFO(old_dir)->dirEntNum);
 916         ncp_add_byte(server, 1);
 917         ncp_add_byte(server, 1);        /* 1 source component */
 918
 919         /* dest Handle Path */
 920         ncp_add_byte(server, NCP_FINFO(new_dir)->volNumber);
 921         ncp_add_dword(server, NCP_FINFO(new_dir)->dirEntNum);
 922         ncp_add_byte(server, 1);
 923         ncp_add_byte(server, 1);        /* 1 destination component */
 924
 925         /* source path string */
 926         ncp_add_pstring(server, old_name);
 927         /* dest path string */
 928         ncp_add_pstring(server, new_name);
 929
 930         result = ncp_request(server, 87);
 931         ncp_unlock_server(server);
 932 out:
 933         return result;
 934 }
 935
 936 int ncp_ren_or_mov_file_or_subdir(struct ncp_server *server,
 937                                 struct inode *old_dir, char *old_name,
 938                                 struct inode *new_dir, char *new_name)
 939 {
 940         int result;
 941         __le16 old_type = cpu_to_le16(0x06);
 942
 943 /* If somebody can do it atomic, call me... vandrove@vc.cvut.cz */
 944         result = ncp_RenameNSEntry(server, old_dir, old_name, old_type,
 945                                            new_dir, new_name);
 946         if (result == 0xFF)     /* File Not Found, try directory */
 947         {
 948                 old_type = cpu_to_le16(0x16);
 949                 result = ncp_RenameNSEntry(server, old_dir, old_name, old_type,
 950                                                    new_dir, new_name);
 951         }
 952         if (result != 0x92) return result;      /* All except NO_FILES_RENAMED */
 953         result = ncp_del_file_or_subdir(server, new_dir, new_name);
 954         if (result != 0) return -EACCES;
 955         result = ncp_RenameNSEntry(server, old_dir, old_name, old_type,
 956                                            new_dir, new_name);
 957         return result;
 958 }
 959
 960
 961 /* We have to transfer to/from user space */
 962 int
 963 ncp_read_kernel(struct ncp_server *server, const char *file_id,
 964              __u32 offset, __u16 to_read, char *target, int *bytes_read)
 965 {
 966         char *source;
 967         int result;
 968
 969         ncp_init_request(server);
 970         ncp_add_byte(server, 0);
 971         ncp_add_mem(server, file_id, 6);
 972         ncp_add_be32(server, offset);
 973         ncp_add_be16(server, to_read);
 974
 975         if ((result = ncp_request(server, 72)) != 0) {
 976                 goto out;
 977         }
 978         *bytes_read = ncp_reply_be16(server, 0);
 979         source = ncp_reply_data(server, 2 + (offset & 1));
 980
 981         memcpy(target, source, *bytes_read);
 982 out:
 983         ncp_unlock_server(server);
 984         return result;
 985 }
 986
 987 /* There is a problem... egrep and some other silly tools do:
 988         x = mmap(NULL, MAP_PRIVATE, PROT_READ|PROT_WRITE, <ncpfs fd>, 32768);
 989         read(<ncpfs fd>, x, 32768);
 990    Now copying read result by copy_to_user causes pagefault. This pagefault
 991    could not be handled because of server was locked due to read. So we have
 992    to use temporary buffer. So ncp_unlock_server must be done before
 993    copy_to_user (and for write, copy_from_user must be done before
 994    ncp_init_request... same applies for send raw packet ioctl). Because of
 995    file is normally read in bigger chunks, caller provides kmalloced
 996    (vmalloced) chunk of memory with size >= to_read...
 997  */
 998 int
 999 ncp_read_bounce(struct ncp_server *server, const char *file_id,
1000          __u32 offset, __u16 to_read, char __user *target, int *bytes_read,
1001          void* bounce, __u32 bufsize)
1002 {
1003         int result;
1004
1005         ncp_init_request(server);
1006         ncp_add_byte(server, 0);
1007         ncp_add_mem(server, file_id, 6);
1008         ncp_add_be32(server, offset);
1009         ncp_add_be16(server, to_read);
1010         result = ncp_request2(server, 72, bounce, bufsize);
1011         ncp_unlock_server(server);
1012         if (!result) {
1013                 int len = be16_to_cpu(get_unaligned((__be16*)((char*)bounce +
1014                           sizeof(struct ncp_reply_header))));
1015                 result = -EIO;
1016                 if (len <= to_read) {
1017                         char* source;
1018
1019                         source = (char*)bounce +
1020                                  sizeof(struct ncp_reply_header) + 2 +
1021                                  (offset & 1);
1022                         *bytes_read = len;
1023                         result = 0;
1024                         if (copy_to_user(target, source, len))
1025                                 result = -EFAULT;
1026                 }
1027         }
1028         return result;
1029 }
1030
1031 int
1032 ncp_write_kernel(struct ncp_server *server, const char *file_id,
1033                  __u32 offset, __u16 to_write,
1034                  const char *source, int *bytes_written)
1035 {
1036         int result;
1037
1038         ncp_init_request(server);
1039         ncp_add_byte(server, 0);
1040         ncp_add_mem(server, file_id, 6);
1041         ncp_add_be32(server, offset);
1042         ncp_add_be16(server, to_write);
1043         ncp_add_mem(server, source, to_write);
1044
1045         if ((result = ncp_request(server, 73)) == 0)
1046                 *bytes_written = to_write;
1047         ncp_unlock_server(server);
1048         return result;
1049 }
1050
1051 #ifdef CONFIG_NCPFS_IOCTL_LOCKING
1052 int
1053 ncp_LogPhysicalRecord(struct ncp_server *server, const char *file_id,
1054           __u8 locktype, __u32 offset, __u32 length, __u16 timeout)
1055 {
1056         int result;
1057
1058         ncp_init_request(server);
1059         ncp_add_byte(server, locktype);
1060         ncp_add_mem(server, file_id, 6);
1061         ncp_add_be32(server, offset);
1062         ncp_add_be32(server, length);
1063         ncp_add_be16(server, timeout);
1064
1065         if ((result = ncp_request(server, 0x1A)) != 0)
1066         {
1067                 ncp_unlock_server(server);
1068                 return result;
1069         }
1070         ncp_unlock_server(server);
1071         return 0;
1072 }
1073
1074 int
1075 ncp_ClearPhysicalRecord(struct ncp_server *server, const char *file_id,
1076           __u32 offset, __u32 length)
1077 {
1078         int result;
1079
1080         ncp_init_request(server);
1081         ncp_add_byte(server, 0);        /* who knows... lanalyzer says that */
1082         ncp_add_mem(server, file_id, 6);
1083         ncp_add_be32(server, offset);
1084         ncp_add_be32(server, length);
1085
1086         if ((result = ncp_request(server, 0x1E)) != 0)
1087         {
1088                 ncp_unlock_server(server);
1089                 return result;
1090         }
1091         ncp_unlock_server(server);
1092         return 0;
1093 }
1094 #endif  /* CONFIG_NCPFS_IOCTL_LOCKING */
1095
1096 #ifdef CONFIG_NCPFS_NLS
1097 /* This are the NLS conversion routines with inspirations and code parts
1098  * from the vfat file system and hints from Petr Vandrovec.
1099  */
1100
1101 int
1102 ncp__io2vol(struct ncp_server *server, unsigned char *vname, unsigned int *vlen,
1103                 const unsigned char *iname, unsigned int ilen, int cc)
1104 {
1105         struct nls_table *in = server->nls_io;
1106         struct nls_table *out = server->nls_vol;
1107         unsigned char *vname_start;
1108         unsigned char *vname_end;
1109         const unsigned char *iname_end;
1110
1111         iname_end = iname + ilen;
1112         vname_start = vname;
1113         vname_end = vname + *vlen - 1;
1114
1115         while (iname < iname_end) {
1116                 int chl;
1117                 wchar_t ec;
1118
1119                 if (NCP_IS_FLAG(server, NCP_FLAG_UTF8)) {
1120                         int k;
1121
1122                         k = utf8_mbtowc(&ec, iname, iname_end - iname);
1123                         if (k < 0)
1124                                 return -EINVAL;
1125                         iname += k;
1126                 } else {
1127                         if (*iname == NCP_ESC) {
1128                                 int k;
1129
1130                                 if (iname_end - iname < 5)
1131                                         goto nospec;
1132
1133                                 ec = 0;
1134                                 for (k = 1; k < 5; k++) {
1135                                         unsigned char nc;
1136
1137                                         nc = iname[k] - '0';
1138                                         if (nc >= 10) {
1139                                                 nc -= 'A' - '0' - 10;
1140                                                 if ((nc < 10) || (nc > 15)) {
1141                                                         goto nospec;
1142                                                 }
1143                                         }
1144                                         ec = (ec << 4) | nc;
1145                                 }
1146                                 iname += 5;
1147                         } else {
1148 nospec:;
1149                                 if ( (chl = in->char2uni(iname, iname_end - iname, &ec)) < 0)
1150                                         return chl;
1151                                 iname += chl;
1152                         }
1153                 }
1154
1155                 /* unitoupper should be here! */
1156
1157                 chl = out->uni2char(ec, vname, vname_end - vname);
1158                 if (chl < 0)
1159                         return chl;
1160
1161                 /* this is wrong... */
1162                 if (cc) {
1163                         int chi;
1164
1165                         for (chi = 0; chi < chl; chi++){
1166                                 vname[chi] = ncp_toupper(out, vname[chi]);
1167                         }
1168                 }
1169                 vname += chl;
1170         }
1171
1172         *vname = 0;
1173         *vlen = vname - vname_start;
1174         return 0;
1175 }
1176
1177 int
1178 ncp__vol2io(struct ncp_server *server, unsigned char *iname, unsigned int *ilen,
1179                 const unsigned char *vname, unsigned int vlen, int cc)
1180 {
1181         struct nls_table *in = server->nls_vol;
1182         struct nls_table *out = server->nls_io;
1183         const unsigned char *vname_end;
1184         unsigned char *iname_start;
1185         unsigned char *iname_end;
1186         unsigned char *vname_cc;
1187         int err;
1188
1189         vname_cc = NULL;
1190
1191         if (cc) {
1192                 int i;
1193
1194                 /* this is wrong! */
1195                 vname_cc = kmalloc(vlen, GFP_KERNEL);
1196                 if (!vname_cc)
1197                         return -ENOMEM;
1198                 for (i = 0; i < vlen; i++)
1199                         vname_cc[i] = ncp_tolower(in, vname[i]);
1200                 vname = vname_cc;
1201         }
1202
1203         iname_start = iname;
1204         iname_end = iname + *ilen - 1;
1205         vname_end = vname + vlen;
1206
1207         while (vname < vname_end) {
1208                 wchar_t ec;
1209                 int chl;
1210
1211                 if ( (chl = in->char2uni(vname, vname_end - vname, &ec)) < 0) {
1212                         err = chl;
1213                         goto quit;
1214                 }
1215                 vname += chl;
1216
1217                 /* unitolower should be here! */
1218
1219                 if (NCP_IS_FLAG(server, NCP_FLAG_UTF8)) {
1220                         int k;
1221
1222                         k = utf8_wctomb(iname, ec, iname_end - iname);
1223                         if (k < 0) {
1224                                 err = -ENAMETOOLONG;
1225                                 goto quit;
1226                         }
1227                         iname += k;
1228                 } else {
1229                         if ( (chl = out->uni2char(ec, iname, iname_end - iname)) >= 0) {
1230                                 iname += chl;
1231                         } else {
1232                                 int k;
1233
1234                                 if (iname_end - iname < 5) {
1235                                         err = -ENAMETOOLONG;
1236                                         goto quit;
1237                                 }
1238                                 *iname = NCP_ESC;
1239                                 for (k = 4; k > 0; k--) {
1240                                         unsigned char v;
1241
1242                                         v = (ec & 0xF) + '0';
1243                                         if (v > '9') {
1244                                                 v += 'A' - '9' - 1;
1245                                         }
1246                                         iname[k] = v;
1247                                         ec >>= 4;
1248                                 }
1249                                 iname += 5;
1250                         }
1251                 }
1252         }
1253
1254         *iname = 0;
1255         *ilen = iname - iname_start;
1256         err = 0;
1257 quit:;
1258         if (cc)
1259                 kfree(vname_cc);
1260         return err;
1261 }
1262
1263 #else
1264
1265 int
1266 ncp__io2vol(unsigned char *vname, unsigned int *vlen,
1267                 const unsigned char *iname, unsigned int ilen, int cc)
1268 {
1269         int i;
1270
1271         if (*vlen <= ilen)
1272                 return -ENAMETOOLONG;
1273
1274         if (cc)
1275                 for (i = 0; i < ilen; i++) {
1276                         *vname = toupper(*iname);
1277                         vname++;
1278                         iname++;
1279                 }
1280         else {
1281                 memmove(vname, iname, ilen);
1282                 vname += ilen;
1283         }
1284
1285         *vlen = ilen;
1286         *vname = 0;
1287         return 0;
1288 }
1289
1290 int
1291 ncp__vol2io(unsigned char *iname, unsigned int *ilen,
1292                 const unsigned char *vname, unsigned int vlen, int cc)
1293 {
1294         int i;
1295
1296         if (*ilen <= vlen)
1297                 return -ENAMETOOLONG;
1298
1299         if (cc)
1300                 for (i = 0; i < vlen; i++) {
1301                         *iname = tolower(*vname);
1302                         iname++;
1303                         vname++;
1304                 }
1305         else {
1306                 memmove(iname, vname, vlen);
1307                 iname += vlen;
1308         }
1309
1310         *ilen = vlen;
1311         *iname = 0;
1312         return 0;
1313 }
1314
1315 #endif