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_open(cli, name, O_RDONLY, DENY_NONE, &fnum);
1716         if (!NT_STATUS_IS_OK(status)) {
1717                 /*
1718                  * Ignore failure, it does not hurt if we can't list
1719                  * snapshots
1720                  */
1721                 return 0;
1722         }
1723         status = cli_shadow_copy_data(talloc_tos(), cli, fnum,
1724                                       true, &snapshots, &num_snapshots);
1725         if (!NT_STATUS_IS_OK(status)) {
1726                 cli_close(cli, fnum);
1727                 return 0;
1728         }
1729
1730         for (i=0; i<num_snapshots; i++) {
1731                 char *snap_name;
1732
1733                 d_printf("%s\n", snapshots[i]);
1734                 snap_name = talloc_asprintf(talloc_tos(), "%s%s",
1735                                             snapshots[i], name);
1736                 status = cli_qpathinfo2(cli, snap_name, &b_time, &a_time,
1737                                         &m_time, &c_time, &size,
1738                                         NULL, NULL);
1739                 if (!NT_STATUS_IS_OK(status)) {
1740                         d_fprintf(stderr, "pathinfo(%s) failed: %s\n",
1741                                   snap_name, nt_errstr(status));
1742                         TALLOC_FREE(snap_name);
1743                         continue;
1744                 }
1745                 unix_timespec_to_nt_time(&tmp, b_time);
1746                 d_printf("create_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1747                 unix_timespec_to_nt_time(&tmp, a_time);
1748                 d_printf("access_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1749                 unix_timespec_to_nt_time(&tmp, m_time);
1750                 d_printf("write_time:     %s\n", nt_time_string(talloc_tos(), tmp));
1751                 unix_timespec_to_nt_time(&tmp, c_time);
1752                 d_printf("change_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1753                 d_printf("size: %d\n", (int)size);
1754         }
1755
1756         TALLOC_FREE(snapshots);
1757
1758         return 0;
1759 }
1760
1761 /****************************************************************************
1762  Show all info we can get
1763 ****************************************************************************/
1764
1765 static int cmd_allinfo(void)
1766 {
1767         TALLOC_CTX *ctx = talloc_tos();
1768         char *name;
1769         char *buf;
1770
1771         name = talloc_strdup(ctx, client_get_cur_dir());
1772         if (!name) {
1773                 return 1;
1774         }
1775
1776         if (!next_token_talloc(ctx, &cmd_ptr, &buf, NULL)) {
1777                 d_printf("allinfo <file>\n");
1778                 return 1;
1779         }
1780         name = talloc_asprintf_append(name, "%s", buf);
1781         if (!name) {
1782                 return 1;
1783         }
1784
1785         do_allinfo(name);
1786
1787         return 0;
1788 }
1789
1790 /****************************************************************************
1791  Put a single file.
1792 ****************************************************************************/
1793
1794 static int do_put(const char *rname, const char *lname, bool reput)
1795 {
1796         TALLOC_CTX *ctx = talloc_tos();
1797         uint16_t fnum;
1798         XFILE *f;
1799         SMB_OFF_T start = 0;
1800         int rc = 0;
1801         struct timespec tp_start;
1802         struct cli_state *targetcli;
1803         char *targetname = NULL;
1804         struct push_state state;
1805         NTSTATUS status;
1806
1807         if (!cli_resolve_path(ctx, "", auth_info, cli, rname, &targetcli, &targetname)) {
1808                 d_printf("Failed to open %s: %s\n", rname, cli_errstr(cli));
1809                 return 1;
1810         }
1811
1812         clock_gettime_mono(&tp_start);
1813
1814         if (reput) {
1815                 status = cli_open(targetcli, targetname, O_RDWR|O_CREAT, DENY_NONE, &fnum);
1816                 if (NT_STATUS_IS_OK(status)) {
1817                         if (!NT_STATUS_IS_OK(status = cli_qfileinfo_basic(
1818                                                      targetcli, fnum, NULL,
1819                                                      &start, NULL, NULL,
1820                                                      NULL, NULL, NULL)) &&
1821                             !NT_STATUS_IS_OK(status = cli_getattrE(
1822                                                      targetcli, fnum, NULL,
1823                                                      &start, NULL, NULL,
1824                                                      NULL))) {
1825                                 d_printf("getattrib: %s\n", nt_errstr(status));
1826                                 return 1;
1827                         }
1828                 }
1829         } else {
1830                 status = cli_open(targetcli, targetname, O_RDWR|O_CREAT|O_TRUNC, DENY_NONE, &fnum);
1831         }
1832
1833         if (!NT_STATUS_IS_OK(status)) {
1834                 d_printf("%s opening remote file %s\n", nt_errstr(status),
1835                          rname);
1836                 return 1;
1837         }
1838
1839         /* allow files to be piped into smbclient
1840            jdblair 24.jun.98
1841
1842            Note that in this case this function will exit(0) rather
1843            than returning. */
1844         if (!strcmp(lname, "-")) {
1845                 f = x_stdin;
1846                 /* size of file is not known */
1847         } else {
1848                 f = x_fopen(lname,O_RDONLY, 0);
1849                 if (f && reput) {
1850                         if (x_tseek(f, start, SEEK_SET) == -1) {
1851                                 d_printf("Error seeking local file\n");
1852                                 x_fclose(f);
1853                                 return 1;
1854                         }
1855                 }
1856         }
1857
1858         if (!f) {
1859                 d_printf("Error opening local file %s\n",lname);
1860                 return 1;
1861         }
1862
1863         DEBUG(1,("putting file %s as %s ",lname,
1864                  rname));
1865
1866         x_setvbuf(f, NULL, X_IOFBF, io_bufsize);
1867
1868         state.f = f;
1869         state.nread = 0;
1870
1871         status = cli_push(targetcli, fnum, 0, 0, io_bufsize, push_source,
1872                           &state);
1873         if (!NT_STATUS_IS_OK(status)) {
1874                 d_fprintf(stderr, "cli_push returned %s\n", nt_errstr(status));
1875                 rc = 1;
1876         }
1877
1878         status = cli_close(targetcli, fnum);
1879         if (!NT_STATUS_IS_OK(status)) {
1880                 d_printf("%s closing remote file %s\n", nt_errstr(status),
1881                          rname);
1882                 if (f != x_stdin) {
1883                         x_fclose(f);
1884                 }
1885                 return 1;
1886         }
1887
1888         if (f != x_stdin) {
1889                 x_fclose(f);
1890         }
1891
1892         {
1893                 struct timespec tp_end;
1894                 int this_time;
1895
1896                 clock_gettime_mono(&tp_end);
1897                 this_time = nsec_time_diff(&tp_end,&tp_start)/1000000;
1898                 put_total_time_ms += this_time;
1899                 put_total_size += state.nread;
1900
1901                 DEBUG(1,("(%3.1f kb/s) (average %3.1f kb/s)\n",
1902                          state.nread / (1.024*this_time + 1.0e-4),
1903                          put_total_size / (1.024*put_total_time_ms)));
1904         }
1905
1906         if (f == x_stdin) {
1907                 cli_shutdown(cli);
1908                 exit(0);
1909         }
1910
1911         return rc;
1912 }
1913
1914 /****************************************************************************
1915  Put a file.
1916 ****************************************************************************/
1917
1918 static int cmd_put(void)
1919 {
1920         TALLOC_CTX *ctx = talloc_tos();
1921         char *lname;
1922         char *rname;
1923         char *buf;
1924
1925         rname = talloc_strdup(ctx, client_get_cur_dir());
1926         if (!rname) {
1927                 return 1;
1928         }
1929
1930         if (!next_token_talloc(ctx, &cmd_ptr,&lname,NULL)) {
1931                 d_printf("put <filename>\n");
1932                 return 1;
1933         }
1934
1935         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
1936                 rname = talloc_asprintf_append(rname, "%s", buf);
1937         } else {
1938                 rname = talloc_asprintf_append(rname, "%s", lname);
1939         }
1940         if (!rname) {
1941                 return 1;
1942         }
1943
1944         rname = clean_name(ctx, rname);
1945         if (!rname) {
1946                 return 1;
1947         }
1948
1949         {
1950                 SMB_STRUCT_STAT st;
1951                 /* allow '-' to represent stdin
1952                    jdblair, 24.jun.98 */
1953                 if (!file_exist_stat(lname, &st, false) &&
1954                     (strcmp(lname,"-"))) {
1955                         d_printf("%s does not exist\n",lname);
1956                         return 1;
1957                 }
1958         }
1959
1960         return do_put(rname, lname, false);
1961 }
1962
1963 /*************************************
1964  File list structure.
1965 *************************************/
1966
1967 static struct file_list {
1968         struct file_list *prev, *next;
1969         char *file_path;
1970         bool isdir;
1971 } *file_list;
1972
1973 /****************************************************************************
1974  Free a file_list structure.
1975 ****************************************************************************/
1976
1977 static void free_file_list (struct file_list *l_head)
1978 {
1979         struct file_list *list, *next;
1980
1981         for (list = l_head; list; list = next) {
1982                 next = list->next;
1983                 DLIST_REMOVE(l_head, list);
1984                 SAFE_FREE(list->file_path);
1985                 SAFE_FREE(list);
1986         }
1987 }
1988
1989 /****************************************************************************
1990  Seek in a directory/file list until you get something that doesn't start with
1991  the specified name.
1992 ****************************************************************************/
1993
1994 static bool seek_list(struct file_list *list, char *name)
1995 {
1996         while (list) {
1997                 trim_string(list->file_path,"./","\n");
1998                 if (strncmp(list->file_path, name, strlen(name)) != 0) {
1999                         return true;
2000                 }
2001                 list = list->next;
2002         }
2003
2004         return false;
2005 }
2006
2007 /****************************************************************************
2008  Set the file selection mask.
2009 ****************************************************************************/
2010
2011 static int cmd_select(void)
2012 {
2013         TALLOC_CTX *ctx = talloc_tos();
2014         char *new_fs = NULL;
2015         next_token_talloc(ctx, &cmd_ptr,&new_fs,NULL)
2016                 ;
2017         if (new_fs) {
2018                 client_set_fileselection(new_fs);
2019         } else {
2020                 client_set_fileselection("");
2021         }
2022         return 0;
2023 }
2024
2025 /****************************************************************************
2026   Recursive file matching function act as find
2027   match must be always set to true when calling this function
2028 ****************************************************************************/
2029
2030 static int file_find(struct file_list **list, const char *directory,
2031                       const char *expression, bool match)
2032 {
2033         SMB_STRUCT_DIR *dir;
2034         struct file_list *entry;
2035         struct stat statbuf;
2036         int ret;
2037         char *path;
2038         bool isdir;
2039         const char *dname;
2040
2041         dir = sys_opendir(directory);
2042         if (!dir)
2043                 return -1;
2044
2045         while ((dname = readdirname(dir))) {
2046                 if (!strcmp("..", dname))
2047                         continue;
2048                 if (!strcmp(".", dname))
2049                         continue;
2050
2051                 if (asprintf(&path, "%s/%s", directory, dname) <= 0) {
2052                         continue;
2053                 }
2054
2055                 isdir = false;
2056                 if (!match || !gen_fnmatch(expression, dname)) {
2057                         if (recurse) {
2058                                 ret = stat(path, &statbuf);
2059                                 if (ret == 0) {
2060                                         if (S_ISDIR(statbuf.st_mode)) {
2061                                                 isdir = true;
2062                                                 ret = file_find(list, path, expression, false);
2063                                         }
2064                                 } else {
2065                                         d_printf("file_find: cannot stat file %s\n", path);
2066                                 }
2067
2068                                 if (ret == -1) {
2069                                         SAFE_FREE(path);
2070                                         sys_closedir(dir);
2071                                         return -1;
2072                                 }
2073                         }
2074                         entry = SMB_MALLOC_P(struct file_list);
2075                         if (!entry) {
2076                                 d_printf("Out of memory in file_find\n");
2077                                 sys_closedir(dir);
2078                                 return -1;
2079                         }
2080                         entry->file_path = path;
2081                         entry->isdir = isdir;
2082                         DLIST_ADD(*list, entry);
2083                 } else {
2084                         SAFE_FREE(path);
2085                 }
2086         }
2087
2088         sys_closedir(dir);
2089         return 0;
2090 }
2091
2092 /****************************************************************************
2093  mput some files.
2094 ****************************************************************************/
2095
2096 static int cmd_mput(void)
2097 {
2098         TALLOC_CTX *ctx = talloc_tos();
2099         char *p = NULL;
2100
2101         while (next_token_talloc(ctx, &cmd_ptr,&p,NULL)) {
2102                 int ret;
2103                 struct file_list *temp_list;
2104                 char *quest, *lname, *rname;
2105
2106                 file_list = NULL;
2107
2108                 ret = file_find(&file_list, ".", p, true);
2109                 if (ret) {
2110                         free_file_list(file_list);
2111                         continue;
2112                 }
2113
2114                 quest = NULL;
2115                 lname = NULL;
2116                 rname = NULL;
2117
2118                 for (temp_list = file_list; temp_list;
2119                      temp_list = temp_list->next) {
2120
2121                         SAFE_FREE(lname);
2122                         if (asprintf(&lname, "%s/", temp_list->file_path) <= 0) {
2123                                 continue;
2124                         }
2125                         trim_string(lname, "./", "/");
2126
2127                         /* check if it's a directory */
2128                         if (temp_list->isdir) {
2129                                 /* if (!recurse) continue; */
2130
2131                                 SAFE_FREE(quest);
2132                                 if (asprintf(&quest, "Put directory %s? ", lname) < 0) {
2133                                         break;
2134                                 }
2135                                 if (prompt && !yesno(quest)) { /* No */
2136                                         /* Skip the directory */
2137                                         lname[strlen(lname)-1] = '/';
2138                                         if (!seek_list(temp_list, lname))
2139                                                 break;
2140                                 } else { /* Yes */
2141                                         SAFE_FREE(rname);
2142                                         if(asprintf(&rname, "%s%s", client_get_cur_dir(), lname) < 0) {
2143                                                 break;
2144                                         }
2145                                         normalize_name(rname);
2146                                         if (!NT_STATUS_IS_OK(cli_chkpath(cli, rname)) &&
2147                                             !do_mkdir(rname)) {
2148                                                 DEBUG (0, ("Unable to make dir, skipping..."));
2149                                                 /* Skip the directory */
2150                                                 lname[strlen(lname)-1] = '/';
2151                                                 if (!seek_list(temp_list, lname)) {
2152                                                         break;
2153                                                 }
2154                                         }
2155                                 }
2156                                 continue;
2157                         } else {
2158                                 SAFE_FREE(quest);
2159                                 if (asprintf(&quest,"Put file %s? ", lname) < 0) {
2160                                         break;
2161                                 }
2162                                 if (prompt && !yesno(quest)) {
2163                                         /* No */
2164                                         continue;
2165                                 }
2166
2167                                 /* Yes */
2168                                 SAFE_FREE(rname);
2169                                 if (asprintf(&rname, "%s%s", client_get_cur_dir(), lname) < 0) {
2170                                         break;
2171                                 }
2172                         }
2173
2174                         normalize_name(rname);
2175
2176                         do_put(rname, lname, false);
2177                 }
2178                 free_file_list(file_list);
2179                 SAFE_FREE(quest);
2180                 SAFE_FREE(lname);
2181                 SAFE_FREE(rname);
2182         }
2183
2184         return 0;
2185 }
2186
2187 /****************************************************************************
2188  Cancel a print job.
2189 ****************************************************************************/
2190
2191 static int do_cancel(int job)
2192 {
2193         if (cli_printjob_del(cli, job)) {
2194                 d_printf("Job %d cancelled\n",job);
2195                 return 0;
2196         } else {
2197                 d_printf("Error cancelling job %d : %s\n",job,cli_errstr(cli));
2198                 return 1;
2199         }
2200 }
2201
2202 /****************************************************************************
2203  Cancel a print job.
2204 ****************************************************************************/
2205
2206 static int cmd_cancel(void)
2207 {
2208         TALLOC_CTX *ctx = talloc_tos();
2209         char *buf = NULL;
2210         int job;
2211
2212         if (!next_token_talloc(ctx, &cmd_ptr, &buf,NULL)) {
2213                 d_printf("cancel <jobid> ...\n");
2214                 return 1;
2215         }
2216         do {
2217                 job = atoi(buf);
2218                 do_cancel(job);
2219         } while (next_token_talloc(ctx, &cmd_ptr,&buf,NULL));
2220
2221         return 0;
2222 }
2223
2224 /****************************************************************************
2225  Print a file.
2226 ****************************************************************************/
2227
2228 static int cmd_print(void)
2229 {
2230         TALLOC_CTX *ctx = talloc_tos();
2231         char *lname = NULL;
2232         char *rname = NULL;
2233         char *p = NULL;
2234
2235         if (!next_token_talloc(ctx, &cmd_ptr, &lname,NULL)) {
2236                 d_printf("print <filename>\n");
2237                 return 1;
2238         }
2239
2240         rname = talloc_strdup(ctx, lname);
2241         if (!rname) {
2242                 return 1;
2243         }
2244         p = strrchr_m(rname,'/');
2245         if (p) {
2246                 rname = talloc_asprintf(ctx,
2247                                         "%s-%d",
2248                                         p+1,
2249                                         (int)sys_getpid());
2250         }
2251         if (strequal(lname,"-")) {
2252                 rname = talloc_asprintf(ctx,
2253                                 "stdin-%d",
2254                                 (int)sys_getpid());
2255         }
2256         if (!rname) {
2257                 return 1;
2258         }
2259
2260         return do_put(rname, lname, false);
2261 }
2262
2263 /****************************************************************************
2264  Show a print queue entry.
2265 ****************************************************************************/
2266
2267 static void queue_fn(struct print_job_info *p)
2268 {
2269         d_printf("%-6d   %-9d    %s\n", (int)p->id, (int)p->size, p->name);
2270 }
2271
2272 /****************************************************************************
2273  Show a print queue.
2274 ****************************************************************************/
2275
2276 static int cmd_queue(void)
2277 {
2278         cli_print_queue(cli, queue_fn);
2279         return 0;
2280 }
2281
2282 /****************************************************************************
2283  Delete some files.
2284 ****************************************************************************/
2285
2286 static NTSTATUS do_del(struct cli_state *cli_state, struct file_info *finfo,
2287                    const char *dir)
2288 {
2289         TALLOC_CTX *ctx = talloc_tos();
2290         char *mask = NULL;
2291         NTSTATUS status;
2292
2293         mask = talloc_asprintf(ctx,
2294                                 "%s%c%s",
2295                                 dir,
2296                                 CLI_DIRSEP_CHAR,
2297                                 finfo->name);
2298         if (!mask) {
2299                 return NT_STATUS_NO_MEMORY;
2300         }
2301
2302         if (finfo->mode & aDIR) {
2303                 TALLOC_FREE(mask);
2304                 return NT_STATUS_OK;
2305         }
2306
2307         status = cli_unlink(cli_state, mask, aSYSTEM | aHIDDEN);
2308         if (!NT_STATUS_IS_OK(status)) {
2309                 d_printf("%s deleting remote file %s\n",
2310                          nt_errstr(status), mask);
2311         }
2312         TALLOC_FREE(mask);
2313         return status;
2314 }
2315
2316 /****************************************************************************
2317  Delete some files.
2318 ****************************************************************************/
2319
2320 static int cmd_del(void)
2321 {
2322         TALLOC_CTX *ctx = talloc_tos();
2323         char *mask = NULL;
2324         char *buf = NULL;
2325         NTSTATUS status = NT_STATUS_OK;
2326         uint16 attribute = aSYSTEM | aHIDDEN;
2327
2328         if (recurse) {
2329                 attribute |= aDIR;
2330         }
2331
2332         mask = talloc_strdup(ctx, client_get_cur_dir());
2333         if (!mask) {
2334                 return 1;
2335         }
2336         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2337                 d_printf("del <filename>\n");
2338                 return 1;
2339         }
2340         mask = talloc_asprintf_append(mask, "%s", buf);
2341         if (!mask) {
2342                 return 1;
2343         }
2344
2345         status = do_list(mask,attribute,do_del,false,false);
2346         if (!NT_STATUS_IS_OK(status)) {
2347                 return 1;
2348         }
2349         return 0;
2350 }
2351
2352 /****************************************************************************
2353  Wildcard delete some files.
2354 ****************************************************************************/
2355
2356 static int cmd_wdel(void)
2357 {
2358         TALLOC_CTX *ctx = talloc_tos();
2359         char *mask = NULL;
2360         char *buf = NULL;
2361         uint16 attribute;
2362         struct cli_state *targetcli;
2363         char *targetname = NULL;
2364         NTSTATUS status;
2365
2366         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2367                 d_printf("wdel 0x<attrib> <wcard>\n");
2368                 return 1;
2369         }
2370
2371         attribute = (uint16)strtol(buf, (char **)NULL, 16);
2372
2373         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2374                 d_printf("wdel 0x<attrib> <wcard>\n");
2375                 return 1;
2376         }
2377
2378         mask = talloc_asprintf(ctx, "%s%s",
2379                         client_get_cur_dir(),
2380                         buf);
2381         if (!mask) {
2382                 return 1;
2383         }
2384
2385         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2386                 d_printf("cmd_wdel %s: %s\n", mask, cli_errstr(cli));
2387                 return 1;
2388         }
2389
2390         status = cli_unlink(targetcli, targetname, attribute);
2391         if (!NT_STATUS_IS_OK(status)) {
2392                 d_printf("%s deleting remote files %s\n", nt_errstr(status),
2393                          targetname);
2394         }
2395         return 0;
2396 }
2397
2398 /****************************************************************************
2399 ****************************************************************************/
2400
2401 static int cmd_open(void)
2402 {
2403         TALLOC_CTX *ctx = talloc_tos();
2404         char *mask = NULL;
2405         char *buf = NULL;
2406         char *targetname = NULL;
2407         struct cli_state *targetcli;
2408         uint16_t fnum = (uint16_t)-1;
2409
2410         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2411                 d_printf("open <filename>\n");
2412                 return 1;
2413         }
2414         mask = talloc_asprintf(ctx,
2415                         "%s%s",
2416                         client_get_cur_dir(),
2417                         buf);
2418         if (!mask) {
2419                 return 1;
2420         }
2421
2422         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2423                 d_printf("open %s: %s\n", mask, cli_errstr(cli));
2424                 return 1;
2425         }
2426
2427         if (!NT_STATUS_IS_OK(cli_ntcreate(targetcli, targetname, 0,
2428                         FILE_READ_DATA|FILE_WRITE_DATA, 0,
2429                         FILE_SHARE_READ|FILE_SHARE_WRITE, FILE_OPEN, 0x0, 0x0, &fnum))) {
2430                 if (NT_STATUS_IS_OK(cli_ntcreate(targetcli, targetname, 0,
2431                                 FILE_READ_DATA, 0,
2432                                 FILE_SHARE_READ|FILE_SHARE_WRITE, FILE_OPEN, 0x0, 0x0, &fnum))) {
2433                         d_printf("open file %s: for read/write fnum %d\n", targetname, fnum);
2434                 } else {
2435                         d_printf("Failed to open file %s. %s\n", targetname, cli_errstr(cli));
2436                 }
2437         } else {
2438                 d_printf("open file %s: for read/write fnum %d\n", targetname, fnum);
2439         }
2440         return 0;
2441 }
2442
2443 static int cmd_posix_encrypt(void)
2444 {
2445         TALLOC_CTX *ctx = talloc_tos();
2446         NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
2447
2448         if (cli->use_kerberos) {
2449                 status = cli_gss_smb_encryption_start(cli);
2450         } else {
2451                 char *domain = NULL;
2452                 char *user = NULL;
2453                 char *password = NULL;
2454
2455                 if (!next_token_talloc(ctx, &cmd_ptr,&domain,NULL)) {
2456                         d_printf("posix_encrypt domain user password\n");
2457                         return 1;
2458                 }
2459
2460                 if (!next_token_talloc(ctx, &cmd_ptr,&user,NULL)) {
2461                         d_printf("posix_encrypt domain user password\n");
2462                         return 1;
2463                 }
2464
2465                 if (!next_token_talloc(ctx, &cmd_ptr,&password,NULL)) {
2466                         d_printf("posix_encrypt domain user password\n");
2467                         return 1;
2468                 }
2469
2470                 status = cli_raw_ntlm_smb_encryption_start(cli,
2471                                                         user,
2472                                                         password,
2473                                                         domain);
2474         }
2475
2476         if (!NT_STATUS_IS_OK(status)) {
2477                 d_printf("posix_encrypt failed with error %s\n", nt_errstr(status));
2478         } else {
2479                 d_printf("encryption on\n");
2480                 smb_encrypt = true;
2481         }
2482
2483         return 0;
2484 }
2485
2486 /****************************************************************************
2487 ****************************************************************************/
2488
2489 static int cmd_posix_open(void)
2490 {
2491         TALLOC_CTX *ctx = talloc_tos();
2492         char *mask = NULL;
2493         char *buf = NULL;
2494         char *targetname = NULL;
2495         struct cli_state *targetcli;
2496         mode_t mode;
2497         uint16_t fnum;
2498
2499         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2500                 d_printf("posix_open <filename> 0<mode>\n");
2501                 return 1;
2502         }
2503         mask = talloc_asprintf(ctx,
2504                         "%s%s",
2505                         client_get_cur_dir(),
2506                         buf);
2507         if (!mask) {
2508                 return 1;
2509         }
2510
2511         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2512                 d_printf("posix_open <filename> 0<mode>\n");
2513                 return 1;
2514         }
2515         mode = (mode_t)strtol(buf, (char **)NULL, 8);
2516
2517         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2518                 d_printf("posix_open %s: %s\n", mask, cli_errstr(cli));
2519                 return 1;
2520         }
2521
2522         if (!NT_STATUS_IS_OK(cli_posix_open(targetcli, targetname, O_CREAT|O_RDWR, mode, &fnum))) {
2523                 if (!NT_STATUS_IS_OK(cli_posix_open(targetcli, targetname, O_CREAT|O_RDONLY, mode, &fnum))) {
2524                         d_printf("posix_open file %s: for read/write fnum %d\n", targetname, fnum);
2525                 } else {
2526                         d_printf("Failed to open file %s. %s\n", targetname, cli_errstr(cli));
2527                 }
2528         } else {
2529                 d_printf("posix_open file %s: for read/write fnum %d\n", targetname, fnum);
2530         }
2531
2532         return 0;
2533 }
2534
2535 static int cmd_posix_mkdir(void)
2536 {
2537         TALLOC_CTX *ctx = talloc_tos();
2538         char *mask = NULL;
2539         char *buf = NULL;
2540         char *targetname = NULL;
2541         struct cli_state *targetcli;
2542         mode_t mode;
2543
2544         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2545                 d_printf("posix_mkdir <filename> 0<mode>\n");
2546                 return 1;
2547         }
2548         mask = talloc_asprintf(ctx,
2549                         "%s%s",
2550                         client_get_cur_dir(),
2551                         buf);
2552         if (!mask) {
2553                 return 1;
2554         }
2555
2556         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2557                 d_printf("posix_mkdir <filename> 0<mode>\n");
2558                 return 1;
2559         }
2560         mode = (mode_t)strtol(buf, (char **)NULL, 8);
2561
2562         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2563                 d_printf("posix_mkdir %s: %s\n", mask, cli_errstr(cli));
2564                 return 1;
2565         }
2566
2567         if (!NT_STATUS_IS_OK(cli_posix_mkdir(targetcli, targetname, mode))) {
2568                 d_printf("Failed to open file %s. %s\n", targetname, cli_errstr(cli));
2569         } else {
2570                 d_printf("posix_mkdir created directory %s\n", targetname);
2571         }
2572         return 0;
2573 }
2574
2575 static int cmd_posix_unlink(void)
2576 {
2577         TALLOC_CTX *ctx = talloc_tos();
2578         char *mask = NULL;
2579         char *buf = NULL;
2580         char *targetname = NULL;
2581         struct cli_state *targetcli;
2582
2583         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2584                 d_printf("posix_unlink <filename>\n");
2585                 return 1;
2586         }
2587         mask = talloc_asprintf(ctx,
2588                         "%s%s",
2589                         client_get_cur_dir(),
2590                         buf);
2591         if (!mask) {
2592                 return 1;
2593         }
2594
2595         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2596                 d_printf("posix_unlink %s: %s\n", mask, cli_errstr(cli));
2597                 return 1;
2598         }
2599
2600         if (!NT_STATUS_IS_OK(cli_posix_unlink(targetcli, targetname))) {
2601                 d_printf("Failed to unlink file %s. %s\n", targetname, cli_errstr(cli));
2602         } else {
2603                 d_printf("posix_unlink deleted file %s\n", targetname);
2604         }
2605
2606         return 0;
2607 }
2608
2609 static int cmd_posix_rmdir(void)
2610 {
2611         TALLOC_CTX *ctx = talloc_tos();
2612         char *mask = NULL;
2613         char *buf = NULL;
2614         char *targetname = NULL;
2615         struct cli_state *targetcli;
2616
2617         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2618                 d_printf("posix_rmdir <filename>\n");
2619                 return 1;
2620         }
2621         mask = talloc_asprintf(ctx,
2622                         "%s%s",
2623                         client_get_cur_dir(),
2624                         buf);
2625         if (!mask) {
2626                 return 1;
2627         }
2628
2629         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2630                 d_printf("posix_rmdir %s: %s\n", mask, cli_errstr(cli));
2631                 return 1;
2632         }
2633
2634         if (!NT_STATUS_IS_OK(cli_posix_rmdir(targetcli, targetname))) {
2635                 d_printf("Failed to unlink directory %s. %s\n", targetname, cli_errstr(cli));
2636         } else {
2637                 d_printf("posix_rmdir deleted directory %s\n", targetname);
2638         }
2639
2640         return 0;
2641 }
2642
2643 static int cmd_close(void)
2644 {
2645         TALLOC_CTX *ctx = talloc_tos();
2646         char *buf = NULL;
2647         int fnum;
2648
2649         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2650                 d_printf("close <fnum>\n");
2651                 return 1;
2652         }
2653
2654         fnum = atoi(buf);
2655         /* We really should use the targetcli here.... */
2656         if (!NT_STATUS_IS_OK(cli_close(cli, fnum))) {
2657                 d_printf("close %d: %s\n", fnum, cli_errstr(cli));
2658                 return 1;
2659         }
2660         return 0;
2661 }
2662
2663 static int cmd_posix(void)
2664 {
2665         TALLOC_CTX *ctx = talloc_tos();
2666         uint16 major, minor;
2667         uint32 caplow, caphigh;
2668         char *caps;
2669         NTSTATUS status;
2670
2671         if (!SERVER_HAS_UNIX_CIFS(cli)) {
2672                 d_printf("Server doesn't support UNIX CIFS extensions.\n");
2673                 return 1;
2674         }
2675
2676         status = cli_unix_extensions_version(cli, &major, &minor, &caplow,
2677                                              &caphigh);
2678         if (!NT_STATUS_IS_OK(status)) {
2679                 d_printf("Can't get UNIX CIFS extensions version from "
2680                          "server: %s\n", nt_errstr(status));
2681                 return 1;
2682         }
2683
2684         d_printf("Server supports CIFS extensions %u.%u\n", (unsigned int)major, (unsigned int)minor);
2685
2686         caps = talloc_strdup(ctx, "");
2687         if (!caps) {
2688                 return 1;
2689         }
2690         if (caplow & CIFS_UNIX_FCNTL_LOCKS_CAP) {
2691                 caps = talloc_asprintf_append(caps, "locks ");
2692                 if (!caps) {
2693                         return 1;
2694                 }
2695         }
2696         if (caplow & CIFS_UNIX_POSIX_ACLS_CAP) {
2697                 caps = talloc_asprintf_append(caps, "acls ");
2698                 if (!caps) {
2699                         return 1;
2700                 }
2701         }
2702         if (caplow & CIFS_UNIX_XATTTR_CAP) {
2703                 caps = talloc_asprintf_append(caps, "eas ");
2704                 if (!caps) {
2705                         return 1;
2706                 }
2707         }
2708         if (caplow & CIFS_UNIX_POSIX_PATHNAMES_CAP) {
2709                 caps = talloc_asprintf_append(caps, "pathnames ");
2710                 if (!caps) {
2711                         return 1;
2712                 }
2713         }
2714         if (caplow & CIFS_UNIX_POSIX_PATH_OPERATIONS_CAP) {
2715                 caps = talloc_asprintf_append(caps, "posix_path_operations ");
2716                 if (!caps) {
2717                         return 1;
2718                 }
2719         }
2720         if (caplow & CIFS_UNIX_LARGE_READ_CAP) {
2721                 caps = talloc_asprintf_append(caps, "large_read ");
2722                 if (!caps) {
2723                         return 1;
2724                 }
2725         }
2726         if (caplow & CIFS_UNIX_LARGE_WRITE_CAP) {
2727                 caps = talloc_asprintf_append(caps, "large_write ");
2728                 if (!caps) {
2729                         return 1;
2730                 }
2731         }
2732         if (caplow & CIFS_UNIX_TRANSPORT_ENCRYPTION_CAP) {
2733                 caps = talloc_asprintf_append(caps, "posix_encrypt ");
2734                 if (!caps) {
2735                         return 1;
2736                 }
2737         }
2738         if (caplow & CIFS_UNIX_TRANSPORT_ENCRYPTION_MANDATORY_CAP) {
2739                 caps = talloc_asprintf_append(caps, "mandatory_posix_encrypt ");
2740                 if (!caps) {
2741                         return 1;
2742                 }
2743         }
2744
2745         if (*caps && caps[strlen(caps)-1] == ' ') {
2746                 caps[strlen(caps)-1] = '\0';
2747         }
2748
2749         d_printf("Server supports CIFS capabilities %s\n", caps);
2750
2751         status = cli_set_unix_extensions_capabilities(cli, major, minor,
2752                                                       caplow, caphigh);
2753         if (!NT_STATUS_IS_OK(status)) {
2754                 d_printf("Can't set UNIX CIFS extensions capabilities. %s.\n",
2755                          nt_errstr(status));
2756                 return 1;
2757         }
2758
2759         if (caplow & CIFS_UNIX_POSIX_PATHNAMES_CAP) {
2760                 CLI_DIRSEP_CHAR = '/';
2761                 *CLI_DIRSEP_STR = '/';
2762                 client_set_cur_dir(CLI_DIRSEP_STR);
2763         }
2764
2765         return 0;
2766 }
2767
2768 static int cmd_lock(void)
2769 {
2770         TALLOC_CTX *ctx = talloc_tos();
2771         char *buf = NULL;
2772         uint64_t start, len;
2773         enum brl_type lock_type;
2774         int fnum;
2775
2776         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2777                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2778                 return 1;
2779         }
2780         fnum = atoi(buf);
2781
2782         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2783                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2784                 return 1;
2785         }
2786
2787         if (*buf == 'r' || *buf == 'R') {
2788                 lock_type = READ_LOCK;
2789         } else if (*buf == 'w' || *buf == 'W') {
2790                 lock_type = WRITE_LOCK;
2791         } else {
2792                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2793                 return 1;
2794         }
2795
2796         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2797                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2798                 return 1;
2799         }
2800
2801         start = (uint64_t)strtol(buf, (char **)NULL, 16);
2802
2803         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2804                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2805                 return 1;
2806         }
2807
2808         len = (uint64_t)strtol(buf, (char **)NULL, 16);
2809
2810         if (!NT_STATUS_IS_OK(cli_posix_lock(cli, fnum, start, len, true, lock_type))) {
2811                 d_printf("lock failed %d: %s\n", fnum, cli_errstr(cli));
2812         }
2813
2814         return 0;
2815 }
2816
2817 static int cmd_unlock(void)
2818 {
2819         TALLOC_CTX *ctx = talloc_tos();
2820         char *buf = NULL;
2821         uint64_t start, len;
2822         int fnum;
2823
2824         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2825                 d_printf("unlock <fnum> <hex-start> <hex-len>\n");
2826                 return 1;
2827         }
2828         fnum = atoi(buf);
2829
2830         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2831                 d_printf("unlock <fnum> <hex-start> <hex-len>\n");
2832                 return 1;
2833         }
2834
2835         start = (uint64_t)strtol(buf, (char **)NULL, 16);
2836
2837         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2838                 d_printf("unlock <fnum> <hex-start> <hex-len>\n");
2839                 return 1;
2840         }
2841
2842         len = (uint64_t)strtol(buf, (char **)NULL, 16);
2843
2844         if (!NT_STATUS_IS_OK(cli_posix_unlock(cli, fnum, start, len))) {
2845                 d_printf("unlock failed %d: %s\n", fnum, cli_errstr(cli));
2846         }
2847
2848         return 0;
2849 }
2850
2851
2852 /****************************************************************************
2853  Remove a directory.
2854 ****************************************************************************/
2855
2856 static int cmd_rmdir(void)
2857 {
2858         TALLOC_CTX *ctx = talloc_tos();
2859         char *mask = NULL;
2860         char *buf = NULL;
2861         char *targetname = NULL;
2862         struct cli_state *targetcli;
2863
2864         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2865                 d_printf("rmdir <dirname>\n");
2866                 return 1;
2867         }
2868         mask = talloc_asprintf(ctx,
2869                         "%s%s",
2870                         client_get_cur_dir(),
2871                         buf);
2872         if (!mask) {
2873                 return 1;
2874         }
2875
2876         if (!cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli, &targetname)) {
2877                 d_printf("rmdir %s: %s\n", mask, cli_errstr(cli));
2878                 return 1;
2879         }
2880
2881         if (!NT_STATUS_IS_OK(cli_rmdir(targetcli, targetname))) {
2882                 d_printf("%s removing remote directory file %s\n",
2883                          cli_errstr(targetcli),mask);
2884         }
2885
2886         return 0;
2887 }
2888
2889 /****************************************************************************
2890  UNIX hardlink.
2891 ****************************************************************************/
2892
2893 static int cmd_link(void)
2894 {
2895         TALLOC_CTX *ctx = talloc_tos();
2896         char *oldname = NULL;
2897         char *newname = NULL;
2898         char *buf = NULL;
2899         char *buf2 = NULL;
2900         char *targetname = NULL;
2901         struct cli_state *targetcli;
2902
2903         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
2904             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
2905                 d_printf("link <oldname> <newname>\n");
2906                 return 1;
2907         }
2908         oldname = talloc_asprintf(ctx,
2909                         "%s%s",
2910                         client_get_cur_dir(),
2911                         buf);
2912         if (!oldname) {
2913                 return 1;
2914         }
2915         newname = talloc_asprintf(ctx,
2916                         "%s%s",
2917                         client_get_cur_dir(),
2918                         buf2);
2919         if (!newname) {
2920                 return 1;
2921         }
2922
2923         if (!cli_resolve_path(ctx, "", auth_info, cli, oldname, &targetcli, &targetname)) {
2924                 d_printf("link %s: %s\n", oldname, cli_errstr(cli));
2925                 return 1;
2926         }
2927
2928         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
2929                 d_printf("Server doesn't support UNIX CIFS calls.\n");
2930                 return 1;
2931         }
2932
2933         if (!NT_STATUS_IS_OK(cli_posix_hardlink(targetcli, targetname, newname))) {
2934                 d_printf("%s linking files (%s -> %s)\n", cli_errstr(targetcli), newname, oldname);
2935                 return 1;
2936         }
2937         return 0;
2938 }
2939
2940 /****************************************************************************
2941  UNIX readlink.
2942 ****************************************************************************/
2943
2944 static int cmd_readlink(void)
2945 {
2946         TALLOC_CTX *ctx = talloc_tos();
2947         char *name= NULL;
2948         char *buf = NULL;
2949         char *targetname = NULL;
2950         char linkname[PATH_MAX+1];
2951         struct cli_state *targetcli;
2952
2953         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2954                 d_printf("readlink <name>\n");
2955                 return 1;
2956         }
2957         name = talloc_asprintf(ctx,
2958                         "%s%s",
2959                         client_get_cur_dir(),
2960                         buf);
2961         if (!name) {
2962                 return 1;
2963         }
2964
2965         if (!cli_resolve_path(ctx, "", auth_info, cli, name, &targetcli, &targetname)) {
2966                 d_printf("readlink %s: %s\n", name, cli_errstr(cli));
2967                 return 1;
2968         }
2969
2970         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
2971                 d_printf("Server doesn't support UNIX CIFS calls.\n");
2972                 return 1;
2973         }
2974
2975         if (!NT_STATUS_IS_OK(cli_posix_readlink(targetcli, name,
2976                         linkname, PATH_MAX+1))) {
2977                 d_printf("%s readlink on file %s\n",
2978                         cli_errstr(targetcli), name);
2979                 return 1;
2980         }
2981
2982         d_printf("%s -> %s\n", name, linkname);
2983
2984         return 0;
2985 }
2986
2987
2988 /****************************************************************************
2989  UNIX symlink.
2990 ****************************************************************************/
2991
2992 static int cmd_symlink(void)
2993 {
2994         TALLOC_CTX *ctx = talloc_tos();
2995         char *oldname = NULL;
2996         char *newname = NULL;
2997         char *buf = NULL;
2998         char *buf2 = NULL;
2999         struct cli_state *newcli;
3000
3001         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3002             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
3003                 d_printf("symlink <oldname> <newname>\n");
3004                 return 1;
3005         }
3006         /* Oldname (link target) must be an untouched blob. */
3007         oldname = buf;
3008
3009         newname = talloc_asprintf(ctx,
3010                         "%s%s",
3011                         client_get_cur_dir(),
3012                         buf2);
3013         if (!newname) {
3014                 return 1;
3015         }
3016
3017         /* New name must be present in share namespace. */
3018         if (!cli_resolve_path(ctx, "", auth_info, cli, newname, &newcli, &newname)) {
3019                 d_printf("link %s: %s\n", oldname, cli_errstr(cli));
3020                 return 1;
3021         }
3022
3023         if (!SERVER_HAS_UNIX_CIFS(newcli)) {
3024                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3025                 return 1;
3026         }
3027
3028         if (!NT_STATUS_IS_OK(cli_posix_symlink(newcli, oldname, newname))) {
3029                 d_printf("%s symlinking files (%s -> %s)\n",
3030                         cli_errstr(newcli), newname, newname);
3031                 return 1;
3032         }
3033
3034         return 0;
3035 }
3036
3037 /****************************************************************************
3038  UNIX chmod.
3039 ****************************************************************************/
3040
3041 static int cmd_chmod(void)
3042 {
3043         TALLOC_CTX *ctx = talloc_tos();
3044         char *src = NULL;
3045         char *buf = NULL;
3046         char *buf2 = NULL;
3047         char *targetname = NULL;
3048         struct cli_state *targetcli;
3049         mode_t mode;
3050
3051         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3052             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
3053                 d_printf("chmod mode file\n");
3054                 return 1;
3055         }
3056         src = talloc_asprintf(ctx,
3057                         "%s%s",
3058                         client_get_cur_dir(),
3059                         buf2);
3060         if (!src) {
3061                 return 1;
3062         }
3063
3064         mode = (mode_t)strtol(buf, NULL, 8);
3065
3066         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetname)) {
3067                 d_printf("chmod %s: %s\n", src, cli_errstr(cli));
3068                 return 1;
3069         }
3070
3071         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3072                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3073                 return 1;
3074         }
3075
3076         if (!NT_STATUS_IS_OK(cli_posix_chmod(targetcli, targetname, mode))) {
3077                 d_printf("%s chmod file %s 0%o\n",
3078                         cli_errstr(targetcli), src, (unsigned int)mode);
3079                 return 1;
3080         }
3081
3082         return 0;
3083 }
3084
3085 static const char *filetype_to_str(mode_t mode)
3086 {
3087         if (S_ISREG(mode)) {
3088                 return "regular file";
3089         } else if (S_ISDIR(mode)) {
3090                 return "directory";
3091         } else
3092 #ifdef S_ISCHR
3093         if (S_ISCHR(mode)) {
3094                 return "character device";
3095         } else
3096 #endif
3097 #ifdef S_ISBLK
3098         if (S_ISBLK(mode)) {
3099                 return "block device";
3100         } else
3101 #endif
3102 #ifdef S_ISFIFO
3103         if (S_ISFIFO(mode)) {
3104                 return "fifo";
3105         } else
3106 #endif
3107 #ifdef S_ISLNK
3108         if (S_ISLNK(mode)) {
3109                 return "symbolic link";
3110         } else
3111 #endif
3112 #ifdef S_ISSOCK
3113         if (S_ISSOCK(mode)) {
3114                 return "socket";
3115         } else
3116 #endif
3117         return "";
3118 }
3119
3120 static char rwx_to_str(mode_t m, mode_t bt, char ret)
3121 {
3122         if (m & bt) {
3123                 return ret;
3124         } else {
3125                 return '-';
3126         }
3127 }
3128
3129 static char *unix_mode_to_str(char *s, mode_t m)
3130 {
3131         char *p = s;
3132         const char *str = filetype_to_str(m);
3133
3134         switch(str[0]) {
3135                 case 'd':
3136                         *p++ = 'd';
3137                         break;
3138                 case 'c':
3139                         *p++ = 'c';
3140                         break;
3141                 case 'b':
3142                         *p++ = 'b';
3143                         break;
3144                 case 'f':
3145                         *p++ = 'p';
3146                         break;
3147                 case 's':
3148                         *p++ = str[1] == 'y' ? 'l' : 's';
3149                         break;
3150                 case 'r':
3151                 default:
3152                         *p++ = '-';
3153                         break;
3154         }
3155         *p++ = rwx_to_str(m, S_IRUSR, 'r');
3156         *p++ = rwx_to_str(m, S_IWUSR, 'w');
3157         *p++ = rwx_to_str(m, S_IXUSR, 'x');
3158         *p++ = rwx_to_str(m, S_IRGRP, 'r');
3159         *p++ = rwx_to_str(m, S_IWGRP, 'w');
3160         *p++ = rwx_to_str(m, S_IXGRP, 'x');
3161         *p++ = rwx_to_str(m, S_IROTH, 'r');
3162         *p++ = rwx_to_str(m, S_IWOTH, 'w');
3163         *p++ = rwx_to_str(m, S_IXOTH, 'x');
3164         *p++ = '\0';
3165         return s;
3166 }
3167
3168 /****************************************************************************
3169  Utility function for UNIX getfacl.
3170 ****************************************************************************/
3171
3172 static char *perms_to_string(fstring permstr, unsigned char perms)
3173 {
3174         fstrcpy(permstr, "---");
3175         if (perms & SMB_POSIX_ACL_READ) {
3176                 permstr[0] = 'r';
3177         }
3178         if (perms & SMB_POSIX_ACL_WRITE) {
3179                 permstr[1] = 'w';
3180         }
3181         if (perms & SMB_POSIX_ACL_EXECUTE) {
3182                 permstr[2] = 'x';
3183         }
3184         return permstr;
3185 }
3186
3187 /****************************************************************************
3188  UNIX getfacl.
3189 ****************************************************************************/
3190
3191 static int cmd_getfacl(void)
3192 {
3193         TALLOC_CTX *ctx = talloc_tos();
3194         char *src = NULL;
3195         char *name = NULL;
3196         char *targetname = NULL;
3197         struct cli_state *targetcli;
3198         uint16 major, minor;
3199         uint32 caplow, caphigh;
3200         char *retbuf = NULL;
3201         size_t rb_size = 0;
3202         SMB_STRUCT_STAT sbuf;
3203         uint16 num_file_acls = 0;
3204         uint16 num_dir_acls = 0;
3205         uint16 i;
3206         NTSTATUS status;
3207
3208         if (!next_token_talloc(ctx, &cmd_ptr,&name,NULL)) {
3209                 d_printf("getfacl filename\n");
3210                 return 1;
3211         }
3212         src = talloc_asprintf(ctx,
3213                         "%s%s",
3214                         client_get_cur_dir(),
3215                         name);
3216         if (!src) {
3217                 return 1;
3218         }
3219
3220         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetname)) {
3221                 d_printf("stat %s: %s\n", src, cli_errstr(cli));
3222                 return 1;
3223         }
3224
3225         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3226                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3227                 return 1;
3228         }
3229
3230         status = cli_unix_extensions_version(targetcli, &major, &minor,
3231                                              &caplow, &caphigh);
3232         if (!NT_STATUS_IS_OK(status)) {
3233                 d_printf("Can't get UNIX CIFS version from server: %s.\n",
3234                          nt_errstr(status));
3235                 return 1;
3236         }
3237
3238         if (!(caplow & CIFS_UNIX_POSIX_ACLS_CAP)) {
3239                 d_printf("This server supports UNIX extensions "
3240                         "but doesn't support POSIX ACLs.\n");
3241                 return 1;
3242         }
3243
3244         if (!NT_STATUS_IS_OK(cli_posix_stat(targetcli, targetname, &sbuf))) {
3245                 d_printf("%s getfacl doing a stat on file %s\n",
3246                         cli_errstr(targetcli), src);
3247                 return 1;
3248         }
3249
3250         if (!NT_STATUS_IS_OK(cli_posix_getfacl(targetcli, targetname, ctx, &rb_size, &retbuf))) {
3251                 d_printf("%s getfacl file %s\n",
3252                         cli_errstr(targetcli), src);
3253                 return 1;
3254         }
3255
3256         /* ToDo : Print out the ACL values. */
3257         if (rb_size < 6 || SVAL(retbuf,0) != SMB_POSIX_ACL_VERSION) {
3258                 d_printf("getfacl file %s, unknown POSIX acl version %u.\n",
3259                         src, (unsigned int)CVAL(retbuf,0) );
3260                 return 1;
3261         }
3262
3263         num_file_acls = SVAL(retbuf,2);
3264         num_dir_acls = SVAL(retbuf,4);
3265         if (rb_size != SMB_POSIX_ACL_HEADER_SIZE + SMB_POSIX_ACL_ENTRY_SIZE*(num_file_acls+num_dir_acls)) {
3266                 d_printf("getfacl file %s, incorrect POSIX acl buffer size (should be %u, was %u).\n",
3267                         src,
3268                         (unsigned int)(SMB_POSIX_ACL_HEADER_SIZE + SMB_POSIX_ACL_ENTRY_SIZE*(num_file_acls+num_dir_acls)),
3269                         (unsigned int)rb_size);
3270                 return 1;
3271         }
3272
3273         d_printf("# file: %s\n", src);
3274         d_printf("# owner: %u\n# group: %u\n", (unsigned int)sbuf.st_ex_uid, (unsigned int)sbuf.st_ex_gid);
3275
3276         if (num_file_acls == 0 && num_dir_acls == 0) {
3277                 d_printf("No acls found.\n");
3278         }
3279
3280         for (i = 0; i < num_file_acls; i++) {
3281                 uint32 uorg;
3282                 fstring permstring;
3283                 unsigned char tagtype = CVAL(retbuf, SMB_POSIX_ACL_HEADER_SIZE+(i*SMB_POSIX_ACL_ENTRY_SIZE));
3284                 unsigned char perms = CVAL(retbuf, SMB_POSIX_ACL_HEADER_SIZE+(i*SMB_POSIX_ACL_ENTRY_SIZE)+1);
3285
3286                 switch(tagtype) {
3287                         case SMB_POSIX_ACL_USER_OBJ:
3288                                 d_printf("user::");
3289                                 break;
3290                         case SMB_POSIX_ACL_USER:
3291                                 uorg = IVAL(retbuf,SMB_POSIX_ACL_HEADER_SIZE+(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3292                                 d_printf("user:%u:", uorg);
3293                                 break;
3294                         case SMB_POSIX_ACL_GROUP_OBJ:
3295                                 d_printf("group::");
3296                                 break;
3297                         case SMB_POSIX_ACL_GROUP:
3298                                 uorg = IVAL(retbuf,SMB_POSIX_ACL_HEADER_SIZE+(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3299                                 d_printf("group:%u:", uorg);
3300                                 break;
3301                         case SMB_POSIX_ACL_MASK:
3302                                 d_printf("mask::");
3303                                 break;
3304                         case SMB_POSIX_ACL_OTHER:
3305                                 d_printf("other::");
3306                                 break;
3307                         default:
3308                                 d_printf("getfacl file %s, incorrect POSIX acl tagtype (%u).\n",
3309                                         src, (unsigned int)tagtype );
3310                                 SAFE_FREE(retbuf);
3311                                 return 1;
3312                 }
3313
3314                 d_printf("%s\n", perms_to_string(permstring, perms));
3315         }
3316
3317         for (i = 0; i < num_dir_acls; i++) {
3318                 uint32 uorg;
3319                 fstring permstring;
3320                 unsigned char tagtype = CVAL(retbuf, SMB_POSIX_ACL_HEADER_SIZE+((i+num_file_acls)*SMB_POSIX_ACL_ENTRY_SIZE));
3321                 unsigned char perms = CVAL(retbuf, SMB_POSIX_ACL_HEADER_SIZE+((i+num_file_acls)*SMB_POSIX_ACL_ENTRY_SIZE)+1);
3322
3323                 switch(tagtype) {
3324                         case SMB_POSIX_ACL_USER_OBJ:
3325                                 d_printf("default:user::");
3326                                 break;
3327                         case SMB_POSIX_ACL_USER:
3328                                 uorg = IVAL(retbuf,SMB_POSIX_ACL_HEADER_SIZE+((i+num_file_acls)*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3329                                 d_printf("default:user:%u:", uorg);
3330                                 break;
3331                         case SMB_POSIX_ACL_GROUP_OBJ:
3332                                 d_printf("default:group::");
3333                                 break;
3334                         case SMB_POSIX_ACL_GROUP:
3335                                 uorg = IVAL(retbuf,SMB_POSIX_ACL_HEADER_SIZE+((i+num_file_acls)*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3336                                 d_printf("default:group:%u:", uorg);
3337                                 break;
3338                         case SMB_POSIX_ACL_MASK:
3339                                 d_printf("default:mask::");
3340                                 break;
3341                         case SMB_POSIX_ACL_OTHER:
3342                                 d_printf("default:other::");
3343                                 break;
3344                         default:
3345                                 d_printf("getfacl file %s, incorrect POSIX acl tagtype (%u).\n",
3346                                         src, (unsigned int)tagtype );
3347                                 SAFE_FREE(retbuf);
3348                                 return 1;
3349                 }
3350
3351                 d_printf("%s\n", perms_to_string(permstring, perms));
3352         }
3353
3354         return 0;
3355 }
3356
3357 static void printf_cb(const char *buf, void *private_data)
3358 {
3359         printf("%s", buf);
3360 }
3361
3362 /****************************************************************************
3363  Get the EA list of a file
3364 ****************************************************************************/
3365
3366 static int cmd_geteas(void)
3367 {
3368         TALLOC_CTX *ctx = talloc_tos();
3369         char *src = NULL;
3370         char *name = NULL;
3371         char *targetname = NULL;
3372         struct cli_state *targetcli;
3373         NTSTATUS status;
3374         size_t i, num_eas;
3375         struct ea_struct *eas;
3376
3377         if (!next_token_talloc(ctx, &cmd_ptr,&name,NULL)) {
3378                 d_printf("geteas filename\n");
3379                 return 1;
3380         }
3381         src = talloc_asprintf(ctx,
3382                         "%s%s",
3383                         client_get_cur_dir(),
3384                         name);
3385         if (!src) {
3386                 return 1;
3387         }
3388
3389         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli,
3390                               &targetname)) {
3391                 d_printf("stat %s: %s\n", src, cli_errstr(cli));
3392                 return 1;
3393         }
3394
3395         status = cli_get_ea_list_path(targetcli, targetname, talloc_tos(),
3396                                       &num_eas, &eas);
3397         if (!NT_STATUS_IS_OK(status)) {
3398                 d_printf("cli_get_ea_list_path: %s\n", nt_errstr(status));
3399                 return 1;
3400         }
3401
3402         for (i=0; i<num_eas; i++) {
3403                 d_printf("%s (%d) =\n", eas[i].name, (int)eas[i].flags);
3404                 dump_data_cb(eas[i].value.data, eas[i].value.length, false,
3405                              printf_cb, NULL);
3406                 d_printf("\n");
3407         }
3408
3409         TALLOC_FREE(eas);
3410
3411         return 0;
3412 }
3413
3414 /****************************************************************************
3415  Set an EA of a file
3416 ****************************************************************************/
3417
3418 static int cmd_setea(void)
3419 {
3420         TALLOC_CTX *ctx = talloc_tos();
3421         char *src = NULL;
3422         char *name = NULL;
3423         char *eaname = NULL;
3424         char *eavalue = NULL;
3425         char *targetname = NULL;
3426         struct cli_state *targetcli;
3427         NTSTATUS status;
3428
3429         if (!next_token_talloc(ctx, &cmd_ptr, &name, NULL)
3430             || !next_token_talloc(ctx, &cmd_ptr, &eaname, NULL)) {
3431                 d_printf("setea filename eaname value\n");
3432                 return 1;
3433         }
3434         if (!next_token_talloc(ctx, &cmd_ptr, &eavalue, NULL)) {
3435                 eavalue = talloc_strdup(ctx, "");
3436         }
3437         src = talloc_asprintf(ctx,
3438                         "%s%s",
3439                         client_get_cur_dir(),
3440                         name);
3441         if (!src) {
3442                 return 1;
3443         }
3444
3445         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli,
3446                               &targetname)) {
3447                 d_printf("stat %s: %s\n", src, cli_errstr(cli));
3448                 return 1;
3449         }
3450
3451         status =  cli_set_ea_path(targetcli, targetname, eaname, eavalue,
3452                                   strlen(eavalue));
3453         if (!NT_STATUS_IS_OK(status)) {
3454                 d_printf("set_ea %s: %s\n", src, nt_errstr(status));
3455                 return 1;
3456         }
3457
3458         return 0;
3459 }
3460
3461 /****************************************************************************
3462  UNIX stat.
3463 ****************************************************************************/
3464
3465 static int cmd_stat(void)
3466 {
3467         TALLOC_CTX *ctx = talloc_tos();
3468         char *src = NULL;
3469         char *name = NULL;
3470         char *targetname = NULL;
3471         struct cli_state *targetcli;
3472         fstring mode_str;
3473         SMB_STRUCT_STAT sbuf;
3474         struct tm *lt;
3475         time_t tmp_time;
3476
3477         if (!next_token_talloc(ctx, &cmd_ptr,&name,NULL)) {
3478                 d_printf("stat file\n");
3479                 return 1;
3480         }
3481         src = talloc_asprintf(ctx,
3482                         "%s%s",
3483                         client_get_cur_dir(),
3484                         name);
3485         if (!src) {
3486                 return 1;
3487         }
3488
3489         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetname)) {
3490                 d_printf("stat %s: %s\n", src, cli_errstr(cli));
3491                 return 1;
3492         }
3493
3494         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3495                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3496                 return 1;
3497         }
3498
3499         if (!NT_STATUS_IS_OK(cli_posix_stat(targetcli, targetname, &sbuf))) {
3500                 d_printf("%s stat file %s\n",
3501                         cli_errstr(targetcli), src);
3502                 return 1;
3503         }
3504
3505         /* Print out the stat values. */
3506         d_printf("File: %s\n", src);
3507         d_printf("Size: %-12.0f\tBlocks: %u\t%s\n",
3508                 (double)sbuf.st_ex_size,
3509                 (unsigned int)sbuf.st_ex_blocks,
3510                 filetype_to_str(sbuf.st_ex_mode));
3511
3512 #if defined(S_ISCHR) && defined(S_ISBLK)
3513         if (S_ISCHR(sbuf.st_ex_mode) || S_ISBLK(sbuf.st_ex_mode)) {
3514                 d_printf("Inode: %.0f\tLinks: %u\tDevice type: %u,%u\n",
3515                         (double)sbuf.st_ex_ino,
3516                         (unsigned int)sbuf.st_ex_nlink,
3517                         unix_dev_major(sbuf.st_ex_rdev),
3518                         unix_dev_minor(sbuf.st_ex_rdev));
3519         } else
3520 #endif
3521                 d_printf("Inode: %.0f\tLinks: %u\n",
3522                         (double)sbuf.st_ex_ino,
3523                         (unsigned int)sbuf.st_ex_nlink);
3524
3525         d_printf("Access: (0%03o/%s)\tUid: %u\tGid: %u\n",
3526                 ((int)sbuf.st_ex_mode & 0777),
3527                 unix_mode_to_str(mode_str, sbuf.st_ex_mode),
3528                 (unsigned int)sbuf.st_ex_uid,
3529                 (unsigned int)sbuf.st_ex_gid);
3530
3531         tmp_time = convert_timespec_to_time_t(sbuf.st_ex_atime);
3532         lt = localtime(&tmp_time);
3533         if (lt) {
3534                 strftime(mode_str, sizeof(mode_str), "%Y-%m-%d %T %z", lt);
3535         } else {
3536                 fstrcpy(mode_str, "unknown");
3537         }
3538         d_printf("Access: %s\n", mode_str);
3539
3540         tmp_time = convert_timespec_to_time_t(sbuf.st_ex_mtime);
3541         lt = localtime(&tmp_time);
3542         if (lt) {
3543                 strftime(mode_str, sizeof(mode_str), "%Y-%m-%d %T %z", lt);
3544         } else {
3545                 fstrcpy(mode_str, "unknown");
3546         }
3547         d_printf("Modify: %s\n", mode_str);
3548
3549         tmp_time = convert_timespec_to_time_t(sbuf.st_ex_ctime);
3550         lt = localtime(&tmp_time);
3551         if (lt) {
3552                 strftime(mode_str, sizeof(mode_str), "%Y-%m-%d %T %z", lt);
3553         } else {
3554                 fstrcpy(mode_str, "unknown");
3555         }
3556         d_printf("Change: %s\n", mode_str);
3557
3558         return 0;
3559 }
3560
3561
3562 /****************************************************************************
3563  UNIX chown.
3564 ****************************************************************************/
3565
3566 static int cmd_chown(void)
3567 {
3568         TALLOC_CTX *ctx = talloc_tos();
3569         char *src = NULL;
3570         uid_t uid;
3571         gid_t gid;
3572         char *buf, *buf2, *buf3;
3573         struct cli_state *targetcli;
3574         char *targetname = NULL;
3575
3576         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3577             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL) ||
3578             !next_token_talloc(ctx, &cmd_ptr,&buf3,NULL)) {
3579                 d_printf("chown uid gid file\n");
3580                 return 1;
3581         }
3582
3583         uid = (uid_t)atoi(buf);
3584         gid = (gid_t)atoi(buf2);
3585
3586         src = talloc_asprintf(ctx,
3587                         "%s%s",
3588                         client_get_cur_dir(),
3589                         buf3);
3590         if (!src) {
3591                 return 1;
3592         }
3593         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetname) ) {
3594                 d_printf("chown %s: %s\n", src, cli_errstr(cli));
3595                 return 1;
3596         }
3597
3598         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3599                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3600                 return 1;
3601         }
3602
3603         if (!NT_STATUS_IS_OK(cli_posix_chown(targetcli, targetname, uid, gid))) {
3604                 d_printf("%s chown file %s uid=%d, gid=%d\n",
3605                         cli_errstr(targetcli), src, (int)uid, (int)gid);
3606                 return 1;
3607         }
3608
3609         return 0;
3610 }
3611
3612 /****************************************************************************
3613  Rename some file.
3614 ****************************************************************************/
3615
3616 static int cmd_rename(void)
3617 {
3618         TALLOC_CTX *ctx = talloc_tos();
3619         char *src, *dest;
3620         char *buf, *buf2;
3621         struct cli_state *targetcli;
3622         char *targetsrc;
3623         char *targetdest;
3624
3625         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3626             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
3627                 d_printf("rename <src> <dest>\n");
3628                 return 1;
3629         }
3630
3631         src = talloc_asprintf(ctx,
3632                         "%s%s",
3633                         client_get_cur_dir(),
3634                         buf);
3635         if (!src) {
3636                 return 1;
3637         }
3638
3639         dest = talloc_asprintf(ctx,
3640                         "%s%s",
3641                         client_get_cur_dir(),
3642                         buf2);
3643         if (!dest) {
3644                 return 1;
3645         }
3646
3647         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetsrc)) {
3648                 d_printf("rename %s: %s\n", src, cli_errstr(cli));
3649                 return 1;
3650         }
3651
3652         if (!cli_resolve_path(ctx, "", auth_info, cli, dest, &targetcli, &targetdest)) {
3653                 d_printf("rename %s: %s\n", dest, cli_errstr(cli));
3654                 return 1;
3655         }
3656
3657         if (!NT_STATUS_IS_OK(cli_rename(targetcli, targetsrc, targetdest))) {
3658                 d_printf("%s renaming files %s -> %s \n",
3659                         cli_errstr(targetcli),
3660                         targetsrc,
3661                         targetdest);
3662                 return 1;
3663         }
3664
3665         return 0;
3666 }
3667
3668 /****************************************************************************
3669  Print the volume name.
3670 ****************************************************************************/
3671
3672 static int cmd_volume(void)
3673 {
3674         fstring volname;
3675         uint32 serial_num;
3676         time_t create_date;
3677         NTSTATUS status;
3678
3679         status = cli_get_fs_volume_info(cli, volname, &serial_num,
3680                                         &create_date);
3681         if (!NT_STATUS_IS_OK(status)) {
3682                 d_printf("Error %s getting volume info\n", nt_errstr(status));
3683                 return 1;
3684         }
3685
3686         d_printf("Volume: |%s| serial number 0x%x\n",
3687                         volname, (unsigned int)serial_num);
3688         return 0;
3689 }
3690
3691 /****************************************************************************
3692  Hard link files using the NT call.
3693 ****************************************************************************/
3694
3695 static int cmd_hardlink(void)
3696 {
3697         TALLOC_CTX *ctx = talloc_tos();
3698         char *src, *dest;
3699         char *buf, *buf2;
3700         struct cli_state *targetcli;
3701         char *targetname;
3702
3703         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3704             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
3705                 d_printf("hardlink <src> <dest>\n");
3706                 return 1;
3707         }
3708
3709         src = talloc_asprintf(ctx,
3710                         "%s%s",
3711                         client_get_cur_dir(),
3712                         buf);
3713         if (!src) {
3714                 return 1;
3715         }
3716
3717         dest = talloc_asprintf(ctx,
3718                         "%s%s",
3719                         client_get_cur_dir(),
3720                         buf2);
3721         if (!dest) {
3722                 return 1;
3723         }
3724
3725         if (!cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli, &targetname)) {
3726                 d_printf("hardlink %s: %s\n", src, cli_errstr(cli));
3727                 return 1;
3728         }
3729
3730         if (!NT_STATUS_IS_OK(cli_nt_hardlink(targetcli, targetname, dest))) {
3731                 d_printf("%s doing an NT hard link of files\n",cli_errstr(targetcli));
3732                 return 1;
3733         }
3734
3735         return 0;
3736 }
3737
3738 /****************************************************************************
3739  Toggle the prompt flag.
3740 ****************************************************************************/
3741
3742 static int cmd_prompt(void)
3743 {
3744         prompt = !prompt;
3745         DEBUG(2,("prompting is now %s\n",prompt?"on":"off"));
3746         return 1;
3747 }
3748
3749 /****************************************************************************
3750  Set the newer than time.
3751 ****************************************************************************/
3752
3753 static int cmd_newer(void)
3754 {
3755         TALLOC_CTX *ctx = talloc_tos();
3756         char *buf;
3757         bool ok;
3758         SMB_STRUCT_STAT sbuf;
3759
3760         ok = next_token_talloc(ctx, &cmd_ptr,&buf,NULL);
3761         if (ok && (sys_stat(buf, &sbuf, false) == 0)) {
3762                 newer_than = convert_timespec_to_time_t(sbuf.st_ex_mtime);
3763                 DEBUG(1,("Getting files newer than %s",
3764                          time_to_asc(newer_than)));
3765         } else {
3766                 newer_than = 0;
3767         }
3768
3769         if (ok && newer_than == 0) {
3770                 d_printf("Error setting newer-than time\n");
3771                 return 1;
3772         }
3773
3774         return 0;
3775 }
3776
3777 /****************************************************************************
3778  Set the archive level.
3779 ****************************************************************************/
3780
3781 static int cmd_archive(void)
3782 {
3783         TALLOC_CTX *ctx = talloc_tos();
3784         char *buf;
3785
3786         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
3787                 archive_level = atoi(buf);
3788         } else {
3789                 d_printf("Archive level is %d\n",archive_level);
3790         }
3791
3792         return 0;
3793 }
3794
3795 /****************************************************************************
3796  Toggle the lowercaseflag.
3797 ****************************************************************************/
3798
3799 static int cmd_lowercase(void)
3800 {
3801         lowercase = !lowercase;
3802         DEBUG(2,("filename lowercasing is now %s\n",lowercase?"on":"off"));
3803         return 0;
3804 }
3805
3806 /****************************************************************************
3807  Toggle the case sensitive flag.
3808 ****************************************************************************/
3809
3810 static int cmd_setcase(void)
3811 {
3812         bool orig_case_sensitive = cli_set_case_sensitive(cli, false);
3813
3814         cli_set_case_sensitive(cli, !orig_case_sensitive);
3815         DEBUG(2,("filename case sensitivity is now %s\n",!orig_case_sensitive ?
3816                 "on":"off"));
3817         return 0;
3818 }
3819
3820 /****************************************************************************
3821  Toggle the showacls flag.
3822 ****************************************************************************/
3823
3824 static int cmd_showacls(void)
3825 {
3826         showacls = !showacls;
3827         DEBUG(2,("showacls is now %s\n",showacls?"on":"off"));
3828         return 0;
3829 }
3830
3831
3832 /****************************************************************************
3833  Toggle the recurse flag.
3834 ****************************************************************************/
3835
3836 static int cmd_recurse(void)
3837 {
3838         recurse = !recurse;
3839         DEBUG(2,("directory recursion is now %s\n",recurse?"on":"off"));
3840         return 0;
3841 }
3842
3843 /****************************************************************************
3844  Toggle the translate flag.
3845 ****************************************************************************/
3846
3847 static int cmd_translate(void)
3848 {
3849         translation = !translation;
3850         DEBUG(2,("CR/LF<->LF and print text translation now %s\n",
3851                  translation?"on":"off"));
3852         return 0;
3853 }
3854
3855 /****************************************************************************
3856  Do the lcd command.
3857  ****************************************************************************/
3858
3859 static int cmd_lcd(void)
3860 {
3861         TALLOC_CTX *ctx = talloc_tos();
3862         char *buf;
3863         char *d;
3864
3865         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
3866                 if (chdir(buf) == -1) {
3867                         d_printf("chdir to %s failed (%s)\n",
3868                                 buf, strerror(errno));
3869                 }
3870         }
3871         d = TALLOC_ARRAY(ctx, char, PATH_MAX+1);
3872         if (!d) {
3873                 return 1;
3874         }
3875         DEBUG(2,("the local directory is now %s\n",sys_getwd(d)));
3876         return 0;
3877 }
3878
3879 /****************************************************************************
3880  Get a file restarting at end of local file.
3881  ****************************************************************************/
3882
3883 static int cmd_reget(void)
3884 {
3885         TALLOC_CTX *ctx = talloc_tos();
3886         char *local_name = NULL;
3887         char *remote_name = NULL;
3888         char *fname = NULL;
3889         char *p = NULL;
3890
3891         remote_name = talloc_strdup(ctx, client_get_cur_dir());
3892         if (!remote_name) {
3893                 return 1;
3894         }
3895
3896         if (!next_token_talloc(ctx, &cmd_ptr, &fname, NULL)) {
3897                 d_printf("reget <filename>\n");
3898                 return 1;
3899         }
3900         remote_name = talloc_asprintf_append(remote_name, "%s", fname);
3901         if (!remote_name) {
3902                 return 1;
3903         }
3904         remote_name = clean_name(ctx,remote_name);
3905         if (!remote_name) {
3906                 return 1;
3907         }
3908
3909         local_name = fname;
3910         next_token_talloc(ctx, &cmd_ptr, &p, NULL);
3911         if (p) {
3912                 local_name = p;
3913         }
3914
3915         return do_get(remote_name, local_name, true);
3916 }
3917
3918 /****************************************************************************
3919  Put a file restarting at end of local file.
3920  ****************************************************************************/
3921
3922 static int cmd_reput(void)
3923 {
3924         TALLOC_CTX *ctx = talloc_tos();
3925         char *local_name = NULL;
3926         char *remote_name = NULL;
3927         char *buf;
3928         SMB_STRUCT_STAT st;
3929
3930         remote_name = talloc_strdup(ctx, client_get_cur_dir());
3931         if (!remote_name) {
3932                 return 1;
3933         }
3934
3935         if (!next_token_talloc(ctx, &cmd_ptr, &local_name, NULL)) {
3936                 d_printf("reput <filename>\n");
3937                 return 1;
3938         }
3939
3940         if (!file_exist_stat(local_name, &st, false)) {
3941                 d_printf("%s does not exist\n", local_name);
3942                 return 1;
3943         }
3944
3945         if (next_token_talloc(ctx, &cmd_ptr, &buf, NULL)) {
3946                 remote_name = talloc_asprintf_append(remote_name,
3947                                                 "%s", buf);
3948         } else {
3949                 remote_name = talloc_asprintf_append(remote_name,
3950                                                 "%s", local_name);
3951         }
3952         if (!remote_name) {
3953                 return 1;
3954         }
3955
3956         remote_name = clean_name(ctx, remote_name);
3957         if (!remote_name) {
3958                 return 1;
3959         }
3960
3961         return do_put(remote_name, local_name, true);
3962 }
3963
3964 /****************************************************************************
3965  List a share name.
3966  ****************************************************************************/
3967
3968 static void browse_fn(const char *name, uint32 m,
3969                       const char *comment, void *state)
3970 {
3971         const char *typestr = "";
3972
3973         switch (m & 7) {
3974         case STYPE_DISKTREE:
3975                 typestr = "Disk";
3976                 break;
3977         case STYPE_PRINTQ:
3978                 typestr = "Printer";
3979                 break;
3980         case STYPE_DEVICE:
3981                 typestr = "Device";
3982                 break;
3983         case STYPE_IPC:
3984                 typestr = "IPC";
3985                 break;
3986         }
3987         /* FIXME: If the remote machine returns non-ascii characters
3988            in any of these fields, they can corrupt the output.  We
3989            should remove them. */
3990         if (!grepable) {
3991                 d_printf("\t%-15s %-10.10s%s\n",
3992                         name,typestr,comment);
3993         } else {
3994                 d_printf ("%s|%s|%s\n",typestr,name,comment);
3995         }
3996 }
3997
3998 static bool browse_host_rpc(bool sort)
3999 {
4000         NTSTATUS status;
4001         struct rpc_pipe_client *pipe_hnd = NULL;
4002         TALLOC_CTX *frame = talloc_stackframe();
4003         WERROR werr;
4004         struct srvsvc_NetShareInfoCtr info_ctr;
4005         struct srvsvc_NetShareCtr1 ctr1;
4006         uint32_t resume_handle = 0;
4007         uint32_t total_entries = 0;
4008         int i;
4009         struct dcerpc_binding_handle *b;
4010
4011         status = cli_rpc_pipe_open_noauth(cli, &ndr_table_srvsvc.syntax_id,
4012                                           &pipe_hnd);
4013
4014         if (!NT_STATUS_IS_OK(status)) {
4015                 DEBUG(10, ("Could not connect to srvsvc pipe: %s\n",
4016                            nt_errstr(status)));
4017                 TALLOC_FREE(frame);
4018                 return false;
4019         }
4020
4021         b = pipe_hnd->binding_handle;
4022
4023         ZERO_STRUCT(info_ctr);
4024         ZERO_STRUCT(ctr1);
4025
4026         info_ctr.level = 1;
4027         info_ctr.ctr.ctr1 = &ctr1;
4028
4029         status = dcerpc_srvsvc_NetShareEnumAll(b, frame,
4030                                               pipe_hnd->desthost,
4031                                               &info_ctr,
4032                                               0xffffffff,
4033                                               &total_entries,
4034                                               &resume_handle,
4035                                               &werr);
4036
4037         if (!NT_STATUS_IS_OK(status) || !W_ERROR_IS_OK(werr)) {
4038                 TALLOC_FREE(pipe_hnd);
4039                 TALLOC_FREE(frame);
4040                 return false;
4041         }
4042
4043         for (i=0; i < info_ctr.ctr.ctr1->count; i++) {
4044                 struct srvsvc_NetShareInfo1 info = info_ctr.ctr.ctr1->array[i];
4045                 browse_fn(info.name, info.type, info.comment, NULL);
4046         }
4047
4048         TALLOC_FREE(pipe_hnd);
4049         TALLOC_FREE(frame);
4050         return true;
4051 }
4052
4053 /****************************************************************************
4054  Try and browse available connections on a host.
4055 ****************************************************************************/
4056
4057 static bool browse_host(bool sort)
4058 {
4059         int ret;
4060         if (!grepable) {
4061                 d_printf("\n\tSharename       Type      Comment\n");
4062                 d_printf("\t---------       ----      -------\n");
4063         }
4064
4065         if (browse_host_rpc(sort)) {
4066                 return true;
4067         }
4068
4069         if((ret = cli_RNetShareEnum(cli, browse_fn, NULL)) == -1)
4070                 d_printf("Error returning browse list: %s\n", cli_errstr(cli));
4071
4072         return (ret != -1);
4073 }
4074
4075 /****************************************************************************
4076  List a server name.
4077 ****************************************************************************/
4078
4079 static void server_fn(const char *name, uint32 m,
4080                       const char *comment, void *state)
4081 {
4082
4083         if (!grepable){
4084                 d_printf("\t%-16s     %s\n", name, comment);
4085         } else {
4086                 d_printf("%s|%s|%s\n",(char *)state, name, comment);
4087         }
4088 }
4089
4090 /****************************************************************************
4091  Try and browse available connections on a host.
4092 ****************************************************************************/
4093
4094 static bool list_servers(const char *wk_grp)
4095 {
4096         fstring state;
4097
4098         if (!cli->server_domain)
4099                 return false;
4100
4101         if (!grepable) {
4102                 d_printf("\n\tServer               Comment\n");
4103                 d_printf("\t---------            -------\n");
4104         };
4105         fstrcpy( state, "Server" );
4106         cli_NetServerEnum(cli, cli->server_domain, SV_TYPE_ALL, server_fn,
4107                           state);
4108
4109         if (!grepable) {
4110                 d_printf("\n\tWorkgroup            Master\n");
4111                 d_printf("\t---------            -------\n");
4112         };
4113
4114         fstrcpy( state, "Workgroup" );
4115         cli_NetServerEnum(cli, cli->server_domain, SV_TYPE_DOMAIN_ENUM,
4116                           server_fn, state);
4117         return true;
4118 }
4119
4120 /****************************************************************************
4121  Print or set current VUID
4122 ****************************************************************************/
4123
4124 static int cmd_vuid(void)
4125 {
4126         TALLOC_CTX *ctx = talloc_tos();
4127         char *buf;
4128
4129         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
4130                 d_printf("Current VUID is %d\n", cli->vuid);
4131                 return 0;
4132         }
4133
4134         cli->vuid = atoi(buf);
4135         return 0;
4136 }
4137
4138 /****************************************************************************
4139  Setup a new VUID, by issuing a session setup
4140 ****************************************************************************/
4141
4142 static int cmd_logon(void)
4143 {
4144         TALLOC_CTX *ctx = talloc_tos();
4145         char *l_username, *l_password;
4146         NTSTATUS nt_status;
4147
4148         if (!next_token_talloc(ctx, &cmd_ptr,&l_username,NULL)) {
4149                 d_printf("logon <username> [<password>]\n");
4150                 return 0;
4151         }
4152
4153         if (!next_token_talloc(ctx, &cmd_ptr,&l_password,NULL)) {
4154                 char *pass = getpass("Password: ");
4155                 if (pass) {
4156                         l_password = talloc_strdup(ctx,pass);
4157                 }
4158         }
4159         if (!l_password) {
4160                 return 1;
4161         }
4162
4163         nt_status = cli_session_setup(cli, l_username,
4164                                       l_password, strlen(l_password),
4165                                       l_password, strlen(l_password),
4166                                       lp_workgroup());
4167         if (!NT_STATUS_IS_OK(nt_status)) {
4168                 d_printf("session setup failed: %s\n", nt_errstr(nt_status));
4169                 return -1;
4170         }
4171
4172         d_printf("Current VUID is %d\n", cli->vuid);
4173         return 0;
4174 }
4175
4176
4177 /****************************************************************************
4178  list active connections
4179 ****************************************************************************/
4180
4181 static int cmd_list_connect(void)
4182 {
4183         cli_cm_display(cli);
4184         return 0;
4185 }
4186
4187 /****************************************************************************
4188  display the current active client connection
4189 ****************************************************************************/
4190
4191 static int cmd_show_connect( void )
4192 {
4193         TALLOC_CTX *ctx = talloc_tos();
4194         struct cli_state *targetcli;
4195         char *targetpath;
4196
4197         if (!cli_resolve_path(ctx, "", auth_info, cli, client_get_cur_dir(),
4198                                 &targetcli, &targetpath ) ) {
4199                 d_printf("showconnect %s: %s\n", cur_dir, cli_errstr(cli));
4200                 return 1;
4201         }
4202
4203         d_printf("//%s/%s\n", targetcli->desthost, targetcli->share);
4204         return 0;
4205 }
4206
4207 /****************************************************************************
4208  iosize command
4209 ***************************************************************************/
4210
4211 int cmd_iosize(void)
4212 {
4213         TALLOC_CTX *ctx = talloc_tos();
4214         char *buf;
4215         int iosize;
4216
4217         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
4218                 if (!smb_encrypt) {
4219                         d_printf("iosize <n> or iosize 0x<n>. "
4220                                 "Minimum is 16384 (0x4000), "
4221                                 "max is 16776960 (0xFFFF00)\n");
4222                 } else {
4223                         d_printf("iosize <n> or iosize 0x<n>. "
4224                                 "(Encrypted connection) ,"
4225                                 "Minimum is 16384 (0x4000), "
4226                                 "max is 130048 (0x1FC00)\n");
4227                 }
4228                 return 1;
4229         }
4230
4231         iosize = strtol(buf,NULL,0);
4232         if (smb_encrypt && (iosize < 0x4000 || iosize > 0xFC00)) {
4233                 d_printf("iosize out of range for encrypted "
4234                         "connection (min = 16384 (0x4000), "
4235                         "max = 130048 (0x1FC00)");
4236                 return 1;
4237         } else if (!smb_encrypt && (iosize < 0x4000 || iosize > 0xFFFF00)) {
4238                 d_printf("iosize out of range (min = 16384 (0x4000), "
4239                         "max = 16776960 (0xFFFF00)");
4240                 return 1;
4241         }
4242
4243         io_bufsize = iosize;
4244         d_printf("iosize is now %d\n", io_bufsize);
4245         return 0;
4246 }
4247
4248 /****************************************************************************
4249 history
4250 ****************************************************************************/
4251 static int cmd_history(void)
4252 {
4253 #if defined(HAVE_LIBREADLINE) && defined(HAVE_HISTORY_LIST)
4254         HIST_ENTRY **hlist;
4255         int i;
4256
4257         hlist = history_list();
4258
4259         for (i = 0; hlist && hlist[i]; i++) {
4260                 DEBUG(0, ("%d: %s\n", i, hlist[i]->line));
4261         }
4262 #else
4263         DEBUG(0,("no history without readline support\n"));
4264 #endif
4265
4266         return 0;
4267 }
4268
4269 /* Some constants for completing filename arguments */
4270
4271 #define COMPL_NONE        0          /* No completions */
4272 #define COMPL_REMOTE      1          /* Complete remote filename */
4273 #define COMPL_LOCAL       2          /* Complete local filename */
4274
4275 /* This defines the commands supported by this client.
4276  * NOTE: The "!" must be the last one in the list because it's fn pointer
4277  *       field is NULL, and NULL in that field is used in process_tok()
4278  *       (below) to indicate the end of the list.  crh
4279  */
4280 static struct {
4281         const char *name;
4282         int (*fn)(void);
4283         const char *description;
4284         char compl_args[2];      /* Completion argument info */
4285 } commands[] = {
4286   {"?",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
4287   {"allinfo",cmd_allinfo,"<file> show all available info",
4288    {COMPL_NONE,COMPL_NONE}},
4289   {"altname",cmd_altname,"<file> show alt name",{COMPL_NONE,COMPL_NONE}},
4290   {"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}},
4291   {"blocksize",cmd_block,"blocksize <number> (default 20)",{COMPL_NONE,COMPL_NONE}},
4292   {"cancel",cmd_cancel,"<jobid> cancel a print queue entry",{COMPL_NONE,COMPL_NONE}},
4293   {"case_sensitive",cmd_setcase,"toggle the case sensitive flag to server",{COMPL_NONE,COMPL_NONE}},
4294   {"cd",cmd_cd,"[directory] change/report the remote directory",{COMPL_REMOTE,COMPL_NONE}},
4295   {"chmod",cmd_chmod,"<src> <mode> chmod a file using UNIX permission",{COMPL_REMOTE,COMPL_REMOTE}},
4296   {"chown",cmd_chown,"<src> <uid> <gid> chown a file using UNIX uids and gids",{COMPL_REMOTE,COMPL_REMOTE}},
4297   {"close",cmd_close,"<fid> close a file given a fid",{COMPL_REMOTE,COMPL_REMOTE}},
4298   {"del",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
4299   {"dir",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
4300   {"du",cmd_du,"<mask> computes the total size of the current directory",{COMPL_REMOTE,COMPL_NONE}},
4301   {"echo",cmd_echo,"ping the server",{COMPL_NONE,COMPL_NONE}},
4302   {"exit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
4303   {"get",cmd_get,"<remote name> [local name] get a file",{COMPL_REMOTE,COMPL_LOCAL}},
4304   {"getfacl",cmd_getfacl,"<file name> get the POSIX ACL on a file (UNIX extensions only)",{COMPL_REMOTE,COMPL_LOCAL}},
4305   {"geteas", cmd_geteas, "<file name> get the EA list of a file",
4306    {COMPL_REMOTE, COMPL_LOCAL}},
4307   {"hardlink",cmd_hardlink,"<src> <dest> create a Windows hard link",{COMPL_REMOTE,COMPL_REMOTE}},
4308   {"help",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
4309   {"history",cmd_history,"displays the command history",{COMPL_NONE,COMPL_NONE}},
4310   {"iosize",cmd_iosize,"iosize <number> (default 64512)",{COMPL_NONE,COMPL_NONE}},
4311   {"lcd",cmd_lcd,"[directory] change/report the local current working directory",{COMPL_LOCAL,COMPL_NONE}},
4312   {"link",cmd_link,"<oldname> <newname> create a UNIX hard link",{COMPL_REMOTE,COMPL_REMOTE}},
4313   {"lock",cmd_lock,"lock <fnum> [r|w] <hex-start> <hex-len> : set a POSIX lock",{COMPL_REMOTE,COMPL_REMOTE}},
4314   {"lowercase",cmd_lowercase,"toggle lowercasing of filenames for get",{COMPL_NONE,COMPL_NONE}},
4315   {"ls",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
4316   {"l",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
4317   {"mask",cmd_select,"<mask> mask all filenames against this",{COMPL_REMOTE,COMPL_NONE}},
4318   {"md",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
4319   {"mget",cmd_mget,"<mask> get all the matching files",{COMPL_REMOTE,COMPL_NONE}},
4320   {"mkdir",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
4321   {"more",cmd_more,"<remote name> view a remote file with your pager",{COMPL_REMOTE,COMPL_NONE}},
4322   {"mput",cmd_mput,"<mask> put all matching files",{COMPL_REMOTE,COMPL_NONE}},
4323   {"newer",cmd_newer,"<file> only mget files newer than the specified local file",{COMPL_LOCAL,COMPL_NONE}},
4324   {"open",cmd_open,"<mask> open a file",{COMPL_REMOTE,COMPL_NONE}},
4325   {"posix", cmd_posix, "turn on all POSIX capabilities", {COMPL_REMOTE,COMPL_NONE}},
4326   {"posix_encrypt",cmd_posix_encrypt,"<domain> <user> <password> start up transport encryption",{COMPL_REMOTE,COMPL_NONE}},
4327   {"posix_open",cmd_posix_open,"<name> 0<mode> open_flags mode open a file using POSIX interface",{COMPL_REMOTE,COMPL_NONE}},
4328   {"posix_mkdir",cmd_posix_mkdir,"<name> 0<mode> creates a directory using POSIX interface",{COMPL_REMOTE,COMPL_NONE}},
4329   {"posix_rmdir",cmd_posix_rmdir,"<name> removes a directory using POSIX interface",{COMPL_REMOTE,COMPL_NONE}},
4330   {"posix_unlink",cmd_posix_unlink,"<name> removes a file using POSIX interface",{COMPL_REMOTE,COMPL_NONE}},
4331   {"print",cmd_print,"<file name> print a file",{COMPL_NONE,COMPL_NONE}},
4332   {"prompt",cmd_prompt,"toggle prompting for filenames for mget and mput",{COMPL_NONE,COMPL_NONE}},
4333   {"put",cmd_put,"<local name> [remote name] put a file",{COMPL_LOCAL,COMPL_REMOTE}},
4334   {"pwd",cmd_pwd,"show current remote directory (same as 'cd' with no args)",{COMPL_NONE,COMPL_NONE}},
4335   {"q",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
4336   {"queue",cmd_queue,"show the print queue",{COMPL_NONE,COMPL_NONE}},
4337   {"quit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
4338   {"readlink",cmd_readlink,"filename Do a UNIX extensions readlink call on a symlink",{COMPL_REMOTE,COMPL_REMOTE}},
4339   {"rd",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
4340   {"recurse",cmd_recurse,"toggle directory recursion for mget and mput",{COMPL_NONE,COMPL_NONE}},
4341   {"reget",cmd_reget,"<remote name> [local name] get a file restarting at end of local file",{COMPL_REMOTE,COMPL_LOCAL}},
4342   {"rename",cmd_rename,"<src> <dest> rename some files",{COMPL_REMOTE,COMPL_REMOTE}},
4343   {"reput",cmd_reput,"<local name> [remote name] put a file restarting at end of remote file",{COMPL_LOCAL,COMPL_REMOTE}},
4344   {"rm",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
4345   {"rmdir",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
4346   {"showacls",cmd_showacls,"toggle if ACLs are shown or not",{COMPL_NONE,COMPL_NONE}},
4347   {"setea", cmd_setea, "<file name> <eaname> <eaval> Set an EA of a file",
4348    {COMPL_REMOTE, COMPL_LOCAL}},
4349   {"setmode",cmd_setmode,"filename <setmode string> change modes of file",{COMPL_REMOTE,COMPL_NONE}},
4350   {"stat",cmd_stat,"filename Do a UNIX extensions stat call on a file",{COMPL_REMOTE,COMPL_REMOTE}},
4351   {"symlink",cmd_symlink,"<oldname> <newname> create a UNIX symlink",{COMPL_REMOTE,COMPL_REMOTE}},
4352   {"tar",cmd_tar,"tar <c|x>[IXFqbgNan] current directory to/from <file name>",{COMPL_NONE,COMPL_NONE}},
4353   {"tarmode",cmd_tarmode,"<full|inc|reset|noreset> tar's behaviour towards archive bits",{COMPL_NONE,COMPL_NONE}},
4354   {"translate",cmd_translate,"toggle text translation for printing",{COMPL_NONE,COMPL_NONE}},
4355   {"unlock",cmd_unlock,"unlock <fnum> <hex-start> <hex-len> : remove a POSIX lock",{COMPL_REMOTE,COMPL_REMOTE}},
4356   {"volume",cmd_volume,"print the volume name",{COMPL_NONE,COMPL_NONE}},
4357   {"vuid",cmd_vuid,"change current vuid",{COMPL_NONE,COMPL_NONE}},
4358   {"wdel",cmd_wdel,"<attrib> <mask> wildcard delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
4359   {"logon",cmd_logon,"establish new logon",{COMPL_NONE,COMPL_NONE}},
4360   {"listconnect",cmd_list_connect,"list open connections",{COMPL_NONE,COMPL_NONE}},
4361   {"showconnect",cmd_show_connect,"display the current active connection",{COMPL_NONE,COMPL_NONE}},
4362   {"..",cmd_cd_oneup,"change the remote directory (up one level)",{COMPL_REMOTE,COMPL_NONE}},
4363
4364   /* Yes, this must be here, see crh's comment above. */
4365   {"!",NULL,"run a shell command on the local system",{COMPL_NONE,COMPL_NONE}},
4366   {NULL,NULL,NULL,{COMPL_NONE,COMPL_NONE}}
4367 };
4368
4369 /*******************************************************************
4370  Lookup a command string in the list of commands, including
4371  abbreviations.
4372 ******************************************************************/
4373
4374 static int process_tok(char *tok)
4375 {
4376         int i = 0, matches = 0;
4377         int cmd=0;
4378         int tok_len = strlen(tok);
4379
4380         while (commands[i].fn != NULL) {
4381                 if (strequal(commands[i].name,tok)) {
4382                         matches = 1;
4383                         cmd = i;
4384                         break;
4385                 } else if (strnequal(commands[i].name, tok, tok_len)) {
4386                         matches++;
4387                         cmd = i;
4388                 }
4389                 i++;
4390         }
4391
4392         if (matches == 0)
4393                 return(-1);
4394         else if (matches == 1)
4395                 return(cmd);
4396         else
4397                 return(-2);
4398 }
4399
4400 /****************************************************************************
4401  Help.
4402 ****************************************************************************/
4403
4404 static int cmd_help(void)
4405 {
4406         TALLOC_CTX *ctx = talloc_tos();
4407         int i=0,j;
4408         char *buf;
4409
4410         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
4411                 if ((i = process_tok(buf)) >= 0)
4412                         d_printf("HELP %s:\n\t%s\n\n",
4413                                 commands[i].name,commands[i].description);
4414         } else {
4415                 while (commands[i].description) {
4416                         for (j=0; commands[i].description && (j<5); j++) {
4417                                 d_printf("%-15s",commands[i].name);
4418                                 i++;
4419                         }
4420                         d_printf("\n");
4421                 }
4422         }
4423         return 0;
4424 }
4425
4426 /****************************************************************************
4427  Process a -c command string.
4428 ****************************************************************************/
4429
4430 static int process_command_string(const char *cmd_in)
4431 {
4432         TALLOC_CTX *ctx = talloc_tos();
4433         char *cmd = talloc_strdup(ctx, cmd_in);
4434         int rc = 0;
4435
4436         if (!cmd) {
4437                 return 1;
4438         }
4439         /* establish the connection if not already */
4440
4441         if (!cli) {
4442                 cli = cli_cm_open(talloc_tos(), NULL,
4443                                 have_ip ? dest_ss_str : desthost,
4444                                 service, auth_info,
4445                                 true, smb_encrypt,
4446                                 max_protocol, port, name_type);
4447                 if (!cli) {
4448                         return 1;
4449                 }
4450         }
4451
4452         while (cmd[0] != '\0')    {
4453                 char *line;
4454                 char *p;
4455                 char *tok;
4456                 int i;
4457
4458                 if ((p = strchr_m(cmd, ';')) == 0) {
4459                         line = cmd;
4460                         cmd += strlen(cmd);
4461                 } else {
4462                         *p = '\0';
4463                         line = cmd;
4464                         cmd = p + 1;
4465                 }
4466
4467                 /* and get the first part of the command */
4468                 cmd_ptr = line;
4469                 if (!next_token_talloc(ctx, &cmd_ptr,&tok,NULL)) {
4470                         continue;
4471                 }
4472
4473                 if ((i = process_tok(tok)) >= 0) {
4474                         rc = commands[i].fn();
4475                 } else if (i == -2) {
4476                         d_printf("%s: command abbreviation ambiguous\n",tok);
4477                 } else {
4478                         d_printf("%s: command not found\n",tok);
4479                 }
4480         }
4481
4482         return rc;
4483 }
4484
4485 #define MAX_COMPLETIONS 100
4486
4487 struct completion_remote {
4488         char *dirmask;
4489         char **matches;
4490         int count, samelen;
4491         const char *text;
4492         int len;
4493 };
4494
4495 static NTSTATUS completion_remote_filter(const char *mnt,
4496                                 struct file_info *f,
4497                                 const char *mask,
4498                                 void *state)
4499 {
4500         struct completion_remote *info = (struct completion_remote *)state;
4501
4502         if (info->count >= MAX_COMPLETIONS - 1) {
4503                 return NT_STATUS_OK;
4504         }
4505         if (strncmp(info->text, f->name, info->len) != 0) {
4506                 return NT_STATUS_OK;
4507         }
4508         if (ISDOT(f->name) || ISDOTDOT(f->name)) {
4509                 return NT_STATUS_OK;
4510         }
4511
4512         if ((info->dirmask[0] == 0) && !(f->mode & aDIR))
4513                 info->matches[info->count] = SMB_STRDUP(f->name);
4514         else {
4515                 TALLOC_CTX *ctx = talloc_stackframe();
4516                 char *tmp;
4517
4518                 tmp = talloc_strdup(ctx,info->dirmask);
4519                 if (!tmp) {
4520                         TALLOC_FREE(ctx);
4521                         return NT_STATUS_NO_MEMORY;
4522                 }
4523                 tmp = talloc_asprintf_append(tmp, "%s", f->name);
4524                 if (!tmp) {
4525                         TALLOC_FREE(ctx);
4526                         return NT_STATUS_NO_MEMORY;
4527                 }
4528                 if (f->mode & aDIR) {
4529                         tmp = talloc_asprintf_append(tmp, "%s",
4530                                                      CLI_DIRSEP_STR);
4531                 }
4532                 if (!tmp) {
4533                         TALLOC_FREE(ctx);
4534                         return NT_STATUS_NO_MEMORY;
4535                 }
4536                 info->matches[info->count] = SMB_STRDUP(tmp);
4537                 TALLOC_FREE(ctx);
4538         }
4539         if (info->matches[info->count] == NULL) {
4540                 return NT_STATUS_OK;
4541         }
4542         if (f->mode & aDIR) {
4543                 smb_readline_ca_char(0);
4544         }
4545         if (info->count == 1) {
4546                 info->samelen = strlen(info->matches[info->count]);
4547         } else {
4548                 while (strncmp(info->matches[info->count],
4549                                info->matches[info->count-1],
4550                                info->samelen) != 0) {
4551                         info->samelen--;
4552                 }
4553         }
4554         info->count++;
4555         return NT_STATUS_OK;
4556 }
4557
4558 static char **remote_completion(const char *text, int len)
4559 {
4560         TALLOC_CTX *ctx = talloc_stackframe();
4561         char *dirmask = NULL;
4562         char *targetpath = NULL;
4563         struct cli_state *targetcli = NULL;
4564         int i;
4565         struct completion_remote info = { NULL, NULL, 1, 0, NULL, 0 };
4566         NTSTATUS status;
4567
4568         /* can't have non-static initialisation on Sun CC, so do it
4569            at run time here */
4570         info.samelen = len;
4571         info.text = text;
4572         info.len = len;
4573
4574         info.matches = SMB_MALLOC_ARRAY(char *,MAX_COMPLETIONS);
4575         if (!info.matches) {
4576                 TALLOC_FREE(ctx);
4577                 return NULL;
4578         }
4579
4580         /*
4581          * We're leaving matches[0] free to fill it later with the text to
4582          * display: Either the one single match or the longest common subset
4583          * of the matches.
4584          */
4585         info.matches[0] = NULL;
4586         info.count = 1;
4587
4588         for (i = len-1; i >= 0; i--) {
4589                 if ((text[i] == '/') || (text[i] == CLI_DIRSEP_CHAR)) {
4590                         break;
4591                 }
4592         }
4593
4594         info.text = text+i+1;
4595         info.samelen = info.len = len-i-1;
4596
4597         if (i > 0) {
4598                 info.dirmask = SMB_MALLOC_ARRAY(char, i+2);
4599                 if (!info.dirmask) {
4600                         goto cleanup;
4601                 }
4602                 strncpy(info.dirmask, text, i+1);
4603                 info.dirmask[i+1] = 0;
4604                 dirmask = talloc_asprintf(ctx,
4605                                         "%s%*s*",
4606                                         client_get_cur_dir(),
4607                                         i-1,
4608                                         text);
4609         } else {
4610                 info.dirmask = SMB_STRDUP("");
4611                 if (!info.dirmask) {
4612                         goto cleanup;
4613                 }
4614                 dirmask = talloc_asprintf(ctx,
4615                                         "%s*",
4616                                         client_get_cur_dir());
4617         }
4618         if (!dirmask) {
4619                 goto cleanup;
4620         }
4621
4622         if (!cli_resolve_path(ctx, "", auth_info, cli, dirmask, &targetcli, &targetpath)) {
4623                 goto cleanup;
4624         }
4625         status = cli_list(targetcli, targetpath, aDIR | aSYSTEM | aHIDDEN,
4626                           completion_remote_filter, (void *)&info);
4627         if (!NT_STATUS_IS_OK(status)) {
4628                 goto cleanup;
4629         }
4630
4631         if (info.count == 1) {
4632                 /*
4633                  * No matches at all, NULL indicates there is nothing
4634                  */
4635                 SAFE_FREE(info.matches[0]);
4636                 SAFE_FREE(info.matches);
4637                 TALLOC_FREE(ctx);
4638                 return NULL;
4639         }
4640
4641         if (info.count == 2) {
4642                 /*
4643                  * Exactly one match in matches[1], indicate this is the one
4644                  * in matches[0].
4645                  */
4646                 info.matches[0] = info.matches[1];
4647                 info.matches[1] = NULL;
4648                 info.count -= 1;
4649                 TALLOC_FREE(ctx);
4650                 return info.matches;
4651         }
4652
4653         /*
4654          * We got more than one possible match, set the result to the maximum
4655          * common subset
4656          */
4657
4658         info.matches[0] = SMB_STRNDUP(info.matches[1], info.samelen);
4659         info.matches[info.count] = NULL;
4660         return info.matches;
4661
4662 cleanup:
4663         for (i = 0; i < info.count; i++) {
4664                 SAFE_FREE(info.matches[i]);
4665         }
4666         SAFE_FREE(info.matches);
4667         SAFE_FREE(info.dirmask);
4668         TALLOC_FREE(ctx);
4669         return NULL;
4670 }
4671
4672 static char **completion_fn(const char *text, int start, int end)
4673 {
4674         smb_readline_ca_char(' ');
4675
4676         if (start) {
4677                 const char *buf, *sp;
4678                 int i;
4679                 char compl_type;
4680
4681                 buf = smb_readline_get_line_buffer();
4682                 if (buf == NULL)
4683                         return NULL;
4684
4685                 sp = strchr(buf, ' ');
4686                 if (sp == NULL)
4687                         return NULL;
4688
4689                 for (i = 0; commands[i].name; i++) {
4690                         if ((strncmp(commands[i].name, buf, sp - buf) == 0) &&
4691                             (commands[i].name[sp - buf] == 0)) {
4692                                 break;
4693                         }
4694                 }
4695                 if (commands[i].name == NULL)
4696                         return NULL;
4697
4698                 while (*sp == ' ')
4699                         sp++;
4700
4701                 if (sp == (buf + start))
4702                         compl_type = commands[i].compl_args[0];
4703                 else
4704                         compl_type = commands[i].compl_args[1];
4705
4706                 if (compl_type == COMPL_REMOTE)
4707                         return remote_completion(text, end - start);
4708                 else /* fall back to local filename completion */
4709                         return NULL;
4710         } else {
4711                 char **matches;
4712                 int i, len, samelen = 0, count=1;
4713
4714                 matches = SMB_MALLOC_ARRAY(char *, MAX_COMPLETIONS);
4715                 if (!matches) {
4716                         return NULL;
4717                 }
4718                 matches[0] = NULL;
4719
4720                 len = strlen(text);
4721                 for (i=0;commands[i].fn && count < MAX_COMPLETIONS-1;i++) {
4722                         if (strncmp(text, commands[i].name, len) == 0) {
4723                                 matches[count] = SMB_STRDUP(commands[i].name);
4724                                 if (!matches[count])
4725                                         goto cleanup;
4726                                 if (count == 1)
4727                                         samelen = strlen(matches[count]);
4728                                 else
4729                                         while (strncmp(matches[count], matches[count-1], samelen) != 0)
4730                                                 samelen--;
4731                                 count++;
4732                         }
4733                 }
4734
4735                 switch (count) {
4736                 case 0: /* should never happen */
4737                 case 1:
4738                         goto cleanup;
4739                 case 2:
4740                         matches[0] = SMB_STRDUP(matches[1]);
4741                         break;
4742                 default:
4743                         matches[0] = (char *)SMB_MALLOC(samelen+1);
4744                         if (!matches[0])
4745                                 goto cleanup;
4746                         strncpy(matches[0], matches[1], samelen);
4747                         matches[0][samelen] = 0;
4748                 }
4749                 matches[count] = NULL;
4750                 return matches;
4751
4752 cleanup:
4753                 for (i = 0; i < count; i++)
4754                         free(matches[i]);
4755
4756                 free(matches);
4757                 return NULL;
4758         }
4759 }
4760
4761 static bool finished;
4762
4763 /****************************************************************************
4764  Make sure we swallow keepalives during idle time.
4765 ****************************************************************************/
4766
4767 static void readline_callback(void)
4768 {
4769         static time_t last_t;
4770         struct timespec now;
4771         time_t t;
4772         int ret, revents;
4773
4774         clock_gettime_mono(&now);
4775         t = now.tv_sec;
4776
4777         if (t - last_t < 5)
4778                 return;
4779
4780         last_t = t;
4781
4782  again:
4783
4784         if (cli->fd == -1)
4785                 return;
4786
4787         /* We deliberately use receive_smb_raw instead of
4788            client_receive_smb as we want to receive
4789            session keepalives and then drop them here.
4790         */
4791
4792         ret = poll_intr_one_fd(cli->fd, POLLIN|POLLHUP, 0, &revents);
4793
4794         if ((ret > 0) && (revents & (POLLIN|POLLHUP|POLLERR))) {
4795                 NTSTATUS status;
4796                 size_t len;
4797
4798                 set_smb_read_error(&cli->smb_rw_error, SMB_READ_OK);
4799
4800                 status = receive_smb_raw(cli->fd, cli->inbuf, cli->bufsize, 0, 0, &len);
4801
4802                 if (!NT_STATUS_IS_OK(status)) {
4803                         DEBUG(0, ("Read from server failed, maybe it closed "
4804                                   "the connection\n"));
4805
4806                         finished = true;
4807                         smb_readline_done();
4808                         if (NT_STATUS_EQUAL(status, NT_STATUS_END_OF_FILE)) {
4809                                 set_smb_read_error(&cli->smb_rw_error,
4810                                                    SMB_READ_EOF);
4811                                 return;
4812                         }
4813
4814                         if (NT_STATUS_EQUAL(status, NT_STATUS_IO_TIMEOUT)) {
4815                                 set_smb_read_error(&cli->smb_rw_error,
4816                                                    SMB_READ_TIMEOUT);
4817                                 return;
4818                         }
4819
4820                         set_smb_read_error(&cli->smb_rw_error, SMB_READ_ERROR);
4821                         return;
4822                 }
4823                 if(CVAL(cli->inbuf,0) != SMBkeepalive) {
4824                         DEBUG(0, ("Read from server "
4825                                 "returned unexpected packet!\n"));
4826                         return;
4827                 }
4828
4829                 goto again;
4830         }
4831
4832         /* Ping the server to keep the connection alive using SMBecho. */
4833         {
4834                 NTSTATUS status;
4835                 unsigned char garbage[16];
4836                 memset(garbage, 0xf0, sizeof(garbage));
4837                 status = cli_echo(cli, 1, data_blob_const(garbage, sizeof(garbage)));
4838
4839                 if (!NT_STATUS_IS_OK(status)) {
4840                         DEBUG(0, ("SMBecho failed. Maybe server has closed "
4841                                 "the connection\n"));
4842                         finished = true;
4843                         smb_readline_done();
4844                 }
4845         }
4846 }
4847
4848 /****************************************************************************
4849  Process commands on stdin.
4850 ****************************************************************************/
4851
4852 static int process_stdin(void)
4853 {
4854         int rc = 0;
4855
4856         while (!finished) {
4857                 TALLOC_CTX *frame = talloc_stackframe();
4858                 char *tok = NULL;
4859                 char *the_prompt = NULL;
4860                 char *line = NULL;
4861                 int i;
4862
4863                 /* display a prompt */
4864                 if (asprintf(&the_prompt, "smb: %s> ", client_get_cur_dir()) < 0) {
4865                         TALLOC_FREE(frame);
4866                         break;
4867                 }
4868                 line = smb_readline(the_prompt, readline_callback, completion_fn);
4869                 SAFE_FREE(the_prompt);
4870                 if (!line) {
4871                         TALLOC_FREE(frame);
4872                         break;
4873                 }
4874
4875                 /* special case - first char is ! */
4876                 if (*line == '!') {
4877                         if (system(line + 1) == -1) {
4878                                 d_printf("system() command %s failed.\n",
4879                                         line+1);
4880                         }
4881                         SAFE_FREE(line);
4882                         TALLOC_FREE(frame);
4883                         continue;
4884                 }
4885
4886                 /* and get the first part of the command */
4887                 cmd_ptr = line;
4888                 if (!next_token_talloc(frame, &cmd_ptr,&tok,NULL)) {
4889                         TALLOC_FREE(frame);
4890                         SAFE_FREE(line);
4891                         continue;
4892                 }
4893
4894                 if ((i = process_tok(tok)) >= 0) {
4895                         rc = commands[i].fn();
4896                 } else if (i == -2) {
4897                         d_printf("%s: command abbreviation ambiguous\n",tok);
4898                 } else {
4899                         d_printf("%s: command not found\n",tok);
4900                 }
4901                 SAFE_FREE(line);
4902                 TALLOC_FREE(frame);
4903         }
4904         return rc;
4905 }
4906
4907 /****************************************************************************
4908  Process commands from the client.
4909 ****************************************************************************/
4910
4911 static int process(const char *base_directory)
4912 {
4913         int rc = 0;
4914
4915         cli = cli_cm_open(talloc_tos(), NULL,
4916                         have_ip ? dest_ss_str : desthost,
4917                         service, auth_info, true, smb_encrypt,
4918                         max_protocol, port, name_type);
4919         if (!cli) {
4920                 return 1;
4921         }
4922
4923         if (base_directory && *base_directory) {
4924                 rc = do_cd(base_directory);
4925                 if (rc) {
4926                         cli_shutdown(cli);
4927                         return rc;
4928                 }
4929         }
4930
4931         if (cmdstr) {
4932                 rc = process_command_string(cmdstr);
4933         } else {
4934                 process_stdin();
4935         }
4936
4937         cli_shutdown(cli);
4938         return rc;
4939 }
4940
4941 /****************************************************************************
4942  Handle a -L query.
4943 ****************************************************************************/
4944
4945 static int do_host_query(const char *query_host)
4946 {
4947         cli = cli_cm_open(talloc_tos(), NULL,
4948                         have_ip ? dest_ss_str : query_host, "IPC$", auth_info, true, smb_encrypt,
4949                         max_protocol, port, name_type);
4950         if (!cli)
4951                 return 1;
4952
4953         browse_host(true);
4954
4955         /* Ensure that the host can do IPv4 */
4956
4957         if (!interpret_addr(query_host)) {
4958                 struct sockaddr_storage ss;
4959                 if (interpret_string_addr(&ss, query_host, 0) &&
4960                                 (ss.ss_family != AF_INET)) {
4961                         d_printf("%s is an IPv6 address -- no workgroup available\n",
4962                                 query_host);
4963                         return 1;
4964                 }
4965         }
4966
4967         if (port != 139) {
4968
4969                 /* Workgroups simply don't make sense over anything
4970                    else but port 139... */
4971
4972                 cli_shutdown(cli);
4973                 cli = cli_cm_open(talloc_tos(), NULL,
4974                                 have_ip ? dest_ss_str : query_host, "IPC$",
4975                                 auth_info, true, smb_encrypt,
4976                                 max_protocol, 139, name_type);
4977         }
4978
4979         if (cli == NULL) {
4980                 d_printf("NetBIOS over TCP disabled -- no workgroup available\n");
4981                 return 1;
4982         }
4983
4984         list_servers(lp_workgroup());
4985
4986         cli_shutdown(cli);
4987
4988         return(0);
4989 }
4990
4991 /****************************************************************************
4992  Handle a tar operation.
4993 ****************************************************************************/
4994
4995 static int do_tar_op(const char *base_directory)
4996 {
4997         int ret;
4998
4999         /* do we already have a connection? */
5000         if (!cli) {
5001                 cli = cli_cm_open(talloc_tos(), NULL,
5002                         have_ip ? dest_ss_str : desthost,
5003                         service, auth_info, true, smb_encrypt,
5004                         max_protocol, port, name_type);
5005                 if (!cli)
5006                         return 1;
5007         }
5008
5009         recurse=true;
5010
5011         if (base_directory && *base_directory)  {
5012                 ret = do_cd(base_directory);
5013                 if (ret) {
5014                         cli_shutdown(cli);
5015                         return ret;
5016                 }
5017         }
5018
5019         ret=process_tar();
5020
5021         cli_shutdown(cli);
5022
5023         return(ret);
5024 }
5025
5026 /****************************************************************************
5027  Handle a message operation.
5028 ****************************************************************************/
5029
5030 static int do_message_op(struct user_auth_info *a_info)
5031 {
5032         struct sockaddr_storage ss;
5033         struct nmb_name called, calling;
5034         fstring server_name;
5035         char name_type_hex[10];
5036         int msg_port;
5037         NTSTATUS status;
5038
5039         make_nmb_name(&calling, calling_name, 0x0);
5040         make_nmb_name(&called , desthost, name_type);
5041
5042         fstrcpy(server_name, desthost);
5043         snprintf(name_type_hex, sizeof(name_type_hex), "#%X", name_type);
5044         fstrcat(server_name, name_type_hex);
5045
5046         zero_sockaddr(&ss);
5047         if (have_ip)
5048                 ss = dest_ss;
5049
5050         /* we can only do messages over port 139 (to windows clients at least) */
5051
5052         msg_port = port ? port : 139;
5053
5054         if (!(cli=cli_initialise())) {
5055                 d_printf("Connection to %s failed\n", desthost);
5056                 return 1;
5057         }
5058         cli_set_port(cli, msg_port);
5059
5060         status = cli_connect(cli, server_name, &ss);
5061         if (!NT_STATUS_IS_OK(status)) {
5062                 d_printf("Connection to %s failed. Error %s\n", desthost, nt_errstr(status));
5063                 return 1;
5064         }
5065
5066         if (!cli_session_request(cli, &calling, &called)) {
5067                 d_printf("session request failed\n");
5068                 cli_shutdown(cli);
5069                 return 1;
5070         }
5071
5072         send_message(get_cmdline_auth_info_username(a_info));
5073         cli_shutdown(cli);
5074
5075         return 0;
5076 }
5077
5078 /****************************************************************************
5079   main program
5080 ****************************************************************************/
5081
5082  int main(int argc,char *argv[])
5083 {
5084         char *base_directory = NULL;
5085         int opt;
5086         char *query_host = NULL;
5087         bool message = false;
5088         static const char *new_name_resolve_order = NULL;
5089         poptContext pc;
5090         char *p;
5091         int rc = 0;
5092         fstring new_workgroup;
5093         bool tar_opt = false;
5094         bool service_opt = false;
5095         struct poptOption long_options[] = {
5096                 POPT_AUTOHELP
5097
5098                 { "name-resolve", 'R', POPT_ARG_STRING, &new_name_resolve_order, 'R', "Use these name resolution services only", "NAME-RESOLVE-ORDER" },
5099                 { "message", 'M', POPT_ARG_STRING, NULL, 'M', "Send message", "HOST" },
5100                 { "ip-address", 'I', POPT_ARG_STRING, NULL, 'I', "Use this IP to connect to", "IP" },
5101                 { "stderr", 'E', POPT_ARG_NONE, NULL, 'E', "Write messages to stderr instead of stdout" },
5102                 { "list", 'L', POPT_ARG_STRING, NULL, 'L', "Get a list of shares available on a host", "HOST" },
5103                 { "max-protocol", 'm', POPT_ARG_STRING, NULL, 'm', "Set the max protocol level", "LEVEL" },
5104                 { "tar", 'T', POPT_ARG_STRING, NULL, 'T', "Command line tar", "<c|x>IXFqgbNan" },
5105                 { "directory", 'D', POPT_ARG_STRING, NULL, 'D', "Start from directory", "DIR" },
5106                 { "command", 'c', POPT_ARG_STRING, &cmdstr, 'c', "Execute semicolon separated commands" },
5107                 { "send-buffer", 'b', POPT_ARG_INT, &io_bufsize, 'b', "Changes the transmit/send buffer", "BYTES" },
5108                 { "port", 'p', POPT_ARG_INT, &port, 'p', "Port to connect to", "PORT" },
5109                 { "grepable", 'g', POPT_ARG_NONE, NULL, 'g', "Produce grepable output" },
5110                 { "browse", 'B', POPT_ARG_NONE, NULL, 'B', "Browse SMB servers using DNS" },
5111                 POPT_COMMON_SAMBA
5112                 POPT_COMMON_CONNECTION
5113                 POPT_COMMON_CREDENTIALS
5114                 POPT_TABLEEND
5115         };
5116         TALLOC_CTX *frame = talloc_stackframe();
5117
5118         if (!client_set_cur_dir("\\")) {
5119                 exit(ENOMEM);
5120         }
5121
5122         /* initialize the workgroup name so we can determine whether or
5123            not it was set by a command line option */
5124
5125         set_global_myworkgroup( "" );
5126         set_global_myname( "" );
5127
5128         /* set default debug level to 1 regardless of what smb.conf sets */
5129         setup_logging( "smbclient", DEBUG_DEFAULT_STDERR );
5130         load_case_tables();
5131
5132         lp_set_cmdline("log level", "1");
5133
5134         auth_info = user_auth_info_init(frame);
5135         if (auth_info == NULL) {
5136                 exit(1);
5137         }
5138         popt_common_set_auth_info(auth_info);
5139
5140         /* skip argv(0) */
5141         pc = poptGetContext("smbclient", argc, (const char **) argv, long_options, 0);
5142         poptSetOtherOptionHelp(pc, "service <password>");
5143
5144         lp_set_in_client(true); /* Make sure that we tell lp_load we are */
5145
5146         while ((opt = poptGetNextOpt(pc)) != -1) {
5147
5148                 /* if the tar option has been called previouslt, now we need to eat out the leftovers */
5149                 /* I see no other way to keep things sane --SSS */
5150                 if (tar_opt == true) {
5151                         while (poptPeekArg(pc)) {
5152                                 poptGetArg(pc);
5153                         }
5154                         tar_opt = false;
5155                 }
5156
5157                 /* if the service has not yet been specified lets see if it is available in the popt stack */
5158                 if (!service_opt && poptPeekArg(pc)) {
5159                         service = talloc_strdup(frame, poptGetArg(pc));
5160                         if (!service) {
5161                                 exit(ENOMEM);
5162                         }
5163                         service_opt = true;
5164                 }
5165
5166                 /* if the service has already been retrieved then check if we have also a password */
5167                 if (service_opt
5168                     && (!get_cmdline_auth_info_got_pass(auth_info))
5169                     && poptPeekArg(pc)) {
5170                         set_cmdline_auth_info_password(auth_info,
5171                                                        poptGetArg(pc));
5172                 }
5173
5174                 switch (opt) {
5175                 case 'M':
5176                         /* Messages are sent to NetBIOS name type 0x3
5177                          * (Messenger Service).  Make sure we default
5178                          * to port 139 instead of port 445. srl,crh
5179                          */
5180                         name_type = 0x03;
5181                         desthost = talloc_strdup(frame,poptGetOptArg(pc));
5182                         if (!desthost) {
5183                                 exit(ENOMEM);
5184                         }
5185                         if( !port )
5186                                 port = 139;
5187                         message = true;
5188                         break;
5189                 case 'I':
5190                         {
5191                                 if (!interpret_string_addr(&dest_ss, poptGetOptArg(pc), 0)) {
5192                                         exit(1);
5193                                 }
5194                                 have_ip = true;
5195                                 print_sockaddr(dest_ss_str, sizeof(dest_ss_str), &dest_ss);
5196                         }
5197                         break;
5198                 case 'E':
5199                         setup_logging("smbclient", DEBUG_STDERR );
5200                         display_set_stderr();
5201                         break;
5202
5203                 case 'L':
5204                         query_host = talloc_strdup(frame, poptGetOptArg(pc));
5205                         if (!query_host) {
5206                                 exit(ENOMEM);
5207                         }
5208                         break;
5209                 case 'm':
5210                         max_protocol = interpret_protocol(poptGetOptArg(pc), max_protocol);
5211                         break;
5212                 case 'T':
5213                         /* We must use old option processing for this. Find the
5214                          * position of the -T option in the raw argv[]. */
5215                         {
5216                                 int i;
5217                                 for (i = 1; i < argc; i++) {
5218                                         if (strncmp("-T", argv[i],2)==0)
5219                                                 break;
5220                                 }
5221                                 i++;
5222                                 if (!tar_parseargs(argc, argv, poptGetOptArg(pc), i)) {
5223                                         poptPrintUsage(pc, stderr, 0);
5224                                         exit(1);
5225                                 }
5226                         }
5227                         /* this must be the last option, mark we have parsed it so that we know we have */
5228                         tar_opt = true;
5229                         break;
5230                 case 'D':
5231                         base_directory = talloc_strdup(frame, poptGetOptArg(pc));
5232                         if (!base_directory) {
5233                                 exit(ENOMEM);
5234                         }
5235                         break;
5236                 case 'g':
5237                         grepable=true;
5238                         break;
5239                 case 'e':
5240                         smb_encrypt=true;
5241                         break;
5242                 case 'B':
5243                         return(do_smb_browse());
5244
5245                 }
5246         }
5247
5248         /* We may still have some leftovers after the last popt option has been called */
5249         if (tar_opt == true) {
5250                 while (poptPeekArg(pc)) {
5251                         poptGetArg(pc);
5252                 }
5253                 tar_opt = false;
5254         }
5255
5256         /* if the service has not yet been specified lets see if it is available in the popt stack */
5257         if (!service_opt && poptPeekArg(pc)) {
5258                 service = talloc_strdup(frame,poptGetArg(pc));
5259                 if (!service) {
5260                         exit(ENOMEM);
5261                 }
5262                 service_opt = true;
5263         }
5264
5265         /* if the service has already been retrieved then check if we have also a password */
5266         if (service_opt
5267             && !get_cmdline_auth_info_got_pass(auth_info)
5268             && poptPeekArg(pc)) {
5269                 set_cmdline_auth_info_password(auth_info,
5270                                                poptGetArg(pc));
5271         }
5272
5273         /* save the workgroup...
5274
5275            FIXME!! do we need to do this for other options as well
5276            (or maybe a generic way to keep lp_load() from overwriting
5277            everything)?  */
5278
5279         fstrcpy( new_workgroup, lp_workgroup() );
5280         calling_name = talloc_strdup(frame, global_myname() );
5281         if (!calling_name) {
5282                 exit(ENOMEM);
5283         }
5284
5285         if ( override_logfile )
5286                 setup_logging( lp_logfile(), DEBUG_FILE );
5287
5288         if (!lp_load(get_dyn_CONFIGFILE(),true,false,false,true)) {
5289                 fprintf(stderr, "%s: Can't load %s - run testparm to debug it\n",
5290                         argv[0], get_dyn_CONFIGFILE());
5291         }
5292
5293         if (get_cmdline_auth_info_use_machine_account(auth_info) &&
5294             !set_cmdline_auth_info_machine_account_creds(auth_info)) {
5295                 exit(-1);
5296         }
5297
5298         load_interfaces();
5299
5300         if (service_opt && service) {
5301                 size_t len;
5302
5303                 /* Convert any '/' characters in the service name to '\' characters */
5304                 string_replace(service, '/','\\');
5305                 if (count_chars(service,'\\') < 3) {
5306                         d_printf("\n%s: Not enough '\\' characters in service\n",service);
5307                         poptPrintUsage(pc, stderr, 0);
5308                         exit(1);
5309                 }
5310                 /* Remove trailing slashes */
5311                 len = strlen(service);
5312                 while(len > 0 && service[len - 1] == '\\') {
5313                         --len;
5314                         service[len] = '\0';
5315                 }
5316         }
5317
5318         if ( strlen(new_workgroup) != 0 ) {
5319                 set_global_myworkgroup( new_workgroup );
5320         }
5321
5322         if ( strlen(calling_name) != 0 ) {
5323                 set_global_myname( calling_name );
5324         } else {
5325                 TALLOC_FREE(calling_name);
5326                 calling_name = talloc_strdup(frame, global_myname() );
5327         }
5328
5329         smb_encrypt = get_cmdline_auth_info_smb_encrypt(auth_info);
5330         if (!init_names()) {
5331                 fprintf(stderr, "init_names() failed\n");
5332                 exit(1);
5333         }
5334
5335         if(new_name_resolve_order)
5336                 lp_set_name_resolve_order(new_name_resolve_order);
5337
5338         if (!tar_type && !query_host && !service && !message) {
5339                 poptPrintUsage(pc, stderr, 0);
5340                 exit(1);
5341         }
5342
5343         poptFreeContext(pc);
5344
5345         DEBUG(3,("Client started (version %s).\n", samba_version_string()));
5346
5347         /* Ensure we have a password (or equivalent). */
5348         set_cmdline_auth_info_getpass(auth_info);
5349
5350         if (tar_type) {
5351                 if (cmdstr)
5352                         process_command_string(cmdstr);
5353                 return do_tar_op(base_directory);
5354         }
5355
5356         if (query_host && *query_host) {
5357                 char *qhost = query_host;
5358                 char *slash;
5359
5360                 while (*qhost == '\\' || *qhost == '/')
5361                         qhost++;
5362
5363                 if ((slash = strchr_m(qhost, '/'))
5364                     || (slash = strchr_m(qhost, '\\'))) {
5365                         *slash = 0;
5366                 }
5367
5368                 if ((p=strchr_m(qhost, '#'))) {
5369                         *p = 0;
5370                         p++;
5371                         sscanf(p, "%x", &name_type);
5372                 }
5373
5374                 return do_host_query(qhost);
5375         }
5376
5377         if (message) {
5378                 return do_message_op(auth_info);
5379         }
5380
5381         if (process(base_directory)) {
5382                 return 1;
5383         }
5384
5385         TALLOC_FREE(frame);
5386         return rc;
5387 }