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