source3/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
   7    Copyright (C) Gerald (Jerry) Carter    2004
   8    Copyright (C) Jeremy Allison           1994-2007
   9
  10    This program is free software; you can redistribute it and/or modify
  11    it under the terms of the GNU General Public License as published by
  12    the Free Software Foundation; either version 3 of the License, or
  13    (at your option) any later version.
  14
  15    This program is distributed in the hope that it will be useful,
  16    but WITHOUT ANY WARRANTY; without even the implied warranty of
  17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18    GNU General Public License for more details.
  19
  20    You should have received a copy of the GNU General Public License
  21    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  22 */
  23
  24 #include "includes.h"
  25 #include "popt_common.h"
  26 #include "rpc_client/cli_pipe.h"
  27 #include "client/client_proto.h"
  28 #include "../librpc/gen_ndr/ndr_srvsvc_c.h"
  29 #include "../lib/util/select.h"
  30 #include "system/readline.h"
  31 #include "../libcli/smbreadline/smbreadline.h"
  32 #include "../libcli/security/security.h"
  33 #include "system/select.h"
  34 #include "libsmb/clirap.h"
  35
  36 #ifndef REGISTER
  37 #define REGISTER 0
  38 #endif
  39
  40 extern int do_smb_browse(void); /* mDNS browsing */
  41
  42 extern bool override_logfile;
  43 extern char tar_type;
  44
  45 static int port = 0;
  46 static char *service;
  47 static char *desthost;
  48 static char *calling_name;
  49 static bool grepable = false;
  50 static char *cmdstr = NULL;
  51 const char *cmd_ptr = NULL;
  52
  53 static int io_bufsize = 524288;
  54
  55 static int name_type = 0x20;
  56 static int max_protocol = PROTOCOL_NT1;
  57
  58 static int process_tok(char *tok);
  59 static int cmd_help(void);
  60
  61 #define CREATE_ACCESS_READ READ_CONTROL_ACCESS
  62
  63 /* 30 second timeout on most commands */
  64 #define CLIENT_TIMEOUT (30*1000)
  65 #define SHORT_TIMEOUT (5*1000)
  66
  67 /* value for unused fid field in trans2 secondary request */
  68 #define FID_UNUSED (0xFFFF)
  69
  70 time_t newer_than = 0;
  71 static int archive_level = 0;
  72
  73 static bool translation = false;
  74 static bool have_ip;
  75
  76 /* clitar bits insert */
  77 extern int blocksize;
  78 extern bool tar_inc;
  79 extern bool tar_reset;
  80 /* clitar bits end */
  81
  82 static bool prompt = true;
  83
  84 static bool recurse = false;
  85 static bool showacls = false;
  86 bool lowercase = false;
  87
  88 static struct sockaddr_storage dest_ss;
  89 static char dest_ss_str[INET6_ADDRSTRLEN];
  90
  91 #define SEPARATORS " \t\n\r"
  92
  93 static bool abort_mget = true;
  94
  95 /* timing globals */
  96 uint64_t get_total_size = 0;
  97 unsigned int get_total_time_ms = 0;
  98 static uint64_t put_total_size = 0;
  99 static unsigned int put_total_time_ms = 0;
 100
 101 /* totals globals */
 102 static double dir_total;
 103
 104 /* encrypted state. */
 105 static bool smb_encrypt;
 106
 107 /* root cli_state connection */
 108
 109 struct cli_state *cli;
 110
 111 static char CLI_DIRSEP_CHAR = '\\';
 112 static char CLI_DIRSEP_STR[] = { '\\', '\0' };
 113
 114 /* Authentication for client connections. */
 115 struct user_auth_info *auth_info;
 116
 117 /* Accessor functions for directory paths. */
 118 static char *fileselection;
 119 static const char *client_get_fileselection(void)
 120 {
 121         if (fileselection) {
 122                 return fileselection;
 123         }
 124         return "";
 125 }
 126
 127 static const char *client_set_fileselection(const char *new_fs)
 128 {
 129         SAFE_FREE(fileselection);
 130         if (new_fs) {
 131                 fileselection = SMB_STRDUP(new_fs);
 132         }
 133         return client_get_fileselection();
 134 }
 135
 136 static char *cwd;
 137 static const char *client_get_cwd(void)
 138 {
 139         if (cwd) {
 140                 return cwd;
 141         }
 142         return CLI_DIRSEP_STR;
 143 }
 144
 145 static const char *client_set_cwd(const char *new_cwd)
 146 {
 147         SAFE_FREE(cwd);
 148         if (new_cwd) {
 149                 cwd = SMB_STRDUP(new_cwd);
 150         }
 151         return client_get_cwd();
 152 }
 153
 154 static char *cur_dir;
 155 const char *client_get_cur_dir(void)
 156 {
 157         if (cur_dir) {
 158                 return cur_dir;
 159         }
 160         return CLI_DIRSEP_STR;
 161 }
 162
 163 const char *client_set_cur_dir(const char *newdir)
 164 {
 165         SAFE_FREE(cur_dir);
 166         if (newdir) {
 167                 cur_dir = SMB_STRDUP(newdir);
 168         }
 169         return client_get_cur_dir();
 170 }
 171
 172 /****************************************************************************
 173  Put up a yes/no prompt.
 174 ****************************************************************************/
 175
 176 static bool yesno(const char *p)
 177 {
 178         char ans[20];
 179         printf("%s",p);
 180
 181         if (!fgets(ans,sizeof(ans)-1,stdin))
 182                 return(False);
 183
 184         if (*ans == 'y' || *ans == 'Y')
 185                 return(True);
 186
 187         return(False);
 188 }
 189
 190 /****************************************************************************
 191  Write to a local file with CR/LF->LF translation if appropriate. Return the
 192  number taken from the buffer. This may not equal the number written.
 193 ****************************************************************************/
 194
 195 static int writefile(int f, char *b, int n)
 196 {
 197         int i;
 198
 199         if (!translation) {
 200                 return write(f,b,n);
 201         }
 202
 203         i = 0;
 204         while (i < n) {
 205                 if (*b == '\r' && (i<(n-1)) && *(b+1) == '\n') {
 206                         b++;i++;
 207                 }
 208                 if (write(f, b, 1) != 1) {
 209                         break;
 210                 }
 211                 b++;
 212                 i++;
 213         }
 214
 215         return(i);
 216 }
 217
 218 /****************************************************************************
 219  Read from a file with LF->CR/LF translation if appropriate. Return the
 220  number read. read approx n bytes.
 221 ****************************************************************************/
 222
 223 static int readfile(uint8_t *b, int n, XFILE *f)
 224 {
 225         int i;
 226         int c;
 227
 228         if (!translation)
 229                 return x_fread(b,1,n,f);
 230
 231         i = 0;
 232         while (i < (n - 1) && (i < BUFFER_SIZE)) {
 233                 if ((c = x_getc(f)) == EOF) {
 234                         break;
 235                 }
 236
 237                 if (c == '\n') { /* change all LFs to CR/LF */
 238                         b[i++] = '\r';
 239                 }
 240
 241                 b[i++] = c;
 242         }
 243
 244         return(i);
 245 }
 246
 247 struct push_state {
 248         XFILE *f;
 249         SMB_OFF_T nread;
 250 };
 251
 252 static size_t push_source(uint8_t *buf, size_t n, void *priv)
 253 {
 254         struct push_state *state = (struct push_state *)priv;
 255         int result;
 256
 257         if (x_feof(state->f)) {
 258                 return 0;
 259         }
 260
 261         result = readfile(buf, n, state->f);
 262         state->nread += result;
 263         return result;
 264 }
 265
 266 /****************************************************************************
 267  Send a message.
 268 ****************************************************************************/
 269
 270 static void send_message(const char *username)
 271 {
 272         char buf[1600];
 273         NTSTATUS status;
 274         int i;
 275
 276         d_printf("Type your message, ending it with a Control-D\n");
 277
 278         i = 0;
 279         while (i<sizeof(buf)-2) {
 280                 int c = fgetc(stdin);
 281                 if (c == EOF) {
 282                         break;
 283                 }
 284                 if (c == '\n') {
 285                         buf[i++] = '\r';
 286                 }
 287                 buf[i++] = c;
 288         }
 289         buf[i] = '\0';
 290
 291         status = cli_message(cli, desthost, username, buf);
 292         if (!NT_STATUS_IS_OK(status)) {
 293                 d_fprintf(stderr, "cli_message returned %s\n",
 294                           nt_errstr(status));
 295         }
 296 }
 297
 298 /****************************************************************************
 299  Check the space on a device.
 300 ****************************************************************************/
 301
 302 static int do_dskattr(void)
 303 {
 304         int total, bsize, avail;
 305         struct cli_state *targetcli = NULL;
 306         char *targetpath = NULL;
 307         TALLOC_CTX *ctx = talloc_tos();
 308         NTSTATUS status;
 309
 310         if ( !cli_resolve_path(ctx, "", auth_info, cli, client_get_cur_dir(), &targetcli, &targetpath)) {
 311                 d_printf("Error in dskattr: %s\n", cli_errstr(cli));
 312                 return 1;
 313         }
 314
 315         status = cli_dskattr(targetcli, &bsize, &total, &avail);
 316         if (!NT_STATUS_IS_OK(status)) {
 317                 d_printf("Error in dskattr: %s\n", nt_errstr(status));
 318                 return 1;
 319         }
 320
 321         d_printf("\n\t\t%d blocks of size %d. %d blocks available\n",
 322                  total, bsize, avail);
 323
 324         return 0;
 325 }
 326
 327 /****************************************************************************
 328  Show cd/pwd.
 329 ****************************************************************************/
 330
 331 static int cmd_pwd(void)
 332 {
 333         d_printf("Current directory is %s",service);
 334         d_printf("%s\n",client_get_cur_dir());
 335         return 0;
 336 }
 337
 338 /****************************************************************************
 339  Ensure name has correct directory separators.
 340 ****************************************************************************/
 341
 342 static void normalize_name(char *newdir)
 343 {
 344         if (!(cli->requested_posix_capabilities & CIFS_UNIX_POSIX_PATHNAMES_CAP)) {
 345                 string_replace(newdir,'/','\\');
 346         }
 347 }
 348
 349 /****************************************************************************
 350  Change directory - inner section.
 351 ****************************************************************************/
 352
 353 static int do_cd(const char *new_dir)
 354 {
 355         char *newdir = NULL;
 356         char *saved_dir = NULL;
 357         char *new_cd = NULL;
 358         char *targetpath = NULL;
 359         struct cli_state *targetcli = NULL;
 360         SMB_STRUCT_STAT sbuf;
 361         uint32 attributes;
 362         int ret = 1;
 363         TALLOC_CTX *ctx = talloc_stackframe();
 364
 365         newdir = talloc_strdup(ctx, new_dir);
 366         if (!newdir) {
 367                 TALLOC_FREE(ctx);
 368                 return 1;
 369         }
 370
 371         normalize_name(newdir);
 372
 373         /* Save the current directory in case the new directory is invalid */
 374
 375         saved_dir = talloc_strdup(ctx, client_get_cur_dir());
 376         if (!saved_dir) {
 377                 TALLOC_FREE(ctx);
 378                 return 1;
 379         }
 380
 381         if (*newdir == CLI_DIRSEP_CHAR) {
 382                 client_set_cur_dir(newdir);
 383                 new_cd = newdir;
 384         } else {
 385                 new_cd = talloc_asprintf(ctx, "%s%s",
 386                                 client_get_cur_dir(),
 387                                 newdir);
 388                 if (!new_cd) {
 389                         goto out;
 390                 }
 391         }
 392
 393         /* Ensure cur_dir ends in a DIRSEP */
 394         if ((new_cd[0] != '\0') && (*(new_cd+strlen(new_cd)-1) != CLI_DIRSEP_CHAR)) {
 395                 new_cd = talloc_asprintf_append(new_cd, "%s", CLI_DIRSEP_STR);
 396                 if (!new_cd) {
 397                         goto out;
 398                 }
 399         }
 400         client_set_cur_dir(new_cd);
 401
 402         new_cd = clean_name(ctx, new_cd);
 403         client_set_cur_dir(new_cd);
 404
 405         if ( !cli_resolve_path(ctx, "", auth_info, cli, new_cd, &targetcli, &targetpath)) {
 406                 d_printf("cd %s: %s\n", new_cd, cli_errstr(cli));
 407                 client_set_cur_dir(saved_dir);
 408                 goto out;
 409         }
 410
 411         if (strequal(targetpath,CLI_DIRSEP_STR )) {
 412                 TALLOC_FREE(ctx);
 413                 return 0;
 414         }
 415
 416         /* Use a trans2_qpathinfo to test directories for modern servers.
 417            Except Win9x doesn't support the qpathinfo_basic() call..... */
 418
 419         if (targetcli->protocol > PROTOCOL_LANMAN2 && !targetcli->win95) {
 420                 NTSTATUS status;
 421
 422                 status = cli_qpathinfo_basic(targetcli, targetpath, &sbuf,
 423                                              &attributes);
 424                 if (!NT_STATUS_IS_OK(status)) {
 425                         d_printf("cd %s: %s\n", new_cd, nt_errstr(status));
 426                         client_set_cur_dir(saved_dir);
 427                         goto out;
 428                 }
 429
 430                 if (!(attributes & FILE_ATTRIBUTE_DIRECTORY)) {
 431                         d_printf("cd %s: not a directory\n", new_cd);
 432                         client_set_cur_dir(saved_dir);
 433                         goto out;
 434                 }
 435         } else {
 436                 NTSTATUS status;
 437
 438                 targetpath = talloc_asprintf(ctx,
 439                                 "%s%s",
 440                                 targetpath,
 441                                 CLI_DIRSEP_STR );
 442                 if (!targetpath) {
 443                         client_set_cur_dir(saved_dir);
 444                         goto out;
 445                 }
 446                 targetpath = clean_name(ctx, targetpath);
 447                 if (!targetpath) {
 448                         client_set_cur_dir(saved_dir);
 449                         goto out;
 450                 }
 451
 452                 status = cli_chkpath(targetcli, targetpath);
 453                 if (!NT_STATUS_IS_OK(status)) {
 454                         d_printf("cd %s: %s\n", new_cd, nt_errstr(status));
 455                         client_set_cur_dir(saved_dir);
 456                         goto out;
 457                 }
 458         }
 459
 460         ret = 0;
 461
 462 out:
 463
 464         TALLOC_FREE(ctx);
 465         return ret;
 466 }
 467
 468 /****************************************************************************
 469  Change directory.
 470 ****************************************************************************/
 471
 472 static int cmd_cd(void)
 473 {
 474         char *buf = NULL;
 475         int rc = 0;
 476
 477         if (next_token_talloc(talloc_tos(), &cmd_ptr, &buf,NULL)) {
 478                 rc = do_cd(buf);
 479         } else {
 480                 d_printf("Current directory is %s\n",client_get_cur_dir());
 481         }
 482
 483         return rc;
 484 }
 485
 486 /****************************************************************************
 487  Change directory.
 488 ****************************************************************************/
 489
 490 static int cmd_cd_oneup(void)
 491 {
 492         return do_cd("..");
 493 }
 494
 495 /*******************************************************************
 496  Decide if a file should be operated on.
 497 ********************************************************************/
 498
 499 static bool do_this_one(struct file_info *finfo)
 500 {
 501         if (!finfo->name) {
 502                 return false;
 503         }
 504
 505         if (finfo->mode & aDIR) {
 506                 return true;
 507         }
 508
 509         if (*client_get_fileselection() &&
 510             !mask_match(finfo->name,client_get_fileselection(),false)) {
 511                 DEBUG(3,("mask_match %s failed\n", finfo->name));
 512                 return false;
 513         }
 514
 515         if (newer_than && finfo->mtime_ts.tv_sec < newer_than) {
 516                 DEBUG(3,("newer_than %s failed\n", finfo->name));
 517                 return false;
 518         }
 519
 520         if ((archive_level==1 || archive_level==2) && !(finfo->mode & aARCH)) {
 521                 DEBUG(3,("archive %s failed\n", finfo->name));
 522                 return false;
 523         }
 524
 525         return true;
 526 }
 527
 528 /****************************************************************************
 529  Display info about a file.
 530 ****************************************************************************/
 531
 532 static NTSTATUS display_finfo(struct cli_state *cli_state, struct file_info *finfo,
 533                           const char *dir)
 534 {
 535         time_t t;
 536         TALLOC_CTX *ctx = talloc_tos();
 537         NTSTATUS status = NT_STATUS_OK;
 538
 539         if (!do_this_one(finfo)) {
 540                 return NT_STATUS_OK;
 541         }
 542
 543         t = finfo->mtime_ts.tv_sec; /* the time is assumed to be passed as GMT */
 544         if (!showacls) {
 545                 d_printf("  %-30s%7.7s %8.0f  %s",
 546                          finfo->name,
 547                          attrib_string(finfo->mode),
 548                         (double)finfo->size,
 549                         time_to_asc(t));
 550                 dir_total += finfo->size;
 551         } else {
 552                 char *afname = NULL;
 553                 uint16_t fnum;
 554
 555                 /* skip if this is . or .. */
 556                 if ( strequal(finfo->name,"..") || strequal(finfo->name,".") )
 557                         return NT_STATUS_OK;
 558                 /* create absolute filename for cli_ntcreate() FIXME */
 559                 afname = talloc_asprintf(ctx,
 560                                         "%s%s%s",
 561                                         dir,
 562                                         CLI_DIRSEP_STR,
 563                                         finfo->name);
 564                 if (!afname) {
 565                         return NT_STATUS_NO_MEMORY;
 566                 }
 567                 /* print file meta date header */
 568                 d_printf( "FILENAME:%s\n", finfo->name);
 569                 d_printf( "MODE:%s\n", attrib_string(finfo->mode));
 570                 d_printf( "SIZE:%.0f\n", (double)finfo->size);
 571                 d_printf( "MTIME:%s", time_to_asc(t));
 572                 status = cli_ntcreate(cli_state, afname, 0,
 573                                       CREATE_ACCESS_READ, 0,
 574                                       FILE_SHARE_READ|FILE_SHARE_WRITE,
 575                                       FILE_OPEN, 0x0, 0x0, &fnum);
 576                 if (!NT_STATUS_IS_OK(status)) {
 577                         DEBUG( 0, ("display_finfo() Failed to open %s: %s\n",
 578                                    afname, nt_errstr(status)));
 579                 } else {
 580                         struct security_descriptor *sd = NULL;
 581                         sd = cli_query_secdesc(cli_state, fnum, ctx);
 582                         if (!sd) {
 583                                 DEBUG( 0, ("display_finfo() failed to "
 584                                         "get security descriptor: %s",
 585                                         cli_errstr(cli_state)));
 586                                 status = cli_nt_error(cli_state);
 587                         } else {
 588                                 display_sec_desc(sd);
 589                         }
 590                         TALLOC_FREE(sd);
 591                 }
 592                 TALLOC_FREE(afname);
 593         }
 594         return status;
 595 }
 596
 597 /****************************************************************************
 598  Accumulate size of a file.
 599 ****************************************************************************/
 600
 601 static NTSTATUS do_du(struct cli_state *cli_state, struct file_info *finfo,
 602                   const char *dir)
 603 {
 604         if (do_this_one(finfo)) {
 605                 dir_total += finfo->size;
 606         }
 607         return NT_STATUS_OK;
 608 }
 609
 610 static bool do_list_recurse;
 611 static bool do_list_dirs;
 612 static char *do_list_queue = 0;
 613 static long do_list_queue_size = 0;
 614 static long do_list_queue_start = 0;
 615 static long do_list_queue_end = 0;
 616 static NTSTATUS (*do_list_fn)(struct cli_state *cli_state, struct file_info *,
 617                           const char *dir);
 618
 619 /****************************************************************************
 620  Functions for do_list_queue.
 621 ****************************************************************************/
 622
 623 /*
 624  * The do_list_queue is a NUL-separated list of strings stored in a
 625  * char*.  Since this is a FIFO, we keep track of the beginning and
 626  * ending locations of the data in the queue.  When we overflow, we
 627  * double the size of the char*.  When the start of the data passes
 628  * the midpoint, we move everything back.  This is logically more
 629  * complex than a linked list, but easier from a memory management
 630  * angle.  In any memory error condition, do_list_queue is reset.
 631  * Functions check to ensure that do_list_queue is non-NULL before
 632  * accessing it.
 633  */
 634
 635 static void reset_do_list_queue(void)
 636 {
 637         SAFE_FREE(do_list_queue);
 638         do_list_queue_size = 0;
 639         do_list_queue_start = 0;
 640         do_list_queue_end = 0;
 641 }
 642
 643 static void init_do_list_queue(void)
 644 {
 645         reset_do_list_queue();
 646         do_list_queue_size = 1024;
 647         do_list_queue = (char *)SMB_MALLOC(do_list_queue_size);
 648         if (do_list_queue == 0) {
 649                 d_printf("malloc fail for size %d\n",
 650                          (int)do_list_queue_size);
 651                 reset_do_list_queue();
 652         } else {
 653                 memset(do_list_queue, 0, do_list_queue_size);
 654         }
 655 }
 656
 657 static void adjust_do_list_queue(void)
 658 {
 659         /*
 660          * If the starting point of the queue is more than half way through,
 661          * move everything toward the beginning.
 662          */
 663
 664         if (do_list_queue == NULL) {
 665                 DEBUG(4,("do_list_queue is empty\n"));
 666                 do_list_queue_start = do_list_queue_end = 0;
 667                 return;
 668         }
 669
 670         if (do_list_queue_start == do_list_queue_end) {
 671                 DEBUG(4,("do_list_queue is empty\n"));
 672                 do_list_queue_start = do_list_queue_end = 0;
 673                 *do_list_queue = '\0';
 674         } else if (do_list_queue_start > (do_list_queue_size / 2)) {
 675                 DEBUG(4,("sliding do_list_queue backward\n"));
 676                 memmove(do_list_queue,
 677                         do_list_queue + do_list_queue_start,
 678                         do_list_queue_end - do_list_queue_start);
 679                 do_list_queue_end -= do_list_queue_start;
 680                 do_list_queue_start = 0;
 681         }
 682 }
 683
 684 static void add_to_do_list_queue(const char *entry)
 685 {
 686         long new_end = do_list_queue_end + ((long)strlen(entry)) + 1;
 687         while (new_end > do_list_queue_size) {
 688                 do_list_queue_size *= 2;
 689                 DEBUG(4,("enlarging do_list_queue to %d\n",
 690                          (int)do_list_queue_size));
 691                 do_list_queue = (char *)SMB_REALLOC(do_list_queue, do_list_queue_size);
 692                 if (! do_list_queue) {
 693                         d_printf("failure enlarging do_list_queue to %d bytes\n",
 694                                  (int)do_list_queue_size);
 695                         reset_do_list_queue();
 696                 } else {
 697                         memset(do_list_queue + do_list_queue_size / 2,
 698                                0, do_list_queue_size / 2);
 699                 }
 700         }
 701         if (do_list_queue) {
 702                 safe_strcpy_base(do_list_queue + do_list_queue_end,
 703                                  entry, do_list_queue, do_list_queue_size);
 704                 do_list_queue_end = new_end;
 705                 DEBUG(4,("added %s to do_list_queue (start=%d, end=%d)\n",
 706                          entry, (int)do_list_queue_start, (int)do_list_queue_end));
 707         }
 708 }
 709
 710 static char *do_list_queue_head(void)
 711 {
 712         return do_list_queue + do_list_queue_start;
 713 }
 714
 715 static void remove_do_list_queue_head(void)
 716 {
 717         if (do_list_queue_end > do_list_queue_start) {
 718                 do_list_queue_start += strlen(do_list_queue_head()) + 1;
 719                 adjust_do_list_queue();
 720                 DEBUG(4,("removed head of do_list_queue (start=%d, end=%d)\n",
 721                          (int)do_list_queue_start, (int)do_list_queue_end));
 722         }
 723 }
 724
 725 static int do_list_queue_empty(void)
 726 {
 727         return (! (do_list_queue && *do_list_queue));
 728 }
 729
 730 /****************************************************************************
 731  A helper for do_list.
 732 ****************************************************************************/
 733
 734 static NTSTATUS do_list_helper(const char *mntpoint, struct file_info *f,
 735                            const char *mask, void *state)
 736 {
 737         struct cli_state *cli_state = (struct cli_state *)state;
 738         TALLOC_CTX *ctx = talloc_tos();
 739         char *dir = NULL;
 740         char *dir_end = NULL;
 741         NTSTATUS status = NT_STATUS_OK;
 742
 743         /* Work out the directory. */
 744         dir = talloc_strdup(ctx, mask);
 745         if (!dir) {
 746                 return NT_STATUS_NO_MEMORY;
 747         }
 748         if ((dir_end = strrchr(dir, CLI_DIRSEP_CHAR)) != NULL) {
 749                 *dir_end = '\0';
 750         }
 751
 752         if (f->mode & aDIR) {
 753                 if (do_list_dirs && do_this_one(f)) {
 754                         status = do_list_fn(cli_state, f, dir);
 755                         if (!NT_STATUS_IS_OK(status)) {
 756                                 return status;
 757                         }
 758                 }
 759                 if (do_list_recurse &&
 760                     f->name &&
 761                     !strequal(f->name,".") &&
 762                     !strequal(f->name,"..")) {
 763                         char *mask2 = NULL;
 764                         char *p = NULL;
 765
 766                         if (!f->name[0]) {
 767                                 d_printf("Empty dir name returned. Possible server misconfiguration.\n");
 768                                 TALLOC_FREE(dir);
 769                                 return NT_STATUS_UNSUCCESSFUL;
 770                         }
 771
 772                         mask2 = talloc_asprintf(ctx,
 773                                         "%s%s",
 774                                         mntpoint,
 775                                         mask);
 776                         if (!mask2) {
 777                                 TALLOC_FREE(dir);
 778                                 return NT_STATUS_NO_MEMORY;
 779                         }
 780                         p = strrchr_m(mask2,CLI_DIRSEP_CHAR);
 781                         if (p) {
 782                                 p[1] = 0;
 783                         } else {
 784                                 mask2[0] = '\0';
 785                         }
 786                         mask2 = talloc_asprintf_append(mask2,
 787                                         "%s%s*",
 788                                         f->name,
 789                                         CLI_DIRSEP_STR);
 790                         if (!mask2) {
 791                                 TALLOC_FREE(dir);
 792                                 return NT_STATUS_NO_MEMORY;
 793                         }
 794                         add_to_do_list_queue(mask2);
 795                         TALLOC_FREE(mask2);
 796                 }
 797                 TALLOC_FREE(dir);
 798                 return NT_STATUS_OK;
 799         }
 800
 801         if (do_this_one(f)) {
 802                 status = do_list_fn(cli_state, f, dir);
 803         }
 804         TALLOC_FREE(dir);
 805         return status;
 806 }
 807
 808 /****************************************************************************
 809  A wrapper around cli_list that adds recursion.
 810 ****************************************************************************/
 811
 812 NTSTATUS do_list(const char *mask,
 813                         uint16 attribute,
 814                         NTSTATUS (*fn)(struct cli_state *cli_state, struct file_info *,
 815                                    const char *dir),
 816                         bool rec,
 817                         bool dirs)
 818 {
 819         static int in_do_list = 0;
 820         TALLOC_CTX *ctx = talloc_tos();
 821         struct cli_state *targetcli = NULL;
 822         char *targetpath = NULL;
 823         NTSTATUS ret_status = NT_STATUS_OK;
 824         NTSTATUS status = NT_STATUS_OK;
 825
 826         if (in_do_list && rec) {
 827                 fprintf(stderr, "INTERNAL ERROR: do_list called recursively when the recursive flag is true\n");
 828                 exit(1);
 829         }
 830
 831         in_do_list = 1;
 832
 833         do_list_recurse = rec;
 834         do_list_dirs = dirs;
 835         do_list_fn = fn;
 836
 837         if (rec) {
 838                 init_do_list_queue();
 839                 add_to_do_list_queue(mask);
 840
 841                 while (!do_list_queue_empty()) {
 842                         /*
 843                          * Need to copy head so that it doesn't become
 844                          * invalid inside the call to cli_list.  This
 845                          * would happen if the list were expanded
 846                          * during the call.
 847                          * Fix from E. Jay Berkenbilt (ejb@ql.org)
 848                          */
 849                         char *head = talloc_strdup(ctx, do_list_queue_head());
 850
 851                         if (!head) {
 852                                 return NT_STATUS_NO_MEMORY;
 853                         }
 854
 855                         /* check for dfs */
 856
 857                         if ( !cli_resolve_path(ctx, "", auth_info, cli, head, &targetcli, &targetpath ) ) {
 858                                 d_printf("do_list: [%s] %s\n", head, cli_errstr(cli));
 859                                 remove_do_list_queue_head();
 860                                 continue;
 861                         }
 862
 863                         status = cli_list(targetcli, targetpath, attribute,
 864                                  do_list_helper, targetcli);
 865                         if (!NT_STATUS_IS_OK(status)) {
 866                                 d_printf("%s listing %s\n",
 867                                          nt_errstr(status), targetpath);
 868                                 ret_status = status;
 869                         }
 870                         remove_do_list_queue_head();
 871                         if ((! do_list_queue_empty()) && (fn == display_finfo)) {
 872                                 char *next_file = do_list_queue_head();
 873                                 char *save_ch = 0;
 874                                 if ((strlen(next_file) >= 2) &&
 875                                     (next_file[strlen(next_file) - 1] == '*') &&
 876                                     (next_file[strlen(next_file) - 2] == CLI_DIRSEP_CHAR)) {
 877                                         save_ch = next_file +
 878                                                 strlen(next_file) - 2;
 879                                         *save_ch = '\0';
 880                                         if (showacls) {
 881                                                 /* cwd is only used if showacls is on */
 882                                                 client_set_cwd(next_file);
 883                                         }
 884                                 }
 885                                 if (!showacls) /* don't disturbe the showacls output */
 886                                         d_printf("\n%s\n",next_file);
 887                                 if (save_ch) {
 888                                         *save_ch = CLI_DIRSEP_CHAR;
 889                                 }
 890                         }
 891                         TALLOC_FREE(head);
 892                         TALLOC_FREE(targetpath);
 893                 }
 894         } else {
 895                 /* check for dfs */
 896                 if (cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetpath)) {
 897
 898                         status = cli_list(targetcli, targetpath, attribute,
 899                                           do_list_helper, targetcli);
 900                         if (!NT_STATUS_IS_OK(status)) {
 901                                 d_printf("%s listing %s\n",
 902                                          nt_errstr(status), targetpath);
 903                                 ret_status = status;
 904                         }
 905                         TALLOC_FREE(targetpath);
 906                 } else {
 907                         d_printf("do_list: [%s] %s\n", mask, cli_errstr(cli));
 908                         ret_status = cli_nt_error(cli);
 909                 }
 910         }
 911
 912         in_do_list = 0;
 913         reset_do_list_queue();
 914         return ret_status;
 915 }
 916
 917 /****************************************************************************
 918  Get a directory listing.
 919 ****************************************************************************/
 920
 921 static int cmd_dir(void)
 922 {
 923         TALLOC_CTX *ctx = talloc_tos();
 924         uint16 attribute = aDIR | aSYSTEM | aHIDDEN;
 925         char *mask = NULL;
 926         char *buf = NULL;
 927         int rc = 1;
 928         NTSTATUS status;
 929
 930         dir_total = 0;
 931         mask = talloc_strdup(ctx, client_get_cur_dir());
 932         if (!mask) {
 933                 return 1;
 934         }
 935
 936         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
 937                 normalize_name(buf);
 938                 if (*buf == CLI_DIRSEP_CHAR) {
 939                         mask = talloc_strdup(ctx, buf);
 940                 } else {
 941                         mask = talloc_asprintf_append(mask, "%s", buf);
 942                 }
 943         } else {
 944                 mask = talloc_asprintf_append(mask, "*");
 945         }
 946         if (!mask) {
 947                 return 1;
 948         }
 949
 950         if (showacls) {
 951                 /* cwd is only used if showacls is on */
 952                 client_set_cwd(client_get_cur_dir());
 953         }
 954
 955         status = do_list(mask, attribute, display_finfo, recurse, true);
 956         if (!NT_STATUS_IS_OK(status)) {
 957                 return 1;
 958         }
 959
 960         rc = do_dskattr();
 961
 962         DEBUG(3, ("Total bytes listed: %.0f\n", dir_total));
 963
 964         return rc;
 965 }
 966
 967 /****************************************************************************
 968  Get a directory listing.
 969 ****************************************************************************/
 970
 971 static int cmd_du(void)
 972 {
 973         TALLOC_CTX *ctx = talloc_tos();
 974         uint16 attribute = aDIR | aSYSTEM | aHIDDEN;
 975         char *mask = NULL;
 976         char *buf = NULL;
 977         NTSTATUS status;
 978         int rc = 1;
 979
 980         dir_total = 0;
 981         mask = talloc_strdup(ctx, client_get_cur_dir());
 982         if (!mask) {
 983                 return 1;
 984         }
 985         if ((mask[0] != '\0') && (mask[strlen(mask)-1]!=CLI_DIRSEP_CHAR)) {
 986                 mask = talloc_asprintf_append(mask, "%s", CLI_DIRSEP_STR);
 987                 if (!mask) {
 988                         return 1;
 989                 }
 990         }
 991
 992         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
 993                 normalize_name(buf);
 994                 if (*buf == CLI_DIRSEP_CHAR) {
 995                         mask = talloc_strdup(ctx, buf);
 996                 } else {
 997                         mask = talloc_asprintf_append(mask, "%s", buf);
 998                 }
 999         } else {
1000                 mask = talloc_strdup(ctx, "*");
1001         }
1002
1003         status = do_list(mask, attribute, do_du, recurse, true);
1004         if (!NT_STATUS_IS_OK(status)) {
1005                 return 1;
1006         }
1007
1008         rc = do_dskattr();
1009
1010         d_printf("Total number of bytes: %.0f\n", dir_total);
1011
1012         return rc;
1013 }
1014
1015 static int cmd_echo(void)
1016 {
1017         TALLOC_CTX *ctx = talloc_tos();
1018         char *num;
1019         char *data;
1020         NTSTATUS status;
1021
1022         if (!next_token_talloc(ctx, &cmd_ptr, &num, NULL)
1023             || !next_token_talloc(ctx, &cmd_ptr, &data, NULL)) {
1024                 d_printf("echo <num> <data>\n");
1025                 return 1;
1026         }
1027
1028         status = cli_echo(cli, atoi(num), data_blob_const(data, strlen(data)));
1029
1030         if (!NT_STATUS_IS_OK(status)) {
1031                 d_printf("echo failed: %s\n", nt_errstr(status));
1032                 return 1;
1033         }
1034
1035         return 0;
1036 }
1037
1038 /****************************************************************************
1039  Get a file from rname to lname
1040 ****************************************************************************/
1041
1042 static NTSTATUS writefile_sink(char *buf, size_t n, void *priv)
1043 {
1044         int *pfd = (int *)priv;
1045         if (writefile(*pfd, buf, n) == -1) {
1046                 return map_nt_error_from_unix(errno);
1047         }
1048         return NT_STATUS_OK;
1049 }
1050
1051 static int do_get(const char *rname, const char *lname_in, bool reget)
1052 {
1053         TALLOC_CTX *ctx = talloc_tos();
1054         int handle = 0;
1055         uint16_t fnum;
1056         bool newhandle = false;
1057         struct timespec tp_start;
1058         uint16 attr;
1059         SMB_OFF_T size;
1060         off_t start = 0;
1061         SMB_OFF_T nread = 0;
1062         int rc = 0;
1063         struct cli_state *targetcli = NULL;
1064         char *targetname = NULL;
1065         char *lname = NULL;
1066         NTSTATUS status;
1067
1068         lname = talloc_strdup(ctx, lname_in);
1069         if (!lname) {
1070                 return 1;
1071         }
1072
1073         if (lowercase) {
1074                 strlower_m(lname);
1075         }
1076
1077         if (!cli_resolve_path(ctx, "", auth_info, cli, rname, &targetcli, &targetname ) ) {
1078                 d_printf("Failed to open %s: %s\n", rname, cli_errstr(cli));
1079                 return 1;
1080         }
1081
1082         clock_gettime_mono(&tp_start);
1083
1084         status = cli_open(targetcli, targetname, O_RDONLY, DENY_NONE, &fnum);
1085         if (!NT_STATUS_IS_OK(status)) {
1086                 d_printf("%s opening remote file %s\n", nt_errstr(status),
1087                          rname);
1088                 return 1;
1089         }
1090
1091         if(!strcmp(lname,"-")) {
1092                 handle = fileno(stdout);
1093         } else {
1094                 if (reget) {
1095                         handle = sys_open(lname, O_WRONLY|O_CREAT, 0644);
1096                         if (handle >= 0) {
1097                                 start = sys_lseek(handle, 0, SEEK_END);
1098                                 if (start == -1) {
1099                                         d_printf("Error seeking local file\n");
1100                                         return 1;
1101                                 }
1102                         }
1103                 } else {
1104                         handle = sys_open(lname, O_WRONLY|O_CREAT|O_TRUNC, 0644);
1105                 }
1106                 newhandle = true;
1107         }
1108         if (handle < 0) {
1109                 d_printf("Error opening local file %s\n",lname);
1110                 return 1;
1111         }
1112
1113
1114         status = cli_qfileinfo_basic(targetcli, fnum, &attr, &size, NULL, NULL,
1115                                      NULL, NULL, NULL);
1116         if (!NT_STATUS_IS_OK(status)) {
1117                 status = cli_getattrE(targetcli, fnum, &attr, &size, NULL, NULL,
1118                                       NULL);
1119                 if(!NT_STATUS_IS_OK(status)) {
1120                         d_printf("getattrib: %s\n", nt_errstr(status));
1121                         return 1;
1122                 }
1123         }
1124
1125         DEBUG(1,("getting file %s of size %.0f as %s ",
1126                  rname, (double)size, lname));
1127
1128         status = cli_pull(targetcli, fnum, start, size, io_bufsize,
1129                           writefile_sink, (void *)&handle, &nread);
1130         if (!NT_STATUS_IS_OK(status)) {
1131                 d_fprintf(stderr, "parallel_read returned %s\n",
1132                           nt_errstr(status));
1133                 cli_close(targetcli, fnum);
1134                 return 1;
1135         }
1136
1137         status = cli_close(targetcli, fnum);
1138         if (!NT_STATUS_IS_OK(status)) {
1139                 d_printf("Error %s closing remote file\n", nt_errstr(status));
1140                 rc = 1;
1141         }
1142
1143         if (newhandle) {
1144                 close(handle);
1145         }
1146
1147         if (archive_level >= 2 && (attr & aARCH)) {
1148                 cli_setatr(cli, rname, attr & ~(uint16)aARCH, 0);
1149         }
1150
1151         {
1152                 struct timespec tp_end;
1153                 int this_time;
1154
1155                 clock_gettime_mono(&tp_end);
1156                 this_time = nsec_time_diff(&tp_end,&tp_start)/1000000;
1157                 get_total_time_ms += this_time;
1158                 get_total_size += nread;
1159
1160                 DEBUG(1,("(%3.1f KiloBytes/sec) (average %3.1f KiloBytes/sec)\n",
1161                          nread / (1.024*this_time + 1.0e-4),
1162                          get_total_size / (1.024*get_total_time_ms)));
1163         }
1164
1165         TALLOC_FREE(targetname);
1166         return rc;
1167 }
1168
1169 /****************************************************************************
1170  Get a file.
1171 ****************************************************************************/
1172
1173 static int cmd_get(void)
1174 {
1175         TALLOC_CTX *ctx = talloc_tos();
1176         char *lname = NULL;
1177         char *rname = NULL;
1178         char *fname = NULL;
1179
1180         rname = talloc_strdup(ctx, client_get_cur_dir());
1181         if (!rname) {
1182                 return 1;
1183         }
1184
1185         if (!next_token_talloc(ctx, &cmd_ptr,&fname,NULL)) {
1186                 d_printf("get <filename> [localname]\n");
1187                 return 1;
1188         }
1189         rname = talloc_asprintf_append(rname, "%s", fname);
1190         if (!rname) {
1191                 return 1;
1192         }
1193         rname = clean_name(ctx, rname);
1194         if (!rname) {
1195                 return 1;
1196         }
1197
1198         next_token_talloc(ctx, &cmd_ptr,&lname,NULL);
1199         if (!lname) {
1200                 lname = fname;
1201         }
1202
1203         return do_get(rname, lname, false);
1204 }
1205
1206 /****************************************************************************
1207  Do an mget operation on one file.
1208 ****************************************************************************/
1209
1210 static NTSTATUS do_mget(struct cli_state *cli_state, struct file_info *finfo,
1211                     const char *dir)
1212 {
1213         TALLOC_CTX *ctx = talloc_tos();
1214         NTSTATUS status = NT_STATUS_OK;
1215         char *rname = NULL;
1216         char *quest = NULL;
1217         char *saved_curdir = NULL;
1218         char *mget_mask = NULL;
1219         char *new_cd = NULL;
1220
1221         if (!finfo->name) {
1222                 return NT_STATUS_OK;
1223         }
1224
1225         if (strequal(finfo->name,".") || strequal(finfo->name,".."))
1226                 return NT_STATUS_OK;
1227
1228         if (abort_mget) {
1229                 d_printf("mget aborted\n");
1230                 return NT_STATUS_UNSUCCESSFUL;
1231         }
1232
1233         if (finfo->mode & aDIR) {
1234                 if (asprintf(&quest,
1235                          "Get directory %s? ",finfo->name) < 0) {
1236                         return NT_STATUS_NO_MEMORY;
1237                 }
1238         } else {
1239                 if (asprintf(&quest,
1240                          "Get file %s? ",finfo->name) < 0) {
1241                         return NT_STATUS_NO_MEMORY;
1242                 }
1243         }
1244
1245         if (prompt && !yesno(quest)) {
1246                 SAFE_FREE(quest);
1247                 return NT_STATUS_OK;
1248         }
1249         SAFE_FREE(quest);
1250
1251         if (!(finfo->mode & aDIR)) {
1252                 rname = talloc_asprintf(ctx,
1253                                 "%s%s",
1254                                 client_get_cur_dir(),
1255                                 finfo->name);
1256                 if (!rname) {
1257                         return NT_STATUS_NO_MEMORY;
1258                 }
1259                 do_get(rname, finfo->name, false);
1260                 TALLOC_FREE(rname);
1261                 return NT_STATUS_OK;
1262         }
1263
1264         /* handle directories */
1265         saved_curdir = talloc_strdup(ctx, client_get_cur_dir());
1266         if (!saved_curdir) {
1267                 return NT_STATUS_NO_MEMORY;
1268         }
1269
1270         new_cd = talloc_asprintf(ctx,
1271                                 "%s%s%s",
1272                                 client_get_cur_dir(),
1273                                 finfo->name,
1274                                 CLI_DIRSEP_STR);
1275         if (!new_cd) {
1276                 return NT_STATUS_NO_MEMORY;
1277         }
1278         client_set_cur_dir(new_cd);
1279
1280         string_replace(finfo->name,'\\','/');
1281         if (lowercase) {
1282                 strlower_m(finfo->name);
1283         }
1284
1285         if (!directory_exist(finfo->name) &&
1286             mkdir(finfo->name,0777) != 0) {
1287                 d_printf("failed to create directory %s\n",finfo->name);
1288                 client_set_cur_dir(saved_curdir);
1289                 return map_nt_error_from_unix(errno);
1290         }
1291
1292         if (chdir(finfo->name) != 0) {
1293                 d_printf("failed to chdir to directory %s\n",finfo->name);
1294                 client_set_cur_dir(saved_curdir);
1295                 return map_nt_error_from_unix(errno);
1296         }
1297
1298         mget_mask = talloc_asprintf(ctx,
1299                         "%s*",
1300                         client_get_cur_dir());
1301
1302         if (!mget_mask) {
1303                 return NT_STATUS_NO_MEMORY;
1304         }
1305
1306         status = do_list(mget_mask, aSYSTEM | aHIDDEN | aDIR,do_mget,false, true);
1307         if (!NT_STATUS_IS_OK(status)) {
1308                 return status;
1309         }
1310
1311         if (chdir("..") == -1) {
1312                 d_printf("do_mget: failed to chdir to .. (error %s)\n",
1313                         strerror(errno) );
1314                 return map_nt_error_from_unix(errno);
1315         }
1316         client_set_cur_dir(saved_curdir);
1317         TALLOC_FREE(mget_mask);
1318         TALLOC_FREE(saved_curdir);
1319         TALLOC_FREE(new_cd);
1320         return NT_STATUS_OK;
1321 }
1322
1323 /****************************************************************************
1324  View the file using the pager.
1325 ****************************************************************************/
1326
1327 static int cmd_more(void)
1328 {
1329         TALLOC_CTX *ctx = talloc_tos();
1330         char *rname = NULL;
1331         char *fname = NULL;
1332         char *lname = NULL;
1333         char *pager_cmd = NULL;
1334         const char *pager;
1335         int fd;
1336         int rc = 0;
1337
1338         rname = talloc_strdup(ctx, client_get_cur_dir());
1339         if (!rname) {
1340                 return 1;
1341         }
1342
1343         lname = talloc_asprintf(ctx, "%s/smbmore.XXXXXX",tmpdir());
1344         if (!lname) {
1345                 return 1;
1346         }
1347         fd = mkstemp(lname);
1348         if (fd == -1) {
1349                 d_printf("failed to create temporary file for more\n");
1350                 return 1;
1351         }
1352         close(fd);
1353
1354         if (!next_token_talloc(ctx, &cmd_ptr,&fname,NULL)) {
1355                 d_printf("more <filename>\n");
1356                 unlink(lname);
1357                 return 1;
1358         }
1359         rname = talloc_asprintf_append(rname, "%s", fname);
1360         if (!rname) {
1361                 return 1;
1362         }
1363         rname = clean_name(ctx,rname);
1364         if (!rname) {
1365                 return 1;
1366         }
1367
1368         rc = do_get(rname, lname, false);
1369
1370         pager=getenv("PAGER");
1371
1372         pager_cmd = talloc_asprintf(ctx,
1373                                 "%s %s",
1374                                 (pager? pager:PAGER),
1375                                 lname);
1376         if (!pager_cmd) {
1377                 return 1;
1378         }
1379         if (system(pager_cmd) == -1) {
1380                 d_printf("system command '%s' returned -1\n",
1381                         pager_cmd);
1382         }
1383         unlink(lname);
1384
1385         return rc;
1386 }
1387
1388 /****************************************************************************
1389  Do a mget command.
1390 ****************************************************************************/
1391
1392 static int cmd_mget(void)
1393 {
1394         TALLOC_CTX *ctx = talloc_tos();
1395         uint16 attribute = aSYSTEM | aHIDDEN;
1396         char *mget_mask = NULL;
1397         char *buf = NULL;
1398         NTSTATUS status = NT_STATUS_OK;
1399
1400         if (recurse) {
1401                 attribute |= aDIR;
1402         }
1403
1404         abort_mget = false;
1405
1406         while (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
1407
1408                 mget_mask = talloc_strdup(ctx, client_get_cur_dir());
1409                 if (!mget_mask) {
1410                         return 1;
1411                 }
1412                 if (*buf == CLI_DIRSEP_CHAR) {
1413                         mget_mask = talloc_strdup(ctx, buf);
1414                 } else {
1415                         mget_mask = talloc_asprintf_append(mget_mask,
1416                                                         "%s", buf);
1417                 }
1418                 if (!mget_mask) {
1419                         return 1;
1420                 }
1421                 status = do_list(mget_mask, attribute, do_mget, false, true);
1422                 if (!NT_STATUS_IS_OK(status)) {
1423                         return 1;
1424                 }
1425         }
1426
1427         if (mget_mask == NULL) {
1428                 d_printf("nothing to mget\n");
1429                 return 0;
1430         }
1431
1432         if (!*mget_mask) {
1433                 mget_mask = talloc_asprintf(ctx,
1434                                         "%s*",
1435                                         client_get_cur_dir());
1436                 if (!mget_mask) {
1437                         return 1;
1438                 }
1439                 status = do_list(mget_mask, attribute, do_mget, false, true);
1440                 if (!NT_STATUS_IS_OK(status)) {
1441                         return 1;
1442                 }
1443         }
1444
1445         return 0;
1446 }
1447
1448 /****************************************************************************
1449  Make a directory of name "name".
1450 ****************************************************************************/
1451
1452 static bool do_mkdir(const char *name)
1453 {
1454         TALLOC_CTX *ctx = talloc_tos();
1455         struct cli_state *targetcli;
1456         char *targetname = NULL;
1457         NTSTATUS status;
1458
1459         if (!cli_resolve_path(ctx, "", auth_info, cli, name, &targetcli, &targetname)) {
1460                 d_printf("mkdir %s: %s\n", name, cli_errstr(cli));
1461                 return false;
1462         }
1463
1464         status = cli_mkdir(targetcli, targetname);
1465         if (!NT_STATUS_IS_OK(status)) {
1466                 d_printf("%s making remote directory %s\n",
1467                          nt_errstr(status),name);
1468                 return false;
1469         }
1470
1471         return true;
1472 }
1473
1474 /****************************************************************************
1475  Show 8.3 name of a file.
1476 ****************************************************************************/
1477
1478 static bool do_altname(const char *name)
1479 {
1480         fstring altname;
1481         NTSTATUS status;
1482
1483         status = cli_qpathinfo_alt_name(cli, name, altname);
1484         if (!NT_STATUS_IS_OK(status)) {
1485                 d_printf("%s getting alt name for %s\n",
1486                          nt_errstr(status),name);
1487                 return false;
1488         }
1489         d_printf("%s\n", altname);
1490
1491         return true;
1492 }
1493
1494 /****************************************************************************
1495  Exit client.
1496 ****************************************************************************/
1497
1498 static int cmd_quit(void)
1499 {
1500         cli_shutdown(cli);
1501         exit(0);
1502         /* NOTREACHED */
1503         return 0;
1504 }
1505
1506 /****************************************************************************
1507  Make a directory.
1508 ****************************************************************************/
1509
1510 static int cmd_mkdir(void)
1511 {
1512         TALLOC_CTX *ctx = talloc_tos();
1513         char *mask = NULL;
1514         char *buf = NULL;
1515
1516         mask = talloc_strdup(ctx, client_get_cur_dir());
1517         if (!mask) {
1518                 return 1;
1519         }
1520
1521         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
1522                 if (!recurse) {
1523                         d_printf("mkdir <dirname>\n");
1524                 }
1525                 return 1;
1526         }
1527         mask = talloc_asprintf_append(mask, "%s", buf);
1528         if (!mask) {
1529                 return 1;
1530         }
1531
1532         if (recurse) {
1533                 char *ddir = NULL;
1534                 char *ddir2 = NULL;
1535                 struct cli_state *targetcli;
1536                 char *targetname = NULL;
1537                 char *p = NULL;
1538                 char *saveptr;
1539
1540                 ddir2 = talloc_strdup(ctx, "");
1541                 if (!ddir2) {
1542                         return 1;
1543                 }
1544
1545                 if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
1546                         return 1;
1547                 }
1548
1549                 ddir = talloc_strdup(ctx, targetname);
1550                 if (!ddir) {
1551                         return 1;
1552                 }
1553                 trim_char(ddir,'.','\0');
1554                 p = strtok_r(ddir, "/\\", &saveptr);
1555                 while (p) {
1556                         ddir2 = talloc_asprintf_append(ddir2, "%s", p);
1557                         if (!ddir2) {
1558                                 return 1;
1559                         }
1560                         if (!NT_STATUS_IS_OK(cli_chkpath(targetcli, ddir2))) {
1561                                 do_mkdir(ddir2);
1562                         }
1563                         ddir2 = talloc_asprintf_append(ddir2, "%s", CLI_DIRSEP_STR);
1564                         if (!ddir2) {
1565                                 return 1;
1566                         }
1567                         p = strtok_r(NULL, "/\\", &saveptr);
1568                 }
1569         } else {
1570                 do_mkdir(mask);
1571         }
1572
1573         return 0;
1574 }
1575
1576 /****************************************************************************
1577  Show alt name.
1578 ****************************************************************************/
1579
1580 static int cmd_altname(void)
1581 {
1582         TALLOC_CTX *ctx = talloc_tos();
1583         char *name;
1584         char *buf;
1585
1586         name = talloc_strdup(ctx, client_get_cur_dir());
1587         if (!name) {
1588                 return 1;
1589         }
1590
1591         if (!next_token_talloc(ctx, &cmd_ptr, &buf, NULL)) {
1592                 d_printf("altname <file>\n");
1593                 return 1;
1594         }
1595         name = talloc_asprintf_append(name, "%s", buf);
1596         if (!name) {
1597                 return 1;
1598         }
1599         do_altname(name);
1600         return 0;
1601 }
1602
1603 static char *attr_str(TALLOC_CTX *mem_ctx, uint16_t mode)
1604 {
1605         char *attrs = TALLOC_ZERO_ARRAY(mem_ctx, char, 17);
1606         int i = 0;
1607
1608         if (!(mode & FILE_ATTRIBUTE_NORMAL)) {
1609                 if (mode & FILE_ATTRIBUTE_ENCRYPTED) {
1610                         attrs[i++] = 'E';
1611                 }
1612                 if (mode & FILE_ATTRIBUTE_NONINDEXED) {
1613                         attrs[i++] = 'N';
1614                 }
1615                 if (mode & FILE_ATTRIBUTE_OFFLINE) {
1616                         attrs[i++] = 'O';
1617                 }
1618                 if (mode & FILE_ATTRIBUTE_COMPRESSED) {
1619                         attrs[i++] = 'C';
1620                 }
1621                 if (mode & FILE_ATTRIBUTE_REPARSE_POINT) {
1622                         attrs[i++] = 'r';
1623                 }
1624                 if (mode & FILE_ATTRIBUTE_SPARSE) {
1625                         attrs[i++] = 's';
1626                 }
1627                 if (mode & FILE_ATTRIBUTE_TEMPORARY) {
1628                         attrs[i++] = 'T';
1629                 }
1630                 if (mode & FILE_ATTRIBUTE_NORMAL) {
1631                         attrs[i++] = 'N';
1632                 }
1633                 if (mode & FILE_ATTRIBUTE_READONLY) {
1634                         attrs[i++] = 'R';
1635                 }
1636                 if (mode & FILE_ATTRIBUTE_HIDDEN) {
1637                         attrs[i++] = 'H';
1638                 }
1639                 if (mode & FILE_ATTRIBUTE_SYSTEM) {
1640                         attrs[i++] = 'S';
1641                 }
1642                 if (mode & FILE_ATTRIBUTE_DIRECTORY) {
1643                         attrs[i++] = 'D';
1644                 }
1645                 if (mode & FILE_ATTRIBUTE_ARCHIVE) {
1646                         attrs[i++] = 'A';
1647                 }
1648         }
1649         return attrs;
1650 }
1651
1652 /****************************************************************************
1653  Show all info we can get
1654 ****************************************************************************/
1655
1656 static int do_allinfo(const char *name)
1657 {
1658         fstring altname;
1659         struct timespec b_time, a_time, m_time, c_time;
1660         SMB_OFF_T size;
1661         uint16_t mode;
1662         SMB_INO_T ino;
1663         NTTIME tmp;
1664         uint16_t fnum;
1665         unsigned int num_streams;
1666         struct stream_struct *streams;
1667         int num_snapshots;
1668         char **snapshots;
1669         unsigned int i;
1670         NTSTATUS status;
1671
1672         status = cli_qpathinfo_alt_name(cli, name, altname);
1673         if (!NT_STATUS_IS_OK(status)) {
1674                 d_printf("%s getting alt name for %s\n", nt_errstr(status),
1675                          name);
1676                 return false;
1677         }
1678         d_printf("altname: %s\n", altname);
1679
1680         status = cli_qpathinfo2(cli, name, &b_time, &a_time, &m_time, &c_time,
1681                                 &size, &mode, &ino);
1682         if (!NT_STATUS_IS_OK(status)) {
1683                 d_printf("%s getting pathinfo for %s\n", nt_errstr(status),
1684                          name);
1685                 return false;
1686         }
1687
1688         unix_timespec_to_nt_time(&tmp, b_time);
1689         d_printf("create_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1690
1691         unix_timespec_to_nt_time(&tmp, a_time);
1692         d_printf("access_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1693
1694         unix_timespec_to_nt_time(&tmp, m_time);
1695         d_printf("write_time:     %s\n", nt_time_string(talloc_tos(), tmp));
1696
1697         unix_timespec_to_nt_time(&tmp, c_time);
1698         d_printf("change_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1699
1700         d_printf("attributes: %s (%x)\n", attr_str(talloc_tos(), mode), mode);
1701
1702         status = cli_qpathinfo_streams(cli, name, talloc_tos(), &num_streams,
1703                                        &streams);
1704         if (!NT_STATUS_IS_OK(status)) {
1705                 d_printf("%s getting streams for %s\n", nt_errstr(status),
1706                          name);
1707                 return false;
1708         }
1709
1710         for (i=0; i<num_streams; i++) {
1711                 d_printf("stream: [%s], %lld bytes\n", streams[i].name,
1712                          (unsigned long long)streams[i].size);
1713         }
1714
1715         status = cli_ntcreate(cli, name, 0,
1716                               CREATE_ACCESS_READ, 0,
1717                               FILE_SHARE_READ|FILE_SHARE_WRITE
1718                               |FILE_SHARE_DELETE,
1719                               FILE_OPEN, 0x0, 0x0, &fnum);
1720         if (!NT_STATUS_IS_OK(status)) {
1721                 /*
1722                  * Ignore failure, it does not hurt if we can't list
1723                  * snapshots
1724                  */
1725                 return 0;
1726         }
1727         status = cli_shadow_copy_data(talloc_tos(), cli, fnum,
1728                                       true, &snapshots, &num_snapshots);
1729         if (!NT_STATUS_IS_OK(status)) {
1730                 cli_close(cli, fnum);
1731                 return 0;
1732         }
1733
1734         for (i=0; i<num_snapshots; i++) {
1735                 char *snap_name;
1736
1737                 d_printf("%s\n", snapshots[i]);
1738                 snap_name = talloc_asprintf(talloc_tos(), "%s%s",
1739                                             snapshots[i], name);
1740                 status = cli_qpathinfo2(cli, snap_name, &b_time, &a_time,
1741                                         &m_time, &c_time, &size,
1742                                         NULL, NULL);
1743                 if (!NT_STATUS_IS_OK(status)) {
1744                         d_fprintf(stderr, "pathinfo(%s) failed: %s\n",
1745                                   snap_name, nt_errstr(status));
1746                         TALLOC_FREE(snap_name);
1747                         continue;
1748                 }
1749                 unix_timespec_to_nt_time(&tmp, b_time);
1750                 d_printf("create_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1751                 unix_timespec_to_nt_time(&tmp, a_time);
1752                 d_printf("access_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1753                 unix_timespec_to_nt_time(&tmp, m_time);
1754                 d_printf("write_time:     %s\n", nt_time_string(talloc_tos(), tmp));
1755                 unix_timespec_to_nt_time(&tmp, c_time);
1756                 d_printf("change_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1757                 d_printf("size: %d\n", (int)size);
1758         }
1759
1760         TALLOC_FREE(snapshots);
1761
1762         return 0;
1763 }
1764
1765 /****************************************************************************
1766  Show all info we can get
1767 ****************************************************************************/
1768
1769 static int cmd_allinfo(void)
1770 {
1771         TALLOC_CTX *ctx = talloc_tos();
1772         char *name;
1773         char *buf;
1774
1775         name = talloc_strdup(ctx, client_get_cur_dir());
1776         if (!name) {
1777                 return 1;
1778         }
1779
1780         if (!next_token_talloc(ctx, &cmd_ptr, &buf, NULL)) {
1781                 d_printf("allinfo <file>\n");
1782                 return 1;
1783         }
1784         name = talloc_asprintf_append(name, "%s", buf);
1785         if (!name) {
1786                 return 1;
1787         }
1788
1789         do_allinfo(name);
1790
1791         return 0;
1792 }
1793
1794 /****************************************************************************
1795  Put a single file.
1796 ****************************************************************************/
1797
1798 static int do_put(const char *rname, const char *lname, bool reput)
1799 {
1800         TALLOC_CTX *ctx = talloc_tos();
1801         uint16_t fnum;
1802         XFILE *f;
1803         SMB_OFF_T start = 0;
1804         int rc = 0;
1805         struct timespec tp_start;
1806         struct cli_state *targetcli;
1807         char *targetname = NULL;
1808         struct push_state state;
1809         NTSTATUS status;
1810
1811         if (!cli_resolve_path(ctx, "", auth_info, cli, rname, &targetcli, &targetname)) {
1812                 d_printf("Failed to open %s: %s\n", rname, cli_errstr(cli));
1813                 return 1;
1814         }
1815
1816         clock_gettime_mono(&tp_start);
1817
1818         if (reput) {
1819                 status = cli_open(targetcli, targetname, O_RDWR|O_CREAT, DENY_NONE, &fnum);
1820                 if (NT_STATUS_IS_OK(status)) {
1821                         if (!NT_STATUS_IS_OK(status = cli_qfileinfo_basic(
1822                                                      targetcli, fnum, NULL,
1823                                                      &start, NULL, NULL,
1824                                                      NULL, NULL, NULL)) &&
1825                             !NT_STATUS_IS_OK(status = cli_getattrE(
1826                                                      targetcli, fnum, NULL,
1827                                                      &start, NULL, NULL,
1828                                                      NULL))) {
1829                                 d_printf("getattrib: %s\n", nt_errstr(status));
1830                                 return 1;
1831                         }
1832                 }
1833         } else {
1834                 status = cli_open(targetcli, targetname, O_RDWR|O_CREAT|O_TRUNC, DENY_NONE, &fnum);
1835         }
1836
1837         if (!NT_STATUS_IS_OK(status)) {
1838                 d_printf("%s opening remote file %s\n", nt_errstr(status),
1839                          rname);
1840                 return 1;
1841         }
1842
1843         /* allow files to be piped into smbclient
1844            jdblair 24.jun.98
1845
1846            Note that in this case this function will exit(0) rather
1847            than returning. */
1848         if (!strcmp(lname, "-")) {
1849                 f = x_stdin;
1850                 /* size of file is not known */
1851         } else {
1852                 f = x_fopen(lname,O_RDONLY, 0);
1853                 if (f && reput) {
1854                         if (x_tseek(f, start, SEEK_SET) == -1) {
1855                                 d_printf("Error seeking local file\n");
1856                                 x_fclose(f);
1857                                 return 1;
1858                         }
1859                 }
1860         }
1861
1862         if (!f) {
1863                 d_printf("Error opening local file %s\n",lname);
1864                 return 1;
1865         }
1866
1867         DEBUG(1,("putting file %s as %s ",lname,
1868                  rname));
1869
1870         x_setvbuf(f, NULL, X_IOFBF, io_bufsize);
1871
1872         state.f = f;
1873         state.nread = 0;
1874
1875         status = cli_push(targetcli, fnum, 0, 0, io_bufsize, push_source,
1876                           &state);
1877         if (!NT_STATUS_IS_OK(status)) {
1878                 d_fprintf(stderr, "cli_push returned %s\n", nt_errstr(status));
1879                 rc = 1;
1880         }
1881
1882         status = cli_close(targetcli, fnum);
1883         if (!NT_STATUS_IS_OK(status)) {
1884                 d_printf("%s closing remote file %s\n", nt_errstr(status),
1885                          rname);
1886                 if (f != x_stdin) {
1887                         x_fclose(f);
1888                 }
1889                 return 1;
1890         }
1891
1892         if (f != x_stdin) {
1893                 x_fclose(f);
1894         }
1895
1896         {
1897                 struct timespec tp_end;
1898                 int this_time;
1899
1900                 clock_gettime_mono(&tp_end);
1901                 this_time = nsec_time_diff(&tp_end,&tp_start)/1000000;
1902                 put_total_time_ms += this_time;
1903                 put_total_size += state.nread;
1904
1905                 DEBUG(1,("(%3.1f kb/s) (average %3.1f kb/s)\n",
1906                          state.nread / (1.024*this_time + 1.0e-4),
1907                          put_total_size / (1.024*put_total_time_ms)));
1908         }
1909
1910         if (f == x_stdin) {
1911                 cli_shutdown(cli);
1912                 exit(0);
1913         }
1914
1915         return rc;
1916 }
1917
1918 /****************************************************************************
1919  Put a file.
1920 ****************************************************************************/
1921
1922 static int cmd_put(void)
1923 {
1924         TALLOC_CTX *ctx = talloc_tos();
1925         char *lname;
1926         char *rname;
1927         char *buf;
1928
1929         rname = talloc_strdup(ctx, client_get_cur_dir());
1930         if (!rname) {
1931                 return 1;
1932         }
1933
1934         if (!next_token_talloc(ctx, &cmd_ptr,&lname,NULL)) {
1935                 d_printf("put <filename>\n");
1936                 return 1;
1937         }
1938
1939         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
1940                 rname = talloc_asprintf_append(rname, "%s", buf);
1941         } else {
1942                 rname = talloc_asprintf_append(rname, "%s", lname);
1943         }
1944         if (!rname) {
1945                 return 1;
1946         }
1947
1948         rname = clean_name(ctx, rname);
1949         if (!rname) {
1950                 return 1;
1951         }
1952
1953         {
1954                 SMB_STRUCT_STAT st;
1955                 /* allow '-' to represent stdin
1956                    jdblair, 24.jun.98 */
1957                 if (!file_exist_stat(lname, &st, false) &&
1958                     (strcmp(lname,"-"))) {
1959                         d_printf("%s does not exist\n",lname);
1960                         return 1;
1961                 }
1962         }
1963
1964         return do_put(rname, lname, false);
1965 }
1966
1967 /*************************************
1968  File list structure.
1969 *************************************/
1970
1971 static struct file_list {
1972         struct file_list *prev, *next;
1973         char *file_path;
1974         bool isdir;
1975 } *file_list;
1976
1977 /****************************************************************************
1978  Free a file_list structure.
1979 ****************************************************************************/
1980
1981 static void free_file_list (struct file_list *l_head)
1982 {
1983         struct file_list *list, *next;
1984
1985         for (list = l_head; list; list = next) {
1986                 next = list->next;
1987                 DLIST_REMOVE(l_head, list);
1988                 SAFE_FREE(list->file_path);
1989                 SAFE_FREE(list);
1990         }
1991 }
1992
1993 /****************************************************************************
1994  Seek in a directory/file list until you get something that doesn't start with
1995  the specified name.
1996 ****************************************************************************/
1997
1998 static bool seek_list(struct file_list *list, char *name)
1999 {
2000         while (list) {
2001                 trim_string(list->file_path,"./","\n");
2002                 if (strncmp(list->file_path, name, strlen(name)) != 0) {
2003                         return true;
2004                 }
2005                 list = list->next;
2006         }
2007
2008         return false;
2009 }
2010
2011 /****************************************************************************
2012  Set the file selection mask.
2013 ****************************************************************************/
2014
2015 static int cmd_select(void)
2016 {
2017         TALLOC_CTX *ctx = talloc_tos();
2018         char *new_fs = NULL;
2019         next_token_talloc(ctx, &cmd_ptr,&new_fs,NULL)
2020                 ;
2021         if (new_fs) {
2022                 client_set_fileselection(new_fs);
2023         } else {
2024                 client_set_fileselection("");
2025         }
2026         return 0;
2027 }
2028
2029 /****************************************************************************
2030   Recursive file matching function act as find
2031   match must be always set to true when calling this function
2032 ****************************************************************************/
2033
2034 static int file_find(struct file_list **list, const char *directory,
2035                       const char *expression, bool match)
2036 {
2037         SMB_STRUCT_DIR *dir;
2038         struct file_list *entry;
2039         struct stat statbuf;
2040         int ret;
2041         char *path;
2042         bool isdir;
2043         const char *dname;
2044
2045         dir = sys_opendir(directory);
2046         if (!dir)
2047                 return -1;
2048
2049         while ((dname = readdirname(dir))) {
2050                 if (!strcmp("..", dname))
2051                         continue;
2052                 if (!strcmp(".", dname))
2053                         continue;
2054
2055                 if (asprintf(&path, "%s/%s", directory, dname) <= 0) {
2056                         continue;
2057                 }
2058
2059                 isdir = false;
2060                 if (!match || !gen_fnmatch(expression, dname)) {
2061                         if (recurse) {
2062                                 ret = stat(path, &statbuf);
2063                                 if (ret == 0) {
2064                                         if (S_ISDIR(statbuf.st_mode)) {
2065                                                 isdir = true;
2066                                                 ret = file_find(list, path, expression, false);
2067                                         }
2068                                 } else {
2069                                         d_printf("file_find: cannot stat file %s\n", path);
2070                                 }
2071
2072                                 if (ret == -1) {
2073                                         SAFE_FREE(path);
2074                                         sys_closedir(dir);
2075                                         return -1;
2076                                 }
2077                         }
2078                         entry = SMB_MALLOC_P(struct file_list);
2079                         if (!entry) {
2080                                 d_printf("Out of memory in file_find\n");
2081                                 sys_closedir(dir);
2082                                 return -1;
2083                         }
2084                         entry->file_path = path;
2085                         entry->isdir = isdir;
2086                         DLIST_ADD(*list, entry);
2087                 } else {
2088                         SAFE_FREE(path);
2089                 }
2090         }
2091
2092         sys_closedir(dir);
2093         return 0;
2094 }
2095
2096 /****************************************************************************
2097  mput some files.
2098 ****************************************************************************/
2099
2100 static int cmd_mput(void)
2101 {
2102         TALLOC_CTX *ctx = talloc_tos();
2103         char *p = NULL;
2104
2105         while (next_token_talloc(ctx, &cmd_ptr,&p,NULL)) {
2106                 int ret;
2107                 struct file_list *temp_list;
2108                 char *quest, *lname, *rname;
2109
2110                 file_list = NULL;
2111
2112                 ret = file_find(&file_list, ".", p, true);
2113                 if (ret) {
2114                         free_file_list(file_list);
2115                         continue;
2116                 }
2117
2118                 quest = NULL;
2119                 lname = NULL;
2120                 rname = NULL;
2121
2122                 for (temp_list = file_list; temp_list;
2123                      temp_list = temp_list->next) {
2124
2125                         SAFE_FREE(lname);
2126                         if (asprintf(&lname, "%s/", temp_list->file_path) <= 0) {
2127                                 continue;
2128                         }
2129                         trim_string(lname, "./", "/");
2130
2131                         /* check if it's a directory */
2132                         if (temp_list->isdir) {
2133                                 /* if (!recurse) continue; */
2134
2135                                 SAFE_FREE(quest);
2136                                 if (asprintf(&quest, "Put directory %s? ", lname) < 0) {
2137                                         break;
2138                                 }
2139                                 if (prompt && !yesno(quest)) { /* No */
2140                                         /* Skip the directory */
2141                                         lname[strlen(lname)-1] = '/';
2142                                         if (!seek_list(temp_list, lname))
2143                                                 break;
2144                                 } else { /* Yes */
2145                                         SAFE_FREE(rname);
2146                                         if(asprintf(&rname, "%s%s", client_get_cur_dir(), lname) < 0) {
2147                                                 break;
2148                                         }
2149                                         normalize_name(rname);
2150                                         if (!NT_STATUS_IS_OK(cli_chkpath(cli, rname)) &&
2151                                             !do_mkdir(rname)) {
2152                                                 DEBUG (0, ("Unable to make dir, skipping..."));
2153                                                 /* Skip the directory */
2154                                                 lname[strlen(lname)-1] = '/';
2155                                                 if (!seek_list(temp_list, lname)) {
2156                                                         break;
2157                                                 }
2158                                         }
2159                                 }
2160                                 continue;
2161                         } else {
2162                                 SAFE_FREE(quest);
2163                                 if (asprintf(&quest,"Put file %s? ", lname) < 0) {
2164                                         break;
2165                                 }
2166                                 if (prompt && !yesno(quest)) {
2167                                         /* No */
2168                                         continue;
2169                                 }
2170
2171                                 /* Yes */
2172                                 SAFE_FREE(rname);
2173                                 if (asprintf(&rname, "%s%s", client_get_cur_dir(), lname) < 0) {
2174                                         break;
2175                                 }
2176                         }
2177
2178                         normalize_name(rname);
2179
2180                         do_put(rname, lname, false);
2181                 }
2182                 free_file_list(file_list);
2183                 SAFE_FREE(quest);
2184                 SAFE_FREE(lname);
2185                 SAFE_FREE(rname);
2186         }
2187
2188         return 0;
2189 }
2190
2191 /****************************************************************************
2192  Cancel a print job.
2193 ****************************************************************************/
2194
2195 static int do_cancel(int job)
2196 {
2197         if (cli_printjob_del(cli, job)) {
2198                 d_printf("Job %d cancelled\n",job);
2199                 return 0;
2200         } else {
2201                 d_printf("Error cancelling job %d : %s\n",job,cli_errstr(cli));
2202                 return 1;
2203         }
2204 }
2205
2206 /****************************************************************************
2207  Cancel a print job.
2208 ****************************************************************************/
2209
2210 static int cmd_cancel(void)
2211 {
2212         TALLOC_CTX *ctx = talloc_tos();
2213         char *buf = NULL;
2214         int job;
2215
2216         if (!next_token_talloc(ctx, &cmd_ptr, &buf,NULL)) {
2217                 d_printf("cancel <jobid> ...\n");
2218                 return 1;
2219         }
2220         do {
2221                 job = atoi(buf);
2222                 do_cancel(job);
2223         } while (next_token_talloc(ctx, &cmd_ptr,&buf,NULL));
2224
2225         return 0;
2226 }
2227
2228 /****************************************************************************
2229  Print a file.
2230 ****************************************************************************/
2231
2232 static int cmd_print(void)
2233 {
2234         TALLOC_CTX *ctx = talloc_tos();
2235         char *lname = NULL;
2236         char *rname = NULL;
2237         char *p = NULL;
2238
2239         if (!next_token_talloc(ctx, &cmd_ptr, &lname,NULL)) {
2240                 d_printf("print <filename>\n");
2241                 return 1;
2242         }
2243
2244         rname = talloc_strdup(ctx, lname);
2245         if (!rname) {
2246                 return 1;
2247         }
2248         p = strrchr_m(rname,'/');
2249         if (p) {
2250                 rname = talloc_asprintf(ctx,
2251                                         "%s-%d",
2252                                         p+1,
2253                                         (int)sys_getpid());
2254         }
2255         if (strequal(lname,"-")) {
2256                 rname = talloc_asprintf(ctx,
2257                                 "stdin-%d",
2258                                 (int)sys_getpid());
2259         }
2260         if (!rname) {
2261                 return 1;
2262         }
2263
2264         return do_put(rname, lname, false);
2265 }
2266
2267 /****************************************************************************
2268  Show a print queue entry.
2269 ****************************************************************************/
2270
2271 static void queue_fn(struct print_job_info *p)
2272 {
2273         d_printf("%-6d   %-9d    %s\n", (int)p->id, (int)p->size, p->name);
2274 }
2275
2276 /****************************************************************************
2277  Show a print queue.
2278 ****************************************************************************/
2279
2280 static int cmd_queue(void)
2281 {
2282         cli_print_queue(cli, queue_fn);
2283         return 0;
2284 }
2285
2286 /****************************************************************************
2287  Delete some files.
2288 ****************************************************************************/
2289
2290 static NTSTATUS do_del(struct cli_state *cli_state, struct file_info *finfo,
2291                    const char *dir)
2292 {
2293         TALLOC_CTX *ctx = talloc_tos();
2294         char *mask = NULL;
2295         NTSTATUS status;
2296
2297         mask = talloc_asprintf(ctx,
2298                                 "%s%c%s",
2299                                 dir,
2300                                 CLI_DIRSEP_CHAR,
2301                                 finfo->name);
2302         if (!mask) {
2303                 return NT_STATUS_NO_MEMORY;
2304         }
2305
2306         if (finfo->mode & aDIR) {
2307                 TALLOC_FREE(mask);
2308                 return NT_STATUS_OK;
2309         }
2310
2311         status = cli_unlink(cli_state, mask, aSYSTEM | aHIDDEN);
2312         if (!NT_STATUS_IS_OK(status)) {
2313                 d_printf("%s deleting remote file %s\n",
2314                          nt_errstr(status), mask);
2315         }
2316         TALLOC_FREE(mask);
2317         return status;
2318 }
2319
2320 /****************************************************************************
2321  Delete some files.
2322 ****************************************************************************/
2323
2324 static int cmd_del(void)
2325 {
2326         TALLOC_CTX *ctx = talloc_tos();
2327         char *mask = NULL;
2328         char *buf = NULL;
2329         NTSTATUS status = NT_STATUS_OK;
2330         uint16 attribute = aSYSTEM | aHIDDEN;
2331
2332         if (recurse) {
2333                 attribute |= aDIR;
2334         }
2335
2336         mask = talloc_strdup(ctx, client_get_cur_dir());
2337         if (!mask) {
2338                 return 1;
2339         }
2340         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2341                 d_printf("del <filename>\n");
2342                 return 1;
2343         }
2344         mask = talloc_asprintf_append(mask, "%s", buf);
2345         if (!mask) {
2346                 return 1;
2347         }
2348
2349         status = do_list(mask,attribute,do_del,false,false);
2350         if (!NT_STATUS_IS_OK(status)) {
2351                 return 1;
2352         }
2353         return 0;
2354 }
2355
2356 /****************************************************************************
2357  Wildcard delete some files.
2358 ****************************************************************************/
2359
2360 static int cmd_wdel(void)
2361 {
2362         TALLOC_CTX *ctx = talloc_tos();
2363         char *mask = NULL;
2364         char *buf = NULL;
2365         uint16 attribute;
2366         struct cli_state *targetcli;
2367         char *targetname = NULL;
2368         NTSTATUS status;
2369
2370         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2371                 d_printf("wdel 0x<attrib> <wcard>\n");
2372                 return 1;
2373         }
2374
2375         attribute = (uint16)strtol(buf, (char **)NULL, 16);
2376
2377         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2378                 d_printf("wdel 0x<attrib> <wcard>\n");
2379                 return 1;
2380         }
2381
2382         mask = talloc_asprintf(ctx, "%s%s",
2383                         client_get_cur_dir(),
2384                         buf);
2385         if (!mask) {
2386                 return 1;
2387         }
2388
2389         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2390                 d_printf("cmd_wdel %s: %s\n", mask, cli_errstr(cli));
2391                 return 1;
2392         }
2393
2394         status = cli_unlink(targetcli, targetname, attribute);
2395         if (!NT_STATUS_IS_OK(status)) {
2396                 d_printf("%s deleting remote files %s\n", nt_errstr(status),
2397                          targetname);
2398         }
2399         return 0;
2400 }
2401
2402 /****************************************************************************
2403 ****************************************************************************/
2404
2405 static int cmd_open(void)
2406 {
2407         TALLOC_CTX *ctx = talloc_tos();
2408         char *mask = NULL;
2409         char *buf = NULL;
2410         char *targetname = NULL;
2411         struct cli_state *targetcli;
2412         uint16_t fnum = (uint16_t)-1;
2413
2414         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2415                 d_printf("open <filename>\n");
2416                 return 1;
2417         }
2418         mask = talloc_asprintf(ctx,
2419                         "%s%s",
2420                         client_get_cur_dir(),
2421                         buf);
2422         if (!mask) {
2423                 return 1;
2424         }
2425
2426         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2427                 d_printf("open %s: %s\n", mask, cli_errstr(cli));
2428                 return 1;
2429         }
2430
2431         if (!NT_STATUS_IS_OK(cli_ntcreate(targetcli, targetname, 0,
2432                         FILE_READ_DATA|FILE_WRITE_DATA, 0,
2433                         FILE_SHARE_READ|FILE_SHARE_WRITE, FILE_OPEN, 0x0, 0x0, &fnum))) {
2434                 if (NT_STATUS_IS_OK(cli_ntcreate(targetcli, targetname, 0,
2435                                 FILE_READ_DATA, 0,
2436                                 FILE_SHARE_READ|FILE_SHARE_WRITE, FILE_OPEN, 0x0, 0x0, &fnum))) {
2437                         d_printf("open file %s: for read/write fnum %d\n", targetname, fnum);
2438                 } else {
2439                         d_printf("Failed to open file %s. %s\n", targetname, cli_errstr(cli));
2440                 }
2441         } else {
2442                 d_printf("open file %s: for read/write fnum %d\n", targetname, fnum);
2443         }
2444         return 0;
2445 }
2446
2447 static int cmd_posix_encrypt(void)
2448 {
2449         TALLOC_CTX *ctx = talloc_tos();
2450         NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
2451
2452         if (cli->use_kerberos) {
2453                 status = cli_gss_smb_encryption_start(cli);
2454         } else {
2455                 char *domain = NULL;
2456                 char *user = NULL;
2457                 char *password = NULL;
2458
2459                 if (!next_token_talloc(ctx, &cmd_ptr,&domain,NULL)) {
2460                         d_printf("posix_encrypt domain user password\n");
2461                         return 1;
2462                 }
2463
2464                 if (!next_token_talloc(ctx, &cmd_ptr,&user,NULL)) {
2465                         d_printf("posix_encrypt domain user password\n");
2466                         return 1;
2467                 }
2468
2469                 if (!next_token_talloc(ctx, &cmd_ptr,&password,NULL)) {
2470                         d_printf("posix_encrypt domain user password\n");
2471                         return 1;
2472                 }
2473
2474                 status = cli_raw_ntlm_smb_encryption_start(cli,
2475                                                         user,
2476                                                         password,
2477                                                         domain);
2478         }
2479
2480         if (!NT_STATUS_IS_OK(status)) {
2481                 d_printf("posix_encrypt failed with error %s\n", nt_errstr(status));
2482         } else {
2483                 d_printf("encryption on\n");
2484                 smb_encrypt = true;
2485         }
2486
2487         return 0;
2488 }
2489
2490 /****************************************************************************
2491 ****************************************************************************/
2492
2493 static int cmd_posix_open(void)
2494 {
2495         TALLOC_CTX *ctx = talloc_tos();
2496         char *mask = NULL;
2497         char *buf = NULL;
2498         char *targetname = NULL;
2499         struct cli_state *targetcli;
2500         mode_t mode;
2501         uint16_t fnum;
2502
2503         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2504                 d_printf("posix_open <filename> 0<mode>\n");
2505                 return 1;
2506         }
2507         mask = talloc_asprintf(ctx,
2508                         "%s%s",
2509                         client_get_cur_dir(),
2510                         buf);
2511         if (!mask) {
2512                 return 1;
2513         }
2514
2515         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2516                 d_printf("posix_open <filename> 0<mode>\n");
2517                 return 1;
2518         }
2519         mode = (mode_t)strtol(buf, (char **)NULL, 8);
2520
2521         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2522                 d_printf("posix_open %s: %s\n", mask, cli_errstr(cli));
2523                 return 1;
2524         }
2525
2526         if (!NT_STATUS_IS_OK(cli_posix_open(targetcli, targetname, O_CREAT|O_RDWR, mode, &fnum))) {
2527                 if (!NT_STATUS_IS_OK(cli_posix_open(targetcli, targetname, O_CREAT|O_RDONLY, mode, &fnum))) {
2528                         d_printf("posix_open file %s: for read/write fnum %d\n", targetname, fnum);
2529                 } else {
2530                         d_printf("Failed to open file %s. %s\n", targetname, cli_errstr(cli));
2531                 }
2532         } else {
2533                 d_printf("posix_open file %s: for read/write fnum %d\n", targetname, fnum);
2534         }
2535
2536         return 0;
2537 }
2538
2539 static int cmd_posix_mkdir(void)
2540 {
2541         TALLOC_CTX *ctx = talloc_tos();
2542         char *mask = NULL;
2543         char *buf = NULL;
2544         char *targetname = NULL;
2545         struct cli_state *targetcli;
2546         mode_t mode;
2547
2548         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2549                 d_printf("posix_mkdir <filename> 0<mode>\n");
2550                 return 1;
2551         }
2552         mask = talloc_asprintf(ctx,
2553                         "%s%s",
2554                         client_get_cur_dir(),
2555                         buf);
2556         if (!mask) {
2557                 return 1;
2558         }
2559
2560         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2561                 d_printf("posix_mkdir <filename> 0<mode>\n");
2562                 return 1;
2563         }
2564         mode = (mode_t)strtol(buf, (char **)NULL, 8);
2565
2566         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2567                 d_printf("posix_mkdir %s: %s\n", mask, cli_errstr(cli));
2568                 return 1;
2569         }
2570
2571         if (!NT_STATUS_IS_OK(cli_posix_mkdir(targetcli, targetname, mode))) {
2572                 d_printf("Failed to open file %s. %s\n", targetname, cli_errstr(cli));
2573         } else {
2574                 d_printf("posix_mkdir created directory %s\n", targetname);
2575         }
2576         return 0;
2577 }
2578
2579 static int cmd_posix_unlink(void)
2580 {
2581         TALLOC_CTX *ctx = talloc_tos();
2582         char *mask = NULL;
2583         char *buf = NULL;
2584         char *targetname = NULL;
2585         struct cli_state *targetcli;
2586
2587         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2588                 d_printf("posix_unlink <filename>\n");
2589                 return 1;
2590         }
2591         mask = talloc_asprintf(ctx,
2592                         "%s%s",
2593                         client_get_cur_dir(),
2594                         buf);
2595         if (!mask) {
2596                 return 1;
2597         }
2598
2599         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2600                 d_printf("posix_unlink %s: %s\n", mask, cli_errstr(cli));
2601                 return 1;
2602         }
2603
2604         if (!NT_STATUS_IS_OK(cli_posix_unlink(targetcli, targetname))) {
2605                 d_printf("Failed to unlink file %s. %s\n", targetname, cli_errstr(cli));
2606         } else {
2607                 d_printf("posix_unlink deleted file %s\n", targetname);
2608         }
2609
2610         return 0;
2611 }
2612
2613 static int cmd_posix_rmdir(void)
2614 {
2615         TALLOC_CTX *ctx = talloc_tos();
2616         char *mask = NULL;
2617         char *buf = NULL;
2618         char *targetname = NULL;
2619         struct cli_state *targetcli;
2620
2621         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2622                 d_printf("posix_rmdir <filename>\n");
2623                 return 1;
2624         }
2625         mask = talloc_asprintf(ctx,
2626                         "%s%s",
2627                         client_get_cur_dir(),
2628                         buf);
2629         if (!mask) {
2630                 return 1;
2631         }
2632
2633         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2634                 d_printf("posix_rmdir %s: %s\n", mask, cli_errstr(cli));
2635                 return 1;
2636         }
2637
2638         if (!NT_STATUS_IS_OK(cli_posix_rmdir(targetcli, targetname))) {
2639                 d_printf("Failed to unlink directory %s. %s\n", targetname, cli_errstr(cli));
2640         } else {
2641                 d_printf("posix_rmdir deleted directory %s\n", targetname);
2642         }
2643
2644         return 0;
2645 }
2646
2647 static int cmd_close(void)
2648 {
2649         TALLOC_CTX *ctx = talloc_tos();
2650         char *buf = NULL;
2651         int fnum;
2652
2653         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2654                 d_printf("close <fnum>\n");
2655                 return 1;
2656         }
2657
2658         fnum = atoi(buf);
2659         /* We really should use the targetcli here.... */
2660         if (!NT_STATUS_IS_OK(cli_close(cli, fnum))) {
2661                 d_printf("close %d: %s\n", fnum, cli_errstr(cli));
2662                 return 1;
2663         }
2664         return 0;
2665 }
2666
2667 static int cmd_posix(void)
2668 {
2669         TALLOC_CTX *ctx = talloc_tos();
2670         uint16 major, minor;
2671         uint32 caplow, caphigh;
2672         char *caps;
2673         NTSTATUS status;
2674
2675         if (!SERVER_HAS_UNIX_CIFS(cli)) {
2676                 d_printf("Server doesn't support UNIX CIFS extensions.\n");
2677                 return 1;
2678         }
2679
2680         status = cli_unix_extensions_version(cli, &major, &minor, &caplow,
2681                                              &caphigh);
2682         if (!NT_STATUS_IS_OK(status)) {
2683                 d_printf("Can't get UNIX CIFS extensions version from "
2684                          "server: %s\n", nt_errstr(status));
2685                 return 1;
2686         }
2687
2688         d_printf("Server supports CIFS extensions %u.%u\n", (unsigned int)major, (unsigned int)minor);
2689
2690         caps = talloc_strdup(ctx, "");
2691         if (!caps) {
2692                 return 1;
2693         }
2694         if (caplow & CIFS_UNIX_FCNTL_LOCKS_CAP) {
2695                 caps = talloc_asprintf_append(caps, "locks ");
2696                 if (!caps) {
2697                         return 1;
2698                 }
2699         }
2700         if (caplow & CIFS_UNIX_POSIX_ACLS_CAP) {
2701                 caps = talloc_asprintf_append(caps, "acls ");
2702                 if (!caps) {
2703                         return 1;
2704                 }
2705         }
2706         if (caplow & CIFS_UNIX_XATTTR_CAP) {
2707                 caps = talloc_asprintf_append(caps, "eas ");
2708                 if (!caps) {
2709                         return 1;
2710                 }
2711         }
2712         if (caplow & CIFS_UNIX_POSIX_PATHNAMES_CAP) {
2713                 caps = talloc_asprintf_append(caps, "pathnames ");
2714                 if (!caps) {
2715                         return 1;
2716                 }
2717         }
2718         if (caplow & CIFS_UNIX_POSIX_PATH_OPERATIONS_CAP) {
2719                 caps = talloc_asprintf_append(caps, "posix_path_operations ");
2720                 if (!caps) {
2721                         return 1;
2722                 }
2723         }
2724         if (caplow & CIFS_UNIX_LARGE_READ_CAP) {
2725                 caps = talloc_asprintf_append(caps, "large_read ");
2726                 if (!caps) {
2727                         return 1;
2728                 }
2729         }
2730         if (caplow & CIFS_UNIX_LARGE_WRITE_CAP) {
2731                 caps = talloc_asprintf_append(caps, "large_write ");
2732                 if (!caps) {
2733                         return 1;
2734                 }
2735         }
2736         if (caplow & CIFS_UNIX_TRANSPORT_ENCRYPTION_CAP) {
2737                 caps = talloc_asprintf_append(caps, "posix_encrypt ");
2738                 if (!caps) {
2739                         return 1;
2740                 }
2741         }
2742         if (caplow & CIFS_UNIX_TRANSPORT_ENCRYPTION_MANDATORY_CAP) {
2743                 caps = talloc_asprintf_append(caps, "mandatory_posix_encrypt ");
2744                 if (!caps) {
2745                         return 1;
2746                 }
2747         }
2748
2749         if (*caps && caps[strlen(caps)-1] == ' ') {
2750                 caps[strlen(caps)-1] = '\0';
2751         }
2752
2753         d_printf("Server supports CIFS capabilities %s\n", caps);
2754
2755         status = cli_set_unix_extensions_capabilities(cli, major, minor,
2756                                                       caplow, caphigh);
2757         if (!NT_STATUS_IS_OK(status)) {
2758                 d_printf("Can't set UNIX CIFS extensions capabilities. %s.\n",
2759                          nt_errstr(status));
2760                 return 1;
2761         }
2762
2763         if (caplow & CIFS_UNIX_POSIX_PATHNAMES_CAP) {
2764                 CLI_DIRSEP_CHAR = '/';
2765                 *CLI_DIRSEP_STR = '/';
2766                 client_set_cur_dir(CLI_DIRSEP_STR);
2767         }
2768
2769         return 0;
2770 }
2771
2772 static int cmd_lock(void)
2773 {
2774         TALLOC_CTX *ctx = talloc_tos();
2775         char *buf = NULL;
2776         uint64_t start, len;
2777         enum brl_type lock_type;
2778         int fnum;
2779
2780         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2781                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2782                 return 1;
2783         }
2784         fnum = atoi(buf);
2785
2786         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2787                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2788                 return 1;
2789         }
2790
2791         if (*buf == 'r' || *buf == 'R') {
2792                 lock_type = READ_LOCK;
2793         } else if (*buf == 'w' || *buf == 'W') {
2794                 lock_type = WRITE_LOCK;
2795         } else {
2796                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2797                 return 1;
2798         }
2799
2800         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2801                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2802                 return 1;
2803         }
2804
2805         start = (uint64_t)strtol(buf, (char **)NULL, 16);
2806
2807         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2808                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2809                 return 1;
2810         }
2811
2812         len = (uint64_t)strtol(buf, (char **)NULL, 16);
2813
2814         if (!NT_STATUS_IS_OK(cli_posix_lock(cli, fnum, start, len, true, lock_type))) {
2815                 d_printf("lock failed %d: %s\n", fnum, cli_errstr(cli));
2816         }
2817
2818         return 0;
2819 }
2820
2821 static int cmd_unlock(void)
2822 {
2823         TALLOC_CTX *ctx = talloc_tos();
2824         char *buf = NULL;
2825         uint64_t start, len;
2826         int fnum;
2827
2828         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2829                 d_printf("unlock <fnum> <hex-start> <hex-len>\n");
2830                 return 1;
2831         }
2832         fnum = atoi(buf);
2833
2834         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2835                 d_printf("unlock <fnum> <hex-start> <hex-len>\n");
2836                 return 1;
2837         }
2838
2839         start = (uint64_t)strtol(buf, (char **)NULL, 16);
2840
2841         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2842                 d_printf("unlock <fnum> <hex-start> <hex-len>\n");
2843                 return 1;
2844         }
2845
2846         len = (uint64_t)strtol(buf, (char **)NULL, 16);
2847
2848         if (!NT_STATUS_IS_OK(cli_posix_unlock(cli, fnum, start, len))) {
2849                 d_printf("unlock failed %d: %s\n", fnum, cli_errstr(cli));
2850         }
2851
2852         return 0;
2853 }
2854
2855
2856 /****************************************************************************
2857  Remove a directory.
2858 ****************************************************************************/
2859
2860 static int cmd_rmdir(void)
2861 {
2862         TALLOC_CTX *ctx = talloc_tos();
2863         char *mask = NULL;
2864         char *buf = NULL;
2865         char *targetname = NULL;
2866         struct cli_state *targetcli;
2867
2868         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2869                 d_printf("rmdir <dirname>\n");
2870                 return 1;
2871         }
2872         mask = talloc_asprintf(ctx,
2873                         "%s%s",
2874                         client_get_cur_dir(),
2875                         buf);
2876         if (!mask) {
2877                 return 1;
2878         }
2879
2880         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2881                 d_printf("rmdir %s: %s\n", mask, cli_errstr(cli));
2882                 return 1;
2883         }
2884
2885         if (!NT_STATUS_IS_OK(cli_rmdir(targetcli, targetname))) {
2886                 d_printf("%s removing remote directory file %s\n",
2887                          cli_errstr(targetcli),mask);
2888         }
2889
2890         return 0;
2891 }
2892
2893 /****************************************************************************
2894  UNIX hardlink.
2895 ****************************************************************************/
2896
2897 static int cmd_link(void)
2898 {
2899         TALLOC_CTX *ctx = talloc_tos();
2900         char *oldname = NULL;
2901         char *newname = NULL;
2902         char *buf = NULL;
2903         char *buf2 = NULL;
2904         char *targetname = NULL;
2905         struct cli_state *targetcli;
2906
2907         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
2908             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
2909                 d_printf("link <oldname> <newname>\n");
2910                 return 1;
2911         }
2912         oldname = talloc_asprintf(ctx,
2913                         "%s%s",
2914                         client_get_cur_dir(),
2915                         buf);
2916         if (!oldname) {
2917                 return 1;
2918         }
2919         newname = talloc_asprintf(ctx,
2920                         "%s%s",
2921                         client_get_cur_dir(),
2922                         buf2);
2923         if (!newname) {
2924                 return 1;
2925         }
2926
2927         if (!cli_resolve_path(ctx, "", auth_info, cli, oldname, &targetcli, &targetname)) {
2928                 d_printf("link %s: %s\n", oldname, cli_errstr(cli));
2929                 return 1;
2930         }
2931
2932         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
2933                 d_printf("Server doesn't support UNIX CIFS calls.\n");
2934                 return 1;
2935         }
2936
2937         if (!NT_STATUS_IS_OK(cli_posix_hardlink(targetcli, targetname, newname))) {
2938                 d_printf("%s linking files (%s -> %s)\n", cli_errstr(targetcli), newname, oldname);
2939                 return 1;
2940         }
2941         return 0;
2942 }
2943
2944 /****************************************************************************
2945  UNIX readlink.
2946 ****************************************************************************/
2947
2948 static int cmd_readlink(void)
2949 {
2950         TALLOC_CTX *ctx = talloc_tos();
2951         char *name= NULL;
2952         char *buf = NULL;
2953         char *targetname = NULL;
2954         char linkname[PATH_MAX+1];
2955         struct cli_state *targetcli;
2956
2957         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2958                 d_printf("readlink <name>\n");
2959                 return 1;
2960         }
2961         name = talloc_asprintf(ctx,
2962                         "%s%s",
2963                         client_get_cur_dir(),
2964                         buf);
2965         if (!name) {
2966                 return 1;
2967         }
2968
2969         if (!cli_resolve_path(ctx, "", auth_info, cli, name, &targetcli, &targetname)) {
2970                 d_printf("readlink %s: %s\n", name, cli_errstr(cli));
2971                 return 1;
2972         }
2973
2974         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
2975                 d_printf("Server doesn't support UNIX CIFS calls.\n");
2976                 return 1;
2977         }
2978
2979         if (!NT_STATUS_IS_OK(cli_posix_readlink(targetcli, name,
2980                         linkname, PATH_MAX+1))) {
2981                 d_printf("%s readlink on file %s\n",
2982                         cli_errstr(targetcli), name);
2983                 return 1;
2984         }
2985
2986         d_printf("%s -> %s\n", name, linkname);
2987
2988         return 0;
2989 }
2990
2991
2992 /****************************************************************************
2993  UNIX symlink.
2994 ****************************************************************************/
2995
2996 static int cmd_symlink(void)
2997 {
2998         TALLOC_CTX *ctx = talloc_tos();
2999         char *oldname = NULL;
3000         char *newname = NULL;
3001         char *buf = NULL;
3002         char *buf2 = NULL;
3003         struct cli_state *newcli;
3004
3005         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3006             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
3007                 d_printf("symlink <oldname> <newname>\n");
3008                 return 1;
3009         }
3010         /* Oldname (link target) must be an untouched blob. */
3011         oldname = buf;
3012
3013         newname = talloc_asprintf(ctx,
3014                         "%s%s",
3015                         client_get_cur_dir(),
3016                         buf2);
3017         if (!newname) {
3018                 return 1;
3019         }
3020
3021         /* New name must be present in share namespace. */
3022         if (!cli_resolve_path(ctx, "", auth_info, cli, newname, &newcli, &newname)) {
3023                 d_printf("link %s: %s\n", oldname, cli_errstr(cli));
3024                 return 1;
3025         }
3026
3027         if (!SERVER_HAS_UNIX_CIFS(newcli)) {
3028                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3029                 return 1;
3030         }
3031
3032         if (!NT_STATUS_IS_OK(cli_posix_symlink(newcli, oldname, newname))) {
3033                 d_printf("%s symlinking files (%s -> %s)\n",
3034                         cli_errstr(newcli), newname, newname);
3035                 return 1;
3036         }
3037
3038         return 0;
3039 }
3040
3041 /****************************************************************************
3042  UNIX chmod.
3043 ****************************************************************************/
3044
3045 static int cmd_chmod(void)
3046 {
3047         TALLOC_CTX *ctx = talloc_tos();
3048         char *src = NULL;
3049         char *buf = NULL;
3050         char *buf2 = NULL;
3051         char *targetname = NULL;
3052         struct cli_state *targetcli;
3053         mode_t mode;
3054
3055         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3056             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
3057                 d_printf("chmod mode file\n");
3058                 return 1;
3059         }
3060         src = talloc_asprintf(ctx,
3061                         "%s%s",
3062                         client_get_cur_dir(),
3063                         buf2);
3064         if (!src) {
3065                 return 1;
3066         }
3067
3068         mode = (mode_t)strtol(buf, NULL, 8);
3069
3070         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetname)) {
3071                 d_printf("chmod %s: %s\n", src, cli_errstr(cli));
3072                 return 1;
3073         }
3074
3075         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3076                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3077                 return 1;
3078         }
3079
3080         if (!NT_STATUS_IS_OK(cli_posix_chmod(targetcli, targetname, mode))) {
3081                 d_printf("%s chmod file %s 0%o\n",
3082                         cli_errstr(targetcli), src, (unsigned int)mode);
3083                 return 1;
3084         }
3085
3086         return 0;
3087 }
3088
3089 static const char *filetype_to_str(mode_t mode)
3090 {
3091         if (S_ISREG(mode)) {
3092                 return "regular file";
3093         } else if (S_ISDIR(mode)) {
3094                 return "directory";
3095         } else
3096 #ifdef S_ISCHR
3097         if (S_ISCHR(mode)) {
3098                 return "character device";
3099         } else
3100 #endif
3101 #ifdef S_ISBLK
3102         if (S_ISBLK(mode)) {
3103                 return "block device";
3104         } else
3105 #endif
3106 #ifdef S_ISFIFO
3107         if (S_ISFIFO(mode)) {
3108                 return "fifo";
3109         } else
3110 #endif
3111 #ifdef S_ISLNK
3112         if (S_ISLNK(mode)) {
3113                 return "symbolic link";
3114         } else
3115 #endif
3116 #ifdef S_ISSOCK
3117         if (S_ISSOCK(mode)) {
3118                 return "socket";
3119         } else
3120 #endif
3121         return "";
3122 }
3123
3124 static char rwx_to_str(mode_t m, mode_t bt, char ret)
3125 {
3126         if (m & bt) {
3127                 return ret;
3128         } else {
3129                 return '-';
3130         }
3131 }
3132
3133 static char *unix_mode_to_str(char *s, mode_t m)
3134 {
3135         char *p = s;
3136         const char *str = filetype_to_str(m);
3137
3138         switch(str[0]) {
3139                 case 'd':
3140                         *p++ = 'd';
3141                         break;
3142                 case 'c':
3143                         *p++ = 'c';
3144                         break;
3145                 case 'b':
3146                         *p++ = 'b';
3147                         break;
3148                 case 'f':
3149                         *p++ = 'p';
3150                         break;
3151                 case 's':
3152                         *p++ = str[1] == 'y' ? 'l' : 's';
3153                         break;
3154                 case 'r':
3155                 default:
3156                         *p++ = '-';
3157                         break;
3158         }
3159         *p++ = rwx_to_str(m, S_IRUSR, 'r');
3160         *p++ = rwx_to_str(m, S_IWUSR, 'w');
3161         *p++ = rwx_to_str(m, S_IXUSR, 'x');
3162         *p++ = rwx_to_str(m, S_IRGRP, 'r');
3163         *p++ = rwx_to_str(m, S_IWGRP, 'w');
3164         *p++ = rwx_to_str(m, S_IXGRP, 'x');
3165         *p++ = rwx_to_str(m, S_IROTH, 'r');
3166         *p++ = rwx_to_str(m, S_IWOTH, 'w');
3167         *p++ = rwx_to_str(m, S_IXOTH, 'x');
3168         *p++ = '\0';
3169         return s;
3170 }
3171
3172 /****************************************************************************
3173  Utility function for UNIX getfacl.
3174 ****************************************************************************/
3175
3176 static char *perms_to_string(fstring permstr, unsigned char perms)
3177 {
3178         fstrcpy(permstr, "---");
3179         if (perms & SMB_POSIX_ACL_READ) {
3180                 permstr[0] = 'r';
3181         }
3182         if (perms & SMB_POSIX_ACL_WRITE) {
3183                 permstr[1] = 'w';
3184         }
3185         if (perms & SMB_POSIX_ACL_EXECUTE) {
3186                 permstr[2] = 'x';
3187         }
3188         return permstr;
3189 }
3190
3191 /****************************************************************************
3192  UNIX getfacl.
3193 ****************************************************************************/
3194
3195 static int cmd_getfacl(void)
3196 {
3197         TALLOC_CTX *ctx = talloc_tos();
3198         char *src = NULL;
3199         char *name = NULL;
3200         char *targetname = NULL;
3201         struct cli_state *targetcli;
3202         uint16 major, minor;
3203         uint32 caplow, caphigh;
3204         char *retbuf = NULL;
3205         size_t rb_size = 0;
3206         SMB_STRUCT_STAT sbuf;
3207         uint16 num_file_acls = 0;
3208         uint16 num_dir_acls = 0;
3209         uint16 i;
3210         NTSTATUS status;
3211
3212         if (!next_token_talloc(ctx, &cmd_ptr,&name,NULL)) {
3213                 d_printf("getfacl filename\n");
3214                 return 1;
3215         }
3216         src = talloc_asprintf(ctx,
3217                         "%s%s",
3218                         client_get_cur_dir(),
3219                         name);
3220         if (!src) {
3221                 return 1;
3222         }
3223
3224         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetname)) {
3225                 d_printf("stat %s: %s\n", src, cli_errstr(cli));
3226                 return 1;
3227         }
3228
3229         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3230                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3231                 return 1;
3232         }
3233
3234         status = cli_unix_extensions_version(targetcli, &major, &minor,
3235                                              &caplow, &caphigh);
3236         if (!NT_STATUS_IS_OK(status)) {
3237                 d_printf("Can't get UNIX CIFS version from server: %s.\n",
3238                          nt_errstr(status));
3239                 return 1;
3240         }
3241
3242         if (!(caplow & CIFS_UNIX_POSIX_ACLS_CAP)) {
3243                 d_printf("This server supports UNIX extensions "
3244                         "but doesn't support POSIX ACLs.\n");
3245                 return 1;
3246         }
3247
3248         if (!NT_STATUS_IS_OK(cli_posix_stat(targetcli, targetname, &sbuf))) {
3249                 d_printf("%s getfacl doing a stat on file %s\n",
3250                         cli_errstr(targetcli), src);
3251                 return 1;
3252         }
3253
3254         if (!NT_STATUS_IS_OK(cli_posix_getfacl(targetcli, targetname, ctx, &rb_size, &retbuf))) {
3255                 d_printf("%s getfacl file %s\n",
3256                         cli_errstr(targetcli), src);
3257                 return 1;
3258         }
3259
3260         /* ToDo : Print out the ACL values. */
3261         if (rb_size < 6 || SVAL(retbuf,0) != SMB_POSIX_ACL_VERSION) {
3262                 d_printf("getfacl file %s, unknown POSIX acl version %u.\n",
3263                         src, (unsigned int)CVAL(retbuf,0) );
3264                 return 1;
3265         }
3266
3267         num_file_acls = SVAL(retbuf,2);
3268         num_dir_acls = SVAL(retbuf,4);
3269         if (rb_size != SMB_POSIX_ACL_HEADER_SIZE + SMB_POSIX_ACL_ENTRY_SIZE*(num_file_acls+num_dir_acls)) {
3270                 d_printf("getfacl file %s, incorrect POSIX acl buffer size (should be %u, was %u).\n",
3271                         src,
3272                         (unsigned int)(SMB_POSIX_ACL_HEADER_SIZE + SMB_POSIX_ACL_ENTRY_SIZE*(num_file_acls+num_dir_acls)),
3273                         (unsigned int)rb_size);
3274                 return 1;
3275         }
3276
3277         d_printf("# file: %s\n", src);
3278         d_printf("# owner: %u\n# group: %u\n", (unsigned int)sbuf.st_ex_uid, (unsigned int)sbuf.st_ex_gid);
3279
3280         if (num_file_acls == 0 && num_dir_acls == 0) {
3281                 d_printf("No acls found.\n");
3282         }
3283
3284         for (i = 0; i < num_file_acls; i++) {
3285                 uint32 uorg;
3286                 fstring permstring;
3287                 unsigned char tagtype = CVAL(retbuf, SMB_POSIX_ACL_HEADER_SIZE+(i*SMB_POSIX_ACL_ENTRY_SIZE));
3288                 unsigned char perms = CVAL(retbuf, SMB_POSIX_ACL_HEADER_SIZE+(i*SMB_POSIX_ACL_ENTRY_SIZE)+1);
3289
3290                 switch(tagtype) {
3291                         case SMB_POSIX_ACL_USER_OBJ:
3292                                 d_printf("user::");
3293                                 break;
3294                         case SMB_POSIX_ACL_USER:
3295                                 uorg = IVAL(retbuf,SMB_POSIX_ACL_HEADER_SIZE+(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3296                                 d_printf("user:%u:", uorg);
3297                                 break;
3298                         case SMB_POSIX_ACL_GROUP_OBJ:
3299                                 d_printf("group::");
3300                                 break;
3301                         case SMB_POSIX_ACL_GROUP:
3302                                 uorg = IVAL(retbuf,SMB_POSIX_ACL_HEADER_SIZE+(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3303                                 d_printf("group:%u:", uorg);
3304                                 break;
3305                         case SMB_POSIX_ACL_MASK:
3306                                 d_printf("mask::");
3307                                 break;
3308                         case SMB_POSIX_ACL_OTHER:
3309                                 d_printf("other::");
3310                                 break;
3311                         default:
3312                                 d_printf("getfacl file %s, incorrect POSIX acl tagtype (%u).\n",
3313                                         src, (unsigned int)tagtype );
3314                                 SAFE_FREE(retbuf);
3315                                 return 1;
3316                 }
3317
3318                 d_printf("%s\n", perms_to_string(permstring, perms));
3319         }
3320
3321         for (i = 0; i < num_dir_acls; i++) {
3322                 uint32 uorg;
3323                 fstring permstring;
3324                 unsigned char tagtype = CVAL(retbuf, SMB_POSIX_ACL_HEADER_SIZE+((i+num_file_acls)*SMB_POSIX_ACL_ENTRY_SIZE));
3325                 unsigned char perms = CVAL(retbuf, SMB_POSIX_ACL_HEADER_SIZE+((i+num_file_acls)*SMB_POSIX_ACL_ENTRY_SIZE)+1);
3326
3327                 switch(tagtype) {
3328                         case SMB_POSIX_ACL_USER_OBJ:
3329                                 d_printf("default:user::");
3330                                 break;
3331                         case SMB_POSIX_ACL_USER:
3332                                 uorg = IVAL(retbuf,SMB_POSIX_ACL_HEADER_SIZE+((i+num_file_acls)*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3333                                 d_printf("default:user:%u:", uorg);
3334                                 break;
3335                         case SMB_POSIX_ACL_GROUP_OBJ:
3336                                 d_printf("default:group::");
3337                                 break;
3338                         case SMB_POSIX_ACL_GROUP:
3339                                 uorg = IVAL(retbuf,SMB_POSIX_ACL_HEADER_SIZE+((i+num_file_acls)*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3340                                 d_printf("default:group:%u:", uorg);
3341                                 break;
3342                         case SMB_POSIX_ACL_MASK:
3343                                 d_printf("default:mask::");
3344                                 break;
3345                         case SMB_POSIX_ACL_OTHER:
3346                                 d_printf("default:other::");
3347                                 break;
3348                         default:
3349                                 d_printf("getfacl file %s, incorrect POSIX acl tagtype (%u).\n",
3350                                         src, (unsigned int)tagtype );
3351                                 SAFE_FREE(retbuf);
3352                                 return 1;
3353                 }
3354
3355                 d_printf("%s\n", perms_to_string(permstring, perms));
3356         }
3357
3358         return 0;
3359 }
3360
3361 static void printf_cb(const char *buf, void *private_data)
3362 {
3363         printf("%s", buf);
3364 }
3365
3366 /****************************************************************************
3367  Get the EA list of a file
3368 ****************************************************************************/
3369
3370 static int cmd_geteas(void)
3371 {
3372         TALLOC_CTX *ctx = talloc_tos();
3373         char *src = NULL;
3374         char *name = NULL;
3375         char *targetname = NULL;
3376         struct cli_state *targetcli;
3377         NTSTATUS status;
3378         size_t i, num_eas;
3379         struct ea_struct *eas;
3380
3381         if (!next_token_talloc(ctx, &cmd_ptr,&name,NULL)) {
3382                 d_printf("geteas filename\n");
3383                 return 1;
3384         }
3385         src = talloc_asprintf(ctx,
3386                         "%s%s",
3387                         client_get_cur_dir(),
3388                         name);
3389         if (!src) {
3390                 return 1;
3391         }
3392
3393         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli,
3394                               &targetname)) {
3395                 d_printf("stat %s: %s\n", src, cli_errstr(cli));
3396                 return 1;
3397         }
3398
3399         status = cli_get_ea_list_path(targetcli, targetname, talloc_tos(),
3400                                       &num_eas, &eas);
3401         if (!NT_STATUS_IS_OK(status)) {
3402                 d_printf("cli_get_ea_list_path: %s\n", nt_errstr(status));
3403                 return 1;
3404         }
3405
3406         for (i=0; i<num_eas; i++) {
3407                 d_printf("%s (%d) =\n", eas[i].name, (int)eas[i].flags);
3408                 dump_data_cb(eas[i].value.data, eas[i].value.length, false,
3409                              printf_cb, NULL);
3410                 d_printf("\n");
3411         }
3412
3413         TALLOC_FREE(eas);
3414
3415         return 0;
3416 }
3417
3418 /****************************************************************************
3419  Set an EA of a file
3420 ****************************************************************************/
3421
3422 static int cmd_setea(void)
3423 {
3424         TALLOC_CTX *ctx = talloc_tos();
3425         char *src = NULL;
3426         char *name = NULL;
3427         char *eaname = NULL;
3428         char *eavalue = NULL;
3429         char *targetname = NULL;
3430         struct cli_state *targetcli;
3431         NTSTATUS status;
3432
3433         if (!next_token_talloc(ctx, &cmd_ptr, &name, NULL)
3434             || !next_token_talloc(ctx, &cmd_ptr, &eaname, NULL)) {
3435                 d_printf("setea filename eaname value\n");
3436                 return 1;
3437         }
3438         if (!next_token_talloc(ctx, &cmd_ptr, &eavalue, NULL)) {
3439                 eavalue = talloc_strdup(ctx, "");
3440         }
3441         src = talloc_asprintf(ctx,
3442                         "%s%s",
3443                         client_get_cur_dir(),
3444                         name);
3445         if (!src) {
3446                 return 1;
3447         }
3448
3449         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli,
3450                               &targetname)) {
3451                 d_printf("stat %s: %s\n", src, cli_errstr(cli));
3452                 return 1;
3453         }
3454
3455         status =  cli_set_ea_path(targetcli, targetname, eaname, eavalue,
3456                                   strlen(eavalue));
3457         if (!NT_STATUS_IS_OK(status)) {
3458                 d_printf("set_ea %s: %s\n", src, nt_errstr(status));
3459                 return 1;
3460         }
3461
3462         return 0;
3463 }
3464
3465 /****************************************************************************
3466  UNIX stat.
3467 ****************************************************************************/
3468
3469 static int cmd_stat(void)
3470 {
3471         TALLOC_CTX *ctx = talloc_tos();
3472         char *src = NULL;
3473         char *name = NULL;
3474         char *targetname = NULL;
3475         struct cli_state *targetcli;
3476         fstring mode_str;
3477         SMB_STRUCT_STAT sbuf;
3478         struct tm *lt;
3479         time_t tmp_time;
3480
3481         if (!next_token_talloc(ctx, &cmd_ptr,&name,NULL)) {
3482                 d_printf("stat file\n");
3483                 return 1;
3484         }
3485         src = talloc_asprintf(ctx,
3486                         "%s%s",
3487                         client_get_cur_dir(),
3488                         name);
3489         if (!src) {
3490                 return 1;
3491         }
3492
3493         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetname)) {
3494                 d_printf("stat %s: %s\n", src, cli_errstr(cli));
3495                 return 1;
3496         }
3497
3498         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3499                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3500                 return 1;
3501         }
3502
3503         if (!NT_STATUS_IS_OK(cli_posix_stat(targetcli, targetname, &sbuf))) {
3504                 d_printf("%s stat file %s\n",
3505                         cli_errstr(targetcli), src);
3506                 return 1;
3507         }
3508
3509         /* Print out the stat values. */
3510         d_printf("File: %s\n", src);
3511         d_printf("Size: %-12.0f\tBlocks: %u\t%s\n",
3512                 (double)sbuf.st_ex_size,
3513                 (unsigned int)sbuf.st_ex_blocks,
3514                 filetype_to_str(sbuf.st_ex_mode));
3515
3516 #if defined(S_ISCHR) && defined(S_ISBLK)
3517         if (S_ISCHR(sbuf.st_ex_mode) || S_ISBLK(sbuf.st_ex_mode)) {
3518                 d_printf("Inode: %.0f\tLinks: %u\tDevice type: %u,%u\n",
3519                         (double)sbuf.st_ex_ino,
3520                         (unsigned int)sbuf.st_ex_nlink,
3521                         unix_dev_major(sbuf.st_ex_rdev),
3522                         unix_dev_minor(sbuf.st_ex_rdev));
3523         } else
3524 #endif
3525                 d_printf("Inode: %.0f\tLinks: %u\n",
3526                         (double)sbuf.st_ex_ino,
3527                         (unsigned int)sbuf.st_ex_nlink);
3528
3529         d_printf("Access: (0%03o/%s)\tUid: %u\tGid: %u\n",
3530                 ((int)sbuf.st_ex_mode & 0777),
3531                 unix_mode_to_str(mode_str, sbuf.st_ex_mode),
3532                 (unsigned int)sbuf.st_ex_uid,
3533                 (unsigned int)sbuf.st_ex_gid);
3534
3535         tmp_time = convert_timespec_to_time_t(sbuf.st_ex_atime);
3536         lt = localtime(&tmp_time);
3537         if (lt) {
3538                 strftime(mode_str, sizeof(mode_str), "%Y-%m-%d %T %z", lt);
3539         } else {
3540                 fstrcpy(mode_str, "unknown");
3541         }
3542         d_printf("Access: %s\n", mode_str);
3543
3544         tmp_time = convert_timespec_to_time_t(sbuf.st_ex_mtime);
3545         lt = localtime(&tmp_time);
3546         if (lt) {
3547                 strftime(mode_str, sizeof(mode_str), "%Y-%m-%d %T %z", lt);
3548         } else {
3549                 fstrcpy(mode_str, "unknown");
3550         }
3551         d_printf("Modify: %s\n", mode_str);
3552
3553         tmp_time = convert_timespec_to_time_t(sbuf.st_ex_ctime);
3554         lt = localtime(&tmp_time);
3555         if (lt) {
3556                 strftime(mode_str, sizeof(mode_str), "%Y-%m-%d %T %z", lt);
3557         } else {
3558                 fstrcpy(mode_str, "unknown");
3559         }
3560         d_printf("Change: %s\n", mode_str);
3561
3562         return 0;
3563 }
3564
3565
3566 /****************************************************************************
3567  UNIX chown.
3568 ****************************************************************************/
3569
3570 static int cmd_chown(void)
3571 {
3572         TALLOC_CTX *ctx = talloc_tos();
3573         char *src = NULL;
3574         uid_t uid;
3575         gid_t gid;
3576         char *buf, *buf2, *buf3;
3577         struct cli_state *targetcli;
3578         char *targetname = NULL;
3579
3580         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3581             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL) ||
3582             !next_token_talloc(ctx, &cmd_ptr,&buf3,NULL)) {
3583                 d_printf("chown uid gid file\n");
3584                 return 1;
3585         }
3586
3587         uid = (uid_t)atoi(buf);
3588         gid = (gid_t)atoi(buf2);
3589
3590         src = talloc_asprintf(ctx,
3591                         "%s%s",
3592                         client_get_cur_dir(),
3593                         buf3);
3594         if (!src) {
3595                 return 1;
3596         }
3597         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetname) ) {
3598                 d_printf("chown %s: %s\n", src, cli_errstr(cli));
3599                 return 1;
3600         }
3601
3602         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3603                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3604                 return 1;
3605         }
3606
3607         if (!NT_STATUS_IS_OK(cli_posix_chown(targetcli, targetname, uid, gid))) {
3608                 d_printf("%s chown file %s uid=%d, gid=%d\n",
3609                         cli_errstr(targetcli), src, (int)uid, (int)gid);
3610                 return 1;
3611         }
3612
3613         return 0;
3614 }
3615
3616 /****************************************************************************
3617  Rename some file.
3618 ****************************************************************************/
3619
3620 static int cmd_rename(void)
3621 {
3622         TALLOC_CTX *ctx = talloc_tos();
3623         char *src, *dest;
3624         char *buf, *buf2;
3625         struct cli_state *targetcli;
3626         char *targetsrc;
3627         char *targetdest;
3628
3629         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3630             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
3631                 d_printf("rename <src> <dest>\n");
3632                 return 1;
3633         }
3634
3635         src = talloc_asprintf(ctx,
3636                         "%s%s",
3637                         client_get_cur_dir(),
3638                         buf);
3639         if (!src) {
3640                 return 1;
3641         }
3642
3643         dest = talloc_asprintf(ctx,
3644                         "%s%s",
3645                         client_get_cur_dir(),
3646                         buf2);
3647         if (!dest) {
3648                 return 1;
3649         }
3650
3651         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetsrc)) {
3652                 d_printf("rename %s: %s\n", src, cli_errstr(cli));
3653                 return 1;
3654         }
3655
3656         if (!cli_resolve_path(ctx, "", auth_info, cli, dest, &targetcli, &targetdest)) {
3657                 d_printf("rename %s: %s\n", dest, cli_errstr(cli));
3658                 return 1;
3659         }
3660
3661         if (!NT_STATUS_IS_OK(cli_rename(targetcli, targetsrc, targetdest))) {
3662                 d_printf("%s renaming files %s -> %s \n",
3663                         cli_errstr(targetcli),
3664                         targetsrc,
3665                         targetdest);
3666                 return 1;
3667         }
3668
3669         return 0;
3670 }
3671
3672 /****************************************************************************
3673  Print the volume name.
3674 ****************************************************************************/
3675
3676 static int cmd_volume(void)
3677 {
3678         fstring volname;
3679         uint32 serial_num;
3680         time_t create_date;
3681         NTSTATUS status;
3682
3683         status = cli_get_fs_volume_info(cli, volname, &serial_num,
3684                                         &create_date);
3685         if (!NT_STATUS_IS_OK(status)) {
3686                 d_printf("Error %s getting volume info\n", nt_errstr(status));
3687                 return 1;
3688         }
3689
3690         d_printf("Volume: |%s| serial number 0x%x\n",
3691                         volname, (unsigned int)serial_num);
3692         return 0;
3693 }
3694
3695 /****************************************************************************
3696  Hard link files using the NT call.
3697 ****************************************************************************/
3698
3699 static int cmd_hardlink(void)
3700 {
3701         TALLOC_CTX *ctx = talloc_tos();
3702         char *src, *dest;
3703         char *buf, *buf2;
3704         struct cli_state *targetcli;
3705         char *targetname;
3706
3707         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3708             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
3709                 d_printf("hardlink <src> <dest>\n");
3710                 return 1;
3711         }
3712
3713         src = talloc_asprintf(ctx,
3714                         "%s%s",
3715                         client_get_cur_dir(),
3716                         buf);
3717         if (!src) {
3718                 return 1;
3719         }
3720
3721         dest = talloc_asprintf(ctx,
3722                         "%s%s",
3723                         client_get_cur_dir(),
3724                         buf2);
3725         if (!dest) {
3726                 return 1;
3727         }
3728
3729         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetname)) {
3730                 d_printf("hardlink %s: %s\n", src, cli_errstr(cli));
3731                 return 1;
3732         }
3733
3734         if (!NT_STATUS_IS_OK(cli_nt_hardlink(targetcli, targetname, dest))) {
3735                 d_printf("%s doing an NT hard link of files\n",cli_errstr(targetcli));
3736                 return 1;
3737         }
3738
3739         return 0;
3740 }
3741
3742 /****************************************************************************
3743  Toggle the prompt flag.
3744 ****************************************************************************/
3745
3746 static int cmd_prompt(void)
3747 {
3748         prompt = !prompt;
3749         DEBUG(2,("prompting is now %s\n",prompt?"on":"off"));
3750         return 1;
3751 }
3752
3753 /****************************************************************************
3754  Set the newer than time.
3755 ****************************************************************************/
3756
3757 static int cmd_newer(void)
3758 {
3759         TALLOC_CTX *ctx = talloc_tos();
3760         char *buf;
3761         bool ok;
3762         SMB_STRUCT_STAT sbuf;
3763
3764         ok = next_token_talloc(ctx, &cmd_ptr,&buf,NULL);
3765         if (ok && (sys_stat(buf, &sbuf, false) == 0)) {
3766                 newer_than = convert_timespec_to_time_t(sbuf.st_ex_mtime);
3767                 DEBUG(1,("Getting files newer than %s",
3768                          time_to_asc(newer_than)));
3769         } else {
3770                 newer_than = 0;
3771         }
3772
3773         if (ok && newer_than == 0) {
3774                 d_printf("Error setting newer-than time\n");
3775                 return 1;
3776         }
3777
3778         return 0;
3779 }
3780
3781 /****************************************************************************
3782  Set the archive level.
3783 ****************************************************************************/
3784
3785 static int cmd_archive(void)
3786 {
3787         TALLOC_CTX *ctx = talloc_tos();
3788         char *buf;
3789
3790         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
3791                 archive_level = atoi(buf);
3792         } else {
3793                 d_printf("Archive level is %d\n",archive_level);
3794         }
3795
3796         return 0;
3797 }
3798
3799 /****************************************************************************
3800  Toggle the lowercaseflag.
3801 ****************************************************************************/
3802
3803 static int cmd_lowercase(void)
3804 {
3805         lowercase = !lowercase;
3806         DEBUG(2,("filename lowercasing is now %s\n",lowercase?"on":"off"));
3807         return 0;
3808 }
3809
3810 /****************************************************************************
3811  Toggle the case sensitive flag.
3812 ****************************************************************************/
3813
3814 static int cmd_setcase(void)
3815 {
3816         bool orig_case_sensitive = cli_set_case_sensitive(cli, false);
3817
3818         cli_set_case_sensitive(cli, !orig_case_sensitive);
3819         DEBUG(2,("filename case sensitivity is now %s\n",!orig_case_sensitive ?
3820                 "on":"off"));
3821         return 0;
3822 }
3823
3824 /****************************************************************************
3825  Toggle the showacls flag.
3826 ****************************************************************************/
3827
3828 static int cmd_showacls(void)
3829 {
3830         showacls = !showacls;
3831         DEBUG(2,("showacls is now %s\n",showacls?"on":"off"));
3832         return 0;
3833 }
3834
3835
3836 /****************************************************************************
3837  Toggle the recurse flag.
3838 ****************************************************************************/
3839
3840 static int cmd_recurse(void)
3841 {
3842         recurse = !recurse;
3843         DEBUG(2,("directory recursion is now %s\n",recurse?"on":"off"));
3844         return 0;
3845 }
3846
3847 /****************************************************************************
3848  Toggle the translate flag.
3849 ****************************************************************************/
3850
3851 static int cmd_translate(void)
3852 {
3853         translation = !translation;
3854         DEBUG(2,("CR/LF<->LF and print text translation now %s\n",
3855                  translation?"on":"off"));
3856         return 0;
3857 }
3858
3859 /****************************************************************************
3860  Do the lcd command.
3861  ****************************************************************************/
3862
3863 static int cmd_lcd(void)
3864 {
3865         TALLOC_CTX *ctx = talloc_tos();
3866         char *buf;
3867         char *d;
3868
3869         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
3870                 if (chdir(buf) == -1) {
3871                         d_printf("chdir to %s failed (%s)\n",
3872                                 buf, strerror(errno));
3873                 }
3874         }
3875         d = TALLOC_ARRAY(ctx, char, PATH_MAX+1);
3876         if (!d) {
3877                 return 1;
3878         }
3879         DEBUG(2,("the local directory is now %s\n",sys_getwd(d)));
3880         return 0;
3881 }
3882
3883 /****************************************************************************
3884  Get a file restarting at end of local file.
3885  ****************************************************************************/
3886
3887 static int cmd_reget(void)
3888 {
3889         TALLOC_CTX *ctx = talloc_tos();
3890         char *local_name = NULL;
3891         char *remote_name = NULL;
3892         char *fname = NULL;
3893         char *p = NULL;
3894
3895         remote_name = talloc_strdup(ctx, client_get_cur_dir());
3896         if (!remote_name) {
3897                 return 1;
3898         }
3899
3900         if (!next_token_talloc(ctx, &cmd_ptr, &fname, NULL)) {
3901                 d_printf("reget <filename>\n");
3902                 return 1;
3903         }
3904         remote_name = talloc_asprintf_append(remote_name, "%s", fname);
3905         if (!remote_name) {
3906                 return 1;
3907         }
3908         remote_name = clean_name(ctx,remote_name);
3909         if (!remote_name) {
3910                 return 1;
3911         }
3912
3913         local_name = fname;
3914         next_token_talloc(ctx, &cmd_ptr, &p, NULL);
3915         if (p) {
3916                 local_name = p;
3917         }
3918
3919         return do_get(remote_name, local_name, true);
3920 }
3921
3922 /****************************************************************************
3923  Put a file restarting at end of local file.
3924  ****************************************************************************/
3925
3926 static int cmd_reput(void)
3927 {
3928         TALLOC_CTX *ctx = talloc_tos();
3929         char *local_name = NULL;
3930         char *remote_name = NULL;
3931         char *buf;
3932         SMB_STRUCT_STAT st;
3933
3934         remote_name = talloc_strdup(ctx, client_get_cur_dir());
3935         if (!remote_name) {
3936                 return 1;
3937         }
3938
3939         if (!next_token_talloc(ctx, &cmd_ptr, &local_name, NULL)) {
3940                 d_printf("reput <filename>\n");
3941                 return 1;
3942         }
3943
3944         if (!file_exist_stat(local_name, &st, false)) {
3945                 d_printf("%s does not exist\n", local_name);
3946                 return 1;
3947         }
3948
3949         if (next_token_talloc(ctx, &cmd_ptr, &buf, NULL)) {
3950                 remote_name = talloc_asprintf_append(remote_name,
3951                                                 "%s", buf);
3952         } else {
3953                 remote_name = talloc_asprintf_append(remote_name,
3954                                                 "%s", local_name);
3955         }
3956         if (!remote_name) {
3957                 return 1;
3958         }
3959
3960         remote_name = clean_name(ctx, remote_name);
3961         if (!remote_name) {
3962                 return 1;
3963         }
3964
3965         return do_put(remote_name, local_name, true);
3966 }
3967
3968 /****************************************************************************
3969  List a share name.
3970  ****************************************************************************/
3971
3972 static void browse_fn(const char *name, uint32 m,
3973                       const char *comment, void *state)
3974 {
3975         const char *typestr = "";
3976
3977         switch (m & 7) {
3978         case STYPE_DISKTREE:
3979                 typestr = "Disk";
3980                 break;
3981         case STYPE_PRINTQ:
3982                 typestr = "Printer";
3983                 break;
3984         case STYPE_DEVICE:
3985                 typestr = "Device";
3986                 break;
3987         case STYPE_IPC:
3988                 typestr = "IPC";
3989                 break;
3990         }
3991         /* FIXME: If the remote machine returns non-ascii characters
3992            in any of these fields, they can corrupt the output.  We
3993            should remove them. */
3994         if (!grepable) {
3995                 d_printf("\t%-15s %-10.10s%s\n",
3996                         name,typestr,comment);
3997         } else {
3998                 d_printf ("%s|%s|%s\n",typestr,name,comment);
3999         }
4000 }
4001
4002 static bool browse_host_rpc(bool sort)
4003 {
4004         NTSTATUS status;
4005         struct rpc_pipe_client *pipe_hnd = NULL;
4006         TALLOC_CTX *frame = talloc_stackframe();
4007         WERROR werr;
4008         struct srvsvc_NetShareInfoCtr info_ctr;
4009         struct srvsvc_NetShareCtr1 ctr1;
4010         uint32_t resume_handle = 0;
4011         uint32_t total_entries = 0;
4012         int i;
4013         struct dcerpc_binding_handle *b;
4014
4015         status = cli_rpc_pipe_open_noauth(cli, &ndr_table_srvsvc.syntax_id,
4016                                           &pipe_hnd);
4017
4018         if (!NT_STATUS_IS_OK(status)) {
4019                 DEBUG(10, ("Could not connect to srvsvc pipe: %s\n",
4020                            nt_errstr(status)));
4021                 TALLOC_FREE(frame);
4022                 return false;
4023         }
4024
4025         b = pipe_hnd->binding_handle;
4026
4027         ZERO_STRUCT(info_ctr);
4028         ZERO_STRUCT(ctr1);
4029
4030         info_ctr.level = 1;
4031         info_ctr.ctr.ctr1 = &ctr1;
4032
4033         status = dcerpc_srvsvc_NetShareEnumAll(b, frame,
4034                                               pipe_hnd->desthost,
4035                                               &info_ctr,
4036                                               0xffffffff,
4037                                               &total_entries,
4038                                               &resume_handle,
4039                                               &werr);
4040
4041         if (!NT_STATUS_IS_OK(status) || !W_ERROR_IS_OK(werr)) {
4042                 TALLOC_FREE(pipe_hnd);
4043                 TALLOC_FREE(frame);
4044                 return false;
4045         }
4046
4047         for (i=0; i < info_ctr.ctr.ctr1->count; i++) {
4048                 struct srvsvc_NetShareInfo1 info = info_ctr.ctr.ctr1->array[i];
4049                 browse_fn(info.name, info.type, info.comment, NULL);
4050         }
4051
4052         TALLOC_FREE(pipe_hnd);
4053         TALLOC_FREE(frame);
4054         return true;
4055 }
4056
4057 /****************************************************************************
4058  Try and browse available connections on a host.
4059 ****************************************************************************/
4060
4061 static bool browse_host(bool sort)
4062 {
4063         int ret;
4064         if (!grepable) {
4065                 d_printf("\n\tSharename       Type      Comment\n");
4066                 d_printf("\t---------       ----      -------\n");
4067         }
4068
4069         if (browse_host_rpc(sort)) {
4070                 return true;
4071         }
4072
4073         if((ret = cli_RNetShareEnum(cli, browse_fn, NULL)) == -1)
4074                 d_printf("Error returning browse list: %s\n", cli_errstr(cli));
4075
4076         return (ret != -1);
4077 }
4078
4079 /****************************************************************************
4080  List a server name.
4081 ****************************************************************************/
4082
4083 static void server_fn(const char *name, uint32 m,
4084                       const char *comment, void *state)
4085 {
4086
4087         if (!grepable){
4088                 d_printf("\t%-16s     %s\n", name, comment);
4089         } else {
4090                 d_printf("%s|%s|%s\n",(char *)state, name, comment);
4091         }
4092 }
4093
4094 /****************************************************************************
4095  Try and browse available connections on a host.
4096 ****************************************************************************/
4097
4098 static bool list_servers(const char *wk_grp)
4099 {
4100         fstring state;
4101
4102         if (!cli->server_domain)
4103                 return false;
4104
4105         if (!grepable) {
4106                 d_printf("\n\tServer               Comment\n");
4107                 d_printf("\t---------            -------\n");
4108         };
4109         fstrcpy( state, "Server" );
4110         cli_NetServerEnum(cli, cli->server_domain, SV_TYPE_ALL, server_fn,
4111                           state);
4112
4113         if (!grepable) {
4114                 d_printf("\n\tWorkgroup            Master\n");
4115                 d_printf("\t---------            -------\n");
4116         };
4117
4118         fstrcpy( state, "Workgroup" );
4119         cli_NetServerEnum(cli, cli->server_domain, SV_TYPE_DOMAIN_ENUM,
4120                           server_fn, state);
4121         return true;
4122 }
4123
4124 /****************************************************************************
4125  Print or set current VUID
4126 ****************************************************************************/
4127
4128 static int cmd_vuid(void)
4129 {
4130         TALLOC_CTX *ctx = talloc_tos();
4131         char *buf;
4132
4133         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
4134                 d_printf("Current VUID is %d\n", cli->vuid);
4135                 return 0;
4136         }
4137
4138         cli->vuid = atoi(buf);
4139         return 0;
4140 }
4141
4142 /****************************************************************************
4143  Setup a new VUID, by issuing a session setup
4144 ****************************************************************************/
4145
4146 static int cmd_logon(void)
4147 {
4148         TALLOC_CTX *ctx = talloc_tos();
4149         char *l_username, *l_password;
4150         NTSTATUS nt_status;
4151
4152         if (!next_token_talloc(ctx, &cmd_ptr,&l_username,NULL)) {
4153                 d_printf("logon <username> [<password>]\n");
4154                 return 0;
4155         }
4156
4157         if (!next_token_talloc(ctx, &cmd_ptr,&l_password,NULL)) {
4158                 char *pass = getpass("Password: ");
4159                 if (pass) {
4160                         l_password = talloc_strdup(ctx,pass);
4161                 }
4162         }
4163         if (!l_password) {
4164                 return 1;
4165         }
4166
4167         nt_status = cli_session_setup(cli, l_username,
4168                                       l_password, strlen(l_password),
4169                                       l_password, strlen(l_password),
4170                                       lp_workgroup());
4171         if (!NT_STATUS_IS_OK(nt_status)) {
4172                 d_printf("session setup failed: %s\n", nt_errstr(nt_status));
4173                 return -1;
4174         }
4175
4176         d_printf("Current VUID is %d\n", cli->vuid);
4177         return 0;
4178 }
4179
4180
4181 /****************************************************************************
4182  list active connections
4183 ****************************************************************************/
4184
4185 static int cmd_list_connect(void)
4186 {
4187         cli_cm_display(cli);
4188         return 0;
4189 }
4190
4191 /****************************************************************************
4192  display the current active client connection
4193 ****************************************************************************/
4194
4195 static int cmd_show_connect( void )
4196 {
4197         TALLOC_CTX *ctx = talloc_tos();
4198         struct cli_state *targetcli;
4199         char *targetpath;
4200
4201         if (!cli_resolve_path(ctx, "", auth_info, cli, client_get_cur_dir(),
4202                                 &targetcli, &targetpath ) ) {
4203                 d_printf("showconnect %s: %s\n", cur_dir, cli_errstr(cli));
4204                 return 1;
4205         }
4206
4207         d_printf("//%s/%s\n", targetcli->desthost, targetcli->share);
4208         return 0;
4209 }
4210
4211 /****************************************************************************
4212  iosize command
4213 ***************************************************************************/
4214
4215 int cmd_iosize(void)
4216 {
4217         TALLOC_CTX *ctx = talloc_tos();
4218         char *buf;
4219         int iosize;
4220
4221         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
4222                 if (!smb_encrypt) {
4223                         d_printf("iosize <n> or iosize 0x<n>. "
4224                                 "Minimum is 16384 (0x4000), "
4225                                 "max is 16776960 (0xFFFF00)\n");
4226                 } else {
4227                         d_printf("iosize <n> or iosize 0x<n>. "
4228                                 "(Encrypted connection) ,"
4229                                 "Minimum is 16384 (0x4000), "
4230                                 "max is 130048 (0x1FC00)\n");
4231                 }
4232                 return 1;
4233         }
4234
4235         iosize = strtol(buf,NULL,0);
4236         if (smb_encrypt && (iosize < 0x4000 || iosize > 0xFC00)) {
4237                 d_printf("iosize out of range for encrypted "
4238                         "connection (min = 16384 (0x4000), "
4239                         "max = 130048 (0x1FC00)");
4240                 return 1;
4241         } else if (!smb_encrypt && (iosize < 0x4000 || iosize > 0xFFFF00)) {
4242                 d_printf("iosize out of range (min = 16384 (0x4000), "
4243                         "max = 16776960 (0xFFFF00)");
4244                 return 1;
4245         }
4246
4247         io_bufsize = iosize;
4248         d_printf("iosize is now %d\n", io_bufsize);
4249         return 0;
4250 }
4251
4252 /****************************************************************************
4253 history
4254 ****************************************************************************/
4255 static int cmd_history(void)
4256 {
4257 #if defined(HAVE_LIBREADLINE) && defined(HAVE_HISTORY_LIST)
4258         HIST_ENTRY **hlist;
4259         int i;
4260
4261         hlist = history_list();
4262
4263         for (i = 0; hlist && hlist[i]; i++) {
4264                 DEBUG(0, ("%d: %s\n", i, hlist[i]->line));
4265         }
4266 #else
4267         DEBUG(0,("no history without readline support\n"));
4268 #endif
4269
4270         return 0;
4271 }
4272
4273 /* Some constants for completing filename arguments */
4274
4275 #define COMPL_NONE        0          /* No completions */
4276 #define COMPL_REMOTE      1          /* Complete remote filename */
4277 #define COMPL_LOCAL       2          /* Complete local filename */
4278
4279 /* This defines the commands supported by this client.
4280  * NOTE: The "!" must be the last one in the list because it's fn pointer
4281  *       field is NULL, and NULL in that field is used in process_tok()
4282  *       (below) to indicate the end of the list.  crh
4283  */
4284 static struct {
4285         const char *name;
4286         int (*fn)(void);
4287         const char *description;
4288         char compl_args[2];      /* Completion argument info */
4289 } commands[] = {
4290   {"?",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
4291   {"allinfo",cmd_allinfo,"<file> show all available info",
4292    {COMPL_NONE,COMPL_NONE}},
4293   {"altname",cmd_altname,"<file> show alt name",{COMPL_NONE,COMPL_NONE}},
4294   {"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}},
4295   {"blocksize",cmd_block,"blocksize <number> (default 20)",{COMPL_NONE,COMPL_NONE}},
4296   {"cancel",cmd_cancel,"<jobid> cancel a print queue entry",{COMPL_NONE,COMPL_NONE}},
4297   {"case_sensitive",cmd_setcase,"toggle the case sensitive flag to server",{COMPL_NONE,COMPL_NONE}},
4298   {"cd",cmd_cd,"[directory] change/report the remote directory",{COMPL_REMOTE,COMPL_NONE}},
4299   {"chmod",cmd_chmod,"<src> <mode> chmod a file using UNIX permission",{COMPL_REMOTE,COMPL_REMOTE}},
4300   {"chown",cmd_chown,"<src> <uid> <gid> chown a file using UNIX uids and gids",{COMPL_REMOTE,COMPL_REMOTE}},
4301   {"close",cmd_close,"<fid> close a file given a fid",{COMPL_REMOTE,COMPL_REMOTE}},
4302   {"del",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
4303   {"dir",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
4304   {"du",cmd_du,"<mask> computes the total size of the current directory",{COMPL_REMOTE,COMPL_NONE}},
4305   {"echo",cmd_echo,"ping the server",{COMPL_NONE,COMPL_NONE}},
4306   {"exit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
4307   {"get",cmd_get,"<remote name> [local name] get a file",{COMPL_REMOTE,COMPL_LOCAL}},
4308   {"getfacl",cmd_getfacl,"<file name> get the POSIX ACL on a file (UNIX extensions only)",{COMPL_REMOTE,COMPL_LOCAL}},
4309   {"geteas", cmd_geteas, "<file name> get the EA list of a file",
4310    {COMPL_REMOTE, COMPL_LOCAL}},
4311   {"hardlink",cmd_hardlink,"<src> <dest> create a Windows hard link",{COMPL_REMOTE,COMPL_REMOTE}},
4312   {"help",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
4313   {"history",cmd_history,"displays the command history",{COMPL_NONE,COMPL_NONE}},
4314   {"iosize",cmd_iosize,"iosize <number> (default 64512)",{COMPL_NONE,COMPL_NONE}},
4315   {"lcd",cmd_lcd,"[directory] change/report the local current working directory",{COMPL_LOCAL,COMPL_NONE}},
4316   {"link",cmd_link,"<oldname> <newname> create a UNIX hard link",{COMPL_REMOTE,COMPL_REMOTE}},
4317   {"lock",cmd_lock,"lock <fnum> [r|w] <hex-start> <hex-len> : set a POSIX lock",{COMPL_REMOTE,COMPL_REMOTE}},
4318   {"lowercase",cmd_lowercase,"toggle lowercasing of filenames for get",{COMPL_NONE,COMPL_NONE}},
4319   {"ls",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
4320   {"l",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
4321   {"mask",cmd_select,"<mask> mask all filenames against this",{COMPL_REMOTE,COMPL_NONE}},
4322   {"md",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
4323   {"mget",cmd_mget,"<mask> get all the matching files",{COMPL_REMOTE,COMPL_NONE}},
4324   {"mkdir",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
4325   {"more",cmd_more,"<remote name> view a remote file with your pager",{COMPL_REMOTE,COMPL_NONE}},
4326   {"mput",cmd_mput,"<mask> put all matching files",{COMPL_REMOTE,COMPL_NONE}},
4327   {"newer",cmd_newer,"<file> only mget files newer than the specified local file",{COMPL_LOCAL,COMPL_NONE}},
4328   {"open",cmd_open,"<mask> open a file",{COMPL_REMOTE,COMPL_NONE}},
4329   {"posix", cmd_posix, "turn on all POSIX capabilities", {COMPL_REMOTE,COMPL_NONE}},
4330   {"posix_encrypt",cmd_posix_encrypt,"<domain> <user> <password> start up transport encryption",{COMPL_REMOTE,COMPL_NONE}},
4331   {"posix_open",cmd_posix_open,"<name> 0<mode> open_flags mode open a file using POSIX interface",{COMPL_REMOTE,COMPL_NONE}},
4332   {"posix_mkdir",cmd_posix_mkdir,"<name> 0<mode> creates a directory using POSIX interface",{COMPL_REMOTE,COMPL_NONE}},
4333   {"posix_rmdir",cmd_posix_rmdir,"<name> removes a directory using POSIX interface",{COMPL_REMOTE,COMPL_NONE}},
4334   {"posix_unlink",cmd_posix_unlink,"<name> removes a file using POSIX interface",{COMPL_REMOTE,COMPL_NONE}},
4335   {"print",cmd_print,"<file name> print a file",{COMPL_NONE,COMPL_NONE}},
4336   {"prompt",cmd_prompt,"toggle prompting for filenames for mget and mput",{COMPL_NONE,COMPL_NONE}},
4337   {"put",cmd_put,"<local name> [remote name] put a file",{COMPL_LOCAL,COMPL_REMOTE}},
4338   {"pwd",cmd_pwd,"show current remote directory (same as 'cd' with no args)",{COMPL_NONE,COMPL_NONE}},
4339   {"q",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
4340   {"queue",cmd_queue,"show the print queue",{COMPL_NONE,COMPL_NONE}},
4341   {"quit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
4342   {"readlink",cmd_readlink,"filename Do a UNIX extensions readlink call on a symlink",{COMPL_REMOTE,COMPL_REMOTE}},
4343   {"rd",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
4344   {"recurse",cmd_recurse,"toggle directory recursion for mget and mput",{COMPL_NONE,COMPL_NONE}},
4345   {"reget",cmd_reget,"<remote name> [local name] get a file restarting at end of local file",{COMPL_REMOTE,COMPL_LOCAL}},
4346   {"rename",cmd_rename,"<src> <dest> rename some files",{COMPL_REMOTE,COMPL_REMOTE}},
4347   {"reput",cmd_reput,"<local name> [remote name] put a file restarting at end of remote file",{COMPL_LOCAL,COMPL_REMOTE}},
4348   {"rm",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
4349   {"rmdir",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
4350   {"showacls",cmd_showacls,"toggle if ACLs are shown or not",{COMPL_NONE,COMPL_NONE}},
4351   {"setea", cmd_setea, "<file name> <eaname> <eaval> Set an EA of a file",
4352    {COMPL_REMOTE, COMPL_LOCAL}},
4353   {"setmode",cmd_setmode,"filename <setmode string> change modes of file",{COMPL_REMOTE,COMPL_NONE}},
4354   {"stat",cmd_stat,"filename Do a UNIX extensions stat call on a file",{COMPL_REMOTE,COMPL_REMOTE}},
4355   {"symlink",cmd_symlink,"<oldname> <newname> create a UNIX symlink",{COMPL_REMOTE,COMPL_REMOTE}},
4356   {"tar",cmd_tar,"tar <c|x>[IXFqbgNan] current directory to/from <file name>",{COMPL_NONE,COMPL_NONE}},
4357   {"tarmode",cmd_tarmode,"<full|inc|reset|noreset> tar's behaviour towards archive bits",{COMPL_NONE,COMPL_NONE}},
4358   {"translate",cmd_translate,"toggle text translation for printing",{COMPL_NONE,COMPL_NONE}},
4359   {"unlock",cmd_unlock,"unlock <fnum> <hex-start> <hex-len> : remove a POSIX lock",{COMPL_REMOTE,COMPL_REMOTE}},
4360   {"volume",cmd_volume,"print the volume name",{COMPL_NONE,COMPL_NONE}},
4361   {"vuid",cmd_vuid,"change current vuid",{COMPL_NONE,COMPL_NONE}},
4362   {"wdel",cmd_wdel,"<attrib> <mask> wildcard delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
4363   {"logon",cmd_logon,"establish new logon",{COMPL_NONE,COMPL_NONE}},
4364   {"listconnect",cmd_list_connect,"list open connections",{COMPL_NONE,COMPL_NONE}},
4365   {"showconnect",cmd_show_connect,"display the current active connection",{COMPL_NONE,COMPL_NONE}},
4366   {"..",cmd_cd_oneup,"change the remote directory (up one level)",{COMPL_REMOTE,COMPL_NONE}},
4367
4368   /* Yes, this must be here, see crh's comment above. */
4369   {"!",NULL,"run a shell command on the local system",{COMPL_NONE,COMPL_NONE}},
4370   {NULL,NULL,NULL,{COMPL_NONE,COMPL_NONE}}
4371 };
4372
4373 /*******************************************************************
4374  Lookup a command string in the list of commands, including
4375  abbreviations.
4376 ******************************************************************/
4377
4378 static int process_tok(char *tok)
4379 {
4380         int i = 0, matches = 0;
4381         int cmd=0;
4382         int tok_len = strlen(tok);
4383
4384         while (commands[i].fn != NULL) {
4385                 if (strequal(commands[i].name,tok)) {
4386                         matches = 1;
4387                         cmd = i;
4388                         break;
4389                 } else if (strnequal(commands[i].name, tok, tok_len)) {
4390                         matches++;
4391                         cmd = i;
4392                 }
4393                 i++;
4394         }
4395
4396         if (matches == 0)
4397                 return(-1);
4398         else if (matches == 1)
4399                 return(cmd);
4400         else
4401                 return(-2);
4402 }
4403
4404 /****************************************************************************
4405  Help.
4406 ****************************************************************************/
4407
4408 static int cmd_help(void)
4409 {
4410         TALLOC_CTX *ctx = talloc_tos();
4411         int i=0,j;
4412         char *buf;
4413
4414         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
4415                 if ((i = process_tok(buf)) >= 0)
4416                         d_printf("HELP %s:\n\t%s\n\n",
4417                                 commands[i].name,commands[i].description);
4418         } else {
4419                 while (commands[i].description) {
4420                         for (j=0; commands[i].description && (j<5); j++) {
4421                                 d_printf("%-15s",commands[i].name);
4422                                 i++;
4423                         }
4424                         d_printf("\n");
4425                 }
4426         }
4427         return 0;
4428 }
4429
4430 /****************************************************************************
4431  Process a -c command string.
4432 ****************************************************************************/
4433
4434 static int process_command_string(const char *cmd_in)
4435 {
4436         TALLOC_CTX *ctx = talloc_tos();
4437         char *cmd = talloc_strdup(ctx, cmd_in);
4438         int rc = 0;
4439
4440         if (!cmd) {
4441                 return 1;
4442         }
4443         /* establish the connection if not already */
4444
4445         if (!cli) {
4446                 cli = cli_cm_open(talloc_tos(), NULL,
4447                                 have_ip ? dest_ss_str : desthost,
4448                                 service, auth_info,
4449                                 true, smb_encrypt,
4450                                 max_protocol, port, name_type);
4451                 if (!cli) {
4452                         return 1;
4453                 }
4454         }
4455
4456         while (cmd[0] != '\0')    {
4457                 char *line;
4458                 char *p;
4459                 char *tok;
4460                 int i;
4461
4462                 if ((p = strchr_m(cmd, ';')) == 0) {
4463                         line = cmd;
4464                         cmd += strlen(cmd);
4465                 } else {
4466                         *p = '\0';
4467                         line = cmd;
4468                         cmd = p + 1;
4469                 }
4470
4471                 /* and get the first part of the command */
4472                 cmd_ptr = line;
4473                 if (!next_token_talloc(ctx, &cmd_ptr,&tok,NULL)) {
4474                         continue;
4475                 }
4476
4477                 if ((i = process_tok(tok)) >= 0) {
4478                         rc = commands[i].fn();
4479                 } else if (i == -2) {
4480                         d_printf("%s: command abbreviation ambiguous\n",tok);
4481                 } else {
4482                         d_printf("%s: command not found\n",tok);
4483                 }
4484         }
4485
4486         return rc;
4487 }
4488
4489 #define MAX_COMPLETIONS 100
4490
4491 struct completion_remote {
4492         char *dirmask;
4493         char **matches;
4494         int count, samelen;
4495         const char *text;
4496         int len;
4497 };
4498
4499 static NTSTATUS completion_remote_filter(const char *mnt,
4500                                 struct file_info *f,
4501                                 const char *mask,
4502                                 void *state)
4503 {
4504         struct completion_remote *info = (struct completion_remote *)state;
4505
4506         if (info->count >= MAX_COMPLETIONS - 1) {
4507                 return NT_STATUS_OK;
4508         }
4509         if (strncmp(info->text, f->name, info->len) != 0) {
4510                 return NT_STATUS_OK;
4511         }
4512         if (ISDOT(f->name) || ISDOTDOT(f->name)) {
4513                 return NT_STATUS_OK;
4514         }
4515
4516         if ((info->dirmask[0] == 0) && !(f->mode & aDIR))
4517                 info->matches[info->count] = SMB_STRDUP(f->name);
4518         else {
4519                 TALLOC_CTX *ctx = talloc_stackframe();
4520                 char *tmp;
4521
4522                 tmp = talloc_strdup(ctx,info->dirmask);
4523                 if (!tmp) {
4524                         TALLOC_FREE(ctx);
4525                         return NT_STATUS_NO_MEMORY;
4526                 }
4527                 tmp = talloc_asprintf_append(tmp, "%s", f->name);
4528                 if (!tmp) {
4529                         TALLOC_FREE(ctx);
4530                         return NT_STATUS_NO_MEMORY;
4531                 }
4532                 if (f->mode & aDIR) {
4533                         tmp = talloc_asprintf_append(tmp, "%s",
4534                                                      CLI_DIRSEP_STR);
4535                 }
4536                 if (!tmp) {
4537                         TALLOC_FREE(ctx);
4538                         return NT_STATUS_NO_MEMORY;
4539                 }
4540                 info->matches[info->count] = SMB_STRDUP(tmp);
4541                 TALLOC_FREE(ctx);
4542         }
4543         if (info->matches[info->count] == NULL) {
4544                 return NT_STATUS_OK;
4545         }
4546         if (f->mode & aDIR) {
4547                 smb_readline_ca_char(0);
4548         }
4549         if (info->count == 1) {
4550                 info->samelen = strlen(info->matches[info->count]);
4551         } else {
4552                 while (strncmp(info->matches[info->count],
4553                                info->matches[info->count-1],
4554                                info->samelen) != 0) {
4555                         info->samelen--;
4556                 }
4557         }
4558         info->count++;
4559         return NT_STATUS_OK;
4560 }
4561
4562 static char **remote_completion(const char *text, int len)
4563 {
4564         TALLOC_CTX *ctx = talloc_stackframe();
4565         char *dirmask = NULL;
4566         char *targetpath = NULL;
4567         struct cli_state *targetcli = NULL;
4568         int i;
4569         struct completion_remote info = { NULL, NULL, 1, 0, NULL, 0 };
4570         NTSTATUS status;
4571
4572         /* can't have non-static initialisation on Sun CC, so do it
4573            at run time here */
4574         info.samelen = len;
4575         info.text = text;
4576         info.len = len;
4577
4578         info.matches = SMB_MALLOC_ARRAY(char *,MAX_COMPLETIONS);
4579         if (!info.matches) {
4580                 TALLOC_FREE(ctx);
4581                 return NULL;
4582         }
4583
4584         /*
4585          * We're leaving matches[0] free to fill it later with the text to
4586          * display: Either the one single match or the longest common subset
4587          * of the matches.
4588          */
4589         info.matches[0] = NULL;
4590         info.count = 1;
4591
4592         for (i = len-1; i >= 0; i--) {
4593                 if ((text[i] == '/') || (text[i] == CLI_DIRSEP_CHAR)) {
4594                         break;
4595                 }
4596         }
4597
4598         info.text = text+i+1;
4599         info.samelen = info.len = len-i-1;
4600
4601         if (i > 0) {
4602                 info.dirmask = SMB_MALLOC_ARRAY(char, i+2);
4603                 if (!info.dirmask) {
4604                         goto cleanup;
4605                 }
4606                 strncpy(info.dirmask, text, i+1);
4607                 info.dirmask[i+1] = 0;
4608                 dirmask = talloc_asprintf(ctx,
4609                                         "%s%*s*",
4610                                         client_get_cur_dir(),
4611                                         i-1,
4612                                         text);
4613         } else {
4614                 info.dirmask = SMB_STRDUP("");
4615                 if (!info.dirmask) {
4616                         goto cleanup;
4617                 }
4618                 dirmask = talloc_asprintf(ctx,
4619                                         "%s*",
4620                                         client_get_cur_dir());
4621         }
4622         if (!dirmask) {
4623                 goto cleanup;
4624         }
4625
4626         if (!cli_resolve_path(ctx, "", auth_info, cli, dirmask, &targetcli, &targetpath)) {
4627                 goto cleanup;
4628         }
4629         status = cli_list(targetcli, targetpath, aDIR | aSYSTEM | aHIDDEN,
4630                           completion_remote_filter, (void *)&info);
4631         if (!NT_STATUS_IS_OK(status)) {
4632                 goto cleanup;
4633         }
4634
4635         if (info.count == 1) {
4636                 /*
4637                  * No matches at all, NULL indicates there is nothing
4638                  */
4639                 SAFE_FREE(info.matches[0]);
4640                 SAFE_FREE(info.matches);
4641                 TALLOC_FREE(ctx);
4642                 return NULL;
4643         }
4644
4645         if (info.count == 2) {
4646                 /*
4647                  * Exactly one match in matches[1], indicate this is the one
4648                  * in matches[0].
4649                  */
4650                 info.matches[0] = info.matches[1];
4651                 info.matches[1] = NULL;
4652                 info.count -= 1;
4653                 TALLOC_FREE(ctx);
4654                 return info.matches;
4655         }
4656
4657         /*
4658          * We got more than one possible match, set the result to the maximum
4659          * common subset
4660          */
4661
4662         info.matches[0] = SMB_STRNDUP(info.matches[1], info.samelen);
4663         info.matches[info.count] = NULL;
4664         return info.matches;
4665
4666 cleanup:
4667         for (i = 0; i < info.count; i++) {
4668                 SAFE_FREE(info.matches[i]);
4669         }
4670         SAFE_FREE(info.matches);
4671         SAFE_FREE(info.dirmask);
4672         TALLOC_FREE(ctx);
4673         return NULL;
4674 }
4675
4676 static char **completion_fn(const char *text, int start, int end)
4677 {
4678         smb_readline_ca_char(' ');
4679
4680         if (start) {
4681                 const char *buf, *sp;
4682                 int i;
4683                 char compl_type;
4684
4685                 buf = smb_readline_get_line_buffer();
4686                 if (buf == NULL)
4687                         return NULL;
4688
4689                 sp = strchr(buf, ' ');
4690                 if (sp == NULL)
4691                         return NULL;
4692
4693                 for (i = 0; commands[i].name; i++) {
4694                         if ((strncmp(commands[i].name, buf, sp - buf) == 0) &&
4695                             (commands[i].name[sp - buf] == 0)) {
4696                                 break;
4697                         }
4698                 }
4699                 if (commands[i].name == NULL)
4700                         return NULL;
4701
4702                 while (*sp == ' ')
4703                         sp++;
4704
4705                 if (sp == (buf + start))
4706                         compl_type = commands[i].compl_args[0];
4707                 else
4708                         compl_type = commands[i].compl_args[1];
4709
4710                 if (compl_type == COMPL_REMOTE)
4711                         return remote_completion(text, end - start);
4712                 else /* fall back to local filename completion */
4713                         return NULL;
4714         } else {
4715                 char **matches;
4716                 int i, len, samelen = 0, count=1;
4717
4718                 matches = SMB_MALLOC_ARRAY(char *, MAX_COMPLETIONS);
4719                 if (!matches) {
4720                         return NULL;
4721                 }
4722                 matches[0] = NULL;
4723
4724                 len = strlen(text);
4725                 for (i=0;commands[i].fn && count < MAX_COMPLETIONS-1;i++) {
4726                         if (strncmp(text, commands[i].name, len) == 0) {
4727                                 matches[count] = SMB_STRDUP(commands[i].name);
4728                                 if (!matches[count])
4729                                         goto cleanup;
4730                                 if (count == 1)
4731                                         samelen = strlen(matches[count]);
4732                                 else
4733                                         while (strncmp(matches[count], matches[count-1], samelen) != 0)
4734                                                 samelen--;
4735                                 count++;
4736                         }
4737                 }
4738
4739                 switch (count) {
4740                 case 0: /* should never happen */
4741                 case 1:
4742                         goto cleanup;
4743                 case 2:
4744                         matches[0] = SMB_STRDUP(matches[1]);
4745                         break;
4746                 default:
4747                         matches[0] = (char *)SMB_MALLOC(samelen+1);
4748                         if (!matches[0])
4749                                 goto cleanup;
4750                         strncpy(matches[0], matches[1], samelen);
4751                         matches[0][samelen] = 0;
4752                 }
4753                 matches[count] = NULL;
4754                 return matches;
4755
4756 cleanup:
4757                 for (i = 0; i < count; i++)
4758                         free(matches[i]);
4759
4760                 free(matches);
4761                 return NULL;
4762         }
4763 }
4764
4765 static bool finished;
4766
4767 /****************************************************************************
4768  Make sure we swallow keepalives during idle time.
4769 ****************************************************************************/
4770
4771 static void readline_callback(void)
4772 {
4773         static time_t last_t;
4774         struct timespec now;
4775         time_t t;
4776         int ret, revents;
4777
4778         clock_gettime_mono(&now);
4779         t = now.tv_sec;
4780
4781         if (t - last_t < 5)
4782                 return;
4783
4784         last_t = t;
4785
4786  again:
4787
4788         if (cli->fd == -1)
4789                 return;
4790
4791         /* We deliberately use receive_smb_raw instead of
4792            client_receive_smb as we want to receive
4793            session keepalives and then drop them here.
4794         */
4795
4796         ret = poll_intr_one_fd(cli->fd, POLLIN|POLLHUP, 0, &revents);
4797
4798         if ((ret > 0) && (revents & (POLLIN|POLLHUP|POLLERR))) {
4799                 NTSTATUS status;
4800                 size_t len;
4801
4802                 set_smb_read_error(&cli->smb_rw_error, SMB_READ_OK);
4803
4804                 status = receive_smb_raw(cli->fd, cli->inbuf, cli->bufsize, 0, 0, &len);
4805
4806                 if (!NT_STATUS_IS_OK(status)) {
4807                         DEBUG(0, ("Read from server failed, maybe it closed "
4808                                   "the connection\n"));
4809
4810                         finished = true;
4811                         smb_readline_done();
4812                         if (NT_STATUS_EQUAL(status, NT_STATUS_END_OF_FILE)) {
4813                                 set_smb_read_error(&cli->smb_rw_error,
4814                                                    SMB_READ_EOF);
4815                                 return;
4816                         }
4817
4818                         if (NT_STATUS_EQUAL(status, NT_STATUS_IO_TIMEOUT)) {
4819                                 set_smb_read_error(&cli->smb_rw_error,
4820                                                    SMB_READ_TIMEOUT);
4821                                 return;
4822                         }
4823
4824                         set_smb_read_error(&cli->smb_rw_error, SMB_READ_ERROR);
4825                         return;
4826                 }
4827                 if(CVAL(cli->inbuf,0) != SMBkeepalive) {
4828                         DEBUG(0, ("Read from server "
4829                                 "returned unexpected packet!\n"));
4830                         return;
4831                 }
4832
4833                 goto again;
4834         }
4835
4836         /* Ping the server to keep the connection alive using SMBecho. */
4837         {
4838                 NTSTATUS status;
4839                 unsigned char garbage[16];
4840                 memset(garbage, 0xf0, sizeof(garbage));
4841                 status = cli_echo(cli, 1, data_blob_const(garbage, sizeof(garbage)));
4842
4843                 if (!NT_STATUS_IS_OK(status)) {
4844                         DEBUG(0, ("SMBecho failed. Maybe server has closed "
4845                                 "the connection\n"));
4846                         finished = true;
4847                         smb_readline_done();
4848                 }
4849         }
4850 }
4851
4852 /****************************************************************************
4853  Process commands on stdin.
4854 ****************************************************************************/
4855
4856 static int process_stdin(void)
4857 {
4858         int rc = 0;
4859
4860         while (!finished) {
4861                 TALLOC_CTX *frame = talloc_stackframe();
4862                 char *tok = NULL;
4863                 char *the_prompt = NULL;
4864                 char *line = NULL;
4865                 int i;
4866
4867                 /* display a prompt */
4868                 if (asprintf(&the_prompt, "smb: %s> ", client_get_cur_dir()) < 0) {
4869                         TALLOC_FREE(frame);
4870                         break;
4871                 }
4872                 line = smb_readline(the_prompt, readline_callback, completion_fn);
4873                 SAFE_FREE(the_prompt);
4874                 if (!line) {
4875                         TALLOC_FREE(frame);
4876                         break;
4877                 }
4878
4879                 /* special case - first char is ! */
4880                 if (*line == '!') {
4881                         if (system(line + 1) == -1) {
4882                                 d_printf("system() command %s failed.\n",
4883                                         line+1);
4884                         }
4885                         SAFE_FREE(line);
4886                         TALLOC_FREE(frame);
4887                         continue;
4888                 }
4889
4890                 /* and get the first part of the command */
4891                 cmd_ptr = line;
4892                 if (!next_token_talloc(frame, &cmd_ptr,&tok,NULL)) {
4893                         TALLOC_FREE(frame);
4894                         SAFE_FREE(line);
4895                         continue;
4896                 }
4897
4898                 if ((i = process_tok(tok)) >= 0) {
4899                         rc = commands[i].fn();
4900                 } else if (i == -2) {
4901                         d_printf("%s: command abbreviation ambiguous\n",tok);
4902                 } else {
4903                         d_printf("%s: command not found\n",tok);
4904                 }
4905                 SAFE_FREE(line);
4906                 TALLOC_FREE(frame);
4907         }
4908         return rc;
4909 }
4910
4911 /****************************************************************************
4912  Process commands from the client.
4913 ****************************************************************************/
4914
4915 static int process(const char *base_directory)
4916 {
4917         int rc = 0;
4918
4919         cli = cli_cm_open(talloc_tos(), NULL,
4920                         have_ip ? dest_ss_str : desthost,
4921                         service, auth_info, true, smb_encrypt,
4922                         max_protocol, port, name_type);
4923         if (!cli) {
4924                 return 1;
4925         }
4926
4927         if (base_directory && *base_directory) {
4928                 rc = do_cd(base_directory);
4929                 if (rc) {
4930                         cli_shutdown(cli);
4931                         return rc;
4932                 }
4933         }
4934
4935         if (cmdstr) {
4936                 rc = process_command_string(cmdstr);
4937         } else {
4938                 process_stdin();
4939         }
4940
4941         cli_shutdown(cli);
4942         return rc;
4943 }
4944
4945 /****************************************************************************
4946  Handle a -L query.
4947 ****************************************************************************/
4948
4949 static int do_host_query(const char *query_host)
4950 {
4951         cli = cli_cm_open(talloc_tos(), NULL,
4952                         have_ip ? dest_ss_str : query_host, "IPC$", auth_info, true, smb_encrypt,
4953                         max_protocol, port, name_type);
4954         if (!cli)
4955                 return 1;
4956
4957         browse_host(true);
4958
4959         /* Ensure that the host can do IPv4 */
4960
4961         if (!interpret_addr(query_host)) {
4962                 struct sockaddr_storage ss;
4963                 if (interpret_string_addr(&ss, query_host, 0) &&
4964                                 (ss.ss_family != AF_INET)) {
4965                         d_printf("%s is an IPv6 address -- no workgroup available\n",
4966                                 query_host);
4967                         return 1;
4968                 }
4969         }
4970
4971         if (port != 139) {
4972
4973                 /* Workgroups simply don't make sense over anything
4974                    else but port 139... */
4975
4976                 cli_shutdown(cli);
4977                 cli = cli_cm_open(talloc_tos(), NULL,
4978                                 have_ip ? dest_ss_str : query_host, "IPC$",
4979                                 auth_info, true, smb_encrypt,
4980                                 max_protocol, 139, name_type);
4981         }
4982
4983         if (cli == NULL) {
4984                 d_printf("NetBIOS over TCP disabled -- no workgroup available\n");
4985                 return 1;
4986         }
4987
4988         list_servers(lp_workgroup());
4989
4990         cli_shutdown(cli);
4991
4992         return(0);
4993 }
4994
4995 /****************************************************************************
4996  Handle a tar operation.
4997 ****************************************************************************/
4998
4999 static int do_tar_op(const char *base_directory)
5000 {
5001         int ret;
5002
5003         /* do we already have a connection? */
5004         if (!cli) {
5005                 cli = cli_cm_open(talloc_tos(), NULL,
5006                         have_ip ? dest_ss_str : desthost,
5007                         service, auth_info, true, smb_encrypt,
5008                         max_protocol, port, name_type);
5009                 if (!cli)
5010                         return 1;
5011         }
5012
5013         recurse=true;
5014
5015         if (base_directory && *base_directory)  {
5016                 ret = do_cd(base_directory);
5017                 if (ret) {
5018                         cli_shutdown(cli);
5019                         return ret;
5020                 }
5021         }
5022
5023         ret=process_tar();
5024
5025         cli_shutdown(cli);
5026
5027         return(ret);
5028 }
5029
5030 /****************************************************************************
5031  Handle a message operation.
5032 ****************************************************************************/
5033
5034 static int do_message_op(struct user_auth_info *a_info)
5035 {
5036         struct sockaddr_storage ss;
5037         struct nmb_name called, calling;
5038         fstring server_name;
5039         char name_type_hex[10];
5040         int msg_port;
5041         NTSTATUS status;
5042
5043         make_nmb_name(&calling, calling_name, 0x0);
5044         make_nmb_name(&called , desthost, name_type);
5045
5046         fstrcpy(server_name, desthost);
5047         snprintf(name_type_hex, sizeof(name_type_hex), "#%X", name_type);
5048         fstrcat(server_name, name_type_hex);
5049
5050         zero_sockaddr(&ss);
5051         if (have_ip)
5052                 ss = dest_ss;
5053
5054         /* we can only do messages over port 139 (to windows clients at least) */
5055
5056         msg_port = port ? port : 139;
5057
5058         if (!(cli=cli_initialise())) {
5059                 d_printf("Connection to %s failed\n", desthost);
5060                 return 1;
5061         }
5062         cli_set_port(cli, msg_port);
5063
5064         status = cli_connect(cli, server_name, &ss);
5065         if (!NT_STATUS_IS_OK(status)) {
5066                 d_printf("Connection to %s failed. Error %s\n", desthost, nt_errstr(status));
5067                 return 1;
5068         }
5069
5070         if (!cli_session_request(cli, &calling, &called)) {
5071                 d_printf("session request failed\n");
5072                 cli_shutdown(cli);
5073                 return 1;
5074         }
5075
5076         send_message(get_cmdline_auth_info_username(a_info));
5077         cli_shutdown(cli);
5078
5079         return 0;
5080 }
5081
5082 /****************************************************************************
5083   main program
5084 ****************************************************************************/
5085
5086  int main(int argc,char *argv[])
5087 {
5088         char *base_directory = NULL;
5089         int opt;
5090         char *query_host = NULL;
5091         bool message = false;
5092         static const char *new_name_resolve_order = NULL;
5093         poptContext pc;
5094         char *p;
5095         int rc = 0;
5096         fstring new_workgroup;
5097         bool tar_opt = false;
5098         bool service_opt = false;
5099         struct poptOption long_options[] = {
5100                 POPT_AUTOHELP
5101
5102                 { "name-resolve", 'R', POPT_ARG_STRING, &new_name_resolve_order, 'R', "Use these name resolution services only", "NAME-RESOLVE-ORDER" },
5103                 { "message", 'M', POPT_ARG_STRING, NULL, 'M', "Send message", "HOST" },
5104                 { "ip-address", 'I', POPT_ARG_STRING, NULL, 'I', "Use this IP to connect to", "IP" },
5105                 { "stderr", 'E', POPT_ARG_NONE, NULL, 'E', "Write messages to stderr instead of stdout" },
5106                 { "list", 'L', POPT_ARG_STRING, NULL, 'L', "Get a list of shares available on a host", "HOST" },
5107                 { "max-protocol", 'm', POPT_ARG_STRING, NULL, 'm', "Set the max protocol level", "LEVEL" },
5108                 { "tar", 'T', POPT_ARG_STRING, NULL, 'T', "Command line tar", "<c|x>IXFqgbNan" },
5109                 { "directory", 'D', POPT_ARG_STRING, NULL, 'D', "Start from directory", "DIR" },
5110                 { "command", 'c', POPT_ARG_STRING, &cmdstr, 'c', "Execute semicolon separated commands" },
5111                 { "send-buffer", 'b', POPT_ARG_INT, &io_bufsize, 'b', "Changes the transmit/send buffer", "BYTES" },
5112                 { "port", 'p', POPT_ARG_INT, &port, 'p', "Port to connect to", "PORT" },
5113                 { "grepable", 'g', POPT_ARG_NONE, NULL, 'g', "Produce grepable output" },
5114                 { "browse", 'B', POPT_ARG_NONE, NULL, 'B', "Browse SMB servers using DNS" },
5115                 POPT_COMMON_SAMBA
5116                 POPT_COMMON_CONNECTION
5117                 POPT_COMMON_CREDENTIALS
5118                 POPT_TABLEEND
5119         };
5120         TALLOC_CTX *frame = talloc_stackframe();
5121
5122         if (!client_set_cur_dir("\\")) {
5123                 exit(ENOMEM);
5124         }
5125
5126         /* initialize the workgroup name so we can determine whether or
5127            not it was set by a command line option */
5128
5129         set_global_myworkgroup( "" );
5130         set_global_myname( "" );
5131
5132         /* set default debug level to 1 regardless of what smb.conf sets */
5133         setup_logging( "smbclient", DEBUG_DEFAULT_STDERR );
5134         load_case_tables();
5135
5136         lp_set_cmdline("log level", "1");
5137
5138         auth_info = user_auth_info_init(frame);
5139         if (auth_info == NULL) {
5140                 exit(1);
5141         }
5142         popt_common_set_auth_info(auth_info);
5143
5144         /* skip argv(0) */
5145         pc = poptGetContext("smbclient", argc, (const char **) argv, long_options, 0);
5146         poptSetOtherOptionHelp(pc, "service <password>");
5147
5148         lp_set_in_client(true); /* Make sure that we tell lp_load we are */
5149
5150         while ((opt = poptGetNextOpt(pc)) != -1) {
5151
5152                 /* if the tar option has been called previouslt, now we need to eat out the leftovers */
5153                 /* I see no other way to keep things sane --SSS */
5154                 if (tar_opt == true) {
5155                         while (poptPeekArg(pc)) {
5156                                 poptGetArg(pc);
5157                         }
5158                         tar_opt = false;
5159                 }
5160
5161                 /* if the service has not yet been specified lets see if it is available in the popt stack */
5162                 if (!service_opt && poptPeekArg(pc)) {
5163                         service = talloc_strdup(frame, poptGetArg(pc));
5164                         if (!service) {
5165                                 exit(ENOMEM);
5166                         }
5167                         service_opt = true;
5168                 }
5169
5170                 /* if the service has already been retrieved then check if we have also a password */
5171                 if (service_opt
5172                     && (!get_cmdline_auth_info_got_pass(auth_info))
5173                     && poptPeekArg(pc)) {
5174                         set_cmdline_auth_info_password(auth_info,
5175                                                        poptGetArg(pc));
5176                 }
5177
5178                 switch (opt) {
5179                 case 'M':
5180                         /* Messages are sent to NetBIOS name type 0x3
5181                          * (Messenger Service).  Make sure we default
5182                          * to port 139 instead of port 445. srl,crh
5183                          */
5184                         name_type = 0x03;
5185                         desthost = talloc_strdup(frame,poptGetOptArg(pc));
5186                         if (!desthost) {
5187                                 exit(ENOMEM);
5188                         }
5189                         if( !port )
5190                                 port = 139;
5191                         message = true;
5192                         break;
5193                 case 'I':
5194                         {
5195                                 if (!interpret_string_addr(&dest_ss, poptGetOptArg(pc), 0)) {
5196                                         exit(1);
5197                                 }
5198                                 have_ip = true;
5199                                 print_sockaddr(dest_ss_str, sizeof(dest_ss_str), &dest_ss);
5200                         }
5201                         break;
5202                 case 'E':
5203                         setup_logging("smbclient", DEBUG_STDERR );
5204                         display_set_stderr();
5205                         break;
5206
5207                 case 'L':
5208                         query_host = talloc_strdup(frame, poptGetOptArg(pc));
5209                         if (!query_host) {
5210                                 exit(ENOMEM);
5211                         }
5212                         break;
5213                 case 'm':
5214                         max_protocol = interpret_protocol(poptGetOptArg(pc), max_protocol);
5215                         break;
5216                 case 'T':
5217                         /* We must use old option processing for this. Find the
5218                          * position of the -T option in the raw argv[]. */
5219                         {
5220                                 int i;
5221                                 for (i = 1; i < argc; i++) {
5222                                         if (strncmp("-T", argv[i],2)==0)
5223                                                 break;
5224                                 }
5225                                 i++;
5226                                 if (!tar_parseargs(argc, argv, poptGetOptArg(pc), i)) {
5227                                         poptPrintUsage(pc, stderr, 0);
5228                                         exit(1);
5229                                 }
5230                         }
5231                         /* this must be the last option, mark we have parsed it so that we know we have */
5232                         tar_opt = true;
5233                         break;
5234                 case 'D':
5235                         base_directory = talloc_strdup(frame, poptGetOptArg(pc));
5236                         if (!base_directory) {
5237                                 exit(ENOMEM);
5238                         }
5239                         break;
5240                 case 'g':
5241                         grepable=true;
5242                         break;
5243                 case 'e':
5244                         smb_encrypt=true;
5245                         break;
5246                 case 'B':
5247                         return(do_smb_browse());
5248
5249                 }
5250         }
5251
5252         /* We may still have some leftovers after the last popt option has been called */
5253         if (tar_opt == true) {
5254                 while (poptPeekArg(pc)) {
5255                         poptGetArg(pc);
5256                 }
5257                 tar_opt = false;
5258         }
5259
5260         /* if the service has not yet been specified lets see if it is available in the popt stack */
5261         if (!service_opt && poptPeekArg(pc)) {
5262                 service = talloc_strdup(frame,poptGetArg(pc));
5263                 if (!service) {
5264                         exit(ENOMEM);
5265                 }
5266                 service_opt = true;
5267         }
5268
5269         /* if the service has already been retrieved then check if we have also a password */
5270         if (service_opt
5271             && !get_cmdline_auth_info_got_pass(auth_info)
5272             && poptPeekArg(pc)) {
5273                 set_cmdline_auth_info_password(auth_info,
5274                                                poptGetArg(pc));
5275         }
5276
5277         /* save the workgroup...
5278
5279            FIXME!! do we need to do this for other options as well
5280            (or maybe a generic way to keep lp_load() from overwriting
5281            everything)?  */
5282
5283         fstrcpy( new_workgroup, lp_workgroup() );
5284         calling_name = talloc_strdup(frame, global_myname() );
5285         if (!calling_name) {
5286                 exit(ENOMEM);
5287         }
5288
5289         if ( override_logfile )
5290                 setup_logging( lp_logfile(), DEBUG_FILE );
5291
5292         if (!lp_load(get_dyn_CONFIGFILE(),true,false,false,true)) {
5293                 fprintf(stderr, "%s: Can't load %s - run testparm to debug it\n",
5294                         argv[0], get_dyn_CONFIGFILE());
5295         }
5296
5297         if (get_cmdline_auth_info_use_machine_account(auth_info) &&
5298             !set_cmdline_auth_info_machine_account_creds(auth_info)) {
5299                 exit(-1);
5300         }
5301
5302         load_interfaces();
5303
5304         if (service_opt && service) {
5305                 size_t len;
5306
5307                 /* Convert any '/' characters in the service name to '\' characters */
5308                 string_replace(service, '/','\\');
5309                 if (count_chars(service,'\\') < 3) {
5310                         d_printf("\n%s: Not enough '\\' characters in service\n",service);
5311                         poptPrintUsage(pc, stderr, 0);
5312                         exit(1);
5313                 }
5314                 /* Remove trailing slashes */
5315                 len = strlen(service);
5316                 while(len > 0 && service[len - 1] == '\\') {
5317                         --len;
5318                         service[len] = '\0';
5319                 }
5320         }
5321
5322         if ( strlen(new_workgroup) != 0 ) {
5323                 set_global_myworkgroup( new_workgroup );
5324         }
5325
5326         if ( strlen(calling_name) != 0 ) {
5327                 set_global_myname( calling_name );
5328         } else {
5329                 TALLOC_FREE(calling_name);
5330                 calling_name = talloc_strdup(frame, global_myname() );
5331         }
5332
5333         smb_encrypt = get_cmdline_auth_info_smb_encrypt(auth_info);
5334         if (!init_names()) {
5335                 fprintf(stderr, "init_names() failed\n");
5336                 exit(1);
5337         }
5338
5339         if(new_name_resolve_order)
5340                 lp_set_name_resolve_order(new_name_resolve_order);
5341
5342         if (!tar_type && !query_host && !service && !message) {
5343                 poptPrintUsage(pc, stderr, 0);
5344                 exit(1);
5345         }
5346
5347         poptFreeContext(pc);
5348
5349         DEBUG(3,("Client started (version %s).\n", samba_version_string()));
5350
5351         /* Ensure we have a password (or equivalent). */
5352         set_cmdline_auth_info_getpass(auth_info);
5353
5354         if (tar_type) {
5355                 if (cmdstr)
5356                         process_command_string(cmdstr);
5357                 return do_tar_op(base_directory);
5358         }
5359
5360         if (query_host && *query_host) {
5361                 char *qhost = query_host;
5362                 char *slash;
5363
5364                 while (*qhost == '\\' || *qhost == '/')
5365                         qhost++;
5366
5367                 if ((slash = strchr_m(qhost, '/'))
5368                     || (slash = strchr_m(qhost, '\\'))) {
5369                         *slash = 0;
5370                 }
5371
5372                 if ((p=strchr_m(qhost, '#'))) {
5373                         *p = 0;
5374                         p++;
5375                         sscanf(p, "%x", &name_type);
5376                 }
5377
5378                 return do_host_query(qhost);
5379         }
5380
5381         if (message) {
5382                 return do_message_op(auth_info);
5383         }
5384
5385         if (process(base_directory)) {
5386                 return 1;
5387         }
5388
5389         TALLOC_FREE(frame);
5390         return rc;
5391 }