source/client/client.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    SMB client
   4    Copyright (C) Andrew Tridgell 1994-1998
   5    Copyright (C) Simo Sorce 2001-2002
   6    Copyright (C) Jelmer Vernooij 2003-2004
   7    Copyright (C) James J Myers   2003 <myersjj@samba.org>
   8
   9    This program is free software; you can redistribute it and/or modify
  10    it under the terms of the GNU General Public License as published by
  11    the Free Software Foundation; either version 2 of the License, or
  12    (at your option) any later version.
  13
  14    This program 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 the
  17    GNU General Public License for more details.
  18
  19    You should have received a copy of the GNU General Public License
  20    along with this program; if not, write to the Free Software
  21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22 */
  23
  24 #include "includes.h"
  25 #include "dynconfig.h"
  26 #include "clilist.h"
  27 #include "lib/cmdline/popt_common.h"
  28 #include "librpc/gen_ndr/ndr_srvsvc.h"
  29 #include "libcli/raw/libcliraw.h"
  30 #include "system/time.h"
  31 #include "system/dir.h"
  32 #include "system/filesys.h"
  33 #include "dlinklist.h"
  34
  35 #ifndef REGISTER
  36 #define REGISTER 0
  37 #endif
  38
  39 struct smbcli_state *cli;
  40 extern BOOL in_client;
  41 static int port = 0;
  42 pstring cur_dir = "\\";
  43 static pstring cd_path = "";
  44 static pstring service;
  45 static pstring desthost;
  46 static pstring username;
  47 static pstring domain;
  48 static pstring password;
  49 static char *cmdstr = NULL;
  50
  51 static int io_bufsize = 64512;
  52
  53 static int name_type = 0x20;
  54
  55 static int process_tok(fstring tok);
  56 static int cmd_help(const char **cmd_ptr);
  57
  58 /* 30 second timeout on most commands */
  59 #define CLIENT_TIMEOUT (30*1000)
  60 #define SHORT_TIMEOUT (5*1000)
  61
  62 /* value for unused fid field in trans2 secondary request */
  63 #define FID_UNUSED (0xFFFF)
  64
  65 time_t newer_than = 0;
  66 static int archive_level = 0;
  67
  68 static BOOL translation = False;
  69
  70 /* clitar bits insert */
  71 extern int blocksize;
  72 extern BOOL tar_inc;
  73 extern BOOL tar_reset;
  74 /* clitar bits end */
  75
  76
  77 static BOOL prompt = True;
  78
  79 static int printmode = 1;
  80
  81 static BOOL recurse = False;
  82 BOOL lowercase = False;
  83
  84 static const char *dest_ip;
  85
  86 #define SEPARATORS " \t\n\r"
  87
  88 static BOOL abort_mget = True;
  89
  90 static pstring fileselection = "";
  91
  92 /* timing globals */
  93 uint64_t get_total_size = 0;
  94 uint_t get_total_time_ms = 0;
  95 static uint64_t put_total_size = 0;
  96 static uint_t put_total_time_ms = 0;
  97
  98 /* totals globals */
  99 static double dir_total;
 100
 101 #define USENMB
 102
 103 /* some forward declarations */
 104 static struct smbcli_state *do_connect(const char *server, const char *share);
 105
 106
 107 /*******************************************************************
 108  Reduce a file name, removing .. elements.
 109 ********************************************************************/
 110 void dos_clean_name(char *s)
 111 {
 112         char *p=NULL;
 113
 114         DEBUG(3,("dos_clean_name [%s]\n",s));
 115
 116         /* remove any double slashes */
 117         all_string_sub(s, "\\\\", "\\", 0);
 118
 119         while ((p = strstr(s,"\\..\\")) != NULL) {
 120                 pstring s1;
 121
 122                 *p = 0;
 123                 pstrcpy(s1,p+3);
 124
 125                 if ((p=strrchr_m(s,'\\')) != NULL)
 126                         *p = 0;
 127                 else
 128                         *s = 0;
 129                 pstrcat(s,s1);
 130         }
 131
 132         trim_string(s,NULL,"\\..");
 133
 134         all_string_sub(s, "\\.\\", "\\", 0);
 135 }
 136
 137 /****************************************************************************
 138 write to a local file with CR/LF->LF translation if appropriate. return the
 139 number taken from the buffer. This may not equal the number written.
 140 ****************************************************************************/
 141 static int writefile(int f, char *b, int n)
 142 {
 143         int i;
 144
 145         if (!translation) {
 146                 return write(f,b,n);
 147         }
 148
 149         i = 0;
 150         while (i < n) {
 151                 if (*b == '\r' && (i<(n-1)) && *(b+1) == '\n') {
 152                         b++;i++;
 153                 }
 154                 if (write(f, b, 1) != 1) {
 155                         break;
 156                 }
 157                 b++;
 158                 i++;
 159         }
 160
 161         return(i);
 162 }
 163
 164 /****************************************************************************
 165   read from a file with LF->CR/LF translation if appropriate. return the
 166   number read. read approx n bytes.
 167 ****************************************************************************/
 168 static int readfile(char *b, int n, XFILE *f)
 169 {
 170         int i;
 171         int c;
 172
 173         if (!translation)
 174                 return x_fread(b,1,n,f);
 175
 176         i = 0;
 177         while (i < (n - 1)) {
 178                 if ((c = x_getc(f)) == EOF) {
 179                         break;
 180                 }
 181
 182                 if (c == '\n') { /* change all LFs to CR/LF */
 183                         b[i++] = '\r';
 184                 }
 185
 186                 b[i++] = c;
 187         }
 188
 189         return(i);
 190 }
 191
 192
 193 /****************************************************************************
 194 send a message
 195 ****************************************************************************/
 196 static void send_message(void)
 197 {
 198         int total_len = 0;
 199         int grp_id;
 200
 201         if (!smbcli_message_start(cli->tree, desthost, username, &grp_id)) {
 202                 d_printf("message start: %s\n", smbcli_errstr(cli->tree));
 203                 return;
 204         }
 205
 206
 207         d_printf("Connected. Type your message, ending it with a Control-D\n");
 208
 209         while (!feof(stdin) && total_len < 1600) {
 210                 int maxlen = MIN(1600 - total_len,127);
 211                 pstring msg;
 212                 int l=0;
 213                 int c;
 214
 215                 ZERO_ARRAY(msg);
 216
 217                 for (l=0;l<maxlen && (c=fgetc(stdin))!=EOF;l++) {
 218                         if (c == '\n')
 219                                 msg[l++] = '\r';
 220                         msg[l] = c;
 221                 }
 222
 223                 if (!smbcli_message_text(cli->tree, msg, l, grp_id)) {
 224                         d_printf("SMBsendtxt failed (%s)\n",smbcli_errstr(cli->tree));
 225                         return;
 226                 }
 227
 228                 total_len += l;
 229         }
 230
 231         if (total_len >= 1600)
 232                 d_printf("the message was truncated to 1600 bytes\n");
 233         else
 234                 d_printf("sent %d bytes\n",total_len);
 235
 236         if (!smbcli_message_end(cli->tree, grp_id)) {
 237                 d_printf("SMBsendend failed (%s)\n",smbcli_errstr(cli->tree));
 238                 return;
 239         }
 240 }
 241
 242
 243
 244 /****************************************************************************
 245 check the space on a device
 246 ****************************************************************************/
 247 static int do_dskattr(void)
 248 {
 249         int total, bsize, avail;
 250
 251         if (NT_STATUS_IS_ERR(smbcli_dskattr(cli->tree, &bsize, &total, &avail))) {
 252                 d_printf("Error in dskattr: %s\n",smbcli_errstr(cli->tree));
 253                 return 1;
 254         }
 255
 256         d_printf("\n\t\t%d blocks of size %d. %d blocks available\n",
 257                  total, bsize, avail);
 258
 259         return 0;
 260 }
 261
 262 /****************************************************************************
 263 show cd/pwd
 264 ****************************************************************************/
 265 static int cmd_pwd(const char **cmd_ptr)
 266 {
 267         d_printf("Current directory is %s",service);
 268         d_printf("%s\n",cur_dir);
 269         return 0;
 270 }
 271
 272 /*
 273   convert a string to dos format
 274 */
 275 static void dos_format(char *s)
 276 {
 277         string_replace(s, '/', '\\');
 278 }
 279
 280 /****************************************************************************
 281 change directory - inner section
 282 ****************************************************************************/
 283 static int do_cd(char *newdir)
 284 {
 285         char *p = newdir;
 286         pstring saved_dir;
 287         pstring dname;
 288
 289         dos_format(newdir);
 290
 291         /* Save the current directory in case the
 292            new directory is invalid */
 293         pstrcpy(saved_dir, cur_dir);
 294         if (*p == '\\')
 295                 pstrcpy(cur_dir,p);
 296         else
 297                 pstrcat(cur_dir,p);
 298         if (*(cur_dir+strlen(cur_dir)-1) != '\\') {
 299                 pstrcat(cur_dir, "\\");
 300         }
 301         dos_clean_name(cur_dir);
 302         pstrcpy(dname,cur_dir);
 303         pstrcat(cur_dir,"\\");
 304         dos_clean_name(cur_dir);
 305
 306         if (!strequal(cur_dir,"\\")) {
 307                 if (NT_STATUS_IS_ERR(smbcli_chkpath(cli->tree, dname))) {
 308                         d_printf("cd %s: %s\n", dname, smbcli_errstr(cli->tree));
 309                         pstrcpy(cur_dir,saved_dir);
 310                 }
 311         }
 312
 313         pstrcpy(cd_path,cur_dir);
 314
 315         return 0;
 316 }
 317
 318 /****************************************************************************
 319 change directory
 320 ****************************************************************************/
 321 static int cmd_cd(const char **cmd_ptr)
 322 {
 323         fstring buf;
 324         int rc = 0;
 325
 326         if (next_token(cmd_ptr,buf,NULL,sizeof(buf)))
 327                 rc = do_cd(buf);
 328         else
 329                 d_printf("Current directory is %s\n",cur_dir);
 330
 331         return rc;
 332 }
 333
 334
 335 BOOL mask_match(struct smbcli_state *c, const char *string, char *pattern,
 336                 BOOL is_case_sensitive)
 337 {
 338         fstring p2, s2;
 339
 340         if (strcmp(string,"..") == 0)
 341                 string = ".";
 342         if (strcmp(pattern,".") == 0)
 343                 return False;
 344
 345         if (is_case_sensitive)
 346                 return ms_fnmatch(pattern, string,
 347                                   c->transport->negotiate.protocol) == 0;
 348
 349         fstrcpy(p2, pattern);
 350         fstrcpy(s2, string);
 351         strlower(p2);
 352         strlower(s2);
 353         return ms_fnmatch(p2, s2, c->transport->negotiate.protocol) == 0;
 354 }
 355
 356
 357
 358 /*******************************************************************
 359   decide if a file should be operated on
 360   ********************************************************************/
 361 static BOOL do_this_one(struct clilist_file_info *finfo)
 362 {
 363         if (finfo->attrib & FILE_ATTRIBUTE_DIRECTORY) return(True);
 364
 365         if (*fileselection &&
 366             !mask_match(cli, finfo->name,fileselection,False)) {
 367                 DEBUG(3,("mask_match %s failed\n", finfo->name));
 368                 return False;
 369         }
 370
 371         if (newer_than && finfo->mtime < newer_than) {
 372                 DEBUG(3,("newer_than %s failed\n", finfo->name));
 373                 return(False);
 374         }
 375
 376         if ((archive_level==1 || archive_level==2) && !(finfo->attrib & FILE_ATTRIBUTE_ARCHIVE)) {
 377                 DEBUG(3,("archive %s failed\n", finfo->name));
 378                 return(False);
 379         }
 380
 381         return(True);
 382 }
 383
 384 /****************************************************************************
 385   display info about a file
 386   ****************************************************************************/
 387 static void display_finfo(struct clilist_file_info *finfo)
 388 {
 389         if (do_this_one(finfo)) {
 390                 time_t t = finfo->mtime; /* the time is assumed to be passed as GMT */
 391                 char *astr = attrib_string(NULL, finfo->attrib);
 392                 d_printf("  %-30s%7.7s %8.0f  %s",
 393                          finfo->name,
 394                          astr,
 395                          (double)finfo->size,
 396                          asctime(localtime(&t)));
 397                 dir_total += finfo->size;
 398                 talloc_free(astr);
 399         }
 400 }
 401
 402
 403 /****************************************************************************
 404    accumulate size of a file
 405   ****************************************************************************/
 406 static void do_du(struct clilist_file_info *finfo)
 407 {
 408         if (do_this_one(finfo)) {
 409                 dir_total += finfo->size;
 410         }
 411 }
 412
 413 static BOOL do_list_recurse;
 414 static BOOL do_list_dirs;
 415 static char *do_list_queue = 0;
 416 static long do_list_queue_size = 0;
 417 static long do_list_queue_start = 0;
 418 static long do_list_queue_end = 0;
 419 static void (*do_list_fn)(struct clilist_file_info *);
 420
 421 /****************************************************************************
 422 functions for do_list_queue
 423   ****************************************************************************/
 424
 425 /*
 426  * The do_list_queue is a NUL-separated list of strings stored in a
 427  * char*.  Since this is a FIFO, we keep track of the beginning and
 428  * ending locations of the data in the queue.  When we overflow, we
 429  * double the size of the char*.  When the start of the data passes
 430  * the midpoint, we move everything back.  This is logically more
 431  * complex than a linked list, but easier from a memory management
 432  * angle.  In any memory error condition, do_list_queue is reset.
 433  * Functions check to ensure that do_list_queue is non-NULL before
 434  * accessing it.
 435  */
 436 static void reset_do_list_queue(void)
 437 {
 438         SAFE_FREE(do_list_queue);
 439         do_list_queue_size = 0;
 440         do_list_queue_start = 0;
 441         do_list_queue_end = 0;
 442 }
 443
 444 static void init_do_list_queue(void)
 445 {
 446         reset_do_list_queue();
 447         do_list_queue_size = 1024;
 448         do_list_queue = malloc(do_list_queue_size);
 449         if (do_list_queue == 0) {
 450                 d_printf("malloc fail for size %d\n",
 451                          (int)do_list_queue_size);
 452                 reset_do_list_queue();
 453         } else {
 454                 memset(do_list_queue, 0, do_list_queue_size);
 455         }
 456 }
 457
 458 static void adjust_do_list_queue(void)
 459 {
 460         /*
 461          * If the starting point of the queue is more than half way through,
 462          * move everything toward the beginning.
 463          */
 464         if (do_list_queue && (do_list_queue_start == do_list_queue_end))
 465         {
 466                 DEBUG(4,("do_list_queue is empty\n"));
 467                 do_list_queue_start = do_list_queue_end = 0;
 468                 *do_list_queue = '\0';
 469         }
 470         else if (do_list_queue_start > (do_list_queue_size / 2))
 471         {
 472                 DEBUG(4,("sliding do_list_queue backward\n"));
 473                 memmove(do_list_queue,
 474                         do_list_queue + do_list_queue_start,
 475                         do_list_queue_end - do_list_queue_start);
 476                 do_list_queue_end -= do_list_queue_start;
 477                 do_list_queue_start = 0;
 478         }
 479
 480 }
 481
 482 static void add_to_do_list_queue(const char* entry)
 483 {
 484         char *dlq;
 485         long new_end = do_list_queue_end + ((long)strlen(entry)) + 1;
 486         while (new_end > do_list_queue_size)
 487         {
 488                 do_list_queue_size *= 2;
 489                 DEBUG(4,("enlarging do_list_queue to %d\n",
 490                          (int)do_list_queue_size));
 491                 dlq = realloc_p(do_list_queue, char, do_list_queue_size);
 492                 if (! dlq) {
 493                         d_printf("failure enlarging do_list_queue to %d bytes\n",
 494                                  (int)do_list_queue_size);
 495                         reset_do_list_queue();
 496                 }
 497                 else
 498                 {
 499                         do_list_queue = dlq;
 500                         memset(do_list_queue + do_list_queue_size / 2,
 501                                0, do_list_queue_size / 2);
 502                 }
 503         }
 504         if (do_list_queue)
 505         {
 506                 safe_strcpy(do_list_queue + do_list_queue_end, entry,
 507                             do_list_queue_size - do_list_queue_end - 1);
 508                 do_list_queue_end = new_end;
 509                 DEBUG(4,("added %s to do_list_queue (start=%d, end=%d)\n",
 510                          entry, (int)do_list_queue_start, (int)do_list_queue_end));
 511         }
 512 }
 513
 514 static char *do_list_queue_head(void)
 515 {
 516         return do_list_queue + do_list_queue_start;
 517 }
 518
 519 static void remove_do_list_queue_head(void)
 520 {
 521         if (do_list_queue_end > do_list_queue_start)
 522         {
 523                 do_list_queue_start += strlen(do_list_queue_head()) + 1;
 524                 adjust_do_list_queue();
 525                 DEBUG(4,("removed head of do_list_queue (start=%d, end=%d)\n",
 526                          (int)do_list_queue_start, (int)do_list_queue_end));
 527         }
 528 }
 529
 530 static int do_list_queue_empty(void)
 531 {
 532         return (! (do_list_queue && *do_list_queue));
 533 }
 534
 535 /****************************************************************************
 536 a helper for do_list
 537   ****************************************************************************/
 538 static void do_list_helper(struct clilist_file_info *f, const char *mask, void *state)
 539 {
 540         if (f->attrib & FILE_ATTRIBUTE_DIRECTORY) {
 541                 if (do_list_dirs && do_this_one(f)) {
 542                         do_list_fn(f);
 543                 }
 544                 if (do_list_recurse &&
 545                     !strequal(f->name,".") &&
 546                     !strequal(f->name,"..")) {
 547                         pstring mask2;
 548                         char *p;
 549
 550                         pstrcpy(mask2, mask);
 551                         p = strrchr_m(mask2,'\\');
 552                         if (!p) return;
 553                         p[1] = 0;
 554                         pstrcat(mask2, f->name);
 555                         pstrcat(mask2,"\\*");
 556                         add_to_do_list_queue(mask2);
 557                 }
 558                 return;
 559         }
 560
 561         if (do_this_one(f)) {
 562                 do_list_fn(f);
 563         }
 564 }
 565
 566
 567 /****************************************************************************
 568 a wrapper around smbcli_list that adds recursion
 569   ****************************************************************************/
 570 void do_list(const char *mask,uint16_t attribute,
 571              void (*fn)(struct clilist_file_info *),BOOL rec, BOOL dirs)
 572 {
 573         static int in_do_list = 0;
 574
 575         if (in_do_list && rec)
 576         {
 577                 fprintf(stderr, "INTERNAL ERROR: do_list called recursively when the recursive flag is true\n");
 578                 exit(1);
 579         }
 580
 581         in_do_list = 1;
 582
 583         do_list_recurse = rec;
 584         do_list_dirs = dirs;
 585         do_list_fn = fn;
 586
 587         if (rec)
 588         {
 589                 init_do_list_queue();
 590                 add_to_do_list_queue(mask);
 591
 592                 while (! do_list_queue_empty())
 593                 {
 594                         /*
 595                          * Need to copy head so that it doesn't become
 596                          * invalid inside the call to smbcli_list.  This
 597                          * would happen if the list were expanded
 598                          * during the call.
 599                          * Fix from E. Jay Berkenbilt (ejb@ql.org)
 600                          */
 601                         pstring head;
 602                         pstrcpy(head, do_list_queue_head());
 603                         smbcli_list(cli->tree, head, attribute, do_list_helper, NULL);
 604                         remove_do_list_queue_head();
 605                         if ((! do_list_queue_empty()) && (fn == display_finfo))
 606                         {
 607                                 char* next_file = do_list_queue_head();
 608                                 char* save_ch = 0;
 609                                 if ((strlen(next_file) >= 2) &&
 610                                     (next_file[strlen(next_file) - 1] == '*') &&
 611                                     (next_file[strlen(next_file) - 2] == '\\'))
 612                                 {
 613                                         save_ch = next_file +
 614                                                 strlen(next_file) - 2;
 615                                         *save_ch = '\0';
 616                                 }
 617                                 d_printf("\n%s\n",next_file);
 618                                 if (save_ch)
 619                                 {
 620                                         *save_ch = '\\';
 621                                 }
 622                         }
 623                 }
 624         }
 625         else
 626         {
 627                 if (smbcli_list(cli->tree, mask, attribute, do_list_helper, NULL) == -1)
 628                 {
 629                         d_printf("%s listing %s\n", smbcli_errstr(cli->tree), mask);
 630                 }
 631         }
 632
 633         in_do_list = 0;
 634         reset_do_list_queue();
 635 }
 636
 637 /****************************************************************************
 638   get a directory listing
 639   ****************************************************************************/
 640 static int cmd_dir(const char **cmd_ptr)
 641 {
 642         uint16_t attribute = FILE_ATTRIBUTE_DIRECTORY | FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN;
 643         pstring mask;
 644         fstring buf;
 645         char *p=buf;
 646         int rc;
 647
 648         dir_total = 0;
 649         pstrcpy(mask,cur_dir);
 650         if(mask[strlen(mask)-1]!='\\')
 651                 pstrcat(mask,"\\");
 652
 653         if (next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
 654                 dos_format(p);
 655                 if (*p == '\\')
 656                         pstrcpy(mask,p);
 657                 else
 658                         pstrcat(mask,p);
 659         }
 660         else {
 661                 if (cli->tree->session->transport->negotiate.protocol <=
 662                     PROTOCOL_LANMAN1) {
 663                         pstrcat(mask,"*.*");
 664                 } else {
 665                         pstrcat(mask,"*");
 666                 }
 667         }
 668
 669         do_list(mask, attribute, display_finfo, recurse, True);
 670
 671         rc = do_dskattr();
 672
 673         DEBUG(3, ("Total bytes listed: %.0f\n", dir_total));
 674
 675         return rc;
 676 }
 677
 678
 679 /****************************************************************************
 680   get a directory listing
 681   ****************************************************************************/
 682 static int cmd_du(const char **cmd_ptr)
 683 {
 684         uint16_t attribute = FILE_ATTRIBUTE_DIRECTORY | FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN;
 685         pstring mask;
 686         fstring buf;
 687         char *p=buf;
 688         int rc;
 689
 690         dir_total = 0;
 691         pstrcpy(mask,cur_dir);
 692         if(mask[strlen(mask)-1]!='\\')
 693                 pstrcat(mask,"\\");
 694
 695         if (next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
 696                 dos_format(p);
 697                 if (*p == '\\')
 698                         pstrcpy(mask,p);
 699                 else
 700                         pstrcat(mask,p);
 701         } else {
 702                 pstrcat(mask,"\\*");
 703         }
 704
 705         do_list(mask, attribute, do_du, recurse, True);
 706
 707         rc = do_dskattr();
 708
 709         d_printf("Total number of bytes: %.0f\n", dir_total);
 710
 711         return rc;
 712 }
 713
 714
 715 /****************************************************************************
 716   get a file from rname to lname
 717   ****************************************************************************/
 718 static int do_get(char *rname, const char *lname, BOOL reget)
 719 {
 720         int handle = 0, fnum;
 721         BOOL newhandle = False;
 722         char *data;
 723         struct timeval tp_start;
 724         int read_size = io_bufsize;
 725         uint16_t attr;
 726         size_t size;
 727         off_t start = 0;
 728         off_t nread = 0;
 729         int rc = 0;
 730
 731         GetTimeOfDay(&tp_start);
 732
 733         if (lowercase) {
 734                 strlower(discard_const_p(char, lname));
 735         }
 736
 737         fnum = smbcli_open(cli->tree, rname, O_RDONLY, DENY_NONE);
 738
 739         if (fnum == -1) {
 740                 d_printf("%s opening remote file %s\n",smbcli_errstr(cli->tree),rname);
 741                 return 1;
 742         }
 743
 744         if(!strcmp(lname,"-")) {
 745                 handle = fileno(stdout);
 746         } else {
 747                 if (reget) {
 748                         handle = open(lname, O_WRONLY|O_CREAT, 0644);
 749                         if (handle >= 0) {
 750                                 start = lseek(handle, 0, SEEK_END);
 751                                 if (start == -1) {
 752                                         d_printf("Error seeking local file\n");
 753                                         return 1;
 754                                 }
 755                         }
 756                 } else {
 757                         handle = open(lname, O_WRONLY|O_CREAT|O_TRUNC, 0644);
 758                 }
 759                 newhandle = True;
 760         }
 761         if (handle < 0) {
 762                 d_printf("Error opening local file %s\n",lname);
 763                 return 1;
 764         }
 765
 766
 767         if (NT_STATUS_IS_ERR(smbcli_qfileinfo(cli->tree, fnum,
 768                            &attr, &size, NULL, NULL, NULL, NULL, NULL)) &&
 769             NT_STATUS_IS_ERR(smbcli_getattrE(cli->tree, fnum,
 770                           &attr, &size, NULL, NULL, NULL))) {
 771                 d_printf("getattrib: %s\n",smbcli_errstr(cli->tree));
 772                 return 1;
 773         }
 774
 775         DEBUG(2,("getting file %s of size %.0f as %s ",
 776                  rname, (double)size, lname));
 777
 778         if(!(data = (char *)malloc(read_size))) {
 779                 d_printf("malloc fail for size %d\n", read_size);
 780                 smbcli_close(cli->tree, fnum);
 781                 return 1;
 782         }
 783
 784         while (1) {
 785                 int n = smbcli_read(cli->tree, fnum, data, nread + start, read_size);
 786
 787                 if (n <= 0) break;
 788
 789                 if (writefile(handle,data, n) != n) {
 790                         d_printf("Error writing local file\n");
 791                         rc = 1;
 792                         break;
 793                 }
 794
 795                 nread += n;
 796         }
 797
 798         if (nread + start < size) {
 799                 DEBUG (0, ("Short read when getting file %s. Only got %ld bytes.\n",
 800                             rname, (long)nread));
 801
 802                 rc = 1;
 803         }
 804
 805         SAFE_FREE(data);
 806
 807         if (NT_STATUS_IS_ERR(smbcli_close(cli->tree, fnum))) {
 808                 d_printf("Error %s closing remote file\n",smbcli_errstr(cli->tree));
 809                 rc = 1;
 810         }
 811
 812         if (newhandle) {
 813                 close(handle);
 814         }
 815
 816         if (archive_level >= 2 && (attr & FILE_ATTRIBUTE_ARCHIVE)) {
 817                 smbcli_setatr(cli->tree, rname, attr & ~(uint16_t)FILE_ATTRIBUTE_ARCHIVE, 0);
 818         }
 819
 820         {
 821                 struct timeval tp_end;
 822                 int this_time;
 823
 824                 GetTimeOfDay(&tp_end);
 825                 this_time =
 826                         (tp_end.tv_sec - tp_start.tv_sec)*1000 +
 827                         (tp_end.tv_usec - tp_start.tv_usec)/1000;
 828                 get_total_time_ms += this_time;
 829                 get_total_size += nread;
 830
 831                 DEBUG(2,("(%3.1f kb/s) (average %3.1f kb/s)\n",
 832                          nread / (1.024*this_time + 1.0e-4),
 833                          get_total_size / (1.024*get_total_time_ms)));
 834         }
 835
 836         return rc;
 837 }
 838
 839
 840 /****************************************************************************
 841   get a file
 842   ****************************************************************************/
 843 static int cmd_get(const char **cmd_ptr)
 844 {
 845         pstring lname;
 846         pstring rname;
 847         char *p;
 848
 849         pstrcpy(rname,cur_dir);
 850         pstrcat(rname,"\\");
 851
 852         p = rname + strlen(rname);
 853
 854         if (!next_token(cmd_ptr,p,NULL,sizeof(rname)-strlen(rname))) {
 855                 d_printf("get <filename>\n");
 856                 return 1;
 857         }
 858         pstrcpy(lname,p);
 859         dos_clean_name(rname);
 860
 861         next_token(cmd_ptr,lname,NULL,sizeof(lname));
 862
 863         return do_get(rname, lname, False);
 864 }
 865
 866 /****************************************************************************
 867  Put up a yes/no prompt.
 868 ****************************************************************************/
 869 static BOOL yesno(char *p)
 870 {
 871         pstring ans;
 872         printf("%s",p);
 873
 874         if (!fgets(ans,sizeof(ans)-1,stdin))
 875                 return(False);
 876
 877         if (*ans == 'y' || *ans == 'Y')
 878                 return(True);
 879
 880         return(False);
 881 }
 882
 883 /****************************************************************************
 884   do a mget operation on one file
 885   ****************************************************************************/
 886 static void do_mget(struct clilist_file_info *finfo)
 887 {
 888         pstring rname;
 889         pstring quest;
 890         pstring saved_curdir;
 891         pstring mget_mask;
 892
 893         if (strequal(finfo->name,".") || strequal(finfo->name,".."))
 894                 return;
 895
 896         if (abort_mget) {
 897                 d_printf("mget aborted\n");
 898                 return;
 899         }
 900
 901         if (finfo->attrib & FILE_ATTRIBUTE_DIRECTORY)
 902                 slprintf(quest,sizeof(pstring)-1,
 903                          "Get directory %s? ",finfo->name);
 904         else
 905                 slprintf(quest,sizeof(pstring)-1,
 906                          "Get file %s? ",finfo->name);
 907
 908         if (prompt && !yesno(quest)) return;
 909
 910         if (!(finfo->attrib & FILE_ATTRIBUTE_DIRECTORY)) {
 911                 pstrcpy(rname,cur_dir);
 912                 pstrcat(rname,finfo->name);
 913                 do_get(rname, finfo->name, False);
 914                 return;
 915         }
 916
 917         /* handle directories */
 918         pstrcpy(saved_curdir,cur_dir);
 919
 920         pstrcat(cur_dir,finfo->name);
 921         pstrcat(cur_dir,"\\");
 922
 923         string_replace(discard_const_p(char, finfo->name), '\\', '/');
 924         if (lowercase) {
 925                 strlower(discard_const_p(char, finfo->name));
 926         }
 927
 928         if (!directory_exist(finfo->name,NULL) &&
 929             mkdir(finfo->name,0777) != 0) {
 930                 d_printf("failed to create directory %s\n",finfo->name);
 931                 pstrcpy(cur_dir,saved_curdir);
 932                 return;
 933         }
 934
 935         if (chdir(finfo->name) != 0) {
 936                 d_printf("failed to chdir to directory %s\n",finfo->name);
 937                 pstrcpy(cur_dir,saved_curdir);
 938                 return;
 939         }
 940
 941         pstrcpy(mget_mask,cur_dir);
 942         pstrcat(mget_mask,"*");
 943
 944         do_list(mget_mask, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN | FILE_ATTRIBUTE_DIRECTORY,do_mget,False, True);
 945         chdir("..");
 946         pstrcpy(cur_dir,saved_curdir);
 947 }
 948
 949
 950 /****************************************************************************
 951 view the file using the pager
 952 ****************************************************************************/
 953 static int cmd_more(const char **cmd_ptr)
 954 {
 955         fstring rname,lname,pager_cmd;
 956         char *pager;
 957         int fd;
 958         int rc = 0;
 959
 960         fstrcpy(rname,cur_dir);
 961         fstrcat(rname,"\\");
 962
 963         slprintf(lname,sizeof(lname)-1, "%s/smbmore.XXXXXX",tmpdir());
 964         fd = smb_mkstemp(lname);
 965         if (fd == -1) {
 966                 d_printf("failed to create temporary file for more\n");
 967                 return 1;
 968         }
 969         close(fd);
 970
 971         if (!next_token(cmd_ptr,rname+strlen(rname),NULL,sizeof(rname)-strlen(rname))) {
 972                 d_printf("more <filename>\n");
 973                 unlink(lname);
 974                 return 1;
 975         }
 976         dos_clean_name(rname);
 977
 978         rc = do_get(rname, lname, False);
 979
 980         pager=getenv("PAGER");
 981
 982         slprintf(pager_cmd,sizeof(pager_cmd)-1,
 983                  "%s %s",(pager? pager:PAGER), lname);
 984         system(pager_cmd);
 985         unlink(lname);
 986
 987         return rc;
 988 }
 989
 990
 991
 992 /****************************************************************************
 993 do a mget command
 994 ****************************************************************************/
 995 static int cmd_mget(const char **cmd_ptr)
 996 {
 997         uint16_t attribute = FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN;
 998         pstring mget_mask;
 999         fstring buf;
1000         char *p=buf;
1001
1002         *mget_mask = 0;
1003
1004         if (recurse)
1005                 attribute |= FILE_ATTRIBUTE_DIRECTORY;
1006
1007         abort_mget = False;
1008
1009         while (next_token(cmd_ptr,p,NULL,sizeof(buf))) {
1010                 pstrcpy(mget_mask,cur_dir);
1011                 if(mget_mask[strlen(mget_mask)-1]!='\\')
1012                         pstrcat(mget_mask,"\\");
1013
1014                 if (*p == '\\')
1015                         pstrcpy(mget_mask,p);
1016                 else
1017                         pstrcat(mget_mask,p);
1018                 do_list(mget_mask, attribute,do_mget,False,True);
1019         }
1020
1021         if (!*mget_mask) {
1022                 pstrcpy(mget_mask,cur_dir);
1023                 if(mget_mask[strlen(mget_mask)-1]!='\\')
1024                         pstrcat(mget_mask,"\\");
1025                 pstrcat(mget_mask,"*");
1026                 do_list(mget_mask, attribute,do_mget,False,True);
1027         }
1028
1029         return 0;
1030 }
1031
1032
1033 /****************************************************************************
1034 make a directory of name "name"
1035 ****************************************************************************/
1036 static NTSTATUS do_mkdir(char *name)
1037 {
1038         NTSTATUS status;
1039
1040         if (NT_STATUS_IS_ERR(status = smbcli_mkdir(cli->tree, name))) {
1041                 d_printf("%s making remote directory %s\n",
1042                          smbcli_errstr(cli->tree),name);
1043                 return status;
1044         }
1045
1046         return status;
1047 }
1048
1049 /****************************************************************************
1050 show 8.3 name of a file
1051 ****************************************************************************/
1052 static BOOL do_altname(char *name)
1053 {
1054         const char *altname;
1055         if (!NT_STATUS_IS_OK(smbcli_qpathinfo_alt_name(cli->tree, name, &altname))) {
1056                 d_printf("%s getting alt name for %s\n",
1057                          smbcli_errstr(cli->tree),name);
1058                 return(False);
1059         }
1060         d_printf("%s\n", altname);
1061
1062         return(True);
1063 }
1064
1065
1066 /****************************************************************************
1067  Exit client.
1068 ****************************************************************************/
1069 static int cmd_quit(const char **cmd_ptr)
1070 {
1071         smbcli_shutdown(cli);
1072         exit(0);
1073         /* NOTREACHED */
1074         return 0;
1075 }
1076
1077
1078 /****************************************************************************
1079   make a directory
1080   ****************************************************************************/
1081 static int cmd_mkdir(const char **cmd_ptr)
1082 {
1083         pstring mask;
1084         fstring buf;
1085         char *p=buf;
1086
1087         pstrcpy(mask,cur_dir);
1088
1089         if (!next_token(cmd_ptr,p,NULL,sizeof(buf))) {
1090                 if (!recurse)
1091                         d_printf("mkdir <dirname>\n");
1092                 return 1;
1093         }
1094         pstrcat(mask,p);
1095
1096         if (recurse) {
1097                 pstring ddir;
1098                 pstring ddir2;
1099                 *ddir2 = 0;
1100
1101                 pstrcpy(ddir,mask);
1102                 trim_string(ddir,".",NULL);
1103                 p = strtok(ddir,"/\\");
1104                 while (p) {
1105                         pstrcat(ddir2,p);
1106                         if (NT_STATUS_IS_ERR(smbcli_chkpath(cli->tree, ddir2))) {
1107                                 do_mkdir(ddir2);
1108                         }
1109                         pstrcat(ddir2,"\\");
1110                         p = strtok(NULL,"/\\");
1111                 }
1112         } else {
1113                 do_mkdir(mask);
1114         }
1115
1116         return 0;
1117 }
1118
1119
1120 /****************************************************************************
1121   show alt name
1122   ****************************************************************************/
1123 static int cmd_altname(const char **cmd_ptr)
1124 {
1125         pstring name;
1126         fstring buf;
1127         char *p=buf;
1128
1129         pstrcpy(name,cur_dir);
1130
1131         if (!next_token(cmd_ptr,p,NULL,sizeof(buf))) {
1132                 d_printf("altname <file>\n");
1133                 return 1;
1134         }
1135         pstrcat(name,p);
1136
1137         do_altname(name);
1138
1139         return 0;
1140 }
1141
1142
1143 /****************************************************************************
1144   put a single file
1145   ****************************************************************************/
1146 static int do_put(char *rname, char *lname, BOOL reput)
1147 {
1148         int fnum;
1149         XFILE *f;
1150         size_t start = 0;
1151         off_t nread = 0;
1152         char *buf = NULL;
1153         int maxwrite = io_bufsize;
1154         int rc = 0;
1155
1156         struct timeval tp_start;
1157         GetTimeOfDay(&tp_start);
1158
1159         if (reput) {
1160                 fnum = smbcli_open(cli->tree, rname, O_RDWR|O_CREAT, DENY_NONE);
1161                 if (fnum >= 0) {
1162                         if (NT_STATUS_IS_ERR(smbcli_qfileinfo(cli->tree, fnum, NULL, &start, NULL, NULL, NULL, NULL, NULL)) &&
1163                             NT_STATUS_IS_ERR(smbcli_getattrE(cli->tree, fnum, NULL, &start, NULL, NULL, NULL))) {
1164                                 d_printf("getattrib: %s\n",smbcli_errstr(cli->tree));
1165                                 return 1;
1166                         }
1167                 }
1168         } else {
1169                 fnum = smbcli_open(cli->tree, rname, O_RDWR|O_CREAT|O_TRUNC,
1170                                 DENY_NONE);
1171         }
1172
1173         if (fnum == -1) {
1174                 d_printf("%s opening remote file %s\n",smbcli_errstr(cli->tree),rname);
1175                 return 1;
1176         }
1177
1178         /* allow files to be piped into smbclient
1179            jdblair 24.jun.98
1180
1181            Note that in this case this function will exit(0) rather
1182            than returning. */
1183         if (!strcmp(lname, "-")) {
1184                 f = x_stdin;
1185                 /* size of file is not known */
1186         } else {
1187                 f = x_fopen(lname,O_RDONLY, 0);
1188                 if (f && reput) {
1189                         if (x_tseek(f, start, SEEK_SET) == -1) {
1190                                 d_printf("Error seeking local file\n");
1191                                 return 1;
1192                         }
1193                 }
1194         }
1195
1196         if (!f) {
1197                 d_printf("Error opening local file %s\n",lname);
1198                 return 1;
1199         }
1200
1201
1202         DEBUG(1,("putting file %s as %s ",lname,
1203                  rname));
1204
1205         buf = (char *)malloc(maxwrite);
1206         if (!buf) {
1207                 d_printf("ERROR: Not enough memory!\n");
1208                 return 1;
1209         }
1210         while (!x_feof(f)) {
1211                 int n = maxwrite;
1212                 int ret;
1213
1214                 if ((n = readfile(buf,n,f)) < 1) {
1215                         if((n == 0) && x_feof(f))
1216                                 break; /* Empty local file. */
1217
1218                         d_printf("Error reading local file: %s\n", strerror(errno));
1219                         rc = 1;
1220                         break;
1221                 }
1222
1223                 ret = smbcli_write(cli->tree, fnum, 0, buf, nread + start, n);
1224
1225                 if (n != ret) {
1226                         d_printf("Error writing file: %s\n", smbcli_errstr(cli->tree));
1227                         rc = 1;
1228                         break;
1229                 }
1230
1231                 nread += n;
1232         }
1233
1234         if (NT_STATUS_IS_ERR(smbcli_close(cli->tree, fnum))) {
1235                 d_printf("%s closing remote file %s\n",smbcli_errstr(cli->tree),rname);
1236                 x_fclose(f);
1237                 SAFE_FREE(buf);
1238                 return 1;
1239         }
1240
1241
1242         if (f != x_stdin) {
1243                 x_fclose(f);
1244         }
1245
1246         SAFE_FREE(buf);
1247
1248         {
1249                 struct timeval tp_end;
1250                 int this_time;
1251
1252                 GetTimeOfDay(&tp_end);
1253                 this_time =
1254                         (tp_end.tv_sec - tp_start.tv_sec)*1000 +
1255                         (tp_end.tv_usec - tp_start.tv_usec)/1000;
1256                 put_total_time_ms += this_time;
1257                 put_total_size += nread;
1258
1259                 DEBUG(1,("(%3.1f kb/s) (average %3.1f kb/s)\n",
1260                          nread / (1.024*this_time + 1.0e-4),
1261                          put_total_size / (1.024*put_total_time_ms)));
1262         }
1263
1264         if (f == x_stdin) {
1265                 smbcli_shutdown(cli);
1266                 exit(0);
1267         }
1268
1269         return rc;
1270 }
1271
1272
1273
1274 /****************************************************************************
1275   put a file
1276   ****************************************************************************/
1277 static int cmd_put(const char **cmd_ptr)
1278 {
1279         pstring lname;
1280         pstring rname;
1281         fstring buf;
1282         char *p=buf;
1283
1284         pstrcpy(rname,cur_dir);
1285         pstrcat(rname,"\\");
1286
1287         if (!next_token(cmd_ptr,p,NULL,sizeof(buf))) {
1288                 d_printf("put <filename>\n");
1289                 return 1;
1290         }
1291         pstrcpy(lname,p);
1292
1293         if (next_token(cmd_ptr,p,NULL,sizeof(buf)))
1294                 pstrcat(rname,p);
1295         else
1296                 pstrcat(rname,lname);
1297
1298         dos_clean_name(rname);
1299
1300         {
1301                 struct stat st;
1302                 /* allow '-' to represent stdin
1303                    jdblair, 24.jun.98 */
1304                 if (!file_exist(lname,&st) &&
1305                     (strcmp(lname,"-"))) {
1306                         d_printf("%s does not exist\n",lname);
1307                         return 1;
1308                 }
1309         }
1310
1311         return do_put(rname, lname, False);
1312 }
1313
1314 /*************************************
1315   File list structure
1316 *************************************/
1317
1318 static struct file_list {
1319         struct file_list *prev, *next;
1320         char *file_path;
1321         BOOL isdir;
1322 } *file_list;
1323
1324 /****************************************************************************
1325   Free a file_list structure
1326 ****************************************************************************/
1327
1328 static void free_file_list (struct file_list * list)
1329 {
1330         struct file_list *tmp;
1331
1332         while (list)
1333         {
1334                 tmp = list;
1335                 DLIST_REMOVE(list, list);
1336                 SAFE_FREE(tmp->file_path);
1337                 SAFE_FREE(tmp);
1338         }
1339 }
1340
1341 /****************************************************************************
1342   seek in a directory/file list until you get something that doesn't start with
1343   the specified name
1344   ****************************************************************************/
1345 static BOOL seek_list(struct file_list *list, char *name)
1346 {
1347         while (list) {
1348                 trim_string(list->file_path,"./","\n");
1349                 if (strncmp(list->file_path, name, strlen(name)) != 0) {
1350                         return(True);
1351                 }
1352                 list = list->next;
1353         }
1354
1355         return(False);
1356 }
1357
1358 /****************************************************************************
1359   set the file selection mask
1360   ****************************************************************************/
1361 static int cmd_select(const char **cmd_ptr)
1362 {
1363         pstrcpy(fileselection,"");
1364         next_token(cmd_ptr,fileselection,NULL,sizeof(fileselection));
1365
1366         return 0;
1367 }
1368
1369 /*******************************************************************
1370   A readdir wrapper which just returns the file name.
1371  ********************************************************************/
1372 static const char *readdirname(DIR *p)
1373 {
1374         struct dirent *ptr;
1375         char *dname;
1376
1377         if (!p)
1378                 return(NULL);
1379
1380         ptr = (struct dirent *)readdir(p);
1381         if (!ptr)
1382                 return(NULL);
1383
1384         dname = ptr->d_name;
1385
1386 #ifdef NEXT2
1387         if (telldir(p) < 0)
1388                 return(NULL);
1389 #endif
1390
1391 #ifdef HAVE_BROKEN_READDIR
1392         /* using /usr/ucb/cc is BAD */
1393         dname = dname - 2;
1394 #endif
1395
1396         {
1397                 static pstring buf;
1398                 int len = NAMLEN(ptr);
1399                 memcpy(buf, dname, len);
1400                 buf[len] = 0;
1401                 dname = buf;
1402         }
1403
1404         return(dname);
1405 }
1406
1407 /****************************************************************************
1408   Recursive file matching function act as find
1409   match must be always set to True when calling this function
1410 ****************************************************************************/
1411 static int file_find(struct file_list **list, const char *directory,
1412                       const char *expression, BOOL match)
1413 {
1414         DIR *dir;
1415         struct file_list *entry;
1416         struct stat statbuf;
1417         int ret;
1418         char *path;
1419         BOOL isdir;
1420         const char *dname;
1421
1422         dir = opendir(directory);
1423         if (!dir) return -1;
1424
1425         while ((dname = readdirname(dir))) {
1426                 if (!strcmp("..", dname)) continue;
1427                 if (!strcmp(".", dname)) continue;
1428
1429                 if (asprintf(&path, "%s/%s", directory, dname) <= 0) {
1430                         continue;
1431                 }
1432
1433                 isdir = False;
1434                 if (!match || !gen_fnmatch(expression, dname)) {
1435                         if (recurse) {
1436                                 ret = stat(path, &statbuf);
1437                                 if (ret == 0) {
1438                                         if (S_ISDIR(statbuf.st_mode)) {
1439                                                 isdir = True;
1440                                                 ret = file_find(list, path, expression, False);
1441                                         }
1442                                 } else {
1443                                         d_printf("file_find: cannot stat file %s\n", path);
1444                                 }
1445
1446                                 if (ret == -1) {
1447                                         SAFE_FREE(path);
1448                                         closedir(dir);
1449                                         return -1;
1450                                 }
1451                         }
1452                         entry = malloc_p(struct file_list);
1453                         if (!entry) {
1454                                 d_printf("Out of memory in file_find\n");
1455                                 closedir(dir);
1456                                 return -1;
1457                         }
1458                         entry->file_path = path;
1459                         entry->isdir = isdir;
1460                         DLIST_ADD(*list, entry);
1461                 } else {
1462                         SAFE_FREE(path);
1463                 }
1464         }
1465
1466         closedir(dir);
1467         return 0;
1468 }
1469
1470 /****************************************************************************
1471   mput some files
1472   ****************************************************************************/
1473 static int cmd_mput(const char **cmd_ptr)
1474 {
1475         fstring buf;
1476         char *p=buf;
1477
1478         while (next_token(cmd_ptr,p,NULL,sizeof(buf))) {
1479                 int ret;
1480                 struct file_list *temp_list;
1481                 char *quest, *lname, *rname;
1482
1483                 file_list = NULL;
1484
1485                 ret = file_find(&file_list, ".", p, True);
1486                 if (ret) {
1487                         free_file_list(file_list);
1488                         continue;
1489                 }
1490
1491                 quest = NULL;
1492                 lname = NULL;
1493                 rname = NULL;
1494
1495                 for (temp_list = file_list; temp_list;
1496                      temp_list = temp_list->next) {
1497
1498                         SAFE_FREE(lname);
1499                         if (asprintf(&lname, "%s/", temp_list->file_path) <= 0)
1500                                 continue;
1501                         trim_string(lname, "./", "/");
1502
1503                         /* check if it's a directory */
1504                         if (temp_list->isdir) {
1505                                 /* if (!recurse) continue; */
1506
1507                                 SAFE_FREE(quest);
1508                                 if (asprintf(&quest, "Put directory %s? ", lname) < 0) break;
1509                                 if (prompt && !yesno(quest)) { /* No */
1510                                         /* Skip the directory */
1511                                         lname[strlen(lname)-1] = '/';
1512                                         if (!seek_list(temp_list, lname))
1513                                                 break;
1514                                 } else { /* Yes */
1515                                         SAFE_FREE(rname);
1516                                         if(asprintf(&rname, "%s%s", cur_dir, lname) < 0) break;
1517                                         dos_format(rname);
1518                                         if (NT_STATUS_IS_ERR(smbcli_chkpath(cli->tree, rname)) &&
1519                                             NT_STATUS_IS_ERR(do_mkdir(rname))) {
1520                                                 DEBUG (0, ("Unable to make dir, skipping..."));
1521                                                 /* Skip the directory */
1522                                                 lname[strlen(lname)-1] = '/';
1523                                                 if (!seek_list(temp_list, lname))
1524                                                         break;
1525                                         }
1526                                 }
1527                                 continue;
1528                         } else {
1529                                 SAFE_FREE(quest);
1530                                 if (asprintf(&quest,"Put file %s? ", lname) < 0) break;
1531                                 if (prompt && !yesno(quest)) /* No */
1532                                         continue;
1533
1534                                 /* Yes */
1535                                 SAFE_FREE(rname);
1536                                 if (asprintf(&rname, "%s%s", cur_dir, lname) < 0) break;
1537                         }
1538
1539                         dos_format(rname);
1540
1541                         do_put(rname, lname, False);
1542                 }
1543                 free_file_list(file_list);
1544                 SAFE_FREE(quest);
1545                 SAFE_FREE(lname);
1546                 SAFE_FREE(rname);
1547         }
1548
1549         return 0;
1550 }
1551
1552
1553 /****************************************************************************
1554   cancel a print job
1555   ****************************************************************************/
1556 static int do_cancel(int job)
1557 {
1558         d_printf("REWRITE: print job cancel not implemented\n");
1559         return 1;
1560 }
1561
1562
1563 /****************************************************************************
1564   cancel a print job
1565   ****************************************************************************/
1566 static int cmd_cancel(const char **cmd_ptr)
1567 {
1568         fstring buf;
1569         int job;
1570
1571         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
1572                 d_printf("cancel <jobid> ...\n");
1573                 return 1;
1574         }
1575         do {
1576                 job = atoi(buf);
1577                 do_cancel(job);
1578         } while (next_token(cmd_ptr,buf,NULL,sizeof(buf)));
1579
1580         return 0;
1581 }
1582
1583
1584 /****************************************************************************
1585   print a file
1586   ****************************************************************************/
1587 static int cmd_print(const char **cmd_ptr)
1588 {
1589         pstring lname;
1590         pstring rname;
1591         char *p;
1592
1593         if (!next_token(cmd_ptr,lname,NULL, sizeof(lname))) {
1594                 d_printf("print <filename>\n");
1595                 return 1;
1596         }
1597
1598         pstrcpy(rname,lname);
1599         p = strrchr_m(rname,'/');
1600         if (p) {
1601                 slprintf(rname, sizeof(rname)-1, "%s-%d", p+1, (int)getpid());
1602         }
1603
1604         if (strequal(lname,"-")) {
1605                 slprintf(rname, sizeof(rname)-1, "stdin-%d", (int)getpid());
1606         }
1607
1608         return do_put(rname, lname, False);
1609 }
1610
1611
1612 /****************************************************************************
1613  show a print queue
1614 ****************************************************************************/
1615 static int cmd_queue(const char **cmd_ptr)
1616 {
1617         d_printf("REWRITE: print job queue not implemented\n");
1618
1619         return 0;
1620 }
1621
1622 /****************************************************************************
1623 delete some files
1624 ****************************************************************************/
1625 static int cmd_del(const char **cmd_ptr)
1626 {
1627         pstring mask;
1628         fstring buf;
1629         uint16_t attribute = FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN;
1630
1631         if (recurse)
1632                 attribute |= FILE_ATTRIBUTE_DIRECTORY;
1633
1634         pstrcpy(mask,cur_dir);
1635
1636         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
1637                 d_printf("del <filename>\n");
1638                 return 1;
1639         }
1640         pstrcat(mask,buf);
1641
1642         if (NT_STATUS_IS_ERR(smbcli_unlink(cli->tree, mask))) {
1643                 d_printf("%s deleting remote file %s\n",smbcli_errstr(cli->tree),mask);
1644         }
1645
1646         return 0;
1647 }
1648
1649
1650 /****************************************************************************
1651 delete a whole directory tree
1652 ****************************************************************************/
1653 static int cmd_deltree(const char **cmd_ptr)
1654 {
1655         pstring dname;
1656         fstring buf;
1657         int ret;
1658
1659         pstrcpy(dname,cur_dir);
1660
1661         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
1662                 d_printf("deltree <dirname>\n");
1663                 return 1;
1664         }
1665         pstrcat(dname,buf);
1666
1667         ret = smbcli_deltree(cli->tree, dname);
1668
1669         if (ret == -1) {
1670                 printf("Failed to delete tree %s - %s\n", dname, smbcli_errstr(cli->tree));
1671                 return -1;
1672         }
1673
1674         printf("Deleted %d files in %s\n", ret, dname);
1675
1676         return 0;
1677 }
1678
1679
1680 /****************************************************************************
1681 show as much information as possible about a file
1682 ****************************************************************************/
1683 static int cmd_allinfo(const char **cmd_ptr)
1684 {
1685         pstring fname;
1686         fstring buf;
1687         int ret = 0;
1688         TALLOC_CTX *mem_ctx;
1689         union smb_fileinfo finfo;
1690         NTSTATUS status;
1691
1692         pstrcpy(fname,cur_dir);
1693
1694         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
1695                 d_printf("allinfo <filename>\n");
1696                 return 1;
1697         }
1698         pstrcat(fname,buf);
1699
1700         mem_ctx = talloc_init("%s", fname);
1701
1702         /* first a ALL_INFO QPATHINFO */
1703         finfo.generic.level = RAW_FILEINFO_ALL_INFO;
1704         finfo.generic.in.fname = fname;
1705         status = smb_raw_pathinfo(cli->tree, mem_ctx, &finfo);
1706         if (!NT_STATUS_IS_OK(status)) {
1707                 d_printf("%s - %s\n", fname, nt_errstr(status));
1708                 ret = 1;
1709                 goto done;
1710         }
1711
1712         d_printf("\tcreate_time:    %s\n", nt_time_string(mem_ctx, finfo.all_info.out.create_time));
1713         d_printf("\taccess_time:    %s\n", nt_time_string(mem_ctx, finfo.all_info.out.access_time));
1714         d_printf("\twrite_time:     %s\n", nt_time_string(mem_ctx, finfo.all_info.out.write_time));
1715         d_printf("\tchange_time:    %s\n", nt_time_string(mem_ctx, finfo.all_info.out.change_time));
1716         d_printf("\tattrib:         0x%x\n", finfo.all_info.out.attrib);
1717         d_printf("\talloc_size:     %lu\n", (unsigned long)finfo.all_info.out.alloc_size);
1718         d_printf("\tsize:           %lu\n", (unsigned long)finfo.all_info.out.size);
1719         d_printf("\tnlink:          %u\n", finfo.all_info.out.nlink);
1720         d_printf("\tdelete_pending: %u\n", finfo.all_info.out.delete_pending);
1721         d_printf("\tdirectory:      %u\n", finfo.all_info.out.directory);
1722         d_printf("\tea_size:        %u\n", finfo.all_info.out.ea_size);
1723         d_printf("\tfname:          '%s'\n", finfo.all_info.out.fname.s);
1724
1725         /* 8.3 name if any */
1726         finfo.generic.level = RAW_FILEINFO_ALT_NAME_INFO;
1727         status = smb_raw_pathinfo(cli->tree, mem_ctx, &finfo);
1728         if (NT_STATUS_IS_OK(status)) {
1729                 d_printf("\talt_name:       %s\n", finfo.alt_name_info.out.fname.s);
1730         }
1731
1732         /* file_id if available */
1733         finfo.generic.level = RAW_FILEINFO_INTERNAL_INFORMATION;
1734         status = smb_raw_pathinfo(cli->tree, mem_ctx, &finfo);
1735         if (NT_STATUS_IS_OK(status)) {
1736                 d_printf("\tfile_id         %.0f\n",
1737                          (double)finfo.internal_information.out.file_id);
1738         }
1739
1740         /* the EAs, if any */
1741         finfo.generic.level = RAW_FILEINFO_ALL_EAS;
1742         status = smb_raw_pathinfo(cli->tree, mem_ctx, &finfo);
1743         if (NT_STATUS_IS_OK(status)) {
1744                 int i;
1745                 for (i=0;i<finfo.all_eas.out.num_eas;i++) {
1746                         d_printf("\tEA[%d] flags=%d %s=%*.*s\n", i,
1747                                  finfo.all_eas.out.eas[i].flags,
1748                                  finfo.all_eas.out.eas[i].name.s,
1749                                  finfo.all_eas.out.eas[i].value.length,
1750                                  finfo.all_eas.out.eas[i].value.length,
1751                                  finfo.all_eas.out.eas[i].value.data);
1752                 }
1753         }
1754
1755         /* streams, if available */
1756         finfo.generic.level = RAW_FILEINFO_STREAM_INFO;
1757         status = smb_raw_pathinfo(cli->tree, mem_ctx, &finfo);
1758         if (NT_STATUS_IS_OK(status)) {
1759                 int i;
1760                 for (i=0;i<finfo.stream_info.out.num_streams;i++) {
1761                         d_printf("\tstream %d:\n", i);
1762                         d_printf("\t\tsize       %ld\n",
1763                                  (long)finfo.stream_info.out.streams[i].size);
1764                         d_printf("\t\talloc size %ld\n",
1765                                  (long)finfo.stream_info.out.streams[i].alloc_size);
1766                         d_printf("\t\tname       %s\n", finfo.stream_info.out.streams[i].stream_name.s);
1767                 }
1768         }
1769
1770         /* dev/inode if available */
1771         finfo.generic.level = RAW_FILEINFO_COMPRESSION_INFORMATION;
1772         status = smb_raw_pathinfo(cli->tree, mem_ctx, &finfo);
1773         if (NT_STATUS_IS_OK(status)) {
1774                 d_printf("\tcompressed size %ld\n", (long)finfo.compression_info.out.compressed_size);
1775                 d_printf("\tformat          %ld\n", (long)finfo.compression_info.out.format);
1776                 d_printf("\tunit_shift      %ld\n", (long)finfo.compression_info.out.unit_shift);
1777                 d_printf("\tchunk_shift     %ld\n", (long)finfo.compression_info.out.chunk_shift);
1778                 d_printf("\tcluster_shift   %ld\n", (long)finfo.compression_info.out.cluster_shift);
1779         }
1780
1781         talloc_destroy(mem_ctx);
1782
1783 done:
1784         return ret;
1785 }
1786
1787
1788 /****************************************************************************
1789 show any ACL on a file
1790 ****************************************************************************/
1791 static int cmd_acl(const char **cmd_ptr)
1792 {
1793         pstring fname;
1794         fstring buf;
1795         int ret = 0;
1796         TALLOC_CTX *mem_ctx;
1797         union smb_fileinfo query;
1798         NTSTATUS status;
1799         int fnum;
1800
1801         pstrcpy(fname,cur_dir);
1802
1803         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
1804                 d_printf("acl <filename>\n");
1805                 return 1;
1806         }
1807         pstrcat(fname,buf);
1808
1809         fnum = smbcli_open(cli->tree, fname, O_RDONLY, DENY_NONE);
1810         if (fnum == -1) {
1811                 d_printf("%s - %s\n", fname, smbcli_errstr(cli->tree));
1812                 return -1;
1813         }
1814
1815         mem_ctx = talloc_init("%s", fname);
1816
1817         query.query_secdesc.level = RAW_FILEINFO_SEC_DESC;
1818         query.query_secdesc.in.fnum = fnum;
1819         query.query_secdesc.in.secinfo_flags = 0x7;
1820
1821         status = smb_raw_fileinfo(cli->tree, mem_ctx, &query);
1822         if (!NT_STATUS_IS_OK(status)) {
1823                 d_printf("%s - %s\n", fname, nt_errstr(status));
1824                 ret = 1;
1825                 goto done;
1826         }
1827
1828         NDR_PRINT_DEBUG(security_descriptor, query.query_secdesc.out.sd);
1829
1830         talloc_destroy(mem_ctx);
1831
1832 done:
1833         return ret;
1834 }
1835
1836
1837 /****************************************************************************
1838 ****************************************************************************/
1839 static int cmd_open(const char **cmd_ptr)
1840 {
1841         pstring mask;
1842         fstring buf;
1843
1844         pstrcpy(mask,cur_dir);
1845
1846         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
1847                 d_printf("open <filename>\n");
1848                 return 1;
1849         }
1850         pstrcat(mask,buf);
1851
1852         smbcli_open(cli->tree, mask, O_RDWR, DENY_ALL);
1853
1854         return 0;
1855 }
1856
1857
1858 /****************************************************************************
1859 remove a directory
1860 ****************************************************************************/
1861 static int cmd_rmdir(const char **cmd_ptr)
1862 {
1863         pstring mask;
1864         fstring buf;
1865
1866         pstrcpy(mask,cur_dir);
1867
1868         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
1869                 d_printf("rmdir <dirname>\n");
1870                 return 1;
1871         }
1872         pstrcat(mask,buf);
1873
1874         if (NT_STATUS_IS_ERR(smbcli_rmdir(cli->tree, mask))) {
1875                 d_printf("%s removing remote directory file %s\n",
1876                          smbcli_errstr(cli->tree),mask);
1877         }
1878
1879         return 0;
1880 }
1881
1882 /****************************************************************************
1883  UNIX hardlink.
1884 ****************************************************************************/
1885 static int cmd_link(const char **cmd_ptr)
1886 {
1887         pstring src,dest;
1888         fstring buf,buf2;
1889
1890         if (!(cli->transport->negotiate.capabilities & CAP_UNIX)) {
1891                 d_printf("Server doesn't support UNIX CIFS calls.\n");
1892                 return 1;
1893         }
1894
1895         pstrcpy(src,cur_dir);
1896         pstrcpy(dest,cur_dir);
1897
1898         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf)) ||
1899             !next_token(cmd_ptr,buf2,NULL, sizeof(buf2))) {
1900                 d_printf("link <src> <dest>\n");
1901                 return 1;
1902         }
1903
1904         pstrcat(src,buf);
1905         pstrcat(dest,buf2);
1906
1907         if (NT_STATUS_IS_ERR(smbcli_unix_hardlink(cli->tree, src, dest))) {
1908                 d_printf("%s linking files (%s -> %s)\n", smbcli_errstr(cli->tree), src, dest);
1909                 return 1;
1910         }
1911
1912         return 0;
1913 }
1914
1915 /****************************************************************************
1916  UNIX symlink.
1917 ****************************************************************************/
1918
1919 static int cmd_symlink(const char **cmd_ptr)
1920 {
1921         pstring src,dest;
1922         fstring buf,buf2;
1923
1924         if (!(cli->transport->negotiate.capabilities & CAP_UNIX)) {
1925                 d_printf("Server doesn't support UNIX CIFS calls.\n");
1926                 return 1;
1927         }
1928
1929         pstrcpy(src,cur_dir);
1930         pstrcpy(dest,cur_dir);
1931
1932         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf)) ||
1933             !next_token(cmd_ptr,buf2,NULL, sizeof(buf2))) {
1934                 d_printf("symlink <src> <dest>\n");
1935                 return 1;
1936         }
1937
1938         pstrcat(src,buf);
1939         pstrcat(dest,buf2);
1940
1941         if (NT_STATUS_IS_ERR(smbcli_unix_symlink(cli->tree, src, dest))) {
1942                 d_printf("%s symlinking files (%s -> %s)\n",
1943                         smbcli_errstr(cli->tree), src, dest);
1944                 return 1;
1945         }
1946
1947         return 0;
1948 }
1949
1950 /****************************************************************************
1951  UNIX chmod.
1952 ****************************************************************************/
1953
1954 static int cmd_chmod(const char **cmd_ptr)
1955 {
1956         pstring src;
1957         mode_t mode;
1958         fstring buf, buf2;
1959
1960         if (!(cli->transport->negotiate.capabilities & CAP_UNIX)) {
1961                 d_printf("Server doesn't support UNIX CIFS calls.\n");
1962                 return 1;
1963         }
1964
1965         pstrcpy(src,cur_dir);
1966
1967         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf)) ||
1968             !next_token(cmd_ptr,buf2,NULL, sizeof(buf2))) {
1969                 d_printf("chmod mode file\n");
1970                 return 1;
1971         }
1972
1973         mode = (mode_t)strtol(buf, NULL, 8);
1974         pstrcat(src,buf2);
1975
1976         if (NT_STATUS_IS_ERR(smbcli_unix_chmod(cli->tree, src, mode))) {
1977                 d_printf("%s chmod file %s 0%o\n",
1978                         smbcli_errstr(cli->tree), src, (uint_t)mode);
1979                 return 1;
1980         }
1981
1982         return 0;
1983 }
1984
1985 /****************************************************************************
1986  UNIX chown.
1987 ****************************************************************************/
1988
1989 static int cmd_chown(const char **cmd_ptr)
1990 {
1991         pstring src;
1992         uid_t uid;
1993         gid_t gid;
1994         fstring buf, buf2, buf3;
1995
1996         if (!(cli->transport->negotiate.capabilities & CAP_UNIX)) {
1997                 d_printf("Server doesn't support UNIX CIFS calls.\n");
1998                 return 1;
1999         }
2000
2001         pstrcpy(src,cur_dir);
2002
2003         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf)) ||
2004             !next_token(cmd_ptr,buf2,NULL, sizeof(buf2)) ||
2005             !next_token(cmd_ptr,buf3,NULL, sizeof(buf3))) {
2006                 d_printf("chown uid gid file\n");
2007                 return 1;
2008         }
2009
2010         uid = (uid_t)atoi(buf);
2011         gid = (gid_t)atoi(buf2);
2012         pstrcat(src,buf3);
2013
2014         if (NT_STATUS_IS_ERR(smbcli_unix_chown(cli->tree, src, uid, gid))) {
2015                 d_printf("%s chown file %s uid=%d, gid=%d\n",
2016                         smbcli_errstr(cli->tree), src, (int)uid, (int)gid);
2017                 return 1;
2018         }
2019
2020         return 0;
2021 }
2022
2023 /****************************************************************************
2024 rename some files
2025 ****************************************************************************/
2026 static int cmd_rename(const char **cmd_ptr)
2027 {
2028         pstring src,dest;
2029         fstring buf,buf2;
2030
2031         pstrcpy(src,cur_dir);
2032         pstrcpy(dest,cur_dir);
2033
2034         if (!next_token(cmd_ptr,buf,NULL,sizeof(buf)) ||
2035             !next_token(cmd_ptr,buf2,NULL, sizeof(buf2))) {
2036                 d_printf("rename <src> <dest>\n");
2037                 return 1;
2038         }
2039
2040         pstrcat(src,buf);
2041         pstrcat(dest,buf2);
2042
2043         if (NT_STATUS_IS_ERR(smbcli_rename(cli->tree, src, dest))) {
2044                 d_printf("%s renaming files\n",smbcli_errstr(cli->tree));
2045                 return 1;
2046         }
2047
2048         return 0;
2049 }
2050
2051
2052 /****************************************************************************
2053 toggle the prompt flag
2054 ****************************************************************************/
2055 static int cmd_prompt(const char **cmd_ptr)
2056 {
2057         prompt = !prompt;
2058         DEBUG(2,("prompting is now %s\n",prompt?"on":"off"));
2059
2060         return 1;
2061 }
2062
2063
2064 /****************************************************************************
2065 set the newer than time
2066 ****************************************************************************/
2067 static int cmd_newer(const char **cmd_ptr)
2068 {
2069         fstring buf;
2070         BOOL ok;
2071         struct stat sbuf;
2072
2073         ok = next_token(cmd_ptr,buf,NULL,sizeof(buf));
2074         if (ok && (stat(buf,&sbuf) == 0)) {
2075                 newer_than = sbuf.st_mtime;
2076                 DEBUG(1,("Getting files newer than %s",
2077                          asctime(localtime(&newer_than))));
2078         } else {
2079                 newer_than = 0;
2080         }
2081
2082         if (ok && newer_than == 0) {
2083                 d_printf("Error setting newer-than time\n");
2084                 return 1;
2085         }
2086
2087         return 0;
2088 }
2089
2090 /****************************************************************************
2091 set the archive level
2092 ****************************************************************************/
2093 static int cmd_archive(const char **cmd_ptr)
2094 {
2095         fstring buf;
2096
2097         if (next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
2098                 archive_level = atoi(buf);
2099         } else
2100                 d_printf("Archive level is %d\n",archive_level);
2101
2102         return 0;
2103 }
2104
2105 /****************************************************************************
2106 toggle the lowercaseflag
2107 ****************************************************************************/
2108 static int cmd_lowercase(const char **cmd_ptr)
2109 {
2110         lowercase = !lowercase;
2111         DEBUG(2,("filename lowercasing is now %s\n",lowercase?"on":"off"));
2112
2113         return 0;
2114 }
2115
2116
2117
2118
2119 /****************************************************************************
2120 toggle the recurse flag
2121 ****************************************************************************/
2122 static int cmd_recurse(const char **cmd_ptr)
2123 {
2124         recurse = !recurse;
2125         DEBUG(2,("directory recursion is now %s\n",recurse?"on":"off"));
2126
2127         return 0;
2128 }
2129
2130 /****************************************************************************
2131 toggle the translate flag
2132 ****************************************************************************/
2133 static int cmd_translate(const char **cmd_ptr)
2134 {
2135         translation = !translation;
2136         DEBUG(2,("CR/LF<->LF and print text translation now %s\n",
2137                  translation?"on":"off"));
2138
2139         return 0;
2140 }
2141
2142
2143 /****************************************************************************
2144 do a printmode command
2145 ****************************************************************************/
2146 static int cmd_printmode(const char **cmd_ptr)
2147 {
2148         fstring buf;
2149         fstring mode;
2150
2151         if (next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
2152                 if (strequal(buf,"text")) {
2153                         printmode = 0;
2154                 } else {
2155                         if (strequal(buf,"graphics"))
2156                                 printmode = 1;
2157                         else
2158                                 printmode = atoi(buf);
2159                 }
2160         }
2161
2162         switch(printmode)
2163                 {
2164                 case 0:
2165                         fstrcpy(mode,"text");
2166                         break;
2167                 case 1:
2168                         fstrcpy(mode,"graphics");
2169                         break;
2170                 default:
2171                         slprintf(mode,sizeof(mode)-1,"%d",printmode);
2172                         break;
2173                 }
2174
2175         DEBUG(2,("the printmode is now %s\n",mode));
2176
2177         return 0;
2178 }
2179
2180 /****************************************************************************
2181  do the lcd command
2182  ****************************************************************************/
2183 static int cmd_lcd(const char **cmd_ptr)
2184 {
2185         fstring buf;
2186         pstring d;
2187
2188         if (next_token(cmd_ptr,buf,NULL,sizeof(buf)))
2189                 chdir(buf);
2190         DEBUG(2,("the local directory is now %s\n",sys_getwd(d)));
2191
2192         return 0;
2193 }
2194
2195 /****************************************************************************
2196  get a file restarting at end of local file
2197  ****************************************************************************/
2198 static int cmd_reget(const char **cmd_ptr)
2199 {
2200         pstring local_name;
2201         pstring remote_name;
2202         char *p;
2203
2204         pstrcpy(remote_name, cur_dir);
2205         pstrcat(remote_name, "\\");
2206
2207         p = remote_name + strlen(remote_name);
2208
2209         if (!next_token(cmd_ptr, p, NULL, sizeof(remote_name) - strlen(remote_name))) {
2210                 d_printf("reget <filename>\n");
2211                 return 1;
2212         }
2213         pstrcpy(local_name, p);
2214         dos_clean_name(remote_name);
2215
2216         next_token(cmd_ptr, local_name, NULL, sizeof(local_name));
2217
2218         return do_get(remote_name, local_name, True);
2219 }
2220
2221 /****************************************************************************
2222  put a file restarting at end of local file
2223  ****************************************************************************/
2224 static int cmd_reput(const char **cmd_ptr)
2225 {
2226         pstring local_name;
2227         pstring remote_name;
2228         fstring buf;
2229         char *p = buf;
2230         struct stat st;
2231
2232         pstrcpy(remote_name, cur_dir);
2233         pstrcat(remote_name, "\\");
2234
2235         if (!next_token(cmd_ptr, p, NULL, sizeof(buf))) {
2236                 d_printf("reput <filename>\n");
2237                 return 1;
2238         }
2239         pstrcpy(local_name, p);
2240
2241         if (!file_exist(local_name, &st)) {
2242                 d_printf("%s does not exist\n", local_name);
2243                 return 1;
2244         }
2245
2246         if (next_token(cmd_ptr, p, NULL, sizeof(buf)))
2247                 pstrcat(remote_name, p);
2248         else
2249                 pstrcat(remote_name, local_name);
2250
2251         dos_clean_name(remote_name);
2252
2253         return do_put(remote_name, local_name, True);
2254 }
2255
2256
2257 /*
2258   return a string representing a share type
2259 */
2260 static const char *share_type_str(uint32_t type)
2261 {
2262         switch (type & 0xF) {
2263         case STYPE_DISKTREE:
2264                 return "Disk";
2265         case STYPE_PRINTQ:
2266                 return "Printer";
2267         case STYPE_DEVICE:
2268                 return "Device";
2269         case STYPE_IPC:
2270                 return "IPC";
2271         default:
2272                 return "Unknown";
2273         }
2274 }
2275
2276
2277 /*
2278   display a list of shares from a level 1 share enum
2279 */
2280 static void display_share_result(struct srvsvc_NetShareCtr1 *ctr1)
2281 {
2282         int i;
2283
2284         for (i=0;i<ctr1->count;i++) {
2285                 struct srvsvc_NetShareInfo1 *info = ctr1->array+i;
2286
2287                 printf("\t%-15s %-10.10s %s\n",
2288                        info->name,
2289                        share_type_str(info->type),
2290                        info->comment);
2291         }
2292 }
2293
2294
2295
2296 /****************************************************************************
2297 try and browse available shares on a host
2298 ****************************************************************************/
2299 static BOOL browse_host(const char *query_host)
2300 {
2301         struct dcerpc_pipe *p;
2302         char *binding;
2303         NTSTATUS status;
2304         struct srvsvc_NetShareEnumAll r;
2305         uint32_t resume_handle = 0;
2306         TALLOC_CTX *mem_ctx = talloc_init("browse_host");
2307         struct srvsvc_NetShareCtr1 ctr1;
2308
2309         binding = talloc_asprintf(mem_ctx, "ncacn_np:%s", query_host);
2310
2311         status = dcerpc_pipe_connect(&p, binding,
2312                                      DCERPC_SRVSVC_UUID,
2313                                      DCERPC_SRVSVC_VERSION,
2314                                      domain,
2315                                      username, password);
2316         if (!NT_STATUS_IS_OK(status)) {
2317                 d_printf("Failed to connect to %s - %s\n",
2318                          binding, nt_errstr(status));
2319                 talloc_destroy(mem_ctx);
2320                 return False;
2321         }
2322         talloc_steal(mem_ctx, p);
2323
2324         r.in.server_unc = talloc_asprintf(mem_ctx,"\\\\%s",dcerpc_server_name(p));
2325         r.in.level = 1;
2326         r.in.ctr.ctr1 = &ctr1;
2327         r.in.max_buffer = ~0;
2328         r.in.resume_handle = &resume_handle;
2329
2330         d_printf("\n\tSharename       Type       Comment\n");
2331         d_printf("\t---------       ----       -------\n");
2332
2333         do {
2334                 ZERO_STRUCT(ctr1);
2335                 status = dcerpc_srvsvc_NetShareEnumAll(p, mem_ctx, &r);
2336
2337                 if (NT_STATUS_IS_OK(status) &&
2338                     (W_ERROR_EQUAL(r.out.result, WERR_MORE_DATA) ||
2339                      W_ERROR_IS_OK(r.out.result)) &&
2340                     r.out.ctr.ctr1) {
2341                         display_share_result(r.out.ctr.ctr1);
2342                         resume_handle += r.out.ctr.ctr1->count;
2343                 }
2344         } while (NT_STATUS_IS_OK(status) && W_ERROR_EQUAL(r.out.result, WERR_MORE_DATA));
2345
2346         talloc_destroy(mem_ctx);
2347
2348         if (!NT_STATUS_IS_OK(status) || !W_ERROR_IS_OK(r.out.result)) {
2349                 d_printf("Failed NetShareEnumAll %s - %s/%s\n",
2350                          binding, nt_errstr(status), win_errstr(r.out.result));
2351                 return False;
2352         }
2353
2354         return False;
2355 }
2356
2357 /****************************************************************************
2358 try and browse available connections on a host
2359 ****************************************************************************/
2360 static BOOL list_servers(const char *wk_grp)
2361 {
2362         d_printf("REWRITE: list servers not implemented\n");
2363         return False;
2364 }
2365
2366 /* Some constants for completing filename arguments */
2367
2368 #define COMPL_NONE        0          /* No completions */
2369 #define COMPL_REMOTE      1          /* Complete remote filename */
2370 #define COMPL_LOCAL       2          /* Complete local filename */
2371
2372 /* This defines the commands supported by this client.
2373  * NOTE: The "!" must be the last one in the list because it's fn pointer
2374  *       field is NULL, and NULL in that field is used in process_tok()
2375  *       (below) to indicate the end of the list.  crh
2376  */
2377 static struct
2378 {
2379   const char *name;
2380   int (*fn)(const char **cmd_ptr);
2381   const char *description;
2382   char compl_args[2];      /* Completion argument info */
2383 } commands[] =
2384 {
2385   {"?",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
2386   {"altname",cmd_altname,"<file> show alt name",{COMPL_NONE,COMPL_NONE}},
2387   {"acl",cmd_acl,"<file> show file ACL",{COMPL_NONE,COMPL_NONE}},
2388   {"allinfo",cmd_allinfo,"<file> show all possible info about a file",{COMPL_NONE,COMPL_NONE}},
2389   {"archive",cmd_archive,"<level>\n0=ignore archive bit\n1=only get archive files\n2=only get archive files and reset archive bit\n3=get all files and reset archive bit",{COMPL_NONE,COMPL_NONE}},
2390   {"cancel",cmd_cancel,"<jobid> cancel a print queue entry",{COMPL_NONE,COMPL_NONE}},
2391   {"cd",cmd_cd,"[directory] change/report the remote directory",{COMPL_REMOTE,COMPL_NONE}},
2392   {"chmod",cmd_chmod,"<src> <mode> chmod a file using UNIX permission",{COMPL_REMOTE,COMPL_REMOTE}},
2393   {"chown",cmd_chown,"<src> <uid> <gid> chown a file using UNIX uids and gids",{COMPL_REMOTE,COMPL_REMOTE}},
2394   {"del",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
2395   {"deltree",cmd_deltree,"<dir> delete a whole directory tree",{COMPL_REMOTE,COMPL_NONE}},
2396   {"dir",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
2397   {"du",cmd_du,"<mask> computes the total size of the current directory",{COMPL_REMOTE,COMPL_NONE}},
2398   {"exit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
2399   {"get",cmd_get,"<remote name> [local name] get a file",{COMPL_REMOTE,COMPL_LOCAL}},
2400   {"help",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
2401   {"history",cmd_history,"displays the command history",{COMPL_NONE,COMPL_NONE}},
2402   {"lcd",cmd_lcd,"[directory] change/report the local current working directory",{COMPL_LOCAL,COMPL_NONE}},
2403   {"link",cmd_link,"<src> <dest> create a UNIX hard link",{COMPL_REMOTE,COMPL_REMOTE}},
2404   {"lowercase",cmd_lowercase,"toggle lowercasing of filenames for get",{COMPL_NONE,COMPL_NONE}},
2405   {"ls",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
2406   {"mask",cmd_select,"<mask> mask all filenames against this",{COMPL_REMOTE,COMPL_NONE}},
2407   {"md",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
2408   {"mget",cmd_mget,"<mask> get all the matching files",{COMPL_REMOTE,COMPL_NONE}},
2409   {"mkdir",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
2410   {"more",cmd_more,"<remote name> view a remote file with your pager",{COMPL_REMOTE,COMPL_NONE}},
2411   {"mput",cmd_mput,"<mask> put all matching files",{COMPL_REMOTE,COMPL_NONE}},
2412   {"newer",cmd_newer,"<file> only mget files newer than the specified local file",{COMPL_LOCAL,COMPL_NONE}},
2413   {"open",cmd_open,"<mask> open a file",{COMPL_REMOTE,COMPL_NONE}},
2414   {"print",cmd_print,"<file name> print a file",{COMPL_NONE,COMPL_NONE}},
2415   {"printmode",cmd_printmode,"<graphics or text> set the print mode",{COMPL_NONE,COMPL_NONE}},
2416   {"prompt",cmd_prompt,"toggle prompting for filenames for mget and mput",{COMPL_NONE,COMPL_NONE}},
2417   {"put",cmd_put,"<local name> [remote name] put a file",{COMPL_LOCAL,COMPL_REMOTE}},
2418   {"pwd",cmd_pwd,"show current remote directory (same as 'cd' with no args)",{COMPL_NONE,COMPL_NONE}},
2419   {"q",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
2420   {"queue",cmd_queue,"show the print queue",{COMPL_NONE,COMPL_NONE}},
2421   {"quit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
2422   {"rd",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
2423   {"recurse",cmd_recurse,"toggle directory recursion for mget and mput",{COMPL_NONE,COMPL_NONE}},
2424   {"reget",cmd_reget,"<remote name> [local name] get a file restarting at end of local file",{COMPL_REMOTE,COMPL_LOCAL}},
2425   {"rename",cmd_rename,"<src> <dest> rename some files",{COMPL_REMOTE,COMPL_REMOTE}},
2426   {"reput",cmd_reput,"<local name> [remote name] put a file restarting at end of remote file",{COMPL_LOCAL,COMPL_REMOTE}},
2427   {"rm",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
2428   {"rmdir",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
2429   {"symlink",cmd_symlink,"<src> <dest> create a UNIX symlink",{COMPL_REMOTE,COMPL_REMOTE}},
2430   {"translate",cmd_translate,"toggle text translation for printing",{COMPL_NONE,COMPL_NONE}},
2431
2432   /* Yes, this must be here, see crh's comment above. */
2433   {"!",NULL,"run a shell command on the local system",{COMPL_NONE,COMPL_NONE}},
2434   {NULL,NULL,NULL,{COMPL_NONE,COMPL_NONE}}
2435 };
2436
2437
2438 /*******************************************************************
2439   lookup a command string in the list of commands, including
2440   abbreviations
2441   ******************************************************************/
2442 static int process_tok(fstring tok)
2443 {
2444         int i = 0, matches = 0;
2445         int cmd=0;
2446         int tok_len = strlen(tok);
2447
2448         while (commands[i].fn != NULL) {
2449                 if (strequal(commands[i].name,tok)) {
2450                         matches = 1;
2451                         cmd = i;
2452                         break;
2453                 } else if (strncasecmp(commands[i].name, tok, tok_len) == 0) {
2454                         matches++;
2455                         cmd = i;
2456                 }
2457                 i++;
2458         }
2459
2460         if (matches == 0)
2461                 return(-1);
2462         else if (matches == 1)
2463                 return(cmd);
2464         else
2465                 return(-2);
2466 }
2467
2468 /****************************************************************************
2469 help
2470 ****************************************************************************/
2471 static int cmd_help(const char **cmd_ptr)
2472 {
2473         int i=0,j;
2474         fstring buf;
2475
2476         if (next_token(cmd_ptr,buf,NULL,sizeof(buf))) {
2477                 if ((i = process_tok(buf)) >= 0)
2478                         d_printf("HELP %s:\n\t%s\n\n",commands[i].name,commands[i].description);
2479         } else {
2480                 while (commands[i].description) {
2481                         for (j=0; commands[i].description && (j<5); j++) {
2482                                 d_printf("%-15s",commands[i].name);
2483                                 i++;
2484                         }
2485                         d_printf("\n");
2486                 }
2487         }
2488         return 0;
2489 }
2490
2491 /****************************************************************************
2492 process a -c command string
2493 ****************************************************************************/
2494 static int process_command_string(char *cmd)
2495 {
2496         pstring line;
2497         const char *ptr;
2498         int rc = 0;
2499
2500         /* establish the connection if not already */
2501
2502         if (!cli) {
2503                 cli = do_connect(desthost, service);
2504                 if (!cli)
2505                         return 0;
2506         }
2507
2508         while (cmd[0] != '\0')    {
2509                 char *p;
2510                 fstring tok;
2511                 int i;
2512
2513                 if ((p = strchr_m(cmd, ';')) == 0) {
2514                         strncpy(line, cmd, 999);
2515                         line[1000] = '\0';
2516                         cmd += strlen(cmd);
2517                 } else {
2518                         if (p - cmd > 999) p = cmd + 999;
2519                         strncpy(line, cmd, p - cmd);
2520                         line[p - cmd] = '\0';
2521                         cmd = p + 1;
2522                 }
2523
2524                 /* and get the first part of the command */
2525                 ptr = line;
2526                 if (!next_token(&ptr,tok,NULL,sizeof(tok))) continue;
2527
2528                 if ((i = process_tok(tok)) >= 0) {
2529                         rc = commands[i].fn(&ptr);
2530                 } else if (i == -2) {
2531                         d_printf("%s: command abbreviation ambiguous\n",tok);
2532                 } else {
2533                         d_printf("%s: command not found\n",tok);
2534                 }
2535         }
2536
2537         return rc;
2538 }
2539
2540 #define MAX_COMPLETIONS 100
2541
2542 typedef struct {
2543         pstring dirmask;
2544         char **matches;
2545         int count, samelen;
2546         const char *text;
2547         int len;
2548 } completion_remote_t;
2549
2550 static void completion_remote_filter(struct clilist_file_info *f, const char *mask, void *state)
2551 {
2552         completion_remote_t *info = (completion_remote_t *)state;
2553
2554         if ((info->count < MAX_COMPLETIONS - 1) && (strncmp(info->text, f->name, info->len) == 0) && (strcmp(f->name, ".") != 0) && (strcmp(f->name, "..") != 0)) {
2555                 if ((info->dirmask[0] == 0) && !(f->attrib & FILE_ATTRIBUTE_DIRECTORY))
2556                         info->matches[info->count] = strdup(f->name);
2557                 else {
2558                         pstring tmp;
2559
2560                         if (info->dirmask[0] != 0)
2561                                 pstrcpy(tmp, info->dirmask);
2562                         else
2563                                 tmp[0] = 0;
2564                         pstrcat(tmp, f->name);
2565                         if (f->attrib & FILE_ATTRIBUTE_DIRECTORY)
2566                                 pstrcat(tmp, "/");
2567                         info->matches[info->count] = strdup(tmp);
2568                 }
2569                 if (info->matches[info->count] == NULL)
2570                         return;
2571                 if (f->attrib & FILE_ATTRIBUTE_DIRECTORY)
2572                         smb_readline_ca_char(0);
2573
2574                 if (info->count == 1)
2575                         info->samelen = strlen(info->matches[info->count]);
2576                 else
2577                         while (strncmp(info->matches[info->count], info->matches[info->count-1], info->samelen) != 0)
2578                                 info->samelen--;
2579                 info->count++;
2580         }
2581 }
2582
2583 static char **remote_completion(const char *text, int len)
2584 {
2585         pstring dirmask;
2586         int i;
2587         completion_remote_t info = { "", NULL, 1, 0, NULL, 0 };
2588
2589         info.samelen = len;
2590         info.text = text;
2591         info.len = len;
2592
2593         if (len >= PATH_MAX)
2594                 return(NULL);
2595
2596         info.matches = (char **)malloc(sizeof(info.matches[0])*MAX_COMPLETIONS);
2597         if (!info.matches) return NULL;
2598         info.matches[0] = NULL;
2599
2600         for (i = len-1; i >= 0; i--)
2601                 if ((text[i] == '/') || (text[i] == '\\'))
2602                         break;
2603         info.text = text+i+1;
2604         info.samelen = info.len = len-i-1;
2605
2606         if (i > 0) {
2607                 strncpy(info.dirmask, text, i+1);
2608                 info.dirmask[i+1] = 0;
2609                 snprintf(dirmask, sizeof(dirmask), "%s%*s*", cur_dir, i-1, text);
2610         } else
2611                 snprintf(dirmask, sizeof(dirmask), "%s*", cur_dir);
2612
2613         if (smbcli_list(cli->tree, dirmask,
2614                      FILE_ATTRIBUTE_DIRECTORY | FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN,
2615                      completion_remote_filter, &info) < 0)
2616                 goto cleanup;
2617
2618         if (info.count == 2)
2619                 info.matches[0] = strdup(info.matches[1]);
2620         else {
2621                 info.matches[0] = malloc(info.samelen+1);
2622                 if (!info.matches[0])
2623                         goto cleanup;
2624                 strncpy(info.matches[0], info.matches[1], info.samelen);
2625                 info.matches[0][info.samelen] = 0;
2626         }
2627         info.matches[info.count] = NULL;
2628         return info.matches;
2629
2630 cleanup:
2631         for (i = 0; i < info.count; i++)
2632                 free(info.matches[i]);
2633         free(info.matches);
2634         return NULL;
2635 }
2636
2637 static char **completion_fn(const char *text, int start, int end)
2638 {
2639         smb_readline_ca_char(' ');
2640
2641         if (start) {
2642                 const char *buf, *sp;
2643                 int i;
2644                 char compl_type;
2645
2646                 buf = smb_readline_get_line_buffer();
2647                 if (buf == NULL)
2648                         return NULL;
2649
2650                 sp = strchr(buf, ' ');
2651                 if (sp == NULL)
2652                         return NULL;
2653
2654                 for (i = 0; commands[i].name; i++)
2655                         if ((strncmp(commands[i].name, text, sp - buf) == 0) && (commands[i].name[sp - buf] == 0))
2656                                 break;
2657                 if (commands[i].name == NULL)
2658                         return NULL;
2659
2660                 while (*sp == ' ')
2661                         sp++;
2662
2663                 if (sp == (buf + start))
2664                         compl_type = commands[i].compl_args[0];
2665                 else
2666                         compl_type = commands[i].compl_args[1];
2667
2668                 if (compl_type == COMPL_REMOTE)
2669                         return remote_completion(text, end - start);
2670                 else /* fall back to local filename completion */
2671                         return NULL;
2672         } else {
2673                 char **matches;
2674                 int i, len, samelen = 0, count=1;
2675
2676                 matches = (char **)malloc(sizeof(matches[0])*MAX_COMPLETIONS);
2677                 if (!matches) return NULL;
2678                 matches[0] = NULL;
2679
2680                 len = strlen(text);
2681                 for (i=0;commands[i].fn && count < MAX_COMPLETIONS-1;i++) {
2682                         if (strncmp(text, commands[i].name, len) == 0) {
2683                                 matches[count] = strdup(commands[i].name);
2684                                 if (!matches[count])
2685                                         goto cleanup;
2686                                 if (count == 1)
2687                                         samelen = strlen(matches[count]);
2688                                 else
2689                                         while (strncmp(matches[count], matches[count-1], samelen) != 0)
2690                                                 samelen--;
2691                                 count++;
2692                         }
2693                 }
2694
2695                 switch (count) {
2696                 case 0: /* should never happen */
2697                 case 1:
2698                         goto cleanup;
2699                 case 2:
2700                         matches[0] = strdup(matches[1]);
2701                         break;
2702                 default:
2703                         matches[0] = malloc(samelen+1);
2704                         if (!matches[0])
2705                                 goto cleanup;
2706                         strncpy(matches[0], matches[1], samelen);
2707                         matches[0][samelen] = 0;
2708                 }
2709                 matches[count] = NULL;
2710                 return matches;
2711
2712 cleanup:
2713                 while (i >= 0) {
2714                         free(matches[i]);
2715                         i--;
2716                 }
2717                 free(matches);
2718                 return NULL;
2719         }
2720 }
2721
2722 /****************************************************************************
2723 make sure we swallow keepalives during idle time
2724 ****************************************************************************/
2725 static void readline_callback(void)
2726 {
2727         static time_t last_t;
2728         time_t t;
2729
2730         t = time(NULL);
2731
2732         if (t - last_t < 5) return;
2733
2734         last_t = t;
2735
2736         smbcli_transport_process(cli->transport);
2737
2738         if (cli->tree) {
2739                 smbcli_chkpath(cli->tree, "\\");
2740         }
2741 }
2742
2743
2744 /****************************************************************************
2745 process commands on stdin
2746 ****************************************************************************/
2747 static void process_stdin(void)
2748 {
2749         while (1) {
2750                 fstring tok;
2751                 fstring the_prompt;
2752                 char *cline;
2753                 pstring line;
2754                 const char *ptr;
2755                 int i;
2756
2757                 /* display a prompt */
2758                 slprintf(the_prompt, sizeof(the_prompt)-1, "smb: %s> ", cur_dir);
2759                 cline = smb_readline(the_prompt, readline_callback, completion_fn);
2760
2761                 if (!cline) break;
2762
2763                 pstrcpy(line, cline);
2764
2765                 /* special case - first char is ! */
2766                 if (*line == '!') {
2767                         system(line + 1);
2768                         continue;
2769                 }
2770
2771                 /* and get the first part of the command */
2772                 ptr = line;
2773                 if (!next_token(&ptr,tok,NULL,sizeof(tok))) continue;
2774
2775                 if ((i = process_tok(tok)) >= 0) {
2776                         commands[i].fn(&ptr);
2777                 } else if (i == -2) {
2778                         d_printf("%s: command abbreviation ambiguous\n",tok);
2779                 } else {
2780                         d_printf("%s: command not found\n",tok);
2781                 }
2782         }
2783 }
2784
2785
2786 /*****************************************************
2787 return a connection to a server
2788 *******************************************************/
2789 static struct smbcli_state *do_connect(const char *server, const char *share)
2790 {
2791         struct smbcli_state *c;
2792         struct nmb_name called, calling;
2793         const char *server_n;
2794         fstring servicename;
2795         char *sharename;
2796         NTSTATUS status;
2797
2798         /* make a copy so we don't modify the global string 'service' */
2799         fstrcpy(servicename, share);
2800         sharename = servicename;
2801         if (*sharename == '\\') {
2802                 server = sharename+2;
2803                 sharename = strchr_m(server,'\\');
2804                 if (!sharename) return NULL;
2805                 *sharename = 0;
2806                 sharename++;
2807         }
2808
2809         asprintf(&sharename, "\\\\%s\\%s", server, sharename);
2810
2811         server_n = dest_ip?dest_ip:server;
2812
2813         make_nmb_name(&calling, lp_netbios_name(), 0x0);
2814         choose_called_name(&called, server, name_type);
2815
2816  again:
2817         /* have to open a new connection */
2818         if (!(c=smbcli_state_init(NULL)) || !smbcli_socket_connect(c, server_n)) {
2819                 d_printf("Connection to %s failed\n", server_n);
2820                 return NULL;
2821         }
2822
2823         if (!smbcli_transport_establish(c, &calling, &called)) {
2824                 char *p;
2825                 d_printf("session request to %s failed\n",
2826                          called.name);
2827                 smbcli_shutdown(c);
2828                 if ((p=strchr_m(called.name, '.'))) {
2829                         *p = 0;
2830                         goto again;
2831                 }
2832                 if (strcmp(called.name, "*SMBSERVER")) {
2833                         make_nmb_name(&called , "*SMBSERVER", 0x20);
2834                         goto again;
2835                 }
2836                 return NULL;
2837         }
2838
2839         DEBUG(4,(" session request ok\n"));
2840
2841         if (NT_STATUS_IS_ERR(smbcli_negprot(c))) {
2842                 d_printf("protocol negotiation failed\n");
2843                 smbcli_shutdown(c);
2844                 return NULL;
2845         }
2846
2847         status = smbcli_session_setup(c, username, password, domain);
2848         if (NT_STATUS_IS_ERR(status)) {
2849                 d_printf("authenticated session setup failed: %s\n", nt_errstr(status));
2850                 /* if a password was not supplied then try again with a null username */
2851                 if (password[0] || !username[0]) {
2852                         status = smbcli_session_setup(c, "", "", lp_workgroup());
2853                 }
2854                 if (NT_STATUS_IS_ERR(status)) {
2855                         d_printf("session setup failed: %s\n", nt_errstr(status));
2856                         smbcli_shutdown(c);
2857                         return NULL;
2858                 }
2859                 d_printf("Anonymous login successful\n");
2860         }
2861
2862         DEBUG(4,(" session setup ok\n"));
2863
2864         if (NT_STATUS_IS_ERR(smbcli_send_tconX(c, sharename, "?????", password))) {
2865                 d_printf("tree connect failed: %s\n", smbcli_errstr(c->tree));
2866                 smbcli_shutdown(c);
2867                 return NULL;
2868         }
2869
2870         DEBUG(4,(" tconx ok\n"));
2871
2872         return c;
2873 }
2874
2875
2876 /****************************************************************************
2877   process commands from the client
2878 ****************************************************************************/
2879 static int process(char *base_directory)
2880 {
2881         int rc = 0;
2882
2883         cli = do_connect(desthost, service);
2884         if (!cli) {
2885                 return 1;
2886         }
2887
2888         if (*base_directory) do_cd(base_directory);
2889
2890         if (cmdstr) {
2891                 rc = process_command_string(cmdstr);
2892         } else {
2893                 process_stdin();
2894         }
2895
2896         smbcli_shutdown(cli);
2897         return rc;
2898 }
2899
2900 /****************************************************************************
2901 handle a -L query
2902 ****************************************************************************/
2903 static int do_host_query(char *query_host)
2904 {
2905         browse_host(query_host);
2906         list_servers(lp_workgroup());
2907         return(0);
2908 }
2909
2910
2911 /****************************************************************************
2912 handle a message operation
2913 ****************************************************************************/
2914 static int do_message_op(void)
2915 {
2916         struct nmb_name called, calling;
2917         const char *server_name;
2918
2919         make_nmb_name(&calling, lp_netbios_name(), 0x0);
2920         choose_called_name(&called, desthost, name_type);
2921
2922         server_name = dest_ip ? dest_ip : desthost;
2923
2924         if (!(cli=smbcli_state_init(NULL)) || !smbcli_socket_connect(cli, server_name)) {
2925                 d_printf("Connection to %s failed\n", server_name);
2926                 return 1;
2927         }
2928
2929         if (!smbcli_transport_establish(cli, &calling, &called)) {
2930                 d_printf("session request failed\n");
2931                 smbcli_shutdown(cli);
2932                 return 1;
2933         }
2934
2935         send_message();
2936         smbcli_shutdown(cli);
2937
2938         return 0;
2939 }
2940
2941
2942 /**
2943  * Process "-L hostname" option.
2944  *
2945  * We don't actually do anything yet -- we just stash the name in a
2946  * global variable and do the query when all options have been read.
2947  **/
2948 static void remember_query_host(const char *arg,
2949                                 pstring query_host)
2950 {
2951         char *slash;
2952
2953         while (*arg == '\\' || *arg == '/')
2954                 arg++;
2955         pstrcpy(query_host, arg);
2956         if ((slash = strchr(query_host, '/'))
2957             || (slash = strchr(query_host, '\\'))) {
2958                 *slash = 0;
2959         }
2960 }
2961
2962
2963 /****************************************************************************
2964   main program
2965 ****************************************************************************/
2966  int main(int argc,char *argv[])
2967 {
2968         fstring base_directory;
2969         int opt;
2970         pstring query_host;
2971         BOOL message = False;
2972         pstring term_code;
2973         poptContext pc;
2974         char *p;
2975         int rc = 0;
2976         TALLOC_CTX *mem_ctx;
2977         struct poptOption long_options[] = {
2978                 POPT_AUTOHELP
2979
2980                 { "message", 'M', POPT_ARG_STRING, NULL, 'M', "Send message", "HOST" },
2981                 { "ip-address", 'I', POPT_ARG_STRING, NULL, 'I', "Use this IP to connect to", "IP" },
2982                 { "stderr", 'E', POPT_ARG_NONE, NULL, 'E', "Write messages to stderr instead of stdout" },
2983                 { "list", 'L', POPT_ARG_STRING, NULL, 'L', "Get a list of shares available on a host", "HOST" },
2984                 { "terminal", 't', POPT_ARG_STRING, NULL, 't', "Terminal I/O code {sjis|euc|jis7|jis8|junet|hex}", "CODE" },
2985                 { "directory", 'D', POPT_ARG_STRING, NULL, 'D', "Start from directory", "DIR" },
2986                 { "command", 'c', POPT_ARG_STRING, &cmdstr, 'c', "Execute semicolon separated commands" },
2987                 { "send-buffer", 'b', POPT_ARG_INT, NULL, 'b', "Changes the transmit/send buffer", "BYTES" },
2988                 { "port", 'p', POPT_ARG_INT, &port, 'p', "Port to connect to", "PORT" },
2989                 POPT_COMMON_SAMBA
2990                 POPT_COMMON_CONNECTION
2991                 POPT_COMMON_CREDENTIALS
2992                 POPT_COMMON_VERSION
2993                 POPT_TABLEEND
2994         };
2995
2996 #ifdef KANJI
2997         pstrcpy(term_code, KANJI);
2998 #else /* KANJI */
2999         *term_code = 0;
3000 #endif /* KANJI */
3001
3002         *query_host = 0;
3003         *base_directory = 0;
3004
3005         setup_logging(argv[0],DEBUG_STDOUT);
3006         mem_ctx = talloc_init("client.c/main");
3007         if (!mem_ctx) {
3008                 d_printf("\nclient.c: Not enough memory\n");
3009                 exit(1);
3010         }
3011
3012         if (!lp_load(dyn_CONFIGFILE,True,False,False)) {
3013                 fprintf(stderr, "%s: Can't load %s - run testparm to debug it\n",
3014                         argv[0], dyn_CONFIGFILE);
3015         }
3016
3017         pc = poptGetContext("smbclient", argc, (const char **) argv, long_options, 0);
3018         poptSetOtherOptionHelp(pc, "[OPTIONS] service <password>");
3019
3020         in_client = True;   /* Make sure that we tell lp_load we are */
3021
3022         while ((opt = poptGetNextOpt(pc)) != -1) {
3023                 switch (opt) {
3024                 case 'M':
3025                         /* Messages are sent to NetBIOS name type 0x3
3026                          * (Messenger Service).  Make sure we default
3027                          * to port 139 instead of port 445. srl,crh
3028                          */
3029                         name_type = 0x03;
3030                         pstrcpy(desthost,poptGetOptArg(pc));
3031                         if( 0 == port ) port = 139;
3032                         message = True;
3033                         break;
3034                 case 'I':
3035                         dest_ip = poptGetOptArg(pc);
3036                         break;
3037                 case 'E':
3038                         setup_logging("client", DEBUG_STDERR);
3039                         break;
3040
3041                 case 'L':
3042                         remember_query_host(poptGetOptArg(pc), query_host);
3043                         break;
3044                 case 't':
3045                         pstrcpy(term_code, poptGetOptArg(pc));
3046                         break;
3047                 case 'D':
3048                         fstrcpy(base_directory,poptGetOptArg(pc));
3049                         break;
3050                 case 'b':
3051                         io_bufsize = MAX(1, atoi(poptGetOptArg(pc)));
3052                         break;
3053                 }
3054         }
3055
3056         load_interfaces();
3057
3058         smbclient_init_subsystems;
3059
3060         if(poptPeekArg(pc)) {
3061                 pstrcpy(service,poptGetArg(pc));
3062                 /* Convert any '/' characters in the service name to '\' characters */
3063                 string_replace(service, '/','\\');
3064
3065                 if (count_chars(service,'\\') < 3) {
3066                         d_printf("\n%s: Not enough '\\' characters in service\n",service);
3067                         poptPrintUsage(pc, stderr, 0);
3068                         exit(1);
3069                 }
3070         }
3071
3072         if (poptPeekArg(pc)) {
3073                 cmdline_set_userpassword(poptGetArg(pc));
3074         }
3075
3076         /*init_names(); */
3077
3078         if (!*query_host && !*service && !message) {
3079                 poptPrintUsage(pc, stderr, 0);
3080                 exit(1);
3081         }
3082
3083         poptFreeContext(pc);
3084
3085         pstrcpy(username, cmdline_get_username());
3086         pstrcpy(domain, cmdline_get_userdomain());
3087         pstrcpy(password, cmdline_get_userpassword());
3088
3089         DEBUG( 3, ( "Client started (version %s).\n", SAMBA_VERSION_STRING ) );
3090
3091         talloc_destroy(mem_ctx);
3092
3093         if ((p=strchr_m(query_host,'#'))) {
3094                 *p = 0;
3095                 p++;
3096                 sscanf(p, "%x", &name_type);
3097         }
3098
3099         if (*query_host) {
3100                 return do_host_query(query_host);
3101         }
3102
3103         if (message) {
3104                 return do_message_op();
3105         }
3106
3107         if (process(base_directory)) {
3108                 return 1;
3109         }
3110
3111         return rc;
3112 }