Introduce dump_data_file
[ira/wip.git] / 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 "system/filesys.h"
26 #include "popt_common.h"
27 #include "rpc_client/cli_pipe.h"
28 #include "client/client_proto.h"
29 #include "../librpc/gen_ndr/ndr_srvsvc_c.h"
30 #include "../lib/util/select.h"
31 #include "system/readline.h"
32 #include "../libcli/smbreadline/smbreadline.h"
33 #include "../libcli/security/security.h"
34 #include "system/select.h"
35 #include "libsmb/libsmb.h"
36 #include "libsmb/clirap.h"
37 #include "trans2.h"
38 #include "libsmb/nmblib.h"
39 #include "include/ntioctl.h"
40
41 #ifndef REGISTER
42 #define REGISTER 0
43 #endif
44
45 extern int do_smb_browse(void); /* mDNS browsing */
46
47 extern bool override_logfile;
48 extern char tar_type;
49
50 static int port = 0;
51 static char *service;
52 static char *desthost;
53 static bool grepable = false;
54 static char *cmdstr = NULL;
55 const char *cmd_ptr = NULL;
56
57 static int io_bufsize = 524288;
58
59 static int name_type = 0x20;
60 static int max_protocol = PROTOCOL_NT1;
61
62 static int process_tok(char *tok);
63 static int cmd_help(void);
64
65 #define CREATE_ACCESS_READ READ_CONTROL_ACCESS
66
67 /* 30 second timeout on most commands */
68 #define CLIENT_TIMEOUT (30*1000)
69 #define SHORT_TIMEOUT (5*1000)
70
71 /* value for unused fid field in trans2 secondary request */
72 #define FID_UNUSED (0xFFFF)
73
74 time_t newer_than = 0;
75 static int archive_level = 0;
76
77 static bool translation = false;
78 static bool have_ip;
79
80 /* clitar bits insert */
81 extern int blocksize;
82 extern bool tar_inc;
83 extern bool tar_reset;
84 /* clitar bits end */
85
86 static bool prompt = true;
87
88 static bool recurse = false;
89 static bool showacls = false;
90 bool lowercase = false;
91 static bool backup_intent = false;
92
93 static struct sockaddr_storage dest_ss;
94 static char dest_ss_str[INET6_ADDRSTRLEN];
95
96 #define SEPARATORS " \t\n\r"
97
98 static bool abort_mget = true;
99
100 /* timing globals */
101 uint64_t get_total_size = 0;
102 unsigned int get_total_time_ms = 0;
103 static uint64_t put_total_size = 0;
104 static unsigned int put_total_time_ms = 0;
105
106 /* totals globals */
107 static double dir_total;
108
109 /* encrypted state. */
110 static bool smb_encrypt;
111
112 /* root cli_state connection */
113
114 struct cli_state *cli;
115
116 static char CLI_DIRSEP_CHAR = '\\';
117 static char CLI_DIRSEP_STR[] = { '\\', '\0' };
118
119 /* Authentication for client connections. */
120 struct user_auth_info *auth_info;
121
122 /* Accessor functions for directory paths. */
123 static char *fileselection;
124 static const char *client_get_fileselection(void)
125 {
126         if (fileselection) {
127                 return fileselection;
128         }
129         return "";
130 }
131
132 static const char *client_set_fileselection(const char *new_fs)
133 {
134         SAFE_FREE(fileselection);
135         if (new_fs) {
136                 fileselection = SMB_STRDUP(new_fs);
137         }
138         return client_get_fileselection();
139 }
140
141 static char *cwd;
142 static const char *client_get_cwd(void)
143 {
144         if (cwd) {
145                 return cwd;
146         }
147         return CLI_DIRSEP_STR;
148 }
149
150 static const char *client_set_cwd(const char *new_cwd)
151 {
152         SAFE_FREE(cwd);
153         if (new_cwd) {
154                 cwd = SMB_STRDUP(new_cwd);
155         }
156         return client_get_cwd();
157 }
158
159 static char *cur_dir;
160 const char *client_get_cur_dir(void)
161 {
162         if (cur_dir) {
163                 return cur_dir;
164         }
165         return CLI_DIRSEP_STR;
166 }
167
168 const char *client_set_cur_dir(const char *newdir)
169 {
170         SAFE_FREE(cur_dir);
171         if (newdir) {
172                 cur_dir = SMB_STRDUP(newdir);
173         }
174         return client_get_cur_dir();
175 }
176
177 /****************************************************************************
178  Put up a yes/no prompt.
179 ****************************************************************************/
180
181 static bool yesno(const char *p)
182 {
183         char ans[20];
184         printf("%s",p);
185
186         if (!fgets(ans,sizeof(ans)-1,stdin))
187                 return(False);
188
189         if (*ans == 'y' || *ans == 'Y')
190                 return(True);
191
192         return(False);
193 }
194
195 /****************************************************************************
196  Write to a local file with CR/LF->LF translation if appropriate. Return the
197  number taken from the buffer. This may not equal the number written.
198 ****************************************************************************/
199
200 static int writefile(int f, char *b, int n)
201 {
202         int i;
203
204         if (!translation) {
205                 return write(f,b,n);
206         }
207
208         i = 0;
209         while (i < n) {
210                 if (*b == '\r' && (i<(n-1)) && *(b+1) == '\n') {
211                         b++;i++;
212                 }
213                 if (write(f, b, 1) != 1) {
214                         break;
215                 }
216                 b++;
217                 i++;
218         }
219
220         return(i);
221 }
222
223 /****************************************************************************
224  Read from a file with LF->CR/LF translation if appropriate. Return the
225  number read. read approx n bytes.
226 ****************************************************************************/
227
228 static int readfile(uint8_t *b, int n, XFILE *f)
229 {
230         int i;
231         int c;
232
233         if (!translation)
234                 return x_fread(b,1,n,f);
235
236         i = 0;
237         while (i < (n - 1) && (i < BUFFER_SIZE)) {
238                 if ((c = x_getc(f)) == EOF) {
239                         break;
240                 }
241
242                 if (c == '\n') { /* change all LFs to CR/LF */
243                         b[i++] = '\r';
244                 }
245
246                 b[i++] = c;
247         }
248
249         return(i);
250 }
251
252 struct push_state {
253         XFILE *f;
254         SMB_OFF_T nread;
255 };
256
257 static size_t push_source(uint8_t *buf, size_t n, void *priv)
258 {
259         struct push_state *state = (struct push_state *)priv;
260         int result;
261
262         if (x_feof(state->f)) {
263                 return 0;
264         }
265
266         result = readfile(buf, n, state->f);
267         state->nread += result;
268         return result;
269 }
270
271 /****************************************************************************
272  Send a message.
273 ****************************************************************************/
274
275 static void send_message(const char *username)
276 {
277         char buf[1600];
278         NTSTATUS status;
279         int i;
280
281         d_printf("Type your message, ending it with a Control-D\n");
282
283         i = 0;
284         while (i<sizeof(buf)-2) {
285                 int c = fgetc(stdin);
286                 if (c == EOF) {
287                         break;
288                 }
289                 if (c == '\n') {
290                         buf[i++] = '\r';
291                 }
292                 buf[i++] = c;
293         }
294         buf[i] = '\0';
295
296         status = cli_message(cli, desthost, username, buf);
297         if (!NT_STATUS_IS_OK(status)) {
298                 d_fprintf(stderr, "cli_message returned %s\n",
299                           nt_errstr(status));
300         }
301 }
302
303 /****************************************************************************
304  Check the space on a device.
305 ****************************************************************************/
306
307 static int do_dskattr(void)
308 {
309         int total, bsize, avail;
310         struct cli_state *targetcli = NULL;
311         char *targetpath = NULL;
312         TALLOC_CTX *ctx = talloc_tos();
313         NTSTATUS status;
314
315         status = cli_resolve_path(ctx, "", auth_info, cli,
316                                   client_get_cur_dir(), &targetcli,
317                                   &targetpath);
318         if (!NT_STATUS_IS_OK(status)) {
319                 d_printf("Error in dskattr: %s\n", nt_errstr(status));
320                 return 1;
321         }
322
323         status = cli_dskattr(targetcli, &bsize, &total, &avail);
324         if (!NT_STATUS_IS_OK(status)) {
325                 d_printf("Error in dskattr: %s\n", nt_errstr(status));
326                 return 1;
327         }
328
329         d_printf("\n\t\t%d blocks of size %d. %d blocks available\n",
330                  total, bsize, avail);
331
332         return 0;
333 }
334
335 /****************************************************************************
336  Show cd/pwd.
337 ****************************************************************************/
338
339 static int cmd_pwd(void)
340 {
341         d_printf("Current directory is %s",service);
342         d_printf("%s\n",client_get_cur_dir());
343         return 0;
344 }
345
346 /****************************************************************************
347  Ensure name has correct directory separators.
348 ****************************************************************************/
349
350 static void normalize_name(char *newdir)
351 {
352         if (!(cli->requested_posix_capabilities & CIFS_UNIX_POSIX_PATHNAMES_CAP)) {
353                 string_replace(newdir,'/','\\');
354         }
355 }
356
357 /****************************************************************************
358  Change directory - inner section.
359 ****************************************************************************/
360
361 static int do_cd(const char *new_dir)
362 {
363         char *newdir = NULL;
364         char *saved_dir = NULL;
365         char *new_cd = NULL;
366         char *targetpath = NULL;
367         struct cli_state *targetcli = NULL;
368         SMB_STRUCT_STAT sbuf;
369         uint32 attributes;
370         int ret = 1;
371         TALLOC_CTX *ctx = talloc_stackframe();
372         NTSTATUS status;
373
374         newdir = talloc_strdup(ctx, new_dir);
375         if (!newdir) {
376                 TALLOC_FREE(ctx);
377                 return 1;
378         }
379
380         normalize_name(newdir);
381
382         /* Save the current directory in case the new directory is invalid */
383
384         saved_dir = talloc_strdup(ctx, client_get_cur_dir());
385         if (!saved_dir) {
386                 TALLOC_FREE(ctx);
387                 return 1;
388         }
389
390         if (*newdir == CLI_DIRSEP_CHAR) {
391                 client_set_cur_dir(newdir);
392                 new_cd = newdir;
393         } else {
394                 new_cd = talloc_asprintf(ctx, "%s%s",
395                                 client_get_cur_dir(),
396                                 newdir);
397                 if (!new_cd) {
398                         goto out;
399                 }
400         }
401
402         /* Ensure cur_dir ends in a DIRSEP */
403         if ((new_cd[0] != '\0') && (*(new_cd+strlen(new_cd)-1) != CLI_DIRSEP_CHAR)) {
404                 new_cd = talloc_asprintf_append(new_cd, "%s", CLI_DIRSEP_STR);
405                 if (!new_cd) {
406                         goto out;
407                 }
408         }
409         client_set_cur_dir(new_cd);
410
411         new_cd = clean_name(ctx, new_cd);
412         client_set_cur_dir(new_cd);
413
414         status = cli_resolve_path(ctx, "", auth_info, cli, new_cd,
415                                   &targetcli, &targetpath);
416         if (!NT_STATUS_IS_OK(status)) {
417                 d_printf("cd %s: %s\n", new_cd, nt_errstr(status));
418                 client_set_cur_dir(saved_dir);
419                 goto out;
420         }
421
422         if (strequal(targetpath,CLI_DIRSEP_STR )) {
423                 TALLOC_FREE(ctx);
424                 return 0;
425         }
426
427         /* Use a trans2_qpathinfo to test directories for modern servers.
428            Except Win9x doesn't support the qpathinfo_basic() call..... */
429
430         if (cli_state_protocol(targetcli) > PROTOCOL_LANMAN2 && !targetcli->win95) {
431
432                 status = cli_qpathinfo_basic(targetcli, targetpath, &sbuf,
433                                              &attributes);
434                 if (!NT_STATUS_IS_OK(status)) {
435                         d_printf("cd %s: %s\n", new_cd, nt_errstr(status));
436                         client_set_cur_dir(saved_dir);
437                         goto out;
438                 }
439
440                 if (!(attributes & FILE_ATTRIBUTE_DIRECTORY)) {
441                         d_printf("cd %s: not a directory\n", new_cd);
442                         client_set_cur_dir(saved_dir);
443                         goto out;
444                 }
445         } else {
446
447                 targetpath = talloc_asprintf(ctx,
448                                 "%s%s",
449                                 targetpath,
450                                 CLI_DIRSEP_STR );
451                 if (!targetpath) {
452                         client_set_cur_dir(saved_dir);
453                         goto out;
454                 }
455                 targetpath = clean_name(ctx, targetpath);
456                 if (!targetpath) {
457                         client_set_cur_dir(saved_dir);
458                         goto out;
459                 }
460
461                 status = cli_chkpath(targetcli, targetpath);
462                 if (!NT_STATUS_IS_OK(status)) {
463                         d_printf("cd %s: %s\n", new_cd, nt_errstr(status));
464                         client_set_cur_dir(saved_dir);
465                         goto out;
466                 }
467         }
468
469         ret = 0;
470
471 out:
472
473         TALLOC_FREE(ctx);
474         return ret;
475 }
476
477 /****************************************************************************
478  Change directory.
479 ****************************************************************************/
480
481 static int cmd_cd(void)
482 {
483         char *buf = NULL;
484         int rc = 0;
485
486         if (next_token_talloc(talloc_tos(), &cmd_ptr, &buf,NULL)) {
487                 rc = do_cd(buf);
488         } else {
489                 d_printf("Current directory is %s\n",client_get_cur_dir());
490         }
491
492         return rc;
493 }
494
495 /****************************************************************************
496  Change directory.
497 ****************************************************************************/
498
499 static int cmd_cd_oneup(void)
500 {
501         return do_cd("..");
502 }
503
504 /*******************************************************************
505  Decide if a file should be operated on.
506 ********************************************************************/
507
508 static bool do_this_one(struct file_info *finfo)
509 {
510         if (!finfo->name) {
511                 return false;
512         }
513
514         if (finfo->mode & FILE_ATTRIBUTE_DIRECTORY) {
515                 return true;
516         }
517
518         if (*client_get_fileselection() &&
519             !mask_match(finfo->name,client_get_fileselection(),false)) {
520                 DEBUG(3,("mask_match %s failed\n", finfo->name));
521                 return false;
522         }
523
524         if (newer_than && finfo->mtime_ts.tv_sec < newer_than) {
525                 DEBUG(3,("newer_than %s failed\n", finfo->name));
526                 return false;
527         }
528
529         if ((archive_level==1 || archive_level==2) && !(finfo->mode & FILE_ATTRIBUTE_ARCHIVE)) {
530                 DEBUG(3,("archive %s failed\n", finfo->name));
531                 return false;
532         }
533
534         return true;
535 }
536
537 /****************************************************************************
538  Display info about a file.
539 ****************************************************************************/
540
541 static NTSTATUS display_finfo(struct cli_state *cli_state, struct file_info *finfo,
542                           const char *dir)
543 {
544         time_t t;
545         TALLOC_CTX *ctx = talloc_tos();
546         NTSTATUS status = NT_STATUS_OK;
547
548         if (!do_this_one(finfo)) {
549                 return NT_STATUS_OK;
550         }
551
552         t = finfo->mtime_ts.tv_sec; /* the time is assumed to be passed as GMT */
553         if (!showacls) {
554                 d_printf("  %-30s%7.7s %8.0f  %s",
555                          finfo->name,
556                          attrib_string(talloc_tos(), finfo->mode),
557                         (double)finfo->size,
558                         time_to_asc(t));
559                 dir_total += finfo->size;
560         } else {
561                 char *afname = NULL;
562                 uint16_t fnum;
563
564                 /* skip if this is . or .. */
565                 if ( strequal(finfo->name,"..") || strequal(finfo->name,".") )
566                         return NT_STATUS_OK;
567                 /* create absolute filename for cli_ntcreate() FIXME */
568                 afname = talloc_asprintf(ctx,
569                                         "%s%s%s",
570                                         dir,
571                                         CLI_DIRSEP_STR,
572                                         finfo->name);
573                 if (!afname) {
574                         return NT_STATUS_NO_MEMORY;
575                 }
576                 /* print file meta date header */
577                 d_printf( "FILENAME:%s\n", finfo->name);
578                 d_printf( "MODE:%s\n", attrib_string(talloc_tos(), finfo->mode));
579                 d_printf( "SIZE:%.0f\n", (double)finfo->size);
580                 d_printf( "MTIME:%s", time_to_asc(t));
581                 status = cli_ntcreate(cli_state, afname, 0,
582                                       CREATE_ACCESS_READ, 0,
583                                       FILE_SHARE_READ|FILE_SHARE_WRITE,
584                                       FILE_OPEN, 0x0, 0x0, &fnum);
585                 if (!NT_STATUS_IS_OK(status)) {
586                         DEBUG( 0, ("display_finfo() Failed to open %s: %s\n",
587                                    afname, nt_errstr(status)));
588                 } else {
589                         struct security_descriptor *sd = NULL;
590                         status = cli_query_secdesc(cli_state, fnum,
591                                                    ctx, &sd);
592                         if (!NT_STATUS_IS_OK(status)) {
593                                 DEBUG( 0, ("display_finfo() failed to "
594                                            "get security descriptor: %s",
595                                            nt_errstr(status)));
596                         } else {
597                                 display_sec_desc(sd);
598                         }
599                         TALLOC_FREE(sd);
600                 }
601                 TALLOC_FREE(afname);
602         }
603         return status;
604 }
605
606 /****************************************************************************
607  Accumulate size of a file.
608 ****************************************************************************/
609
610 static NTSTATUS do_du(struct cli_state *cli_state, struct file_info *finfo,
611                   const char *dir)
612 {
613         if (do_this_one(finfo)) {
614                 dir_total += finfo->size;
615         }
616         return NT_STATUS_OK;
617 }
618
619 static bool do_list_recurse;
620 static bool do_list_dirs;
621 static char *do_list_queue = 0;
622 static long do_list_queue_size = 0;
623 static long do_list_queue_start = 0;
624 static long do_list_queue_end = 0;
625 static NTSTATUS (*do_list_fn)(struct cli_state *cli_state, struct file_info *,
626                           const char *dir);
627
628 /****************************************************************************
629  Functions for do_list_queue.
630 ****************************************************************************/
631
632 /*
633  * The do_list_queue is a NUL-separated list of strings stored in a
634  * char*.  Since this is a FIFO, we keep track of the beginning and
635  * ending locations of the data in the queue.  When we overflow, we
636  * double the size of the char*.  When the start of the data passes
637  * the midpoint, we move everything back.  This is logically more
638  * complex than a linked list, but easier from a memory management
639  * angle.  In any memory error condition, do_list_queue is reset.
640  * Functions check to ensure that do_list_queue is non-NULL before
641  * accessing it.
642  */
643
644 static void reset_do_list_queue(void)
645 {
646         SAFE_FREE(do_list_queue);
647         do_list_queue_size = 0;
648         do_list_queue_start = 0;
649         do_list_queue_end = 0;
650 }
651
652 static void init_do_list_queue(void)
653 {
654         reset_do_list_queue();
655         do_list_queue_size = 1024;
656         do_list_queue = (char *)SMB_MALLOC(do_list_queue_size);
657         if (do_list_queue == 0) {
658                 d_printf("malloc fail for size %d\n",
659                          (int)do_list_queue_size);
660                 reset_do_list_queue();
661         } else {
662                 memset(do_list_queue, 0, do_list_queue_size);
663         }
664 }
665
666 static void adjust_do_list_queue(void)
667 {
668         /*
669          * If the starting point of the queue is more than half way through,
670          * move everything toward the beginning.
671          */
672
673         if (do_list_queue == NULL) {
674                 DEBUG(4,("do_list_queue is empty\n"));
675                 do_list_queue_start = do_list_queue_end = 0;
676                 return;
677         }
678
679         if (do_list_queue_start == do_list_queue_end) {
680                 DEBUG(4,("do_list_queue is empty\n"));
681                 do_list_queue_start = do_list_queue_end = 0;
682                 *do_list_queue = '\0';
683         } else if (do_list_queue_start > (do_list_queue_size / 2)) {
684                 DEBUG(4,("sliding do_list_queue backward\n"));
685                 memmove(do_list_queue,
686                         do_list_queue + do_list_queue_start,
687                         do_list_queue_end - do_list_queue_start);
688                 do_list_queue_end -= do_list_queue_start;
689                 do_list_queue_start = 0;
690         }
691 }
692
693 static void add_to_do_list_queue(const char *entry)
694 {
695         long new_end = do_list_queue_end + ((long)strlen(entry)) + 1;
696         while (new_end > do_list_queue_size) {
697                 do_list_queue_size *= 2;
698                 DEBUG(4,("enlarging do_list_queue to %d\n",
699                          (int)do_list_queue_size));
700                 do_list_queue = (char *)SMB_REALLOC(do_list_queue, do_list_queue_size);
701                 if (! do_list_queue) {
702                         d_printf("failure enlarging do_list_queue to %d bytes\n",
703                                  (int)do_list_queue_size);
704                         reset_do_list_queue();
705                 } else {
706                         memset(do_list_queue + do_list_queue_size / 2,
707                                0, do_list_queue_size / 2);
708                 }
709         }
710         if (do_list_queue) {
711                 strlcpy_base(do_list_queue + do_list_queue_end,
712                                  entry, do_list_queue, do_list_queue_size);
713                 do_list_queue_end = new_end;
714                 DEBUG(4,("added %s to do_list_queue (start=%d, end=%d)\n",
715                          entry, (int)do_list_queue_start, (int)do_list_queue_end));
716         }
717 }
718
719 static char *do_list_queue_head(void)
720 {
721         return do_list_queue + do_list_queue_start;
722 }
723
724 static void remove_do_list_queue_head(void)
725 {
726         if (do_list_queue_end > do_list_queue_start) {
727                 do_list_queue_start += strlen(do_list_queue_head()) + 1;
728                 adjust_do_list_queue();
729                 DEBUG(4,("removed head of do_list_queue (start=%d, end=%d)\n",
730                          (int)do_list_queue_start, (int)do_list_queue_end));
731         }
732 }
733
734 static int do_list_queue_empty(void)
735 {
736         return (! (do_list_queue && *do_list_queue));
737 }
738
739 /****************************************************************************
740  A helper for do_list.
741 ****************************************************************************/
742
743 static NTSTATUS do_list_helper(const char *mntpoint, struct file_info *f,
744                            const char *mask, void *state)
745 {
746         struct cli_state *cli_state = (struct cli_state *)state;
747         TALLOC_CTX *ctx = talloc_tos();
748         char *dir = NULL;
749         char *dir_end = NULL;
750         NTSTATUS status = NT_STATUS_OK;
751
752         /* Work out the directory. */
753         dir = talloc_strdup(ctx, mask);
754         if (!dir) {
755                 return NT_STATUS_NO_MEMORY;
756         }
757         if ((dir_end = strrchr(dir, CLI_DIRSEP_CHAR)) != NULL) {
758                 *dir_end = '\0';
759         }
760
761         if (f->mode & FILE_ATTRIBUTE_DIRECTORY) {
762                 if (do_list_dirs && do_this_one(f)) {
763                         status = do_list_fn(cli_state, f, dir);
764                         if (!NT_STATUS_IS_OK(status)) {
765                                 return status;
766                         }
767                 }
768                 if (do_list_recurse &&
769                     f->name &&
770                     !strequal(f->name,".") &&
771                     !strequal(f->name,"..")) {
772                         char *mask2 = NULL;
773                         char *p = NULL;
774
775                         if (!f->name[0]) {
776                                 d_printf("Empty dir name returned. Possible server misconfiguration.\n");
777                                 TALLOC_FREE(dir);
778                                 return NT_STATUS_UNSUCCESSFUL;
779                         }
780
781                         mask2 = talloc_asprintf(ctx,
782                                         "%s%s",
783                                         mntpoint,
784                                         mask);
785                         if (!mask2) {
786                                 TALLOC_FREE(dir);
787                                 return NT_STATUS_NO_MEMORY;
788                         }
789                         p = strrchr_m(mask2,CLI_DIRSEP_CHAR);
790                         if (p) {
791                                 p[1] = 0;
792                         } else {
793                                 mask2[0] = '\0';
794                         }
795                         mask2 = talloc_asprintf_append(mask2,
796                                         "%s%s*",
797                                         f->name,
798                                         CLI_DIRSEP_STR);
799                         if (!mask2) {
800                                 TALLOC_FREE(dir);
801                                 return NT_STATUS_NO_MEMORY;
802                         }
803                         add_to_do_list_queue(mask2);
804                         TALLOC_FREE(mask2);
805                 }
806                 TALLOC_FREE(dir);
807                 return NT_STATUS_OK;
808         }
809
810         if (do_this_one(f)) {
811                 status = do_list_fn(cli_state, f, dir);
812         }
813         TALLOC_FREE(dir);
814         return status;
815 }
816
817 /****************************************************************************
818  A wrapper around cli_list that adds recursion.
819 ****************************************************************************/
820
821 NTSTATUS do_list(const char *mask,
822                         uint16 attribute,
823                         NTSTATUS (*fn)(struct cli_state *cli_state, struct file_info *,
824                                    const char *dir),
825                         bool rec,
826                         bool dirs)
827 {
828         static int in_do_list = 0;
829         TALLOC_CTX *ctx = talloc_tos();
830         struct cli_state *targetcli = NULL;
831         char *targetpath = NULL;
832         NTSTATUS ret_status = NT_STATUS_OK;
833         NTSTATUS status = NT_STATUS_OK;
834
835         if (in_do_list && rec) {
836                 fprintf(stderr, "INTERNAL ERROR: do_list called recursively when the recursive flag is true\n");
837                 exit(1);
838         }
839
840         in_do_list = 1;
841
842         do_list_recurse = rec;
843         do_list_dirs = dirs;
844         do_list_fn = fn;
845
846         if (rec) {
847                 init_do_list_queue();
848                 add_to_do_list_queue(mask);
849
850                 while (!do_list_queue_empty()) {
851                         /*
852                          * Need to copy head so that it doesn't become
853                          * invalid inside the call to cli_list.  This
854                          * would happen if the list were expanded
855                          * during the call.
856                          * Fix from E. Jay Berkenbilt (ejb@ql.org)
857                          */
858                         char *head = talloc_strdup(ctx, do_list_queue_head());
859
860                         if (!head) {
861                                 return NT_STATUS_NO_MEMORY;
862                         }
863
864                         /* check for dfs */
865
866                         status = cli_resolve_path(ctx, "", auth_info, cli,
867                                                   head, &targetcli,
868                                                   &targetpath);
869                         if (!NT_STATUS_IS_OK(status)) {
870                                 d_printf("do_list: [%s] %s\n", head,
871                                          nt_errstr(status));
872                                 remove_do_list_queue_head();
873                                 continue;
874                         }
875
876                         status = cli_list(targetcli, targetpath, attribute,
877                                  do_list_helper, targetcli);
878                         if (!NT_STATUS_IS_OK(status)) {
879                                 d_printf("%s listing %s\n",
880                                          nt_errstr(status), targetpath);
881                                 ret_status = status;
882                         }
883                         remove_do_list_queue_head();
884                         if ((! do_list_queue_empty()) && (fn == display_finfo)) {
885                                 char *next_file = do_list_queue_head();
886                                 char *save_ch = 0;
887                                 if ((strlen(next_file) >= 2) &&
888                                     (next_file[strlen(next_file) - 1] == '*') &&
889                                     (next_file[strlen(next_file) - 2] == CLI_DIRSEP_CHAR)) {
890                                         save_ch = next_file +
891                                                 strlen(next_file) - 2;
892                                         *save_ch = '\0';
893                                         if (showacls) {
894                                                 /* cwd is only used if showacls is on */
895                                                 client_set_cwd(next_file);
896                                         }
897                                 }
898                                 if (!showacls) /* don't disturbe the showacls output */
899                                         d_printf("\n%s\n",next_file);
900                                 if (save_ch) {
901                                         *save_ch = CLI_DIRSEP_CHAR;
902                                 }
903                         }
904                         TALLOC_FREE(head);
905                         TALLOC_FREE(targetpath);
906                 }
907         } else {
908                 /* check for dfs */
909                 status = cli_resolve_path(ctx, "", auth_info, cli, mask,
910                                           &targetcli, &targetpath);
911                 if (NT_STATUS_IS_OK(status)) {
912                         status = cli_list(targetcli, targetpath, attribute,
913                                           do_list_helper, targetcli);
914                         if (!NT_STATUS_IS_OK(status)) {
915                                 d_printf("%s listing %s\n",
916                                          nt_errstr(status), targetpath);
917                                 ret_status = status;
918                         }
919                         TALLOC_FREE(targetpath);
920                 } else {
921                         d_printf("do_list: [%s] %s\n", mask, nt_errstr(status));
922                         ret_status = status;
923                 }
924         }
925
926         in_do_list = 0;
927         reset_do_list_queue();
928         return ret_status;
929 }
930
931 /****************************************************************************
932  Get a directory listing.
933 ****************************************************************************/
934
935 static int cmd_dir(void)
936 {
937         TALLOC_CTX *ctx = talloc_tos();
938         uint16 attribute = FILE_ATTRIBUTE_DIRECTORY | FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN;
939         char *mask = NULL;
940         char *buf = NULL;
941         int rc = 1;
942         NTSTATUS status;
943
944         dir_total = 0;
945         mask = talloc_strdup(ctx, client_get_cur_dir());
946         if (!mask) {
947                 return 1;
948         }
949
950         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
951                 normalize_name(buf);
952                 if (*buf == CLI_DIRSEP_CHAR) {
953                         mask = talloc_strdup(ctx, buf);
954                 } else {
955                         mask = talloc_asprintf_append(mask, "%s", buf);
956                 }
957         } else {
958                 mask = talloc_asprintf_append(mask, "*");
959         }
960         if (!mask) {
961                 return 1;
962         }
963
964         if (showacls) {
965                 /* cwd is only used if showacls is on */
966                 client_set_cwd(client_get_cur_dir());
967         }
968
969         status = do_list(mask, attribute, display_finfo, recurse, true);
970         if (!NT_STATUS_IS_OK(status)) {
971                 return 1;
972         }
973
974         rc = do_dskattr();
975
976         DEBUG(3, ("Total bytes listed: %.0f\n", dir_total));
977
978         return rc;
979 }
980
981 /****************************************************************************
982  Get a directory listing.
983 ****************************************************************************/
984
985 static int cmd_du(void)
986 {
987         TALLOC_CTX *ctx = talloc_tos();
988         uint16 attribute = FILE_ATTRIBUTE_DIRECTORY | FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN;
989         char *mask = NULL;
990         char *buf = NULL;
991         NTSTATUS status;
992         int rc = 1;
993
994         dir_total = 0;
995         mask = talloc_strdup(ctx, client_get_cur_dir());
996         if (!mask) {
997                 return 1;
998         }
999         if ((mask[0] != '\0') && (mask[strlen(mask)-1]!=CLI_DIRSEP_CHAR)) {
1000                 mask = talloc_asprintf_append(mask, "%s", CLI_DIRSEP_STR);
1001                 if (!mask) {
1002                         return 1;
1003                 }
1004         }
1005
1006         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
1007                 normalize_name(buf);
1008                 if (*buf == CLI_DIRSEP_CHAR) {
1009                         mask = talloc_strdup(ctx, buf);
1010                 } else {
1011                         mask = talloc_asprintf_append(mask, "%s", buf);
1012                 }
1013         } else {
1014                 mask = talloc_strdup(ctx, "*");
1015         }
1016
1017         status = do_list(mask, attribute, do_du, recurse, true);
1018         if (!NT_STATUS_IS_OK(status)) {
1019                 return 1;
1020         }
1021
1022         rc = do_dskattr();
1023
1024         d_printf("Total number of bytes: %.0f\n", dir_total);
1025
1026         return rc;
1027 }
1028
1029 static int cmd_echo(void)
1030 {
1031         TALLOC_CTX *ctx = talloc_tos();
1032         char *num;
1033         char *data;
1034         NTSTATUS status;
1035
1036         if (!next_token_talloc(ctx, &cmd_ptr, &num, NULL)
1037             || !next_token_talloc(ctx, &cmd_ptr, &data, NULL)) {
1038                 d_printf("echo <num> <data>\n");
1039                 return 1;
1040         }
1041
1042         status = cli_echo(cli, atoi(num), data_blob_const(data, strlen(data)));
1043
1044         if (!NT_STATUS_IS_OK(status)) {
1045                 d_printf("echo failed: %s\n", nt_errstr(status));
1046                 return 1;
1047         }
1048
1049         return 0;
1050 }
1051
1052 /****************************************************************************
1053  Get a file from rname to lname
1054 ****************************************************************************/
1055
1056 static NTSTATUS writefile_sink(char *buf, size_t n, void *priv)
1057 {
1058         int *pfd = (int *)priv;
1059         if (writefile(*pfd, buf, n) == -1) {
1060                 return map_nt_error_from_unix(errno);
1061         }
1062         return NT_STATUS_OK;
1063 }
1064
1065 static int do_get(const char *rname, const char *lname_in, bool reget)
1066 {
1067         TALLOC_CTX *ctx = talloc_tos();
1068         int handle = 0;
1069         uint16_t fnum;
1070         bool newhandle = false;
1071         struct timespec tp_start;
1072         uint16 attr;
1073         SMB_OFF_T size;
1074         off_t start = 0;
1075         SMB_OFF_T nread = 0;
1076         int rc = 0;
1077         struct cli_state *targetcli = NULL;
1078         char *targetname = NULL;
1079         char *lname = NULL;
1080         NTSTATUS status;
1081
1082         lname = talloc_strdup(ctx, lname_in);
1083         if (!lname) {
1084                 return 1;
1085         }
1086
1087         if (lowercase) {
1088                 strlower_m(lname);
1089         }
1090
1091         status = cli_resolve_path(ctx, "", auth_info, cli, rname, &targetcli,
1092                                   &targetname);
1093         if (!NT_STATUS_IS_OK(status)) {
1094                 d_printf("Failed to open %s: %s\n", rname, nt_errstr(status));
1095                 return 1;
1096         }
1097
1098         clock_gettime_mono(&tp_start);
1099
1100         status = cli_open(targetcli, targetname, O_RDONLY, DENY_NONE, &fnum);
1101         if (!NT_STATUS_IS_OK(status)) {
1102                 d_printf("%s opening remote file %s\n", nt_errstr(status),
1103                          rname);
1104                 return 1;
1105         }
1106
1107         if(!strcmp(lname,"-")) {
1108                 handle = fileno(stdout);
1109         } else {
1110                 if (reget) {
1111                         handle = sys_open(lname, O_WRONLY|O_CREAT, 0644);
1112                         if (handle >= 0) {
1113                                 start = sys_lseek(handle, 0, SEEK_END);
1114                                 if (start == -1) {
1115                                         d_printf("Error seeking local file\n");
1116                                         return 1;
1117                                 }
1118                         }
1119                 } else {
1120                         handle = sys_open(lname, O_WRONLY|O_CREAT|O_TRUNC, 0644);
1121                 }
1122                 newhandle = true;
1123         }
1124         if (handle < 0) {
1125                 d_printf("Error opening local file %s\n",lname);
1126                 return 1;
1127         }
1128
1129
1130         status = cli_qfileinfo_basic(targetcli, fnum, &attr, &size, NULL, NULL,
1131                                      NULL, NULL, NULL);
1132         if (!NT_STATUS_IS_OK(status)) {
1133                 status = cli_getattrE(targetcli, fnum, &attr, &size, NULL, NULL,
1134                                       NULL);
1135                 if(!NT_STATUS_IS_OK(status)) {
1136                         d_printf("getattrib: %s\n", nt_errstr(status));
1137                         return 1;
1138                 }
1139         }
1140
1141         DEBUG(1,("getting file %s of size %.0f as %s ",
1142                  rname, (double)size, lname));
1143
1144         status = cli_pull(targetcli, fnum, start, size, io_bufsize,
1145                           writefile_sink, (void *)&handle, &nread);
1146         if (!NT_STATUS_IS_OK(status)) {
1147                 d_fprintf(stderr, "parallel_read returned %s\n",
1148                           nt_errstr(status));
1149                 cli_close(targetcli, fnum);
1150                 return 1;
1151         }
1152
1153         status = cli_close(targetcli, fnum);
1154         if (!NT_STATUS_IS_OK(status)) {
1155                 d_printf("Error %s closing remote file\n", nt_errstr(status));
1156                 rc = 1;
1157         }
1158
1159         if (newhandle) {
1160                 close(handle);
1161         }
1162
1163         if (archive_level >= 2 && (attr & FILE_ATTRIBUTE_ARCHIVE)) {
1164                 cli_setatr(cli, rname, attr & ~(uint16)FILE_ATTRIBUTE_ARCHIVE, 0);
1165         }
1166
1167         {
1168                 struct timespec tp_end;
1169                 int this_time;
1170
1171                 clock_gettime_mono(&tp_end);
1172                 this_time = nsec_time_diff(&tp_end,&tp_start)/1000000;
1173                 get_total_time_ms += this_time;
1174                 get_total_size += nread;
1175
1176                 DEBUG(1,("(%3.1f KiloBytes/sec) (average %3.1f KiloBytes/sec)\n",
1177                          nread / (1.024*this_time + 1.0e-4),
1178                          get_total_size / (1.024*get_total_time_ms)));
1179         }
1180
1181         TALLOC_FREE(targetname);
1182         return rc;
1183 }
1184
1185 /****************************************************************************
1186  Get a file.
1187 ****************************************************************************/
1188
1189 static int cmd_get(void)
1190 {
1191         TALLOC_CTX *ctx = talloc_tos();
1192         char *lname = NULL;
1193         char *rname = NULL;
1194         char *fname = NULL;
1195
1196         rname = talloc_strdup(ctx, client_get_cur_dir());
1197         if (!rname) {
1198                 return 1;
1199         }
1200
1201         if (!next_token_talloc(ctx, &cmd_ptr,&fname,NULL)) {
1202                 d_printf("get <filename> [localname]\n");
1203                 return 1;
1204         }
1205         rname = talloc_asprintf_append(rname, "%s", fname);
1206         if (!rname) {
1207                 return 1;
1208         }
1209         rname = clean_name(ctx, rname);
1210         if (!rname) {
1211                 return 1;
1212         }
1213
1214         next_token_talloc(ctx, &cmd_ptr,&lname,NULL);
1215         if (!lname) {
1216                 lname = fname;
1217         }
1218
1219         return do_get(rname, lname, false);
1220 }
1221
1222 /****************************************************************************
1223  Do an mget operation on one file.
1224 ****************************************************************************/
1225
1226 static NTSTATUS do_mget(struct cli_state *cli_state, struct file_info *finfo,
1227                     const char *dir)
1228 {
1229         TALLOC_CTX *ctx = talloc_tos();
1230         NTSTATUS status = NT_STATUS_OK;
1231         char *rname = NULL;
1232         char *quest = NULL;
1233         char *saved_curdir = NULL;
1234         char *mget_mask = NULL;
1235         char *new_cd = NULL;
1236
1237         if (!finfo->name) {
1238                 return NT_STATUS_OK;
1239         }
1240
1241         if (strequal(finfo->name,".") || strequal(finfo->name,".."))
1242                 return NT_STATUS_OK;
1243
1244         if (abort_mget) {
1245                 d_printf("mget aborted\n");
1246                 return NT_STATUS_UNSUCCESSFUL;
1247         }
1248
1249         if (finfo->mode & FILE_ATTRIBUTE_DIRECTORY) {
1250                 if (asprintf(&quest,
1251                          "Get directory %s? ",finfo->name) < 0) {
1252                         return NT_STATUS_NO_MEMORY;
1253                 }
1254         } else {
1255                 if (asprintf(&quest,
1256                          "Get file %s? ",finfo->name) < 0) {
1257                         return NT_STATUS_NO_MEMORY;
1258                 }
1259         }
1260
1261         if (prompt && !yesno(quest)) {
1262                 SAFE_FREE(quest);
1263                 return NT_STATUS_OK;
1264         }
1265         SAFE_FREE(quest);
1266
1267         if (!(finfo->mode & FILE_ATTRIBUTE_DIRECTORY)) {
1268                 rname = talloc_asprintf(ctx,
1269                                 "%s%s",
1270                                 client_get_cur_dir(),
1271                                 finfo->name);
1272                 if (!rname) {
1273                         return NT_STATUS_NO_MEMORY;
1274                 }
1275                 do_get(rname, finfo->name, false);
1276                 TALLOC_FREE(rname);
1277                 return NT_STATUS_OK;
1278         }
1279
1280         /* handle directories */
1281         saved_curdir = talloc_strdup(ctx, client_get_cur_dir());
1282         if (!saved_curdir) {
1283                 return NT_STATUS_NO_MEMORY;
1284         }
1285
1286         new_cd = talloc_asprintf(ctx,
1287                                 "%s%s%s",
1288                                 client_get_cur_dir(),
1289                                 finfo->name,
1290                                 CLI_DIRSEP_STR);
1291         if (!new_cd) {
1292                 return NT_STATUS_NO_MEMORY;
1293         }
1294         client_set_cur_dir(new_cd);
1295
1296         string_replace(finfo->name,'\\','/');
1297         if (lowercase) {
1298                 strlower_m(finfo->name);
1299         }
1300
1301         if (!directory_exist(finfo->name) &&
1302             mkdir(finfo->name,0777) != 0) {
1303                 d_printf("failed to create directory %s\n",finfo->name);
1304                 client_set_cur_dir(saved_curdir);
1305                 return map_nt_error_from_unix(errno);
1306         }
1307
1308         if (chdir(finfo->name) != 0) {
1309                 d_printf("failed to chdir to directory %s\n",finfo->name);
1310                 client_set_cur_dir(saved_curdir);
1311                 return map_nt_error_from_unix(errno);
1312         }
1313
1314         mget_mask = talloc_asprintf(ctx,
1315                         "%s*",
1316                         client_get_cur_dir());
1317
1318         if (!mget_mask) {
1319                 return NT_STATUS_NO_MEMORY;
1320         }
1321
1322         status = do_list(mget_mask, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN | FILE_ATTRIBUTE_DIRECTORY,do_mget,false, true);
1323         if (!NT_STATUS_IS_OK(status)) {
1324                 return status;
1325         }
1326
1327         if (chdir("..") == -1) {
1328                 d_printf("do_mget: failed to chdir to .. (error %s)\n",
1329                         strerror(errno) );
1330                 return map_nt_error_from_unix(errno);
1331         }
1332         client_set_cur_dir(saved_curdir);
1333         TALLOC_FREE(mget_mask);
1334         TALLOC_FREE(saved_curdir);
1335         TALLOC_FREE(new_cd);
1336         return NT_STATUS_OK;
1337 }
1338
1339 /****************************************************************************
1340  View the file using the pager.
1341 ****************************************************************************/
1342
1343 static int cmd_more(void)
1344 {
1345         TALLOC_CTX *ctx = talloc_tos();
1346         char *rname = NULL;
1347         char *fname = NULL;
1348         char *lname = NULL;
1349         char *pager_cmd = NULL;
1350         const char *pager;
1351         int fd;
1352         int rc = 0;
1353
1354         rname = talloc_strdup(ctx, client_get_cur_dir());
1355         if (!rname) {
1356                 return 1;
1357         }
1358
1359         lname = talloc_asprintf(ctx, "%s/smbmore.XXXXXX",tmpdir());
1360         if (!lname) {
1361                 return 1;
1362         }
1363         fd = mkstemp(lname);
1364         if (fd == -1) {
1365                 d_printf("failed to create temporary file for more\n");
1366                 return 1;
1367         }
1368         close(fd);
1369
1370         if (!next_token_talloc(ctx, &cmd_ptr,&fname,NULL)) {
1371                 d_printf("more <filename>\n");
1372                 unlink(lname);
1373                 return 1;
1374         }
1375         rname = talloc_asprintf_append(rname, "%s", fname);
1376         if (!rname) {
1377                 return 1;
1378         }
1379         rname = clean_name(ctx,rname);
1380         if (!rname) {
1381                 return 1;
1382         }
1383
1384         rc = do_get(rname, lname, false);
1385
1386         pager=getenv("PAGER");
1387
1388         pager_cmd = talloc_asprintf(ctx,
1389                                 "%s %s",
1390                                 (pager? pager:PAGER),
1391                                 lname);
1392         if (!pager_cmd) {
1393                 return 1;
1394         }
1395         if (system(pager_cmd) == -1) {
1396                 d_printf("system command '%s' returned -1\n",
1397                         pager_cmd);
1398         }
1399         unlink(lname);
1400
1401         return rc;
1402 }
1403
1404 /****************************************************************************
1405  Do a mget command.
1406 ****************************************************************************/
1407
1408 static int cmd_mget(void)
1409 {
1410         TALLOC_CTX *ctx = talloc_tos();
1411         uint16 attribute = FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN;
1412         char *mget_mask = NULL;
1413         char *buf = NULL;
1414         NTSTATUS status = NT_STATUS_OK;
1415
1416         if (recurse) {
1417                 attribute |= FILE_ATTRIBUTE_DIRECTORY;
1418         }
1419
1420         abort_mget = false;
1421
1422         while (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
1423
1424                 mget_mask = talloc_strdup(ctx, client_get_cur_dir());
1425                 if (!mget_mask) {
1426                         return 1;
1427                 }
1428                 if (*buf == CLI_DIRSEP_CHAR) {
1429                         mget_mask = talloc_strdup(ctx, buf);
1430                 } else {
1431                         mget_mask = talloc_asprintf_append(mget_mask,
1432                                                         "%s", buf);
1433                 }
1434                 if (!mget_mask) {
1435                         return 1;
1436                 }
1437                 status = do_list(mget_mask, attribute, do_mget, false, true);
1438                 if (!NT_STATUS_IS_OK(status)) {
1439                         return 1;
1440                 }
1441         }
1442
1443         if (mget_mask == NULL) {
1444                 d_printf("nothing to mget\n");
1445                 return 0;
1446         }
1447
1448         if (!*mget_mask) {
1449                 mget_mask = talloc_asprintf(ctx,
1450                                         "%s*",
1451                                         client_get_cur_dir());
1452                 if (!mget_mask) {
1453                         return 1;
1454                 }
1455                 status = do_list(mget_mask, attribute, do_mget, false, true);
1456                 if (!NT_STATUS_IS_OK(status)) {
1457                         return 1;
1458                 }
1459         }
1460
1461         return 0;
1462 }
1463
1464 /****************************************************************************
1465  Make a directory of name "name".
1466 ****************************************************************************/
1467
1468 static bool do_mkdir(const char *name)
1469 {
1470         TALLOC_CTX *ctx = talloc_tos();
1471         struct cli_state *targetcli;
1472         char *targetname = NULL;
1473         NTSTATUS status;
1474
1475         status = cli_resolve_path(ctx, "", auth_info, cli, name, &targetcli,
1476                                   &targetname);
1477         if (!NT_STATUS_IS_OK(status)) {
1478                 d_printf("mkdir %s: %s\n", name, nt_errstr(status));
1479                 return false;
1480         }
1481
1482         status = cli_mkdir(targetcli, targetname);
1483         if (!NT_STATUS_IS_OK(status)) {
1484                 d_printf("%s making remote directory %s\n",
1485                          nt_errstr(status),name);
1486                 return false;
1487         }
1488
1489         return true;
1490 }
1491
1492 /****************************************************************************
1493  Show 8.3 name of a file.
1494 ****************************************************************************/
1495
1496 static bool do_altname(const char *name)
1497 {
1498         fstring altname;
1499         NTSTATUS status;
1500
1501         status = cli_qpathinfo_alt_name(cli, name, altname);
1502         if (!NT_STATUS_IS_OK(status)) {
1503                 d_printf("%s getting alt name for %s\n",
1504                          nt_errstr(status),name);
1505                 return false;
1506         }
1507         d_printf("%s\n", altname);
1508
1509         return true;
1510 }
1511
1512 /****************************************************************************
1513  Exit client.
1514 ****************************************************************************/
1515
1516 static int cmd_quit(void)
1517 {
1518         cli_shutdown(cli);
1519         exit(0);
1520         /* NOTREACHED */
1521         return 0;
1522 }
1523
1524 /****************************************************************************
1525  Make a directory.
1526 ****************************************************************************/
1527
1528 static int cmd_mkdir(void)
1529 {
1530         TALLOC_CTX *ctx = talloc_tos();
1531         char *mask = NULL;
1532         char *buf = NULL;
1533         NTSTATUS status;
1534
1535         mask = talloc_strdup(ctx, client_get_cur_dir());
1536         if (!mask) {
1537                 return 1;
1538         }
1539
1540         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
1541                 if (!recurse) {
1542                         d_printf("mkdir <dirname>\n");
1543                 }
1544                 return 1;
1545         }
1546         mask = talloc_asprintf_append(mask, "%s", buf);
1547         if (!mask) {
1548                 return 1;
1549         }
1550
1551         if (recurse) {
1552                 char *ddir = NULL;
1553                 char *ddir2 = NULL;
1554                 struct cli_state *targetcli;
1555                 char *targetname = NULL;
1556                 char *p = NULL;
1557                 char *saveptr;
1558
1559                 ddir2 = talloc_strdup(ctx, "");
1560                 if (!ddir2) {
1561                         return 1;
1562                 }
1563
1564                 status = cli_resolve_path(ctx, "", auth_info, cli, mask,
1565                                           &targetcli, &targetname);
1566                 if (!NT_STATUS_IS_OK(status)) {
1567                         return 1;
1568                 }
1569
1570                 ddir = talloc_strdup(ctx, targetname);
1571                 if (!ddir) {
1572                         return 1;
1573                 }
1574                 trim_char(ddir,'.','\0');
1575                 p = strtok_r(ddir, "/\\", &saveptr);
1576                 while (p) {
1577                         ddir2 = talloc_asprintf_append(ddir2, "%s", p);
1578                         if (!ddir2) {
1579                                 return 1;
1580                         }
1581                         if (!NT_STATUS_IS_OK(cli_chkpath(targetcli, ddir2))) {
1582                                 do_mkdir(ddir2);
1583                         }
1584                         ddir2 = talloc_asprintf_append(ddir2, "%s", CLI_DIRSEP_STR);
1585                         if (!ddir2) {
1586                                 return 1;
1587                         }
1588                         p = strtok_r(NULL, "/\\", &saveptr);
1589                 }
1590         } else {
1591                 do_mkdir(mask);
1592         }
1593
1594         return 0;
1595 }
1596
1597 /****************************************************************************
1598  Show alt name.
1599 ****************************************************************************/
1600
1601 static int cmd_altname(void)
1602 {
1603         TALLOC_CTX *ctx = talloc_tos();
1604         char *name;
1605         char *buf;
1606
1607         name = talloc_strdup(ctx, client_get_cur_dir());
1608         if (!name) {
1609                 return 1;
1610         }
1611
1612         if (!next_token_talloc(ctx, &cmd_ptr, &buf, NULL)) {
1613                 d_printf("altname <file>\n");
1614                 return 1;
1615         }
1616         name = talloc_asprintf_append(name, "%s", buf);
1617         if (!name) {
1618                 return 1;
1619         }
1620         do_altname(name);
1621         return 0;
1622 }
1623
1624 static char *attr_str(TALLOC_CTX *mem_ctx, uint16_t mode)
1625 {
1626         char *attrs = talloc_zero_array(mem_ctx, char, 17);
1627         int i = 0;
1628
1629         if (!(mode & FILE_ATTRIBUTE_NORMAL)) {
1630                 if (mode & FILE_ATTRIBUTE_ENCRYPTED) {
1631                         attrs[i++] = 'E';
1632                 }
1633                 if (mode & FILE_ATTRIBUTE_NONINDEXED) {
1634                         attrs[i++] = 'N';
1635                 }
1636                 if (mode & FILE_ATTRIBUTE_OFFLINE) {
1637                         attrs[i++] = 'O';
1638                 }
1639                 if (mode & FILE_ATTRIBUTE_COMPRESSED) {
1640                         attrs[i++] = 'C';
1641                 }
1642                 if (mode & FILE_ATTRIBUTE_REPARSE_POINT) {
1643                         attrs[i++] = 'r';
1644                 }
1645                 if (mode & FILE_ATTRIBUTE_SPARSE) {
1646                         attrs[i++] = 's';
1647                 }
1648                 if (mode & FILE_ATTRIBUTE_TEMPORARY) {
1649                         attrs[i++] = 'T';
1650                 }
1651                 if (mode & FILE_ATTRIBUTE_NORMAL) {
1652                         attrs[i++] = 'N';
1653                 }
1654                 if (mode & FILE_ATTRIBUTE_READONLY) {
1655                         attrs[i++] = 'R';
1656                 }
1657                 if (mode & FILE_ATTRIBUTE_HIDDEN) {
1658                         attrs[i++] = 'H';
1659                 }
1660                 if (mode & FILE_ATTRIBUTE_SYSTEM) {
1661                         attrs[i++] = 'S';
1662                 }
1663                 if (mode & FILE_ATTRIBUTE_DIRECTORY) {
1664                         attrs[i++] = 'D';
1665                 }
1666                 if (mode & FILE_ATTRIBUTE_ARCHIVE) {
1667                         attrs[i++] = 'A';
1668                 }
1669         }
1670         return attrs;
1671 }
1672
1673 /****************************************************************************
1674  Show all info we can get
1675 ****************************************************************************/
1676
1677 static int do_allinfo(const char *name)
1678 {
1679         fstring altname;
1680         struct timespec b_time, a_time, m_time, c_time;
1681         SMB_OFF_T size;
1682         uint16_t mode;
1683         SMB_INO_T ino;
1684         NTTIME tmp;
1685         uint16_t fnum;
1686         unsigned int num_streams;
1687         struct stream_struct *streams;
1688         int num_snapshots;
1689         char **snapshots;
1690         unsigned int i;
1691         NTSTATUS status;
1692
1693         status = cli_qpathinfo_alt_name(cli, name, altname);
1694         if (!NT_STATUS_IS_OK(status)) {
1695                 d_printf("%s getting alt name for %s\n", nt_errstr(status),
1696                          name);
1697                 return false;
1698         }
1699         d_printf("altname: %s\n", altname);
1700
1701         status = cli_qpathinfo2(cli, name, &b_time, &a_time, &m_time, &c_time,
1702                                 &size, &mode, &ino);
1703         if (!NT_STATUS_IS_OK(status)) {
1704                 d_printf("%s getting pathinfo for %s\n", nt_errstr(status),
1705                          name);
1706                 return false;
1707         }
1708
1709         unix_timespec_to_nt_time(&tmp, b_time);
1710         d_printf("create_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1711
1712         unix_timespec_to_nt_time(&tmp, a_time);
1713         d_printf("access_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1714
1715         unix_timespec_to_nt_time(&tmp, m_time);
1716         d_printf("write_time:     %s\n", nt_time_string(talloc_tos(), tmp));
1717
1718         unix_timespec_to_nt_time(&tmp, c_time);
1719         d_printf("change_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1720
1721         d_printf("attributes: %s (%x)\n", attr_str(talloc_tos(), mode), mode);
1722
1723         status = cli_qpathinfo_streams(cli, name, talloc_tos(), &num_streams,
1724                                        &streams);
1725         if (!NT_STATUS_IS_OK(status)) {
1726                 d_printf("%s getting streams for %s\n", nt_errstr(status),
1727                          name);
1728                 return false;
1729         }
1730
1731         for (i=0; i<num_streams; i++) {
1732                 d_printf("stream: [%s], %lld bytes\n", streams[i].name,
1733                          (unsigned long long)streams[i].size);
1734         }
1735
1736         if (mode & FILE_ATTRIBUTE_REPARSE_POINT) {
1737                 char *subst, *print;
1738                 uint32_t flags;
1739
1740                 status = cli_readlink(cli, name, talloc_tos(), &subst, &print,
1741                                       &flags);
1742                 if (!NT_STATUS_IS_OK(status)) {
1743                         d_fprintf(stderr, "cli_readlink returned %s\n",
1744                                   nt_errstr(status));
1745                 } else {
1746                         d_printf("symlink: subst=[%s], print=[%s], flags=%x\n",
1747                                  subst, print, flags);
1748                         TALLOC_FREE(subst);
1749                         TALLOC_FREE(print);
1750                 }
1751         }
1752
1753         status = cli_ntcreate(cli, name, 0,
1754                               CREATE_ACCESS_READ, 0,
1755                               FILE_SHARE_READ|FILE_SHARE_WRITE
1756                               |FILE_SHARE_DELETE,
1757                               FILE_OPEN, 0x0, 0x0, &fnum);
1758         if (!NT_STATUS_IS_OK(status)) {
1759                 /*
1760                  * Ignore failure, it does not hurt if we can't list
1761                  * snapshots
1762                  */
1763                 return 0;
1764         }
1765         status = cli_shadow_copy_data(talloc_tos(), cli, fnum,
1766                                       true, &snapshots, &num_snapshots);
1767         if (!NT_STATUS_IS_OK(status)) {
1768                 cli_close(cli, fnum);
1769                 return 0;
1770         }
1771
1772         for (i=0; i<num_snapshots; i++) {
1773                 char *snap_name;
1774
1775                 d_printf("%s\n", snapshots[i]);
1776                 snap_name = talloc_asprintf(talloc_tos(), "%s%s",
1777                                             snapshots[i], name);
1778                 status = cli_qpathinfo2(cli, snap_name, &b_time, &a_time,
1779                                         &m_time, &c_time, &size,
1780                                         NULL, NULL);
1781                 if (!NT_STATUS_IS_OK(status)) {
1782                         d_fprintf(stderr, "pathinfo(%s) failed: %s\n",
1783                                   snap_name, nt_errstr(status));
1784                         TALLOC_FREE(snap_name);
1785                         continue;
1786                 }
1787                 unix_timespec_to_nt_time(&tmp, b_time);
1788                 d_printf("create_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1789                 unix_timespec_to_nt_time(&tmp, a_time);
1790                 d_printf("access_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1791                 unix_timespec_to_nt_time(&tmp, m_time);
1792                 d_printf("write_time:     %s\n", nt_time_string(talloc_tos(), tmp));
1793                 unix_timespec_to_nt_time(&tmp, c_time);
1794                 d_printf("change_time:    %s\n", nt_time_string(talloc_tos(), tmp));
1795                 d_printf("size: %d\n", (int)size);
1796         }
1797
1798         TALLOC_FREE(snapshots);
1799
1800         return 0;
1801 }
1802
1803 /****************************************************************************
1804  Show all info we can get
1805 ****************************************************************************/
1806
1807 static int cmd_allinfo(void)
1808 {
1809         TALLOC_CTX *ctx = talloc_tos();
1810         char *name;
1811         char *buf;
1812
1813         name = talloc_strdup(ctx, client_get_cur_dir());
1814         if (!name) {
1815                 return 1;
1816         }
1817
1818         if (!next_token_talloc(ctx, &cmd_ptr, &buf, NULL)) {
1819                 d_printf("allinfo <file>\n");
1820                 return 1;
1821         }
1822         name = talloc_asprintf_append(name, "%s", buf);
1823         if (!name) {
1824                 return 1;
1825         }
1826
1827         do_allinfo(name);
1828
1829         return 0;
1830 }
1831
1832 /****************************************************************************
1833  Put a single file.
1834 ****************************************************************************/
1835
1836 static int do_put(const char *rname, const char *lname, bool reput)
1837 {
1838         TALLOC_CTX *ctx = talloc_tos();
1839         uint16_t fnum;
1840         XFILE *f;
1841         SMB_OFF_T start = 0;
1842         int rc = 0;
1843         struct timespec tp_start;
1844         struct cli_state *targetcli;
1845         char *targetname = NULL;
1846         struct push_state state;
1847         NTSTATUS status;
1848
1849         status = cli_resolve_path(ctx, "", auth_info, cli, rname,
1850                                   &targetcli, &targetname);
1851         if (!NT_STATUS_IS_OK(status)) {
1852                 d_printf("Failed to open %s: %s\n", rname, nt_errstr(status));
1853                 return 1;
1854         }
1855
1856         clock_gettime_mono(&tp_start);
1857
1858         if (reput) {
1859                 status = cli_open(targetcli, targetname, O_RDWR|O_CREAT, DENY_NONE, &fnum);
1860                 if (NT_STATUS_IS_OK(status)) {
1861                         if (!NT_STATUS_IS_OK(status = cli_qfileinfo_basic(
1862                                                      targetcli, fnum, NULL,
1863                                                      &start, NULL, NULL,
1864                                                      NULL, NULL, NULL)) &&
1865                             !NT_STATUS_IS_OK(status = cli_getattrE(
1866                                                      targetcli, fnum, NULL,
1867                                                      &start, NULL, NULL,
1868                                                      NULL))) {
1869                                 d_printf("getattrib: %s\n", nt_errstr(status));
1870                                 return 1;
1871                         }
1872                 }
1873         } else {
1874                 status = cli_open(targetcli, targetname, O_RDWR|O_CREAT|O_TRUNC, DENY_NONE, &fnum);
1875         }
1876
1877         if (!NT_STATUS_IS_OK(status)) {
1878                 d_printf("%s opening remote file %s\n", nt_errstr(status),
1879                          rname);
1880                 return 1;
1881         }
1882
1883         /* allow files to be piped into smbclient
1884            jdblair 24.jun.98
1885
1886            Note that in this case this function will exit(0) rather
1887            than returning. */
1888         if (!strcmp(lname, "-")) {
1889                 f = x_stdin;
1890                 /* size of file is not known */
1891         } else {
1892                 f = x_fopen(lname,O_RDONLY, 0);
1893                 if (f && reput) {
1894                         if (x_tseek(f, start, SEEK_SET) == -1) {
1895                                 d_printf("Error seeking local file\n");
1896                                 x_fclose(f);
1897                                 return 1;
1898                         }
1899                 }
1900         }
1901
1902         if (!f) {
1903                 d_printf("Error opening local file %s\n",lname);
1904                 return 1;
1905         }
1906
1907         DEBUG(1,("putting file %s as %s ",lname,
1908                  rname));
1909
1910         x_setvbuf(f, NULL, X_IOFBF, io_bufsize);
1911
1912         state.f = f;
1913         state.nread = 0;
1914
1915         status = cli_push(targetcli, fnum, 0, 0, io_bufsize, push_source,
1916                           &state);
1917         if (!NT_STATUS_IS_OK(status)) {
1918                 d_fprintf(stderr, "cli_push returned %s\n", nt_errstr(status));
1919                 rc = 1;
1920         }
1921
1922         status = cli_close(targetcli, fnum);
1923         if (!NT_STATUS_IS_OK(status)) {
1924                 d_printf("%s closing remote file %s\n", nt_errstr(status),
1925                          rname);
1926                 if (f != x_stdin) {
1927                         x_fclose(f);
1928                 }
1929                 return 1;
1930         }
1931
1932         if (f != x_stdin) {
1933                 x_fclose(f);
1934         }
1935
1936         {
1937                 struct timespec tp_end;
1938                 int this_time;
1939
1940                 clock_gettime_mono(&tp_end);
1941                 this_time = nsec_time_diff(&tp_end,&tp_start)/1000000;
1942                 put_total_time_ms += this_time;
1943                 put_total_size += state.nread;
1944
1945                 DEBUG(1,("(%3.1f kb/s) (average %3.1f kb/s)\n",
1946                          state.nread / (1.024*this_time + 1.0e-4),
1947                          put_total_size / (1.024*put_total_time_ms)));
1948         }
1949
1950         if (f == x_stdin) {
1951                 cli_shutdown(cli);
1952                 exit(rc);
1953         }
1954
1955         return rc;
1956 }
1957
1958 /****************************************************************************
1959  Put a file.
1960 ****************************************************************************/
1961
1962 static int cmd_put(void)
1963 {
1964         TALLOC_CTX *ctx = talloc_tos();
1965         char *lname;
1966         char *rname;
1967         char *buf;
1968
1969         rname = talloc_strdup(ctx, client_get_cur_dir());
1970         if (!rname) {
1971                 return 1;
1972         }
1973
1974         if (!next_token_talloc(ctx, &cmd_ptr,&lname,NULL)) {
1975                 d_printf("put <filename>\n");
1976                 return 1;
1977         }
1978
1979         if (next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
1980                 rname = talloc_asprintf_append(rname, "%s", buf);
1981         } else {
1982                 rname = talloc_asprintf_append(rname, "%s", lname);
1983         }
1984         if (!rname) {
1985                 return 1;
1986         }
1987
1988         rname = clean_name(ctx, rname);
1989         if (!rname) {
1990                 return 1;
1991         }
1992
1993         {
1994                 SMB_STRUCT_STAT st;
1995                 /* allow '-' to represent stdin
1996                    jdblair, 24.jun.98 */
1997                 if (!file_exist_stat(lname, &st, false) &&
1998                     (strcmp(lname,"-"))) {
1999                         d_printf("%s does not exist\n",lname);
2000                         return 1;
2001                 }
2002         }
2003
2004         return do_put(rname, lname, false);
2005 }
2006
2007 /*************************************
2008  File list structure.
2009 *************************************/
2010
2011 static struct file_list {
2012         struct file_list *prev, *next;
2013         char *file_path;
2014         bool isdir;
2015 } *file_list;
2016
2017 /****************************************************************************
2018  Free a file_list structure.
2019 ****************************************************************************/
2020
2021 static void free_file_list (struct file_list *l_head)
2022 {
2023         struct file_list *list, *next;
2024
2025         for (list = l_head; list; list = next) {
2026                 next = list->next;
2027                 DLIST_REMOVE(l_head, list);
2028                 SAFE_FREE(list->file_path);
2029                 SAFE_FREE(list);
2030         }
2031 }
2032
2033 /****************************************************************************
2034  Seek in a directory/file list until you get something that doesn't start with
2035  the specified name.
2036 ****************************************************************************/
2037
2038 static bool seek_list(struct file_list *list, char *name)
2039 {
2040         while (list) {
2041                 trim_string(list->file_path,"./","\n");
2042                 if (strncmp(list->file_path, name, strlen(name)) != 0) {
2043                         return true;
2044                 }
2045                 list = list->next;
2046         }
2047
2048         return false;
2049 }
2050
2051 /****************************************************************************
2052  Set the file selection mask.
2053 ****************************************************************************/
2054
2055 static int cmd_select(void)
2056 {
2057         TALLOC_CTX *ctx = talloc_tos();
2058         char *new_fs = NULL;
2059         next_token_talloc(ctx, &cmd_ptr,&new_fs,NULL)
2060                 ;
2061         if (new_fs) {
2062                 client_set_fileselection(new_fs);
2063         } else {
2064                 client_set_fileselection("");
2065         }
2066         return 0;
2067 }
2068
2069 /****************************************************************************
2070   Recursive file matching function act as find
2071   match must be always set to true when calling this function
2072 ****************************************************************************/
2073
2074 static int file_find(struct file_list **list, const char *directory,
2075                       const char *expression, bool match)
2076 {
2077         SMB_STRUCT_DIR *dir;
2078         struct file_list *entry;
2079         struct stat statbuf;
2080         int ret;
2081         char *path;
2082         bool isdir;
2083         const char *dname;
2084
2085         dir = sys_opendir(directory);
2086         if (!dir)
2087                 return -1;
2088
2089         while ((dname = readdirname(dir))) {
2090                 if (!strcmp("..", dname))
2091                         continue;
2092                 if (!strcmp(".", dname))
2093                         continue;
2094
2095                 if (asprintf(&path, "%s/%s", directory, dname) <= 0) {
2096                         continue;
2097                 }
2098
2099                 isdir = false;
2100                 if (!match || !gen_fnmatch(expression, dname)) {
2101                         if (recurse) {
2102                                 ret = stat(path, &statbuf);
2103                                 if (ret == 0) {
2104                                         if (S_ISDIR(statbuf.st_mode)) {
2105                                                 isdir = true;
2106                                                 ret = file_find(list, path, expression, false);
2107                                         }
2108                                 } else {
2109                                         d_printf("file_find: cannot stat file %s\n", path);
2110                                 }
2111
2112                                 if (ret == -1) {
2113                                         SAFE_FREE(path);
2114                                         sys_closedir(dir);
2115                                         return -1;
2116                                 }
2117                         }
2118                         entry = SMB_MALLOC_P(struct file_list);
2119                         if (!entry) {
2120                                 d_printf("Out of memory in file_find\n");
2121                                 sys_closedir(dir);
2122                                 return -1;
2123                         }
2124                         entry->file_path = path;
2125                         entry->isdir = isdir;
2126                         DLIST_ADD(*list, entry);
2127                 } else {
2128                         SAFE_FREE(path);
2129                 }
2130         }
2131
2132         sys_closedir(dir);
2133         return 0;
2134 }
2135
2136 /****************************************************************************
2137  mput some files.
2138 ****************************************************************************/
2139
2140 static int cmd_mput(void)
2141 {
2142         TALLOC_CTX *ctx = talloc_tos();
2143         char *p = NULL;
2144
2145         while (next_token_talloc(ctx, &cmd_ptr,&p,NULL)) {
2146                 int ret;
2147                 struct file_list *temp_list;
2148                 char *quest, *lname, *rname;
2149
2150                 file_list = NULL;
2151
2152                 ret = file_find(&file_list, ".", p, true);
2153                 if (ret) {
2154                         free_file_list(file_list);
2155                         continue;
2156                 }
2157
2158                 quest = NULL;
2159                 lname = NULL;
2160                 rname = NULL;
2161
2162                 for (temp_list = file_list; temp_list;
2163                      temp_list = temp_list->next) {
2164
2165                         SAFE_FREE(lname);
2166                         if (asprintf(&lname, "%s/", temp_list->file_path) <= 0) {
2167                                 continue;
2168                         }
2169                         trim_string(lname, "./", "/");
2170
2171                         /* check if it's a directory */
2172                         if (temp_list->isdir) {
2173                                 /* if (!recurse) continue; */
2174
2175                                 SAFE_FREE(quest);
2176                                 if (asprintf(&quest, "Put directory %s? ", lname) < 0) {
2177                                         break;
2178                                 }
2179                                 if (prompt && !yesno(quest)) { /* No */
2180                                         /* Skip the directory */
2181                                         lname[strlen(lname)-1] = '/';
2182                                         if (!seek_list(temp_list, lname))
2183                                                 break;
2184                                 } else { /* Yes */
2185                                         SAFE_FREE(rname);
2186                                         if(asprintf(&rname, "%s%s", client_get_cur_dir(), lname) < 0) {
2187                                                 break;
2188                                         }
2189                                         normalize_name(rname);
2190                                         if (!NT_STATUS_IS_OK(cli_chkpath(cli, rname)) &&
2191                                             !do_mkdir(rname)) {
2192                                                 DEBUG (0, ("Unable to make dir, skipping..."));
2193                                                 /* Skip the directory */
2194                                                 lname[strlen(lname)-1] = '/';
2195                                                 if (!seek_list(temp_list, lname)) {
2196                                                         break;
2197                                                 }
2198                                         }
2199                                 }
2200                                 continue;
2201                         } else {
2202                                 SAFE_FREE(quest);
2203                                 if (asprintf(&quest,"Put file %s? ", lname) < 0) {
2204                                         break;
2205                                 }
2206                                 if (prompt && !yesno(quest)) {
2207                                         /* No */
2208                                         continue;
2209                                 }
2210
2211                                 /* Yes */
2212                                 SAFE_FREE(rname);
2213                                 if (asprintf(&rname, "%s%s", client_get_cur_dir(), lname) < 0) {
2214                                         break;
2215                                 }
2216                         }
2217
2218                         normalize_name(rname);
2219
2220                         do_put(rname, lname, false);
2221                 }
2222                 free_file_list(file_list);
2223                 SAFE_FREE(quest);
2224                 SAFE_FREE(lname);
2225                 SAFE_FREE(rname);
2226         }
2227
2228         return 0;
2229 }
2230
2231 /****************************************************************************
2232  Cancel a print job.
2233 ****************************************************************************/
2234
2235 static int do_cancel(int job)
2236 {
2237         if (cli_printjob_del(cli, job)) {
2238                 d_printf("Job %d cancelled\n",job);
2239                 return 0;
2240         } else {
2241                 NTSTATUS status = cli_nt_error(cli);
2242                 d_printf("Error cancelling job %d : %s\n",
2243                          job, nt_errstr(status));
2244                 return 1;
2245         }
2246 }
2247
2248 /****************************************************************************
2249  Cancel a print job.
2250 ****************************************************************************/
2251
2252 static int cmd_cancel(void)
2253 {
2254         TALLOC_CTX *ctx = talloc_tos();
2255         char *buf = NULL;
2256         int job;
2257
2258         if (!next_token_talloc(ctx, &cmd_ptr, &buf,NULL)) {
2259                 d_printf("cancel <jobid> ...\n");
2260                 return 1;
2261         }
2262         do {
2263                 job = atoi(buf);
2264                 do_cancel(job);
2265         } while (next_token_talloc(ctx, &cmd_ptr,&buf,NULL));
2266
2267         return 0;
2268 }
2269
2270 /****************************************************************************
2271  Print a file.
2272 ****************************************************************************/
2273
2274 static int cmd_print(void)
2275 {
2276         TALLOC_CTX *ctx = talloc_tos();
2277         char *lname = NULL;
2278         char *rname = NULL;
2279         char *p = NULL;
2280
2281         if (!next_token_talloc(ctx, &cmd_ptr, &lname,NULL)) {
2282                 d_printf("print <filename>\n");
2283                 return 1;
2284         }
2285
2286         rname = talloc_strdup(ctx, lname);
2287         if (!rname) {
2288                 return 1;
2289         }
2290         p = strrchr_m(rname,'/');
2291         if (p) {
2292                 rname = talloc_asprintf(ctx,
2293                                         "%s-%d",
2294                                         p+1,
2295                                         (int)sys_getpid());
2296         }
2297         if (strequal(lname,"-")) {
2298                 rname = talloc_asprintf(ctx,
2299                                 "stdin-%d",
2300                                 (int)sys_getpid());
2301         }
2302         if (!rname) {
2303                 return 1;
2304         }
2305
2306         return do_put(rname, lname, false);
2307 }
2308
2309 /****************************************************************************
2310  Show a print queue entry.
2311 ****************************************************************************/
2312
2313 static void queue_fn(struct print_job_info *p)
2314 {
2315         d_printf("%-6d   %-9d    %s\n", (int)p->id, (int)p->size, p->name);
2316 }
2317
2318 /****************************************************************************
2319  Show a print queue.
2320 ****************************************************************************/
2321
2322 static int cmd_queue(void)
2323 {
2324         cli_print_queue(cli, queue_fn);
2325         return 0;
2326 }
2327
2328 /****************************************************************************
2329  Delete some files.
2330 ****************************************************************************/
2331
2332 static NTSTATUS do_del(struct cli_state *cli_state, struct file_info *finfo,
2333                    const char *dir)
2334 {
2335         TALLOC_CTX *ctx = talloc_tos();
2336         char *mask = NULL;
2337         NTSTATUS status;
2338
2339         mask = talloc_asprintf(ctx,
2340                                 "%s%c%s",
2341                                 dir,
2342                                 CLI_DIRSEP_CHAR,
2343                                 finfo->name);
2344         if (!mask) {
2345                 return NT_STATUS_NO_MEMORY;
2346         }
2347
2348         if (finfo->mode & FILE_ATTRIBUTE_DIRECTORY) {
2349                 TALLOC_FREE(mask);
2350                 return NT_STATUS_OK;
2351         }
2352
2353         status = cli_unlink(cli_state, mask, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2354         if (!NT_STATUS_IS_OK(status)) {
2355                 d_printf("%s deleting remote file %s\n",
2356                          nt_errstr(status), mask);
2357         }
2358         TALLOC_FREE(mask);
2359         return status;
2360 }
2361
2362 /****************************************************************************
2363  Delete some files.
2364 ****************************************************************************/
2365
2366 static int cmd_del(void)
2367 {
2368         TALLOC_CTX *ctx = talloc_tos();
2369         char *mask = NULL;
2370         char *buf = NULL;
2371         NTSTATUS status = NT_STATUS_OK;
2372         uint16 attribute = FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN;
2373
2374         if (recurse) {
2375                 attribute |= FILE_ATTRIBUTE_DIRECTORY;
2376         }
2377
2378         mask = talloc_strdup(ctx, client_get_cur_dir());
2379         if (!mask) {
2380                 return 1;
2381         }
2382         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2383                 d_printf("del <filename>\n");
2384                 return 1;
2385         }
2386         mask = talloc_asprintf_append(mask, "%s", buf);
2387         if (!mask) {
2388                 return 1;
2389         }
2390
2391         status = do_list(mask,attribute,do_del,false,false);
2392         if (!NT_STATUS_IS_OK(status)) {
2393                 return 1;
2394         }
2395         return 0;
2396 }
2397
2398 /****************************************************************************
2399  Wildcard delete some files.
2400 ****************************************************************************/
2401
2402 static int cmd_wdel(void)
2403 {
2404         TALLOC_CTX *ctx = talloc_tos();
2405         char *mask = NULL;
2406         char *buf = NULL;
2407         uint16 attribute;
2408         struct cli_state *targetcli;
2409         char *targetname = NULL;
2410         NTSTATUS status;
2411
2412         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2413                 d_printf("wdel 0x<attrib> <wcard>\n");
2414                 return 1;
2415         }
2416
2417         attribute = (uint16)strtol(buf, (char **)NULL, 16);
2418
2419         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2420                 d_printf("wdel 0x<attrib> <wcard>\n");
2421                 return 1;
2422         }
2423
2424         mask = talloc_asprintf(ctx, "%s%s",
2425                         client_get_cur_dir(),
2426                         buf);
2427         if (!mask) {
2428                 return 1;
2429         }
2430
2431         status = cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli,
2432                                   &targetname);
2433         if (!NT_STATUS_IS_OK(status)) {
2434                 d_printf("cmd_wdel %s: %s\n", mask, nt_errstr(status));
2435                 return 1;
2436         }
2437
2438         status = cli_unlink(targetcli, targetname, attribute);
2439         if (!NT_STATUS_IS_OK(status)) {
2440                 d_printf("%s deleting remote files %s\n", nt_errstr(status),
2441                          targetname);
2442         }
2443         return 0;
2444 }
2445
2446 /****************************************************************************
2447 ****************************************************************************/
2448
2449 static int cmd_open(void)
2450 {
2451         TALLOC_CTX *ctx = talloc_tos();
2452         char *mask = NULL;
2453         char *buf = NULL;
2454         char *targetname = NULL;
2455         struct cli_state *targetcli;
2456         uint16_t fnum = (uint16_t)-1;
2457         NTSTATUS status;
2458
2459         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2460                 d_printf("open <filename>\n");
2461                 return 1;
2462         }
2463         mask = talloc_asprintf(ctx,
2464                         "%s%s",
2465                         client_get_cur_dir(),
2466                         buf);
2467         if (!mask) {
2468                 return 1;
2469         }
2470
2471         status = cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli,
2472                                   &targetname);
2473         if (!NT_STATUS_IS_OK(status)) {
2474                 d_printf("open %s: %s\n", mask, nt_errstr(status));
2475                 return 1;
2476         }
2477
2478         status = cli_ntcreate(targetcli, targetname, 0,
2479                         FILE_READ_DATA|FILE_WRITE_DATA, 0,
2480                         FILE_SHARE_READ|FILE_SHARE_WRITE, FILE_OPEN,
2481                         0x0, 0x0, &fnum);
2482         if (!NT_STATUS_IS_OK(status)) {
2483                 status = cli_ntcreate(targetcli, targetname, 0,
2484                                 FILE_READ_DATA, 0,
2485                                 FILE_SHARE_READ|FILE_SHARE_WRITE, FILE_OPEN,
2486                                 0x0, 0x0, &fnum);
2487                 if (NT_STATUS_IS_OK(status)) {
2488                         d_printf("open file %s: for read/write fnum %d\n", targetname, fnum);
2489                 } else {
2490                         d_printf("Failed to open file %s. %s\n",
2491                                  targetname, nt_errstr(status));
2492                 }
2493         } else {
2494                 d_printf("open file %s: for read/write fnum %d\n", targetname, fnum);
2495         }
2496         return 0;
2497 }
2498
2499 static int cmd_posix_encrypt(void)
2500 {
2501         TALLOC_CTX *ctx = talloc_tos();
2502         NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
2503
2504         if (cli->use_kerberos) {
2505                 status = cli_gss_smb_encryption_start(cli);
2506         } else {
2507                 char *domain = NULL;
2508                 char *user = NULL;
2509                 char *password = NULL;
2510
2511                 if (!next_token_talloc(ctx, &cmd_ptr,&domain,NULL)) {
2512                         d_printf("posix_encrypt domain user password\n");
2513                         return 1;
2514                 }
2515
2516                 if (!next_token_talloc(ctx, &cmd_ptr,&user,NULL)) {
2517                         d_printf("posix_encrypt domain user password\n");
2518                         return 1;
2519                 }
2520
2521                 if (!next_token_talloc(ctx, &cmd_ptr,&password,NULL)) {
2522                         d_printf("posix_encrypt domain user password\n");
2523                         return 1;
2524                 }
2525
2526                 status = cli_raw_ntlm_smb_encryption_start(cli,
2527                                                         user,
2528                                                         password,
2529                                                         domain);
2530         }
2531
2532         if (!NT_STATUS_IS_OK(status)) {
2533                 d_printf("posix_encrypt failed with error %s\n", nt_errstr(status));
2534         } else {
2535                 d_printf("encryption on\n");
2536                 smb_encrypt = true;
2537         }
2538
2539         return 0;
2540 }
2541
2542 /****************************************************************************
2543 ****************************************************************************/
2544
2545 static int cmd_posix_open(void)
2546 {
2547         TALLOC_CTX *ctx = talloc_tos();
2548         char *mask = NULL;
2549         char *buf = NULL;
2550         char *targetname = NULL;
2551         struct cli_state *targetcli;
2552         mode_t mode;
2553         uint16_t fnum;
2554         NTSTATUS status;
2555
2556         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2557                 d_printf("posix_open <filename> 0<mode>\n");
2558                 return 1;
2559         }
2560         mask = talloc_asprintf(ctx,
2561                         "%s%s",
2562                         client_get_cur_dir(),
2563                         buf);
2564         if (!mask) {
2565                 return 1;
2566         }
2567
2568         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2569                 d_printf("posix_open <filename> 0<mode>\n");
2570                 return 1;
2571         }
2572         mode = (mode_t)strtol(buf, (char **)NULL, 8);
2573
2574         status = cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli,
2575                                   &targetname);
2576         if (!NT_STATUS_IS_OK(status)) {
2577                 d_printf("posix_open %s: %s\n", mask, nt_errstr(status));
2578                 return 1;
2579         }
2580
2581         status = cli_posix_open(targetcli, targetname, O_CREAT|O_RDWR, mode,
2582                                 &fnum);
2583         if (!NT_STATUS_IS_OK(status)) {
2584                 status = cli_posix_open(targetcli, targetname,
2585                                         O_CREAT|O_RDONLY, mode, &fnum);
2586                 if (!NT_STATUS_IS_OK(status)) {
2587                         d_printf("Failed to open file %s. %s\n", targetname,
2588                                  nt_errstr(status));
2589                 } else {
2590                         d_printf("posix_open file %s: for readonly fnum %d\n",
2591                                  targetname, fnum);
2592                 }
2593         } else {
2594                 d_printf("posix_open file %s: for read/write fnum %d\n",
2595                          targetname, fnum);
2596         }
2597
2598         return 0;
2599 }
2600
2601 static int cmd_posix_mkdir(void)
2602 {
2603         TALLOC_CTX *ctx = talloc_tos();
2604         char *mask = NULL;
2605         char *buf = NULL;
2606         char *targetname = NULL;
2607         struct cli_state *targetcli;
2608         mode_t mode;
2609         NTSTATUS status;
2610
2611         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2612                 d_printf("posix_mkdir <filename> 0<mode>\n");
2613                 return 1;
2614         }
2615         mask = talloc_asprintf(ctx,
2616                         "%s%s",
2617                         client_get_cur_dir(),
2618                         buf);
2619         if (!mask) {
2620                 return 1;
2621         }
2622
2623         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2624                 d_printf("posix_mkdir <filename> 0<mode>\n");
2625                 return 1;
2626         }
2627         mode = (mode_t)strtol(buf, (char **)NULL, 8);
2628
2629         status = cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli,
2630                                   &targetname);
2631         if (!NT_STATUS_IS_OK(status)) {
2632                 d_printf("posix_mkdir %s: %s\n", mask, nt_errstr(status));
2633                 return 1;
2634         }
2635
2636         status = cli_posix_mkdir(targetcli, targetname, mode);
2637         if (!NT_STATUS_IS_OK(status)) {
2638                 d_printf("Failed to open file %s. %s\n",
2639                          targetname, nt_errstr(status));
2640         } else {
2641                 d_printf("posix_mkdir created directory %s\n", targetname);
2642         }
2643         return 0;
2644 }
2645
2646 static int cmd_posix_unlink(void)
2647 {
2648         TALLOC_CTX *ctx = talloc_tos();
2649         char *mask = NULL;
2650         char *buf = NULL;
2651         char *targetname = NULL;
2652         struct cli_state *targetcli;
2653         NTSTATUS status;
2654
2655         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2656                 d_printf("posix_unlink <filename>\n");
2657                 return 1;
2658         }
2659         mask = talloc_asprintf(ctx,
2660                         "%s%s",
2661                         client_get_cur_dir(),
2662                         buf);
2663         if (!mask) {
2664                 return 1;
2665         }
2666
2667         status = cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli,
2668                                   &targetname);
2669         if (!NT_STATUS_IS_OK(status)) {
2670                 d_printf("posix_unlink %s: %s\n", mask, nt_errstr(status));
2671                 return 1;
2672         }
2673
2674         status = cli_posix_unlink(targetcli, targetname);
2675         if (!NT_STATUS_IS_OK(status)) {
2676                 d_printf("Failed to unlink file %s. %s\n",
2677                          targetname, nt_errstr(status));
2678         } else {
2679                 d_printf("posix_unlink deleted file %s\n", targetname);
2680         }
2681
2682         return 0;
2683 }
2684
2685 static int cmd_posix_rmdir(void)
2686 {
2687         TALLOC_CTX *ctx = talloc_tos();
2688         char *mask = NULL;
2689         char *buf = NULL;
2690         char *targetname = NULL;
2691         struct cli_state *targetcli;
2692         NTSTATUS status;
2693
2694         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2695                 d_printf("posix_rmdir <filename>\n");
2696                 return 1;
2697         }
2698         mask = talloc_asprintf(ctx,
2699                         "%s%s",
2700                         client_get_cur_dir(),
2701                         buf);
2702         if (!mask) {
2703                 return 1;
2704         }
2705
2706         status = cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli,
2707                                   &targetname);
2708         if (!NT_STATUS_IS_OK(status)) {
2709                 d_printf("posix_rmdir %s: %s\n", mask, nt_errstr(status));
2710                 return 1;
2711         }
2712
2713         status = cli_posix_rmdir(targetcli, targetname);
2714         if (!NT_STATUS_IS_OK(status)) {
2715                 d_printf("Failed to unlink directory %s. %s\n",
2716                          targetname, nt_errstr(status));
2717         } else {
2718                 d_printf("posix_rmdir deleted directory %s\n", targetname);
2719         }
2720
2721         return 0;
2722 }
2723
2724 static int cmd_close(void)
2725 {
2726         TALLOC_CTX *ctx = talloc_tos();
2727         char *buf = NULL;
2728         int fnum;
2729         NTSTATUS status;
2730
2731         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2732                 d_printf("close <fnum>\n");
2733                 return 1;
2734         }
2735
2736         fnum = atoi(buf);
2737         /* We really should use the targetcli here.... */
2738         status = cli_close(cli, fnum);
2739         if (!NT_STATUS_IS_OK(status)) {
2740                 d_printf("close %d: %s\n", fnum, nt_errstr(status));
2741                 return 1;
2742         }
2743         return 0;
2744 }
2745
2746 static int cmd_posix(void)
2747 {
2748         TALLOC_CTX *ctx = talloc_tos();
2749         uint16 major, minor;
2750         uint32 caplow, caphigh;
2751         char *caps;
2752         NTSTATUS status;
2753
2754         if (!SERVER_HAS_UNIX_CIFS(cli)) {
2755                 d_printf("Server doesn't support UNIX CIFS extensions.\n");
2756                 return 1;
2757         }
2758
2759         status = cli_unix_extensions_version(cli, &major, &minor, &caplow,
2760                                              &caphigh);
2761         if (!NT_STATUS_IS_OK(status)) {
2762                 d_printf("Can't get UNIX CIFS extensions version from "
2763                          "server: %s\n", nt_errstr(status));
2764                 return 1;
2765         }
2766
2767         d_printf("Server supports CIFS extensions %u.%u\n", (unsigned int)major, (unsigned int)minor);
2768
2769         caps = talloc_strdup(ctx, "");
2770         if (!caps) {
2771                 return 1;
2772         }
2773         if (caplow & CIFS_UNIX_FCNTL_LOCKS_CAP) {
2774                 caps = talloc_asprintf_append(caps, "locks ");
2775                 if (!caps) {
2776                         return 1;
2777                 }
2778         }
2779         if (caplow & CIFS_UNIX_POSIX_ACLS_CAP) {
2780                 caps = talloc_asprintf_append(caps, "acls ");
2781                 if (!caps) {
2782                         return 1;
2783                 }
2784         }
2785         if (caplow & CIFS_UNIX_XATTTR_CAP) {
2786                 caps = talloc_asprintf_append(caps, "eas ");
2787                 if (!caps) {
2788                         return 1;
2789                 }
2790         }
2791         if (caplow & CIFS_UNIX_POSIX_PATHNAMES_CAP) {
2792                 caps = talloc_asprintf_append(caps, "pathnames ");
2793                 if (!caps) {
2794                         return 1;
2795                 }
2796         }
2797         if (caplow & CIFS_UNIX_POSIX_PATH_OPERATIONS_CAP) {
2798                 caps = talloc_asprintf_append(caps, "posix_path_operations ");
2799                 if (!caps) {
2800                         return 1;
2801                 }
2802         }
2803         if (caplow & CIFS_UNIX_LARGE_READ_CAP) {
2804                 caps = talloc_asprintf_append(caps, "large_read ");
2805                 if (!caps) {
2806                         return 1;
2807                 }
2808         }
2809         if (caplow & CIFS_UNIX_LARGE_WRITE_CAP) {
2810                 caps = talloc_asprintf_append(caps, "large_write ");
2811                 if (!caps) {
2812                         return 1;
2813                 }
2814         }
2815         if (caplow & CIFS_UNIX_TRANSPORT_ENCRYPTION_CAP) {
2816                 caps = talloc_asprintf_append(caps, "posix_encrypt ");
2817                 if (!caps) {
2818                         return 1;
2819                 }
2820         }
2821         if (caplow & CIFS_UNIX_TRANSPORT_ENCRYPTION_MANDATORY_CAP) {
2822                 caps = talloc_asprintf_append(caps, "mandatory_posix_encrypt ");
2823                 if (!caps) {
2824                         return 1;
2825                 }
2826         }
2827
2828         if (*caps && caps[strlen(caps)-1] == ' ') {
2829                 caps[strlen(caps)-1] = '\0';
2830         }
2831
2832         d_printf("Server supports CIFS capabilities %s\n", caps);
2833
2834         status = cli_set_unix_extensions_capabilities(cli, major, minor,
2835                                                       caplow, caphigh);
2836         if (!NT_STATUS_IS_OK(status)) {
2837                 d_printf("Can't set UNIX CIFS extensions capabilities. %s.\n",
2838                          nt_errstr(status));
2839                 return 1;
2840         }
2841
2842         if (caplow & CIFS_UNIX_POSIX_PATHNAMES_CAP) {
2843                 CLI_DIRSEP_CHAR = '/';
2844                 *CLI_DIRSEP_STR = '/';
2845                 client_set_cur_dir(CLI_DIRSEP_STR);
2846         }
2847
2848         return 0;
2849 }
2850
2851 static int cmd_lock(void)
2852 {
2853         TALLOC_CTX *ctx = talloc_tos();
2854         char *buf = NULL;
2855         uint64_t start, len;
2856         enum brl_type lock_type;
2857         int fnum;
2858         NTSTATUS status;
2859
2860         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2861                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2862                 return 1;
2863         }
2864         fnum = atoi(buf);
2865
2866         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2867                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2868                 return 1;
2869         }
2870
2871         if (*buf == 'r' || *buf == 'R') {
2872                 lock_type = READ_LOCK;
2873         } else if (*buf == 'w' || *buf == 'W') {
2874                 lock_type = WRITE_LOCK;
2875         } else {
2876                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2877                 return 1;
2878         }
2879
2880         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2881                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2882                 return 1;
2883         }
2884
2885         start = (uint64_t)strtol(buf, (char **)NULL, 16);
2886
2887         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2888                 d_printf("lock <fnum> [r|w] <hex-start> <hex-len>\n");
2889                 return 1;
2890         }
2891
2892         len = (uint64_t)strtol(buf, (char **)NULL, 16);
2893
2894         status = cli_posix_lock(cli, fnum, start, len, true, lock_type);
2895         if (!NT_STATUS_IS_OK(status)) {
2896                 d_printf("lock failed %d: %s\n", fnum, nt_errstr(status));
2897         }
2898
2899         return 0;
2900 }
2901
2902 static int cmd_unlock(void)
2903 {
2904         TALLOC_CTX *ctx = talloc_tos();
2905         char *buf = NULL;
2906         uint64_t start, len;
2907         int fnum;
2908         NTSTATUS status;
2909
2910         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2911                 d_printf("unlock <fnum> <hex-start> <hex-len>\n");
2912                 return 1;
2913         }
2914         fnum = atoi(buf);
2915
2916         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2917                 d_printf("unlock <fnum> <hex-start> <hex-len>\n");
2918                 return 1;
2919         }
2920
2921         start = (uint64_t)strtol(buf, (char **)NULL, 16);
2922
2923         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2924                 d_printf("unlock <fnum> <hex-start> <hex-len>\n");
2925                 return 1;
2926         }
2927
2928         len = (uint64_t)strtol(buf, (char **)NULL, 16);
2929
2930         status = cli_posix_unlock(cli, fnum, start, len);
2931         if (!NT_STATUS_IS_OK(status)) {
2932                 d_printf("unlock failed %d: %s\n", fnum, nt_errstr(status));
2933         }
2934
2935         return 0;
2936 }
2937
2938
2939 /****************************************************************************
2940  Remove a directory.
2941 ****************************************************************************/
2942
2943 static int cmd_rmdir(void)
2944 {
2945         TALLOC_CTX *ctx = talloc_tos();
2946         char *mask = NULL;
2947         char *buf = NULL;
2948         char *targetname = NULL;
2949         struct cli_state *targetcli;
2950         NTSTATUS status;
2951
2952         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
2953                 d_printf("rmdir <dirname>\n");
2954                 return 1;
2955         }
2956         mask = talloc_asprintf(ctx,
2957                         "%s%s",
2958                         client_get_cur_dir(),
2959                         buf);
2960         if (!mask) {
2961                 return 1;
2962         }
2963
2964         status = cli_resolve_path(ctx, "", auth_info, cli, mask, &targetcli,
2965                                   &targetname);
2966         if (!NT_STATUS_IS_OK(status)) {
2967                 d_printf("rmdir %s: %s\n", mask, nt_errstr(status));
2968                 return 1;
2969         }
2970
2971         status = cli_rmdir(targetcli, targetname);
2972         if (!NT_STATUS_IS_OK(status)) {
2973                 d_printf("%s removing remote directory file %s\n",
2974                          nt_errstr(status), mask);
2975         }
2976
2977         return 0;
2978 }
2979
2980 /****************************************************************************
2981  UNIX hardlink.
2982 ****************************************************************************/
2983
2984 static int cmd_link(void)
2985 {
2986         TALLOC_CTX *ctx = talloc_tos();
2987         char *oldname = NULL;
2988         char *newname = NULL;
2989         char *buf = NULL;
2990         char *buf2 = NULL;
2991         char *targetname = NULL;
2992         struct cli_state *targetcli;
2993         NTSTATUS status;
2994
2995         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
2996             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
2997                 d_printf("link <oldname> <newname>\n");
2998                 return 1;
2999         }
3000         oldname = talloc_asprintf(ctx,
3001                         "%s%s",
3002                         client_get_cur_dir(),
3003                         buf);
3004         if (!oldname) {
3005                 return 1;
3006         }
3007         newname = talloc_asprintf(ctx,
3008                         "%s%s",
3009                         client_get_cur_dir(),
3010                         buf2);
3011         if (!newname) {
3012                 return 1;
3013         }
3014
3015         status = cli_resolve_path(ctx, "", auth_info, cli, oldname, &targetcli,
3016                                   &targetname);
3017         if (!NT_STATUS_IS_OK(status)) {
3018                 d_printf("link %s: %s\n", oldname, nt_errstr(status));
3019                 return 1;
3020         }
3021
3022         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3023                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3024                 return 1;
3025         }
3026
3027         status = cli_posix_hardlink(targetcli, targetname, newname);
3028         if (!NT_STATUS_IS_OK(status)) {
3029                 d_printf("%s linking files (%s -> %s)\n",
3030                          nt_errstr(status), newname, oldname);
3031                 return 1;
3032         }
3033         return 0;
3034 }
3035
3036 /****************************************************************************
3037  UNIX readlink.
3038 ****************************************************************************/
3039
3040 static int cmd_readlink(void)
3041 {
3042         TALLOC_CTX *ctx = talloc_tos();
3043         char *name= NULL;
3044         char *buf = NULL;
3045         char *targetname = NULL;
3046         char linkname[PATH_MAX+1];
3047         struct cli_state *targetcli;
3048         NTSTATUS status;
3049
3050         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL)) {
3051                 d_printf("readlink <name>\n");
3052                 return 1;
3053         }
3054         name = talloc_asprintf(ctx,
3055                         "%s%s",
3056                         client_get_cur_dir(),
3057                         buf);
3058         if (!name) {
3059                 return 1;
3060         }
3061
3062         status = cli_resolve_path(ctx, "", auth_info, cli, name, &targetcli,
3063                                   &targetname);
3064         if (!NT_STATUS_IS_OK(status)) {
3065                 d_printf("readlink %s: %s\n", name, nt_errstr(status));
3066                 return 1;
3067         }
3068
3069         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3070                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3071                 return 1;
3072         }
3073
3074         status = cli_posix_readlink(targetcli, name, linkname, PATH_MAX+1);
3075         if (!NT_STATUS_IS_OK(status)) {
3076                 d_printf("%s readlink on file %s\n",
3077                          nt_errstr(status), name);
3078                 return 1;
3079         }
3080
3081         d_printf("%s -> %s\n", name, linkname);
3082
3083         return 0;
3084 }
3085
3086
3087 /****************************************************************************
3088  UNIX symlink.
3089 ****************************************************************************/
3090
3091 static int cmd_symlink(void)
3092 {
3093         TALLOC_CTX *ctx = talloc_tos();
3094         char *oldname = NULL;
3095         char *newname = NULL;
3096         char *buf = NULL;
3097         char *buf2 = NULL;
3098         struct cli_state *newcli;
3099         NTSTATUS status;
3100
3101         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3102             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
3103                 d_printf("symlink <oldname> <newname>\n");
3104                 return 1;
3105         }
3106         /* Oldname (link target) must be an untouched blob. */
3107         oldname = buf;
3108
3109         if (SERVER_HAS_UNIX_CIFS(cli)) {
3110                 newname = talloc_asprintf(ctx, "%s%s", client_get_cur_dir(),
3111                                           buf2);
3112                 if (!newname) {
3113                         return 1;
3114                 }
3115                 /* New name must be present in share namespace. */
3116                 status = cli_resolve_path(ctx, "", auth_info, cli, newname,
3117                                           &newcli, &newname);
3118                 if (!NT_STATUS_IS_OK(status)) {
3119                         d_printf("link %s: %s\n", oldname, nt_errstr(status));
3120                         return 1;
3121                 }
3122                 status = cli_posix_symlink(newcli, oldname, newname);
3123         } else {
3124                 status = cli_symlink(
3125                         cli, oldname, buf2,
3126                         buf2[0] == '\\' ? 0 : SYMLINK_FLAG_RELATIVE);
3127         }
3128
3129         if (!NT_STATUS_IS_OK(status)) {
3130                 d_printf("%s symlinking files (%s -> %s)\n",
3131                          nt_errstr(status), oldname, newname);
3132                 return 1;
3133         }
3134
3135         return 0;
3136 }
3137
3138 /****************************************************************************
3139  UNIX chmod.
3140 ****************************************************************************/
3141
3142 static int cmd_chmod(void)
3143 {
3144         TALLOC_CTX *ctx = talloc_tos();
3145         char *src = NULL;
3146         char *buf = NULL;
3147         char *buf2 = NULL;
3148         char *targetname = NULL;
3149         struct cli_state *targetcli;
3150         mode_t mode;
3151         NTSTATUS status;
3152
3153         if (!next_token_talloc(ctx, &cmd_ptr,&buf,NULL) ||
3154             !next_token_talloc(ctx, &cmd_ptr,&buf2,NULL)) {
3155                 d_printf("chmod mode file\n");
3156                 return 1;
3157         }
3158         src = talloc_asprintf(ctx,
3159                         "%s%s",
3160                         client_get_cur_dir(),
3161                         buf2);
3162         if (!src) {
3163                 return 1;
3164         }
3165
3166         mode = (mode_t)strtol(buf, NULL, 8);
3167
3168         status = cli_resolve_path(ctx, "", auth_info, cli, src, &targetcli,
3169                                   &targetname);
3170         if (!NT_STATUS_IS_OK(status)) {
3171                 d_printf("chmod %s: %s\n", src, nt_errstr(status));
3172                 return 1;
3173         }
3174
3175         if (!SERVER_HAS_UNIX_CIFS(targetcli)) {
3176                 d_printf("Server doesn't support UNIX CIFS calls.\n");
3177                 return 1;
3178         }
3179
3180         status = cli_posix_chmod(targetcli, targetname, mode);
3181         if (!NT_STATUS_IS_OK(status)) {
3182                 d_printf("%s chmod file %s 0%o\n",
3183                          nt_errstr(status), src, (unsigned int)mode);
3184                 return 1;
3185         }
3186
3187         return 0;
3188 }
3189
3190 static const char *filetype_to_str(mode_t mode)
3191 {
3192         if (S_ISREG(mode)) {
3193                 return "regular file";
3194         } else if (S_ISDIR(mode)) {
3195                 return "directory";
3196         } else
3197 #ifdef S_ISCHR
3198         if (S_ISCHR(mode)) {
3199                 return "character device";
3200         } else
3201 #endif
3202 #ifdef S_ISBLK
3203         if (S_ISBLK(mode)) {
3204                 return "block device";
3205         } else
3206 #endif
3207 #ifdef S_ISFIFO
3208         if (S_ISFIFO(mode)) {
3209                 return "fifo";
3210         } else
3211 #endif
3212 #ifdef S_ISLNK
3213         if (S_ISLNK(mode)) {
3214                 return "symbolic link";
3215         } else
3216 #endif
3217 #ifdef S_ISSOCK
3218         if (S_ISSOCK(mode)) {
3219                 return "socket";
3220         } else
3221 #endif
3222         return "";
3223 }
3224
3225 static char rwx_to_str(mode_t m, mode_t bt, char ret)
3226 {
3227         if (m & bt) {
3228                 return ret;
3229         } else {
3230                 return '-';
3231         }
3232 }
3233
3234 static char *unix_mode_to_str(char *s, mode_t m)
3235 {
3236         char *p = s;
3237         const char *str = filetype_to_str(m);
3238
3239         switch(str[0]) {
3240                 case 'd':
3241                         *p++ = 'd';
3242                         break;
3243                 case 'c':
3244                         *p++ = 'c';
3245                         break;
3246                 case 'b':
3247                         *p++ = 'b';
3248                         break;
3249                 case 'f':
3250                         *p++ = 'p';
3251                         break;
3252                 case 's':
3253                         *p++ = str[1] == 'y' ? 'l' : 's';
3254                         break;
3255                 case 'r':
3256                 default:
3257                         *p++ = '-';
3258                         break;
3259         }
3260         *p++ = rwx_to_str(m, S_IRUSR, 'r');
3261         *p++ = rwx_to_str(m, S_IWUSR, 'w');
3262         *p++ = rwx_to_str(m, S_IXUSR, 'x');
3263         *p++ = rwx_to_str(m, S_IRGRP, 'r');
3264         *p++ = rwx_to_str(m, S_IWGRP, 'w');
3265         *p++ = rwx_to_str(m, S_IXGRP, 'x');
3266         *p++ = rwx_to_str(m, S_IROTH, 'r');
3267         *p++ = rwx_to_str(m, S_IWOTH, 'w');
3268         *p++ = rwx_to_str(m, S_IXOTH, 'x');
3269         *p++ = '\0';
3270         return s;
3271 }
3272
3273 /****************************************************************************
3274  Utility function for UNIX getfacl.
3275 ****************************************************************************/
3276
3277 static char *perms_to_string(fstring permstr, unsigned char perms)
3278 {
3279         fstrcpy(permstr, "---");
3280         if (perms & SMB_POSIX_ACL_READ) {
3281                 permstr[0] = 'r';
3282         }
3283         if (perms & SMB_POSIX_ACL_WRITE) {
3284                 permstr[1] = 'w';
3285         }
3286         if (perms & SMB_POSIX_ACL_EXECUTE) {
3287                 permstr[2] = 'x';
3288         }
3289         return permstr;
3290 }
3291
3292 /****************************************************************************
3293  UNIX getfacl.
3294 ****************************************************************************/
3295
3296 static int cmd_getfacl(void)
3297 {
3298         TALLOC_CTX *ctx = talloc_tos();
3299         char *src = NULL;
3300         char *name = NULL;
3301         char *targetname = NULL;
3302         struct cli_state *targetcli;
3303         uint16 major, minor;
3304         uint32 caplow, caphigh;
3305         char *retbuf = NULL;
3306         size_t rb_size = 0;
3307         SMB_STRUCT_STAT sbuf;
3308         uint16 num_file_acls = 0;
3309         uint16 num_dir_acls = 0;
3310         uint16 i;
3311         NTSTATUS status;
3312
3313         if (!next_token_talloc(ctx, &cmd_ptr,&name,NULL)) {
3314                 d_printf("getfacl filename\n");
3315                 return 1;
3316         }
3317         src&nb