source/smbwrapper/smbw.c

   1 /*
   2    Unix SMB/Netbios implementation.
   3    Version 2.0
   4    SMB wrapper functions
   5    Copyright (C) Andrew Tridgell 1998
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 2 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, write to the Free Software
  19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20 */
  21
  22 #include "includes.h"
  23 #include "wrapper.h"
  24
  25 pstring smb_cwd;
  26
  27 static struct smbw_file *smbw_files;
  28 static struct smbw_server *smbw_srvs;
  29
  30 struct bitmap *smbw_file_bmap;
  31 extern pstring global_myname;
  32 extern int DEBUGLEVEL;
  33
  34 int smbw_busy=0;
  35
  36 /*****************************************************
  37 initialise structures
  38 *******************************************************/
  39 void smbw_init(void)
  40 {
  41         extern BOOL in_client;
  42         static int initialised;
  43         static pstring servicesf = CONFIGFILE;
  44         extern FILE *dbf;
  45         char *p;
  46
  47         if (initialised) return;
  48         initialised = 1;
  49
  50         smbw_busy++;
  51
  52         DEBUGLEVEL = 0;
  53         setup_logging("smbw",True);
  54
  55         dbf = stderr;
  56
  57         if ((p=getenv("SMBW_LOGFILE"))) {
  58                 dbf = fopen(p, "a");
  59         }
  60
  61         smbw_file_bmap = bitmap_allocate(SMBW_MAX_OPEN);
  62         if (!smbw_file_bmap) {
  63                 exit(1);
  64         }
  65
  66         charset_initialise();
  67
  68         in_client = True;
  69
  70         load_interfaces();
  71
  72         if (!lp_load(servicesf,True,False,False)) {
  73                 exit(1);
  74         }
  75
  76         get_myname(global_myname,NULL);
  77
  78         if ((p=getenv("SMBW_DEBUG"))) {
  79                 DEBUGLEVEL = atoi(p);
  80         }
  81
  82         if ((p=getenv(SMBW_PWD_ENV))) {
  83                 pstrcpy(smb_cwd, p);
  84                 DEBUG(4,("Initial cwd from smb_cwd is %s\n", smb_cwd));
  85         } else {
  86                 sys_getwd(smb_cwd);
  87                 DEBUG(4,("Initial cwd from getwd is %s\n", smb_cwd));
  88         }
  89         smbw_busy--;
  90
  91         set_maxfiles();
  92 }
  93
  94 /*****************************************************
  95 determine if a file descriptor is a smb one
  96 *******************************************************/
  97 int smbw_fd(int fd)
  98 {
  99         if (smbw_busy) return 0;
 100         return smbw_file_bmap && bitmap_query(smbw_file_bmap, fd);
 101 }
 102
 103 /*****************************************************
 104 a crude inode number generator
 105 *******************************************************/
 106 ino_t smbw_inode(const char *name)
 107 {
 108         return (ino_t)str_checksum(name);
 109 }
 110
 111 /*****************************************************
 112 remove redundent stuff from a filename
 113 *******************************************************/
 114 void clean_fname(char *name)
 115 {
 116         char *p, *p2;
 117         int l;
 118         int modified = 1;
 119
 120         if (!name) return;
 121
 122         while (modified) {
 123                 modified = 0;
 124
 125                 DEBUG(5,("cleaning %s\n", name));
 126
 127                 if ((p=strstr(name,"/./"))) {
 128                         modified = 1;
 129                         while (*p) {
 130                                 p[0] = p[2];
 131                                 p++;
 132                         }
 133                 }
 134
 135                 if ((p=strstr(name,"//"))) {
 136                         modified = 1;
 137                         while (*p) {
 138                                 p[0] = p[1];
 139                                 p++;
 140                         }
 141                 }
 142
 143                 if (strcmp(name,"/../")==0) {
 144                         modified = 1;
 145                         name[1] = 0;
 146                 }
 147
 148                 if ((p=strstr(name,"/../"))) {
 149                         modified = 1;
 150                         for (p2=(p>name?p-1:p);p2>name;p2--) {
 151                                 if (p2[0] == '/') break;
 152                         }
 153                         while (*p2) {
 154                                 p2[0] = p2[3];
 155                                 p2++;
 156                         }
 157                 }
 158
 159                 if (strcmp(name,"/..")==0) {
 160                         modified = 1;
 161                         name[1] = 0;
 162                 }
 163
 164                 l = strlen(name);
 165                 p = l>=3?(name+l-3):name;
 166                 if (strcmp(p,"/..")==0) {
 167                         modified = 1;
 168                         for (p2=p-1;p2>name;p2--) {
 169                                 if (p2[0] == '/') break;
 170                         }
 171                         if (p2==name) {
 172                                 p[0] = '/';
 173                                 p[1] = 0;
 174                         } else {
 175                                 p2[0] = 0;
 176                         }
 177                 }
 178
 179                 l = strlen(name);
 180                 p = l>=2?(name+l-2):name;
 181                 if (strcmp(p,"/.")==0) {
 182                         if (p == name) {
 183                                 p[1] = 0;
 184                         } else {
 185                                 p[0] = 0;
 186                         }
 187                 }
 188
 189                 if (strncmp(p=name,"./",2) == 0) {
 190                         modified = 1;
 191                         do {
 192                                 p[0] = p[2];
 193                         } while (*p++);
 194                 }
 195
 196                 l = strlen(p=name);
 197                 if (l > 1 && p[l-1] == '/') {
 198                         modified = 1;
 199                         p[l-1] = 0;
 200                 }
 201         }
 202 }
 203
 204
 205 /*****************************************************
 206 parse a smb path into its components.
 207 *******************************************************/
 208 char *smbw_parse_path(const char *fname, char *server, char *share, char *path)
 209 {
 210         static pstring s;
 211         char *p, *p2;
 212         int len = strlen(SMBW_PREFIX)-1;
 213
 214         *server = *share = *path = 0;
 215
 216         if (fname[0] == '/') {
 217                 pstrcpy(s, fname);
 218         } else {
 219                 slprintf(s,sizeof(s)-1, "%s/%s", smb_cwd, fname);
 220         }
 221         clean_fname(s);
 222
 223         DEBUG(5,("cleaned %s (fname=%s cwd=%s)\n",
 224                  s, fname, smb_cwd));
 225
 226         if (strncmp(s,SMBW_PREFIX,len) ||
 227             (s[len] != '/' && s[len] != 0)) return s;
 228
 229         p = s + len;
 230         if (*p == '/') p++;
 231
 232         p2 = strchr(p,'/');
 233
 234         if (p2) {
 235                 len = (int)(p2-p);
 236         } else {
 237                 len = strlen(p);
 238         }
 239
 240         len = MIN(len,sizeof(fstring)-1);
 241
 242         strncpy(server, p, len);
 243         server[len] = 0;
 244
 245         p = p2;
 246         if (!p) {
 247                 if (len == 0) {
 248                         char *workgroup = getenv("SMBW_WORKGROUP");
 249                         if (!workgroup) workgroup = lp_workgroup();
 250                         slprintf(server,sizeof(fstring)-1, "%s#1D", workgroup);
 251                 }
 252                 fstrcpy(share,"IPC$");
 253                 pstrcpy(path,"");
 254                 goto ok;
 255         }
 256
 257         p++;
 258         p2 = strchr(p,'/');
 259
 260         if (p2) {
 261                 len = (int)(p2-p);
 262         } else {
 263                 len = strlen(p);
 264         }
 265
 266         len = MIN(len,sizeof(fstring)-1);
 267
 268         strncpy(share, p, len);
 269         share[len] = 0;
 270
 271         p = p2;
 272         if (!p) {
 273                 pstrcpy(path,"\\");
 274                 goto ok;
 275         }
 276
 277         pstrcpy(path,p);
 278
 279         string_sub(path, "/", "\\");
 280
 281  ok:
 282         DEBUG(5,("parsed path name=%s cwd=%s [%s] [%s] [%s]\n",
 283                  fname, smb_cwd,
 284                  server, share, path));
 285
 286         return s;
 287 }
 288
 289 /*****************************************************
 290 determine if a path name (possibly relative) is in the
 291 smb name space
 292 *******************************************************/
 293 int smbw_path(const char *path)
 294 {
 295         fstring server, share;
 296         pstring s;
 297         char *cwd;
 298         int l=strlen(SMBW_PREFIX)-1;
 299
 300         if (path[0] == '/' && strncmp(path,SMBW_PREFIX,l)) {
 301                 return 0;
 302         }
 303
 304         if (smbw_busy) return 0;
 305
 306         smbw_init();
 307
 308         DEBUG(3,("smbw_path(%s)\n", path));
 309
 310         cwd = smbw_parse_path(path, server, share, s);
 311
 312         if (strncmp(cwd,SMBW_PREFIX,l) == 0 &&
 313             (cwd[l] == '/' || cwd[l] == 0)) {
 314                 return 1;
 315         }
 316
 317         return 0;
 318 }
 319
 320 /*****************************************************
 321 return a unix errno from a SMB error pair
 322 *******************************************************/
 323 int smbw_errno(struct cli_state *c)
 324 {
 325         uint8 eclass;
 326         uint32 ecode;
 327         int ret;
 328
 329         ret = cli_error(c, &eclass, &ecode);
 330
 331         if (ret) {
 332                 DEBUG(3,("smbw_error %d %d (0x%x) -> %d\n",
 333                          (int)eclass, (int)ecode, (int)ecode, ret));
 334         }
 335         return ret;
 336 }
 337
 338 /*****************************************************
 339 return a connection to a server (existing or new)
 340 *******************************************************/
 341 struct smbw_server *smbw_server(char *server, char *share)
 342 {
 343         struct smbw_server *srv=NULL;
 344         struct cli_state c;
 345         char *username;
 346         char *password;
 347         char *workgroup;
 348         struct nmb_name called, calling;
 349         char *p, *server_n = server;
 350         fstring group;
 351
 352         ZERO_STRUCT(c);
 353
 354         username = getenv("SMBW_USER");
 355         if (!username) username = getenv("USER");
 356         if (!username) username = "guest";
 357
 358         workgroup = getenv("SMBW_WORKGROUP");
 359         if (!workgroup) workgroup = lp_workgroup();
 360
 361         password = getenv("SMBW_PASSWORD");
 362         if (!password) password = "";
 363
 364         /* try to use an existing connection */
 365         for (srv=smbw_srvs;srv;srv=srv->next) {
 366                 if (strcmp(server,srv->server_name)==0 &&
 367                     strcmp(share,srv->share_name)==0) return srv;
 368         }
 369
 370         if (server[0] == 0) {
 371                 errno = EPERM;
 372                 return NULL;
 373         }
 374
 375         make_nmb_name(&calling, global_myname, 0x0, "");
 376         make_nmb_name(&called , server, 0x20, "");
 377
 378         DEBUG(5,("server_n=[%s] server=[%s]\n", server_n, server));
 379
 380         if ((p=strchr(server_n,'#')) && strcmp(p+1,"1D")==0) {
 381                 struct in_addr ip;
 382                 fstrcpy(group, server_n);
 383                 p = strchr(group,'#');
 384                 *p = 0;
 385                 if (!find_master(group, &ip)) {
 386                         errno = ENOENT;
 387                         return NULL;
 388                 }
 389                 fstrcpy(group, inet_ntoa(ip));
 390                 server_n = group;
 391         }
 392
 393         DEBUG(5,(" -> server_n=[%s] server=[%s]\n", server_n, server));
 394
 395  again:
 396         /* have to open a new connection */
 397         if (!cli_initialise(&c) || !cli_connect(&c, server_n, NULL)) {
 398                 errno = ENOENT;
 399                 return NULL;
 400         }
 401
 402         if (!cli_session_request(&c, &calling, &called)) {
 403                 cli_shutdown(&c);
 404                 if (strcmp(called.name, "*SMBSERVER")) {
 405                         make_nmb_name(&called , "*SMBSERVER", 0x20, "");
 406                         goto again;
 407                 }
 408                 errno = ENOENT;
 409                 return NULL;
 410         }
 411
 412
 413         if (!cli_negprot(&c)) {
 414                 cli_shutdown(&c);
 415                 errno = ENOENT;
 416                 return NULL;
 417         }
 418
 419         if (!cli_session_setup(&c, username,
 420                                password, strlen(password),
 421                                password, strlen(password),
 422                                workgroup)) {
 423                 cli_shutdown(&c);
 424                 errno = EPERM;
 425                 return NULL;
 426         }
 427
 428         if (!cli_send_tconX(&c, share, "?????",
 429                             password, strlen(password)+1)) {
 430                 errno = smbw_errno(&c);
 431                 cli_shutdown(&c);
 432                 return NULL;
 433         }
 434
 435         srv = (struct smbw_server *)malloc(sizeof(*srv));
 436         if (!srv) {
 437                 errno = ENOMEM;
 438                 goto failed;
 439         }
 440
 441         ZERO_STRUCTP(srv);
 442
 443         srv->cli = c;
 444
 445         srv->dev = (dev_t)(str_checksum(server) ^ str_checksum(share));
 446
 447         srv->server_name = strdup(server);
 448         if (!srv->server_name) {
 449                 errno = ENOMEM;
 450                 goto failed;
 451         }
 452
 453         srv->share_name = strdup(share);
 454         if (!srv->share_name) {
 455                 errno = ENOMEM;
 456                 goto failed;
 457         }
 458
 459         /* some programs play with file descriptors fairly intimately. We
 460            try to get out of the way by duping to a high fd number */
 461         if (fcntl(SMBW_CLI_FD + srv->cli.fd, F_GETFD) && errno == EBADF) {
 462                 if (dup2(srv->cli.fd,SMBW_CLI_FD+srv->cli.fd) ==
 463                     srv->cli.fd+SMBW_CLI_FD) {
 464                         close(srv->cli.fd);
 465                         srv->cli.fd += SMBW_CLI_FD;
 466                 }
 467         }
 468
 469         DLIST_ADD(smbw_srvs, srv);
 470
 471         return srv;
 472
 473  failed:
 474         cli_shutdown(&c);
 475         if (!srv) return NULL;
 476
 477         if (srv->server_name) free(srv->server_name);
 478         if (srv->share_name) free(srv->share_name);
 479         free(srv);
 480         return NULL;
 481 }
 482
 483
 484 /*****************************************************
 485 map a fd to a smbw_file structure
 486 *******************************************************/
 487 struct smbw_file *smbw_file(int fd)
 488 {
 489         struct smbw_file *file;
 490
 491         for (file=smbw_files;file;file=file->next) {
 492                 if (file->fd == fd) return file;
 493         }
 494         return NULL;
 495 }
 496
 497 /*****************************************************
 498 a wrapper for open()
 499 *******************************************************/
 500 int smbw_open(const char *fname, int flags, mode_t mode)
 501 {
 502         fstring server, share;
 503         pstring path;
 504         struct smbw_server *srv=NULL;
 505         int eno, fd = -1;
 506         struct smbw_file *file=NULL;
 507
 508         DEBUG(4,("%s\n", __FUNCTION__));
 509
 510         smbw_init();
 511
 512         if (!fname) {
 513                 errno = EINVAL;
 514                 return -1;
 515         }
 516
 517         smbw_busy++;
 518
 519         /* work out what server they are after */
 520         smbw_parse_path(fname, server, share, path);
 521
 522         /* get a connection to the server */
 523         srv = smbw_server(server, share);
 524         if (!srv) {
 525                 /* smbw_server sets errno */
 526                 goto failed;
 527         }
 528
 529         if (path[strlen(path)-1] == '\\') {
 530                 fd = -1;
 531         } else {
 532                 fd = cli_open(&srv->cli, path, flags, DENY_NONE);
 533         }
 534         if (fd == -1) {
 535                 /* it might be a directory. Maybe we should use chkpath? */
 536                 fd = smbw_dir_open(fname);
 537                 smbw_busy--;
 538                 return fd;
 539         }
 540         if (fd == -1) {
 541                 errno = eno;
 542                 goto failed;
 543         }
 544
 545         file = (struct smbw_file *)malloc(sizeof(*file));
 546         if (!file) {
 547                 errno = ENOMEM;
 548                 goto failed;
 549         }
 550
 551         ZERO_STRUCTP(file);
 552
 553         file->f = (struct smbw_filedes *)malloc(sizeof(*(file->f)));
 554         if (!file->f) {
 555                 errno = ENOMEM;
 556                 goto failed;
 557         }
 558
 559         ZERO_STRUCTP(file->f);
 560
 561         file->f->cli_fd = fd;
 562         file->f->fname = strdup(path);
 563         if (!file->f->fname) {
 564                 errno = ENOMEM;
 565                 goto failed;
 566         }
 567         file->srv = srv;
 568         file->fd = open(SMBW_DUMMY, O_WRONLY);
 569         if (file->fd == -1) {
 570                 errno = EMFILE;
 571                 goto failed;
 572         }
 573
 574         if (bitmap_query(smbw_file_bmap, file->fd)) {
 575                 DEBUG(0,("ERROR: fd used in smbw_open\n"));
 576                 errno = EIO;
 577                 goto failed;
 578         }
 579
 580         file->f->ref_count=1;
 581
 582         bitmap_set(smbw_file_bmap, file->fd);
 583
 584         DLIST_ADD(smbw_files, file);
 585
 586         DEBUG(4,("opened %s\n", fname));
 587
 588         smbw_busy--;
 589         return file->fd;
 590
 591  failed:
 592         if (fd != -1) {
 593                 cli_close(&srv->cli, fd);
 594         }
 595         if (file) {
 596                 if (file->f) {
 597                         if (file->f->fname) {
 598                                 free(file->f->fname);
 599                         }
 600                         free(file->f);
 601                 }
 602                 free(file);
 603         }
 604         smbw_busy--;
 605         return -1;
 606 }
 607
 608
 609 /*****************************************************
 610 a wrapper for read()
 611 *******************************************************/
 612 ssize_t smbw_read(int fd, void *buf, size_t count)
 613 {
 614         struct smbw_file *file;
 615         int ret;
 616
 617         DEBUG(4,("%s %d\n",
 618                  __FUNCTION__, (int)count));
 619
 620         smbw_busy++;
 621
 622         file = smbw_file(fd);
 623         if (!file) {
 624                 errno = EBADF;
 625                 smbw_busy--;
 626                 return -1;
 627         }
 628
 629         ret = cli_read(&file->srv->cli, file->f->cli_fd, buf, file->f->offset, count);
 630
 631         if (ret == -1) {
 632                 errno = smbw_errno(&file->srv->cli);
 633                 smbw_busy--;
 634                 return -1;
 635         }
 636
 637         file->f->offset += ret;
 638
 639         smbw_busy--;
 640         return ret;
 641 }
 642
 643 /*****************************************************
 644 a wrapper for write()
 645 *******************************************************/
 646 ssize_t smbw_write(int fd, void *buf, size_t count)
 647 {
 648         struct smbw_file *file;
 649         int ret;
 650
 651         DEBUG(4,("%s\n", __FUNCTION__));
 652
 653         smbw_busy++;
 654
 655         file = smbw_file(fd);
 656         if (!file) {
 657                 DEBUG(3,("bad fd in read\n"));
 658                 errno = EBADF;
 659                 smbw_busy--;
 660                 return -1;
 661         }
 662
 663         ret = cli_write(&file->srv->cli, file->f->cli_fd, buf, file->f->offset, count);
 664
 665         if (ret == -1) {
 666                 errno = smbw_errno(&file->srv->cli);
 667                 smbw_busy--;
 668                 return -1;
 669         }
 670
 671         file->f->offset += ret;
 672
 673         smbw_busy--;
 674         return ret;
 675 }
 676
 677 /*****************************************************
 678 a wrapper for close()
 679 *******************************************************/
 680 int smbw_close(int fd)
 681 {
 682         struct smbw_file *file;
 683
 684         DEBUG(4,("%s\n", __FUNCTION__));
 685
 686         smbw_busy++;
 687
 688         file = smbw_file(fd);
 689         if (!file) {
 690                 int ret = smbw_dir_close(fd);
 691                 smbw_busy--;
 692                 return ret;
 693         }
 694
 695         if (file->f->ref_count == 1 &&
 696             !cli_close(&file->srv->cli, file->f->cli_fd)) {
 697                 errno = smbw_errno(&file->srv->cli);
 698                 smbw_busy--;
 699                 return -1;
 700         }
 701
 702
 703         bitmap_clear(smbw_file_bmap, file->fd);
 704         close(file->fd);
 705
 706         DLIST_REMOVE(smbw_files, file);
 707
 708         file->f->ref_count--;
 709         if (file->f->ref_count == 0) {
 710                 free(file->f->fname);
 711                 free(file->f);
 712         }
 713         ZERO_STRUCTP(file);
 714         free(file);
 715
 716         smbw_busy--;
 717
 718         return 0;
 719 }
 720
 721
 722 /*****************************************************
 723 a wrapper for fcntl()
 724 *******************************************************/
 725 int smbw_fcntl(int fd, int cmd, long arg)
 726 {
 727         DEBUG(4,("%s\n", __FUNCTION__));
 728         return 0;
 729 }
 730
 731
 732 /*****************************************************
 733 a wrapper for access()
 734 *******************************************************/
 735 int smbw_access(const char *name, int mode)
 736 {
 737         struct stat st;
 738         /* how do we map this properly ?? */
 739         return smbw_stat(name, &st);
 740 }
 741
 742 /*****************************************************
 743 a wrapper for realink() - needed for correct errno setting
 744 *******************************************************/
 745 int smbw_readlink(const char *path, char *buf, size_t bufsize)
 746 {
 747         struct stat st;
 748         int ret;
 749
 750         ret = smbw_stat(path, &st);
 751         if (ret != 0) {
 752                 DEBUG(4,("readlink(%s) failed\n", path));
 753                 return -1;
 754         }
 755
 756         /* it exists - say it isn't a link */
 757         DEBUG(4,("readlink(%s) not a link\n", path));
 758
 759         errno = EINVAL;
 760         return -1;
 761 }
 762
 763
 764 /*****************************************************
 765 a wrapper for unlink()
 766 *******************************************************/
 767 int smbw_unlink(const char *fname)
 768 {
 769         struct smbw_server *srv;
 770         fstring server, share;
 771         pstring path;
 772
 773         DEBUG(4,("%s (%s)\n", __FUNCTION__, fname));
 774
 775         if (!fname) {
 776                 errno = EINVAL;
 777                 return -1;
 778         }
 779
 780         smbw_init();
 781
 782         smbw_busy++;
 783
 784         /* work out what server they are after */
 785         smbw_parse_path(fname, server, share, path);
 786
 787         /* get a connection to the server */
 788         srv = smbw_server(server, share);
 789         if (!srv) {
 790                 /* smbw_server sets errno */
 791                 goto failed;
 792         }
 793
 794         if (strncmp(srv->cli.dev, "LPT", 3) == 0) {
 795                 int job = smbw_stat_printjob(srv, path, NULL, NULL);
 796                 if (job == -1) {
 797                         goto failed;
 798                 }
 799                 if (cli_printjob_del(&srv->cli, job) != 0) {
 800                         goto failed;
 801                 }
 802         } else if (!cli_unlink(&srv->cli, path)) {
 803                 errno = smbw_errno(&srv->cli);
 804                 goto failed;
 805         }
 806
 807         smbw_busy--;
 808         return 0;
 809
 810  failed:
 811         smbw_busy--;
 812         return -1;
 813 }
 814
 815
 816 /*****************************************************
 817 a wrapper for rename()
 818 *******************************************************/
 819 int smbw_rename(const char *oldname, const char *newname)
 820 {
 821         struct smbw_server *srv;
 822         fstring server1, share1;
 823         pstring path1;
 824         fstring server2, share2;
 825         pstring path2;
 826
 827         DEBUG(4,("%s (%s, %s)\n", __FUNCTION__, oldname, newname));
 828
 829         if (!oldname || !newname) {
 830                 errno = EINVAL;
 831                 return -1;
 832         }
 833
 834         smbw_init();
 835
 836         smbw_busy++;
 837
 838         /* work out what server they are after */
 839         smbw_parse_path(oldname, server1, share1, path1);
 840         smbw_parse_path(newname, server2, share2, path2);
 841
 842         if (strcmp(server1, server2) || strcmp(share1, share2)) {
 843                 /* can't cross filesystems */
 844                 errno = EXDEV;
 845                 return -1;
 846         }
 847
 848         /* get a connection to the server */
 849         srv = smbw_server(server1, share1);
 850         if (!srv) {
 851                 /* smbw_server sets errno */
 852                 goto failed;
 853         }
 854
 855         if (!cli_rename(&srv->cli, path1, path2)) {
 856                 errno = smbw_errno(&srv->cli);
 857                 goto failed;
 858         }
 859
 860         smbw_busy--;
 861         return 0;
 862
 863  failed:
 864         smbw_busy--;
 865         return -1;
 866 }
 867
 868
 869 /*****************************************************
 870 a wrapper for utime()
 871 *******************************************************/
 872 int smbw_utime(const char *fname, void *buf)
 873 {
 874         struct utimbuf *tbuf = (struct utimbuf *)buf;
 875         struct smbw_server *srv;
 876         fstring server, share;
 877         pstring path;
 878         uint32 mode;
 879
 880         DEBUG(4,("%s (%s)\n", __FUNCTION__, fname));
 881
 882         if (!fname) {
 883                 errno = EINVAL;
 884                 return -1;
 885         }
 886
 887         smbw_init();
 888
 889         smbw_busy++;
 890
 891         /* work out what server they are after */
 892         smbw_parse_path(fname, server, share, path);
 893
 894         /* get a connection to the server */
 895         srv = smbw_server(server, share);
 896         if (!srv) {
 897                 /* smbw_server sets errno */
 898                 goto failed;
 899         }
 900
 901         if (!cli_getatr(&srv->cli, path, &mode, NULL, NULL)) {
 902                 errno = smbw_errno(&srv->cli);
 903                 goto failed;
 904         }
 905
 906         if (!cli_setatr(&srv->cli, path, mode, tbuf->modtime)) {
 907                 errno = smbw_errno(&srv->cli);
 908                 goto failed;
 909         }
 910
 911         smbw_busy--;
 912         return 0;
 913
 914  failed:
 915         smbw_busy--;
 916         return -1;
 917 }
 918
 919 /*****************************************************
 920 a wrapper for chown()
 921 *******************************************************/
 922 int smbw_chown(const char *fname, uid_t owner, gid_t group)
 923 {
 924         struct smbw_server *srv;
 925         fstring server, share;
 926         pstring path;
 927         uint32 mode;
 928
 929         DEBUG(4,("%s (%s)\n", __FUNCTION__, fname));
 930
 931         if (!fname) {
 932                 errno = EINVAL;
 933                 return -1;
 934         }
 935
 936         smbw_init();
 937
 938         smbw_busy++;
 939
 940         /* work out what server they are after */
 941         smbw_parse_path(fname, server, share, path);
 942
 943         /* get a connection to the server */
 944         srv = smbw_server(server, share);
 945         if (!srv) {
 946                 /* smbw_server sets errno */
 947                 goto failed;
 948         }
 949
 950         if (!cli_getatr(&srv->cli, path, &mode, NULL, NULL)) {
 951                 errno = smbw_errno(&srv->cli);
 952                 goto failed;
 953         }
 954
 955         /* assume success */
 956
 957         smbw_busy--;
 958         return 0;
 959
 960  failed:
 961         smbw_busy--;
 962         return -1;
 963 }
 964
 965 /*****************************************************
 966 a wrapper for chmod()
 967 *******************************************************/
 968 int smbw_chmod(const char *fname, mode_t newmode)
 969 {
 970         struct smbw_server *srv;
 971         fstring server, share;
 972         pstring path;
 973         uint32 mode;
 974
 975         DEBUG(4,("%s (%s)\n", __FUNCTION__, fname));
 976
 977         if (!fname) {
 978                 errno = EINVAL;
 979                 return -1;
 980         }
 981
 982         smbw_init();
 983
 984         smbw_busy++;
 985
 986         /* work out what server they are after */
 987         smbw_parse_path(fname, server, share, path);
 988
 989         /* get a connection to the server */
 990         srv = smbw_server(server, share);
 991         if (!srv) {
 992                 /* smbw_server sets errno */
 993                 goto failed;
 994         }
 995
 996         if (!cli_getatr(&srv->cli, path, &mode, NULL, NULL)) {
 997                 errno = smbw_errno(&srv->cli);
 998                 goto failed;
 999         }
1000
1001         /* assume success for the moment - need to add attribute mapping */
1002
1003         smbw_busy--;
1004         return 0;
1005
1006  failed:
1007         smbw_busy--;
1008         return -1;
1009 }
1010
1011 /*****************************************************
1012 a wrapper for lseek()
1013 *******************************************************/
1014 off_t smbw_lseek(int fd, off_t offset, int whence)
1015 {
1016         struct smbw_file *file;
1017         uint32 size;
1018
1019         DEBUG(4,("%s\n", __FUNCTION__));
1020
1021         smbw_busy++;
1022
1023         file = smbw_file(fd);
1024         if (!file) {
1025                 off_t ret = smbw_dir_lseek(fd, offset, whence);
1026                 smbw_busy--;
1027                 return ret;
1028         }
1029
1030         switch (whence) {
1031         case SEEK_SET:
1032                 file->f->offset = offset;
1033                 break;
1034         case SEEK_CUR:
1035                 file->f->offset += offset;
1036                 break;
1037         case SEEK_END:
1038                 if (!cli_qfileinfo(&file->srv->cli, file->f->cli_fd,
1039                                    NULL, &size, NULL, NULL, NULL) &&
1040                     !cli_getattrE(&file->srv->cli, file->f->cli_fd,
1041                                   NULL, &size, NULL, NULL, NULL)) {
1042                         errno = EINVAL;
1043                         smbw_busy--;
1044                         return -1;
1045                 }
1046                 file->f->offset = size + offset;
1047                 break;
1048         }
1049
1050         smbw_busy--;
1051         return file->f->offset;
1052 }
1053
1054
1055 /*****************************************************
1056 a wrapper for dup()
1057 *******************************************************/
1058 int smbw_dup(int fd)
1059 {
1060         int fd2;
1061         struct smbw_file *file, *file2;
1062
1063         DEBUG(4,("%s\n", __FUNCTION__));
1064
1065         smbw_busy++;
1066
1067         file = smbw_file(fd);
1068         if (!file) {
1069                 errno = EBADF;
1070                 goto failed;
1071         }
1072
1073         fd2 = dup(file->fd);
1074         if (fd2 == -1) {
1075                 goto failed;
1076         }
1077
1078         if (bitmap_query(smbw_file_bmap, fd2)) {
1079                 DEBUG(0,("ERROR: fd already open in dup!\n"));
1080                 errno = EIO;
1081                 goto failed;
1082         }
1083
1084         file2 = (struct smbw_file *)malloc(sizeof(*file2));
1085         if (!file2) {
1086                 close(fd2);
1087                 errno = ENOMEM;
1088                 goto failed;
1089         }
1090
1091         ZERO_STRUCTP(file2);
1092
1093         *file2 = *file;
1094         file2->fd = fd2;
1095
1096         file->f->ref_count++;
1097
1098         bitmap_set(smbw_file_bmap, fd2);
1099
1100         DLIST_ADD(smbw_files, file2);
1101
1102         smbw_busy--;
1103         return fd2;
1104
1105  failed:
1106         smbw_busy--;
1107         return -1;
1108 }
1109
1110
1111 /*****************************************************
1112 a wrapper for dup2()
1113 *******************************************************/
1114 int smbw_dup2(int fd, int fd2)
1115 {
1116         struct smbw_file *file, *file2;
1117
1118         DEBUG(4,("%s\n", __FUNCTION__));
1119
1120         smbw_busy++;
1121
1122         file = smbw_file(fd);
1123         if (!file) {
1124                 errno = EBADF;
1125                 goto failed;
1126         }
1127
1128         if (bitmap_query(smbw_file_bmap, fd2)) {
1129                 DEBUG(0,("ERROR: fd already open in dup2!\n"));
1130                 errno = EIO;
1131                 goto failed;
1132         }
1133
1134         if (dup2(file->fd, fd2) != fd2) {
1135                 goto failed;
1136         }
1137
1138         file2 = (struct smbw_file *)malloc(sizeof(*file2));
1139         if (!file2) {
1140                 close(fd2);
1141                 errno = ENOMEM;
1142                 goto failed;
1143         }
1144
1145         ZERO_STRUCTP(file2);
1146
1147         *file2 = *file;
1148         file2->fd = fd2;
1149
1150         file->f->ref_count++;
1151
1152         bitmap_set(smbw_file_bmap, fd2);
1153
1154         DLIST_ADD(smbw_files, file2);
1155
1156         smbw_busy--;
1157         return fd2;
1158
1159  failed:
1160         smbw_busy--;
1161         return -1;
1162 }
1163