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