r3713: Implementation of get posix acls in UNIX extensions. Passes valgrind.
[tprouty/samba.git] / source3 / libsmb / clifile.c
1 /* 
2    Unix SMB/CIFS implementation.
3    client file operations
4    Copyright (C) Andrew Tridgell 1994-1998
5    Copyright (C) Jeremy Allison 2001-2002
6    
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11    
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16    
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 */
21
22 #define NO_SYSLOG
23
24 #include "includes.h"
25
26 /****************************************************************************
27  Hard/Symlink a file (UNIX extensions).
28  Creates new name (sym)linked to oldname.
29 ****************************************************************************/
30
31 static BOOL cli_link_internal(struct cli_state *cli, const char *oldname, const char *newname, BOOL hard_link)
32 {
33         unsigned int data_len = 0;
34         unsigned int param_len = 0;
35         uint16 setup = TRANSACT2_SETPATHINFO;
36         char param[sizeof(pstring)+6];
37         pstring data;
38         char *rparam=NULL, *rdata=NULL;
39         char *p;
40         size_t oldlen = 2*(strlen(oldname)+1);
41         size_t newlen = 2*(strlen(newname)+1);
42
43         memset(param, 0, sizeof(param));
44         SSVAL(param,0,hard_link ? SMB_SET_FILE_UNIX_HLINK : SMB_SET_FILE_UNIX_LINK);
45         p = &param[6];
46
47         p += clistr_push(cli, p, newname, MIN(newlen, sizeof(param)-6), STR_TERMINATE);
48         param_len = PTR_DIFF(p, param);
49
50         p = data;
51         p += clistr_push(cli, p, oldname, MIN(oldlen,sizeof(data)), STR_TERMINATE);
52         data_len = PTR_DIFF(p, data);
53
54         if (!cli_send_trans(cli, SMBtrans2,
55                 NULL,                        /* name */
56                 -1, 0,                          /* fid, flags */
57                 &setup, 1, 0,                   /* setup, length, max */
58                 param, param_len, 2,            /* param, length, max */
59                 (char *)&data,  data_len, cli->max_xmit /* data, length, max */
60                 )) {
61                         return False;
62         }
63
64         if (!cli_receive_trans(cli, SMBtrans2,
65                 &rparam, &param_len,
66                 &rdata, &data_len)) {
67                         return False;
68         }
69
70         SAFE_FREE(rdata);
71         SAFE_FREE(rparam);
72
73         return True;
74 }
75
76 /****************************************************************************
77  Map standard UNIX permissions onto wire representations.
78 ****************************************************************************/
79
80 uint32 unix_perms_to_wire(mode_t perms)
81 {
82         unsigned int ret = 0;
83
84         ret |= ((perms & S_IXOTH) ?  UNIX_X_OTH : 0);
85         ret |= ((perms & S_IWOTH) ?  UNIX_W_OTH : 0);
86         ret |= ((perms & S_IROTH) ?  UNIX_R_OTH : 0);
87         ret |= ((perms & S_IXGRP) ?  UNIX_X_GRP : 0);
88         ret |= ((perms & S_IWGRP) ?  UNIX_W_GRP : 0);
89         ret |= ((perms & S_IRGRP) ?  UNIX_R_GRP : 0);
90         ret |= ((perms & S_IXUSR) ?  UNIX_X_USR : 0);
91         ret |= ((perms & S_IWUSR) ?  UNIX_W_USR : 0);
92         ret |= ((perms & S_IRUSR) ?  UNIX_R_USR : 0);
93 #ifdef S_ISVTX
94         ret |= ((perms & S_ISVTX) ?  UNIX_STICKY : 0);
95 #endif
96 #ifdef S_ISGID
97         ret |= ((perms & S_ISGID) ?  UNIX_SET_GID : 0);
98 #endif
99 #ifdef S_ISUID
100         ret |= ((perms & S_ISUID) ?  UNIX_SET_UID : 0);
101 #endif
102         return ret;
103 }
104
105 /****************************************************************************
106  Map wire permissions to standard UNIX.
107 ****************************************************************************/
108
109 mode_t wire_perms_to_unix(uint32 perms)
110 {
111         mode_t ret = (mode_t)0;
112
113         ret |= ((perms & UNIX_X_OTH) ? S_IXOTH : 0);
114         ret |= ((perms & UNIX_W_OTH) ? S_IWOTH : 0);
115         ret |= ((perms & UNIX_R_OTH) ? S_IROTH : 0);
116         ret |= ((perms & UNIX_X_GRP) ? S_IXGRP : 0);
117         ret |= ((perms & UNIX_W_GRP) ? S_IWGRP : 0);
118         ret |= ((perms & UNIX_R_GRP) ? S_IRGRP : 0);
119         ret |= ((perms & UNIX_X_USR) ? S_IXUSR : 0);
120         ret |= ((perms & UNIX_W_USR) ? S_IWUSR : 0);
121         ret |= ((perms & UNIX_R_USR) ? S_IRUSR : 0);
122 #ifdef S_ISVTX
123         ret |= ((perms & UNIX_STICKY) ? S_ISVTX : 0);
124 #endif
125 #ifdef S_ISGID
126         ret |= ((perms & UNIX_SET_GID) ? S_ISGID : 0);
127 #endif
128 #ifdef S_ISUID
129         ret |= ((perms & UNIX_SET_UID) ? S_ISUID : 0);
130 #endif
131         return ret;
132 }
133
134 /****************************************************************************
135  Return the file type from the wire filetype for UNIX extensions.
136 ****************************************************************************/
137                                                                                                                 
138 static mode_t unix_filetype_from_wire(uint32 wire_type)
139 {
140         switch (wire_type) {
141                 case UNIX_TYPE_FILE:
142                         return S_IFREG;
143                 case UNIX_TYPE_DIR:
144                         return S_IFDIR;
145 #ifdef S_IFLNK
146                 case UNIX_TYPE_SYMLINK:
147                         return S_IFLNK;
148 #endif
149 #ifdef S_IFCHR
150                 case UNIX_TYPE_CHARDEV:
151                         return S_IFCHR;
152 #endif
153 #ifdef S_IFBLK
154                 case UNIX_TYPE_BLKDEV:
155                         return S_IFBLK;
156 #endif
157 #ifdef S_IFIFO
158                 case UNIX_TYPE_FIFO:
159                         return S_IFIFO;
160 #endif
161 #ifdef S_IFSOCK
162                 case UNIX_TYPE_SOCKET:
163                         return S_IFSOCK;
164 #endif
165                 default:
166                         return (mode_t)0;
167         }
168 }
169
170 /****************************************************************************
171  Do a POSIX getfacl (UNIX extensions).
172 ****************************************************************************/
173
174 BOOL cli_unix_getfacl(struct cli_state *cli, const char *name, char **retbuf)
175 {
176         unsigned int param_len = 0;
177         unsigned int data_len = 0;
178         uint16 setup = TRANSACT2_QPATHINFO;
179         char param[sizeof(pstring)+6];
180         char *rparam=NULL, *rdata=NULL;
181         char *p;
182
183         p = param;
184         memset(p, 0, 6);
185         SSVAL(p, 0, SMB_QUERY_POSIX_ACL);
186         p += 6;
187         p += clistr_push(cli, p, name, sizeof(pstring)-6, STR_TERMINATE);
188         param_len = PTR_DIFF(p, param);
189
190         if (!cli_send_trans(cli, SMBtrans2,
191                 NULL,                        /* name */
192                 -1, 0,                       /* fid, flags */
193                 &setup, 1, 0,                /* setup, length, max */
194                 param, param_len, 2,         /* param, length, max */
195                 NULL,  0, cli->max_xmit      /* data, length, max */
196                 )) {
197                         return False;
198         }
199
200         if (!cli_receive_trans(cli, SMBtrans2,
201                 &rparam, &param_len,
202                 &rdata, &data_len)) {
203                         return False;
204         }
205
206         if (data_len < 6) {
207                 SAFE_FREE(rdata);
208                 SAFE_FREE(rparam);
209                 return False;
210         }
211
212         SAFE_FREE(rparam);
213         *retbuf = rdata;
214
215         return True;
216 }
217
218 /****************************************************************************
219  Stat a file (UNIX extensions).
220 ****************************************************************************/
221
222 BOOL cli_unix_stat(struct cli_state *cli, const char *name, SMB_STRUCT_STAT *sbuf)
223 {
224         unsigned int param_len = 0;
225         unsigned int data_len = 0;
226         uint16 setup = TRANSACT2_QPATHINFO;
227         char param[sizeof(pstring)+6];
228         char *rparam=NULL, *rdata=NULL;
229         char *p;
230
231         ZERO_STRUCTP(sbuf);
232
233         p = param;
234         memset(p, 0, 6);
235         SSVAL(p, 0, SMB_QUERY_FILE_UNIX_BASIC);
236         p += 6;
237         p += clistr_push(cli, p, name, sizeof(pstring)-6, STR_TERMINATE);
238         param_len = PTR_DIFF(p, param);
239
240         if (!cli_send_trans(cli, SMBtrans2,
241                 NULL,                        /* name */
242                 -1, 0,                       /* fid, flags */
243                 &setup, 1, 0,                /* setup, length, max */
244                 param, param_len, 2,         /* param, length, max */
245                 NULL,  0, cli->max_xmit      /* data, length, max */
246                 )) {
247                         return False;
248         }
249
250         if (!cli_receive_trans(cli, SMBtrans2,
251                 &rparam, &param_len,
252                 &rdata, &data_len)) {
253                         return False;
254         }
255
256         if (data_len < 96) {
257                 SAFE_FREE(rdata);
258                 SAFE_FREE(rparam);
259                 return False;
260         }
261
262         sbuf->st_size = IVAL2_TO_SMB_BIG_UINT(rdata,0);     /* total size, in bytes */
263         sbuf->st_blocks = IVAL2_TO_SMB_BIG_UINT(rdata,8);   /* number of blocks allocated */
264         sbuf->st_blocks /= STAT_ST_BLOCKSIZE;
265         sbuf->st_ctime = interpret_long_date(rdata + 16);    /* time of last change */
266         sbuf->st_atime = interpret_long_date(rdata + 24);    /* time of last access */
267         sbuf->st_mtime = interpret_long_date(rdata + 32);    /* time of last modification */
268         sbuf->st_uid = IVAL(rdata,40);      /* user ID of owner */
269         sbuf->st_gid = IVAL(rdata,48);      /* group ID of owner */
270         sbuf->st_mode |= unix_filetype_from_wire(IVAL(rdata, 56));
271 #if defined(HAVE_MAKEDEV)
272         {
273                 uint32 dev_major = IVAL(rdata,60);
274                 uint32 dev_minor = IVAL(rdata,68);
275                 sbuf->st_rdev = makedev(dev_major, dev_minor);
276         }
277 #endif
278         sbuf->st_ino = (SMB_INO_T)IVAL2_TO_SMB_BIG_UINT(rdata,76);      /* inode */
279         sbuf->st_mode |= wire_perms_to_unix(IVAL(rdata,84));     /* protection */
280         sbuf->st_nlink = IVAL(rdata,92);    /* number of hard links */
281
282         SAFE_FREE(rdata);
283         SAFE_FREE(rparam);
284
285         return True;
286 }
287
288 /****************************************************************************
289  Symlink a file (UNIX extensions).
290 ****************************************************************************/
291
292 BOOL cli_unix_symlink(struct cli_state *cli, const char *oldname, const char *newname)
293 {
294         return cli_link_internal(cli, oldname, newname, False);
295 }
296
297 /****************************************************************************
298  Hard a file (UNIX extensions).
299 ****************************************************************************/
300
301 BOOL cli_unix_hardlink(struct cli_state *cli, const char *oldname, const char *newname)
302 {
303         return cli_link_internal(cli, oldname, newname, True);
304 }
305
306 /****************************************************************************
307  Chmod or chown a file internal (UNIX extensions).
308 ****************************************************************************/
309
310 static BOOL cli_unix_chmod_chown_internal(struct cli_state *cli, const char *fname, uint32 mode, uint32 uid, uint32 gid)
311 {
312         unsigned int data_len = 0;
313         unsigned int param_len = 0;
314         uint16 setup = TRANSACT2_SETPATHINFO;
315         char param[sizeof(pstring)+6];
316         char data[100];
317         char *rparam=NULL, *rdata=NULL;
318         char *p;
319
320         memset(param, 0, sizeof(param));
321         memset(data, 0, sizeof(data));
322         SSVAL(param,0,SMB_SET_FILE_UNIX_BASIC);
323         p = &param[6];
324
325         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
326         param_len = PTR_DIFF(p, param);
327
328         SIVAL(data,40,uid);
329         SIVAL(data,48,gid);
330         SIVAL(data,84,mode);
331
332         data_len = 100;
333
334         if (!cli_send_trans(cli, SMBtrans2,
335                 NULL,                        /* name */
336                 -1, 0,                          /* fid, flags */
337                 &setup, 1, 0,                   /* setup, length, max */
338                 param, param_len, 2,            /* param, length, max */
339                 (char *)&data,  data_len, cli->max_xmit /* data, length, max */
340                 )) {
341                         return False;
342         }
343
344         if (!cli_receive_trans(cli, SMBtrans2,
345                 &rparam, &param_len,
346                 &rdata, &data_len)) {
347                         return False;
348         }
349
350         SAFE_FREE(rdata);
351         SAFE_FREE(rparam);
352
353         return True;
354 }
355
356 /****************************************************************************
357  chmod a file (UNIX extensions).
358 ****************************************************************************/
359
360 BOOL cli_unix_chmod(struct cli_state *cli, const char *fname, mode_t mode)
361 {
362         return cli_unix_chmod_chown_internal(cli, fname, 
363                 unix_perms_to_wire(mode), SMB_UID_NO_CHANGE, SMB_GID_NO_CHANGE);
364 }
365
366 /****************************************************************************
367  chown a file (UNIX extensions).
368 ****************************************************************************/
369
370 BOOL cli_unix_chown(struct cli_state *cli, const char *fname, uid_t uid, gid_t gid)
371 {
372         return cli_unix_chmod_chown_internal(cli, fname, SMB_MODE_NO_CHANGE, (uint32)uid, (uint32)gid);
373 }
374
375 /****************************************************************************
376  Rename a file.
377 ****************************************************************************/
378
379 BOOL cli_rename(struct cli_state *cli, const char *fname_src, const char *fname_dst)
380 {
381         char *p;
382
383         memset(cli->outbuf,'\0',smb_size);
384         memset(cli->inbuf,'\0',smb_size);
385
386         set_message(cli->outbuf,1, 0, True);
387
388         SCVAL(cli->outbuf,smb_com,SMBmv);
389         SSVAL(cli->outbuf,smb_tid,cli->cnum);
390         cli_setup_packet(cli);
391
392         SSVAL(cli->outbuf,smb_vwv0,aSYSTEM | aHIDDEN | aDIR);
393
394         p = smb_buf(cli->outbuf);
395         *p++ = 4;
396         p += clistr_push(cli, p, fname_src, -1, STR_TERMINATE);
397         *p++ = 4;
398         p += clistr_push(cli, p, fname_dst, -1, STR_TERMINATE);
399
400         cli_setup_bcc(cli, p);
401
402         cli_send_smb(cli);
403         if (!cli_receive_smb(cli))
404                 return False;
405
406         if (cli_is_error(cli))
407                 return False;
408
409         return True;
410 }
411
412 /****************************************************************************
413  NT Rename a file.
414 ****************************************************************************/
415
416 BOOL cli_ntrename(struct cli_state *cli, const char *fname_src, const char *fname_dst)
417 {
418         char *p;
419
420         memset(cli->outbuf,'\0',smb_size);
421         memset(cli->inbuf,'\0',smb_size);
422
423         set_message(cli->outbuf, 4, 0, True);
424
425         SCVAL(cli->outbuf,smb_com,SMBntrename);
426         SSVAL(cli->outbuf,smb_tid,cli->cnum);
427         cli_setup_packet(cli);
428
429         SSVAL(cli->outbuf,smb_vwv0,aSYSTEM | aHIDDEN | aDIR);
430         SSVAL(cli->outbuf,smb_vwv1, RENAME_FLAG_RENAME);
431
432         p = smb_buf(cli->outbuf);
433         *p++ = 4;
434         p += clistr_push(cli, p, fname_src, -1, STR_TERMINATE);
435         *p++ = 4;
436         p += clistr_push(cli, p, fname_dst, -1, STR_TERMINATE);
437
438         cli_setup_bcc(cli, p);
439
440         cli_send_smb(cli);
441         if (!cli_receive_smb(cli))
442                 return False;
443
444         if (cli_is_error(cli))
445                 return False;
446
447         return True;
448 }
449
450 /****************************************************************************
451  NT hardlink a file.
452 ****************************************************************************/
453
454 BOOL cli_nt_hardlink(struct cli_state *cli, const char *fname_src, const char *fname_dst)
455 {
456         char *p;
457
458         memset(cli->outbuf,'\0',smb_size);
459         memset(cli->inbuf,'\0',smb_size);
460
461         set_message(cli->outbuf, 4, 0, True);
462
463         SCVAL(cli->outbuf,smb_com,SMBntrename);
464         SSVAL(cli->outbuf,smb_tid,cli->cnum);
465         cli_setup_packet(cli);
466
467         SSVAL(cli->outbuf,smb_vwv0,aSYSTEM | aHIDDEN | aDIR);
468         SSVAL(cli->outbuf,smb_vwv1, RENAME_FLAG_HARD_LINK);
469
470         p = smb_buf(cli->outbuf);
471         *p++ = 4;
472         p += clistr_push(cli, p, fname_src, -1, STR_TERMINATE);
473         *p++ = 4;
474         p += clistr_push(cli, p, fname_dst, -1, STR_TERMINATE);
475
476         cli_setup_bcc(cli, p);
477
478         cli_send_smb(cli);
479         if (!cli_receive_smb(cli))
480                 return False;
481
482         if (cli_is_error(cli))
483                 return False;
484
485         return True;
486 }
487
488 /****************************************************************************
489  Delete a file.
490 ****************************************************************************/
491
492 BOOL cli_unlink(struct cli_state *cli, const char *fname)
493 {
494         char *p;
495
496         memset(cli->outbuf,'\0',smb_size);
497         memset(cli->inbuf,'\0',smb_size);
498
499         set_message(cli->outbuf,1, 0,True);
500
501         SCVAL(cli->outbuf,smb_com,SMBunlink);
502         SSVAL(cli->outbuf,smb_tid,cli->cnum);
503         cli_setup_packet(cli);
504
505         SSVAL(cli->outbuf,smb_vwv0,aSYSTEM | aHIDDEN);
506   
507         p = smb_buf(cli->outbuf);
508         *p++ = 4;      
509         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
510
511         cli_setup_bcc(cli, p);
512         cli_send_smb(cli);
513         if (!cli_receive_smb(cli)) {
514                 return False;
515         }
516
517         if (cli_is_error(cli)) {
518                 return False;
519         }
520
521         return True;
522 }
523
524 /****************************************************************************
525  Create a directory.
526 ****************************************************************************/
527
528 BOOL cli_mkdir(struct cli_state *cli, const char *dname)
529 {
530         char *p;
531
532         memset(cli->outbuf,'\0',smb_size);
533         memset(cli->inbuf,'\0',smb_size);
534
535         set_message(cli->outbuf,0, 0,True);
536
537         SCVAL(cli->outbuf,smb_com,SMBmkdir);
538         SSVAL(cli->outbuf,smb_tid,cli->cnum);
539         cli_setup_packet(cli);
540
541         p = smb_buf(cli->outbuf);
542         *p++ = 4;      
543         p += clistr_push(cli, p, dname, -1, STR_TERMINATE);
544
545         cli_setup_bcc(cli, p);
546
547         cli_send_smb(cli);
548         if (!cli_receive_smb(cli)) {
549                 return False;
550         }
551
552         if (cli_is_error(cli)) {
553                 return False;
554         }
555
556         return True;
557 }
558
559 /****************************************************************************
560  Remove a directory.
561 ****************************************************************************/
562
563 BOOL cli_rmdir(struct cli_state *cli, const char *dname)
564 {
565         char *p;
566
567         memset(cli->outbuf,'\0',smb_size);
568         memset(cli->inbuf,'\0',smb_size);
569
570         set_message(cli->outbuf,0, 0, True);
571
572         SCVAL(cli->outbuf,smb_com,SMBrmdir);
573         SSVAL(cli->outbuf,smb_tid,cli->cnum);
574         cli_setup_packet(cli);
575
576         p = smb_buf(cli->outbuf);
577         *p++ = 4;      
578         p += clistr_push(cli, p, dname, -1, STR_TERMINATE);
579
580         cli_setup_bcc(cli, p);
581
582         cli_send_smb(cli);
583         if (!cli_receive_smb(cli)) {
584                 return False;
585         }
586
587         if (cli_is_error(cli)) {
588                 return False;
589         }
590
591         return True;
592 }
593
594 /****************************************************************************
595  Set or clear the delete on close flag.
596 ****************************************************************************/
597
598 int cli_nt_delete_on_close(struct cli_state *cli, int fnum, BOOL flag)
599 {
600         unsigned int data_len = 1;
601         unsigned int param_len = 6;
602         uint16 setup = TRANSACT2_SETFILEINFO;
603         pstring param;
604         unsigned char data;
605         char *rparam=NULL, *rdata=NULL;
606
607         memset(param, 0, param_len);
608         SSVAL(param,0,fnum);
609         SSVAL(param,2,SMB_SET_FILE_DISPOSITION_INFO);
610
611         data = flag ? 1 : 0;
612
613         if (!cli_send_trans(cli, SMBtrans2,
614                                                 NULL,                        /* name */
615                                                 -1, 0,                          /* fid, flags */
616                                                 &setup, 1, 0,                   /* setup, length, max */
617                                                 param, param_len, 2,            /* param, length, max */
618                                                 (char *)&data,  data_len, cli->max_xmit /* data, length, max */
619                                                 )) {
620                 return False;
621         }
622
623         if (!cli_receive_trans(cli, SMBtrans2,
624                                                 &rparam, &param_len,
625                                                 &rdata, &data_len)) {
626                 return False;
627         }
628
629         SAFE_FREE(rdata);
630         SAFE_FREE(rparam);
631
632         return True;
633 }
634
635 /****************************************************************************
636  Open a file - exposing the full horror of the NT API :-).
637  Used in smbtorture.
638 ****************************************************************************/
639
640 int cli_nt_create_full(struct cli_state *cli, const char *fname, 
641                  uint32 CreatFlags, uint32 DesiredAccess,
642                  uint32 FileAttributes, uint32 ShareAccess,
643                  uint32 CreateDisposition, uint32 CreateOptions,
644                  uint8 SecuityFlags)
645 {
646         char *p;
647         int len;
648
649         memset(cli->outbuf,'\0',smb_size);
650         memset(cli->inbuf,'\0',smb_size);
651
652         set_message(cli->outbuf,24,0,True);
653
654         SCVAL(cli->outbuf,smb_com,SMBntcreateX);
655         SSVAL(cli->outbuf,smb_tid,cli->cnum);
656         cli_setup_packet(cli);
657
658         SSVAL(cli->outbuf,smb_vwv0,0xFF);
659         if (cli->use_oplocks)
660                 CreatFlags |= (REQUEST_OPLOCK|REQUEST_BATCH_OPLOCK);
661         
662         SIVAL(cli->outbuf,smb_ntcreate_Flags, CreatFlags);
663         SIVAL(cli->outbuf,smb_ntcreate_RootDirectoryFid, 0x0);
664         SIVAL(cli->outbuf,smb_ntcreate_DesiredAccess, DesiredAccess);
665         SIVAL(cli->outbuf,smb_ntcreate_FileAttributes, FileAttributes);
666         SIVAL(cli->outbuf,smb_ntcreate_ShareAccess, ShareAccess);
667         SIVAL(cli->outbuf,smb_ntcreate_CreateDisposition, CreateDisposition);
668         SIVAL(cli->outbuf,smb_ntcreate_CreateOptions, CreateOptions);
669         SIVAL(cli->outbuf,smb_ntcreate_ImpersonationLevel, 0x02);
670         SCVAL(cli->outbuf,smb_ntcreate_SecurityFlags, SecuityFlags);
671
672         p = smb_buf(cli->outbuf);
673         /* this alignment and termination is critical for netapp filers. Don't change */
674         p += clistr_align_out(cli, p, 0);
675         len = clistr_push(cli, p, fname, -1, 0);
676         p += len;
677         SSVAL(cli->outbuf,smb_ntcreate_NameLength, len);
678         /* sigh. this copes with broken netapp filer behaviour */
679         p += clistr_push(cli, p, "", -1, STR_TERMINATE);
680
681         cli_setup_bcc(cli, p);
682
683         cli_send_smb(cli);
684         if (!cli_receive_smb(cli)) {
685                 return -1;
686         }
687
688         if (cli_is_error(cli)) {
689                 return -1;
690         }
691
692         return SVAL(cli->inbuf,smb_vwv2 + 1);
693 }
694
695 /****************************************************************************
696  Open a file.
697 ****************************************************************************/
698
699 int cli_nt_create(struct cli_state *cli, const char *fname, uint32 DesiredAccess)
700 {
701         return cli_nt_create_full(cli, fname, 0, DesiredAccess, 0,
702                                 FILE_SHARE_READ|FILE_SHARE_WRITE, FILE_EXISTS_OPEN, 0x0, 0x0);
703 }
704
705 /****************************************************************************
706  Open a file
707  WARNING: if you open with O_WRONLY then getattrE won't work!
708 ****************************************************************************/
709
710 int cli_open(struct cli_state *cli, const char *fname, int flags, int share_mode)
711 {
712         char *p;
713         unsigned openfn=0;
714         unsigned accessmode=0;
715
716         if (flags & O_CREAT)
717                 openfn |= (1<<4);
718         if (!(flags & O_EXCL)) {
719                 if (flags & O_TRUNC)
720                         openfn |= (1<<1);
721                 else
722                         openfn |= (1<<0);
723         }
724
725         accessmode = (share_mode<<4);
726
727         if ((flags & O_ACCMODE) == O_RDWR) {
728                 accessmode |= 2;
729         } else if ((flags & O_ACCMODE) == O_WRONLY) {
730                 accessmode |= 1;
731         } 
732
733 #if defined(O_SYNC)
734         if ((flags & O_SYNC) == O_SYNC) {
735                 accessmode |= (1<<14);
736         }
737 #endif /* O_SYNC */
738
739         if (share_mode == DENY_FCB) {
740                 accessmode = 0xFF;
741         }
742
743         memset(cli->outbuf,'\0',smb_size);
744         memset(cli->inbuf,'\0',smb_size);
745
746         set_message(cli->outbuf,15,0,True);
747
748         SCVAL(cli->outbuf,smb_com,SMBopenX);
749         SSVAL(cli->outbuf,smb_tid,cli->cnum);
750         cli_setup_packet(cli);
751
752         SSVAL(cli->outbuf,smb_vwv0,0xFF);
753         SSVAL(cli->outbuf,smb_vwv2,0);  /* no additional info */
754         SSVAL(cli->outbuf,smb_vwv3,accessmode);
755         SSVAL(cli->outbuf,smb_vwv4,aSYSTEM | aHIDDEN);
756         SSVAL(cli->outbuf,smb_vwv5,0);
757         SSVAL(cli->outbuf,smb_vwv8,openfn);
758
759         if (cli->use_oplocks) {
760                 /* if using oplocks then ask for a batch oplock via
761                    core and extended methods */
762                 SCVAL(cli->outbuf,smb_flg, CVAL(cli->outbuf,smb_flg)|
763                         FLAG_REQUEST_OPLOCK|FLAG_REQUEST_BATCH_OPLOCK);
764                 SSVAL(cli->outbuf,smb_vwv2,SVAL(cli->outbuf,smb_vwv2) | 6);
765         }
766   
767         p = smb_buf(cli->outbuf);
768         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
769
770         cli_setup_bcc(cli, p);
771
772         cli_send_smb(cli);
773         if (!cli_receive_smb(cli)) {
774                 return -1;
775         }
776
777         if (cli_is_error(cli)) {
778                 return -1;
779         }
780
781         return SVAL(cli->inbuf,smb_vwv2);
782 }
783
784 /****************************************************************************
785  Close a file.
786 ****************************************************************************/
787
788 BOOL cli_close(struct cli_state *cli, int fnum)
789 {
790         memset(cli->outbuf,'\0',smb_size);
791         memset(cli->inbuf,'\0',smb_size);
792
793         set_message(cli->outbuf,3,0,True);
794
795         SCVAL(cli->outbuf,smb_com,SMBclose);
796         SSVAL(cli->outbuf,smb_tid,cli->cnum);
797         cli_setup_packet(cli);
798
799         SSVAL(cli->outbuf,smb_vwv0,fnum);
800         SIVALS(cli->outbuf,smb_vwv1,-1);
801
802         cli_send_smb(cli);
803         if (!cli_receive_smb(cli)) {
804                 return False;
805         }
806
807         return !cli_is_error(cli);
808 }
809
810
811 /****************************************************************************
812  send a lock with a specified locktype 
813  this is used for testing LOCKING_ANDX_CANCEL_LOCK
814 ****************************************************************************/
815 NTSTATUS cli_locktype(struct cli_state *cli, int fnum, 
816                       uint32 offset, uint32 len, int timeout, unsigned char locktype)
817 {
818         char *p;
819         int saved_timeout = cli->timeout;
820
821         memset(cli->outbuf,'\0',smb_size);
822         memset(cli->inbuf,'\0', smb_size);
823
824         set_message(cli->outbuf,8,0,True);
825
826         SCVAL(cli->outbuf,smb_com,SMBlockingX);
827         SSVAL(cli->outbuf,smb_tid,cli->cnum);
828         cli_setup_packet(cli);
829
830         SCVAL(cli->outbuf,smb_vwv0,0xFF);
831         SSVAL(cli->outbuf,smb_vwv2,fnum);
832         SCVAL(cli->outbuf,smb_vwv3,locktype);
833         SIVALS(cli->outbuf, smb_vwv4, timeout);
834         SSVAL(cli->outbuf,smb_vwv6,0);
835         SSVAL(cli->outbuf,smb_vwv7,1);
836
837         p = smb_buf(cli->outbuf);
838         SSVAL(p, 0, cli->pid);
839         SIVAL(p, 2, offset);
840         SIVAL(p, 6, len);
841
842         p += 10;
843
844         cli_setup_bcc(cli, p);
845
846         cli_send_smb(cli);
847
848         if (timeout != 0) {
849                 cli->timeout = (timeout == -1) ? 0x7FFFFFFF : (timeout + 2*1000);
850         }
851
852         if (!cli_receive_smb(cli)) {
853                 cli->timeout = saved_timeout;
854                 return NT_STATUS_UNSUCCESSFUL;
855         }
856
857         cli->timeout = saved_timeout;
858
859         return cli_nt_error(cli);
860 }
861
862
863 /****************************************************************************
864  Lock a file.
865  note that timeout is in units of 2 milliseconds
866 ****************************************************************************/
867 BOOL cli_lock(struct cli_state *cli, int fnum, 
868               uint32 offset, uint32 len, int timeout, enum brl_type lock_type)
869 {
870         char *p;
871         int saved_timeout = cli->timeout;
872
873         memset(cli->outbuf,'\0',smb_size);
874         memset(cli->inbuf,'\0', smb_size);
875
876         set_message(cli->outbuf,8,0,True);
877
878         SCVAL(cli->outbuf,smb_com,SMBlockingX);
879         SSVAL(cli->outbuf,smb_tid,cli->cnum);
880         cli_setup_packet(cli);
881
882         SCVAL(cli->outbuf,smb_vwv0,0xFF);
883         SSVAL(cli->outbuf,smb_vwv2,fnum);
884         SCVAL(cli->outbuf,smb_vwv3,(lock_type == READ_LOCK? 1 : 0));
885         SIVALS(cli->outbuf, smb_vwv4, timeout);
886         SSVAL(cli->outbuf,smb_vwv6,0);
887         SSVAL(cli->outbuf,smb_vwv7,1);
888
889         p = smb_buf(cli->outbuf);
890         SSVAL(p, 0, cli->pid);
891         SIVAL(p, 2, offset);
892         SIVAL(p, 6, len);
893
894         p += 10;
895
896         cli_setup_bcc(cli, p);
897
898         cli_send_smb(cli);
899
900         if (timeout != 0) {
901                 cli->timeout = (timeout == -1) ? 0x7FFFFFFF : (timeout*2 + 5*1000);
902         }
903
904         if (!cli_receive_smb(cli)) {
905                 cli->timeout = saved_timeout;
906                 return False;
907         }
908
909         cli->timeout = saved_timeout;
910
911         if (cli_is_error(cli)) {
912                 return False;
913         }
914
915         return True;
916 }
917
918 /****************************************************************************
919  Unlock a file.
920 ****************************************************************************/
921
922 BOOL cli_unlock(struct cli_state *cli, int fnum, uint32 offset, uint32 len)
923 {
924         char *p;
925
926         memset(cli->outbuf,'\0',smb_size);
927         memset(cli->inbuf,'\0',smb_size);
928
929         set_message(cli->outbuf,8,0,True);
930
931         SCVAL(cli->outbuf,smb_com,SMBlockingX);
932         SSVAL(cli->outbuf,smb_tid,cli->cnum);
933         cli_setup_packet(cli);
934
935         SCVAL(cli->outbuf,smb_vwv0,0xFF);
936         SSVAL(cli->outbuf,smb_vwv2,fnum);
937         SCVAL(cli->outbuf,smb_vwv3,0);
938         SIVALS(cli->outbuf, smb_vwv4, 0);
939         SSVAL(cli->outbuf,smb_vwv6,1);
940         SSVAL(cli->outbuf,smb_vwv7,0);
941
942         p = smb_buf(cli->outbuf);
943         SSVAL(p, 0, cli->pid);
944         SIVAL(p, 2, offset);
945         SIVAL(p, 6, len);
946         p += 10;
947         cli_setup_bcc(cli, p);
948         cli_send_smb(cli);
949         if (!cli_receive_smb(cli)) {
950                 return False;
951         }
952
953         if (cli_is_error(cli)) {
954                 return False;
955         }
956
957         return True;
958 }
959
960 /****************************************************************************
961  Lock a file with 64 bit offsets.
962 ****************************************************************************/
963
964 BOOL cli_lock64(struct cli_state *cli, int fnum, 
965                 SMB_BIG_UINT offset, SMB_BIG_UINT len, int timeout, enum brl_type lock_type)
966 {
967         char *p;
968         int saved_timeout = cli->timeout;
969         int ltype;
970
971         if (! (cli->capabilities & CAP_LARGE_FILES)) {
972                 return cli_lock(cli, fnum, offset, len, timeout, lock_type);
973         }
974
975         ltype = (lock_type == READ_LOCK? 1 : 0);
976         ltype |= LOCKING_ANDX_LARGE_FILES;
977
978         memset(cli->outbuf,'\0',smb_size);
979         memset(cli->inbuf,'\0', smb_size);
980
981         set_message(cli->outbuf,8,0,True);
982
983         SCVAL(cli->outbuf,smb_com,SMBlockingX);
984         SSVAL(cli->outbuf,smb_tid,cli->cnum);
985         cli_setup_packet(cli);
986
987         SCVAL(cli->outbuf,smb_vwv0,0xFF);
988         SSVAL(cli->outbuf,smb_vwv2,fnum);
989         SCVAL(cli->outbuf,smb_vwv3,ltype);
990         SIVALS(cli->outbuf, smb_vwv4, timeout);
991         SSVAL(cli->outbuf,smb_vwv6,0);
992         SSVAL(cli->outbuf,smb_vwv7,1);
993
994         p = smb_buf(cli->outbuf);
995         SIVAL(p, 0, cli->pid);
996         SOFF_T_R(p, 4, offset);
997         SOFF_T_R(p, 12, len);
998         p += 20;
999
1000         cli_setup_bcc(cli, p);
1001         cli_send_smb(cli);
1002
1003         if (timeout != 0) {
1004                 cli->timeout = (timeout == -1) ? 0x7FFFFFFF : (timeout + 5*1000);
1005         }
1006
1007         if (!cli_receive_smb(cli)) {
1008                 cli->timeout = saved_timeout;
1009                 return False;
1010         }
1011
1012         cli->timeout = saved_timeout;
1013
1014         if (cli_is_error(cli)) {
1015                 return False;
1016         }
1017
1018         return True;
1019 }
1020
1021 /****************************************************************************
1022  Unlock a file with 64 bit offsets.
1023 ****************************************************************************/
1024
1025 BOOL cli_unlock64(struct cli_state *cli, int fnum, SMB_BIG_UINT offset, SMB_BIG_UINT len)
1026 {
1027         char *p;
1028
1029         if (! (cli->capabilities & CAP_LARGE_FILES)) {
1030                 return cli_unlock(cli, fnum, offset, len);
1031         }
1032
1033         memset(cli->outbuf,'\0',smb_size);
1034         memset(cli->inbuf,'\0',smb_size);
1035
1036         set_message(cli->outbuf,8,0,True);
1037
1038         SCVAL(cli->outbuf,smb_com,SMBlockingX);
1039         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1040         cli_setup_packet(cli);
1041
1042         SCVAL(cli->outbuf,smb_vwv0,0xFF);
1043         SSVAL(cli->outbuf,smb_vwv2,fnum);
1044         SCVAL(cli->outbuf,smb_vwv3,LOCKING_ANDX_LARGE_FILES);
1045         SIVALS(cli->outbuf, smb_vwv4, 0);
1046         SSVAL(cli->outbuf,smb_vwv6,1);
1047         SSVAL(cli->outbuf,smb_vwv7,0);
1048
1049         p = smb_buf(cli->outbuf);
1050         SIVAL(p, 0, cli->pid);
1051         SOFF_T_R(p, 4, offset);
1052         SOFF_T_R(p, 12, len);
1053         p += 20;
1054         cli_setup_bcc(cli, p);
1055         cli_send_smb(cli);
1056         if (!cli_receive_smb(cli)) {
1057                 return False;
1058         }
1059
1060         if (cli_is_error(cli)) {
1061                 return False;
1062         }
1063
1064         return True;
1065 }
1066
1067
1068 /****************************************************************************
1069  Do a SMBgetattrE call.
1070 ****************************************************************************/
1071
1072 BOOL cli_getattrE(struct cli_state *cli, int fd, 
1073                   uint16 *attr, SMB_BIG_UINT *size, 
1074                   time_t *c_time, time_t *a_time, time_t *m_time)
1075 {
1076         memset(cli->outbuf,'\0',smb_size);
1077         memset(cli->inbuf,'\0',smb_size);
1078
1079         set_message(cli->outbuf,1,0,True);
1080
1081         SCVAL(cli->outbuf,smb_com,SMBgetattrE);
1082         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1083         cli_setup_packet(cli);
1084
1085         SSVAL(cli->outbuf,smb_vwv0,fd);
1086
1087         cli_send_smb(cli);
1088         if (!cli_receive_smb(cli)) {
1089                 return False;
1090         }
1091         
1092         if (cli_is_error(cli)) {
1093                 return False;
1094         }
1095
1096         if (size) {
1097                 *size = IVAL(cli->inbuf, smb_vwv6);
1098         }
1099
1100         if (attr) {
1101                 *attr = SVAL(cli->inbuf,smb_vwv10);
1102         }
1103
1104         if (c_time) {
1105                 *c_time = make_unix_date3(cli->inbuf+smb_vwv0);
1106         }
1107
1108         if (a_time) {
1109                 *a_time = make_unix_date3(cli->inbuf+smb_vwv2);
1110         }
1111
1112         if (m_time) {
1113                 *m_time = make_unix_date3(cli->inbuf+smb_vwv4);
1114         }
1115
1116         return True;
1117 }
1118
1119 /****************************************************************************
1120  Do a SMBgetatr call
1121 ****************************************************************************/
1122
1123 BOOL cli_getatr(struct cli_state *cli, const char *fname, 
1124                 uint16 *attr, size_t *size, time_t *t)
1125 {
1126         char *p;
1127
1128         memset(cli->outbuf,'\0',smb_size);
1129         memset(cli->inbuf,'\0',smb_size);
1130
1131         set_message(cli->outbuf,0,0,True);
1132
1133         SCVAL(cli->outbuf,smb_com,SMBgetatr);
1134         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1135         cli_setup_packet(cli);
1136
1137         p = smb_buf(cli->outbuf);
1138         *p++ = 4;
1139         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
1140
1141         cli_setup_bcc(cli, p);
1142
1143         cli_send_smb(cli);
1144         if (!cli_receive_smb(cli)) {
1145                 return False;
1146         }
1147         
1148         if (cli_is_error(cli)) {
1149                 return False;
1150         }
1151
1152         if (size) {
1153                 *size = IVAL(cli->inbuf, smb_vwv3);
1154         }
1155
1156         if (t) {
1157                 *t = make_unix_date3(cli->inbuf+smb_vwv1);
1158         }
1159
1160         if (attr) {
1161                 *attr = SVAL(cli->inbuf,smb_vwv0);
1162         }
1163
1164
1165         return True;
1166 }
1167
1168 /****************************************************************************
1169  Do a SMBsetattrE call.
1170 ****************************************************************************/
1171
1172 BOOL cli_setattrE(struct cli_state *cli, int fd,
1173                   time_t c_time, time_t a_time, time_t m_time)
1174
1175 {
1176         char *p;
1177
1178         memset(cli->outbuf,'\0',smb_size);
1179         memset(cli->inbuf,'\0',smb_size);
1180
1181         set_message(cli->outbuf,7,0,True);
1182
1183         SCVAL(cli->outbuf,smb_com,SMBsetattrE);
1184         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1185         cli_setup_packet(cli);
1186
1187         SSVAL(cli->outbuf,smb_vwv0, fd);
1188         put_dos_date3(cli->outbuf,smb_vwv1, c_time);
1189         put_dos_date3(cli->outbuf,smb_vwv3, a_time);
1190         put_dos_date3(cli->outbuf,smb_vwv5, m_time);
1191
1192         p = smb_buf(cli->outbuf);
1193         *p++ = 4;
1194
1195         cli_setup_bcc(cli, p);
1196
1197         cli_send_smb(cli);
1198         if (!cli_receive_smb(cli)) {
1199                 return False;
1200         }
1201         
1202         if (cli_is_error(cli)) {
1203                 return False;
1204         }
1205
1206         return True;
1207 }
1208
1209 /****************************************************************************
1210  Do a SMBsetatr call.
1211 ****************************************************************************/
1212
1213 BOOL cli_setatr(struct cli_state *cli, const char *fname, uint16 attr, time_t t)
1214 {
1215         char *p;
1216
1217         memset(cli->outbuf,'\0',smb_size);
1218         memset(cli->inbuf,'\0',smb_size);
1219
1220         set_message(cli->outbuf,8,0,True);
1221
1222         SCVAL(cli->outbuf,smb_com,SMBsetatr);
1223         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1224         cli_setup_packet(cli);
1225
1226         SSVAL(cli->outbuf,smb_vwv0, attr);
1227         put_dos_date3(cli->outbuf,smb_vwv1, t);
1228
1229         p = smb_buf(cli->outbuf);
1230         *p++ = 4;
1231         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
1232         *p++ = 4;
1233
1234         cli_setup_bcc(cli, p);
1235
1236         cli_send_smb(cli);
1237         if (!cli_receive_smb(cli)) {
1238                 return False;
1239         }
1240         
1241         if (cli_is_error(cli)) {
1242                 return False;
1243         }
1244
1245         return True;
1246 }
1247
1248 /****************************************************************************
1249  Check for existance of a dir.
1250 ****************************************************************************/
1251 BOOL cli_chkpath(struct cli_state *cli, const char *path)
1252 {
1253         pstring path2;
1254         char *p;
1255         
1256         pstrcpy(path2,path);
1257         trim_char(path2,'\0','\\');
1258         if (!*path2)
1259                 *path2 = '\\';
1260         
1261         memset(cli->outbuf,'\0',smb_size);
1262         set_message(cli->outbuf,0,0,True);
1263         SCVAL(cli->outbuf,smb_com,SMBchkpth);
1264         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1265         cli_setup_packet(cli);
1266         p = smb_buf(cli->outbuf);
1267         *p++ = 4;
1268         p += clistr_push(cli, p, path2, -1, STR_TERMINATE);
1269
1270         cli_setup_bcc(cli, p);
1271
1272         cli_send_smb(cli);
1273         if (!cli_receive_smb(cli)) {
1274                 return False;
1275         }
1276
1277         if (cli_is_error(cli)) return False;
1278
1279         return True;
1280 }
1281
1282 /****************************************************************************
1283  Query disk space.
1284 ****************************************************************************/
1285
1286 BOOL cli_dskattr(struct cli_state *cli, int *bsize, int *total, int *avail)
1287 {
1288         memset(cli->outbuf,'\0',smb_size);
1289         set_message(cli->outbuf,0,0,True);
1290         SCVAL(cli->outbuf,smb_com,SMBdskattr);
1291         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1292         cli_setup_packet(cli);
1293
1294         cli_send_smb(cli);
1295         if (!cli_receive_smb(cli)) {
1296                 return False;
1297         }
1298
1299         *bsize = SVAL(cli->inbuf,smb_vwv1)*SVAL(cli->inbuf,smb_vwv2);
1300         *total = SVAL(cli->inbuf,smb_vwv0);
1301         *avail = SVAL(cli->inbuf,smb_vwv3);
1302         
1303         return True;
1304 }
1305
1306 /****************************************************************************
1307  Create and open a temporary file.
1308 ****************************************************************************/
1309
1310 int cli_ctemp(struct cli_state *cli, const char *path, char **tmp_path)
1311 {
1312         int len;
1313         char *p;
1314
1315         memset(cli->outbuf,'\0',smb_size);
1316         memset(cli->inbuf,'\0',smb_size);
1317
1318         set_message(cli->outbuf,3,0,True);
1319
1320         SCVAL(cli->outbuf,smb_com,SMBctemp);
1321         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1322         cli_setup_packet(cli);
1323
1324         SSVAL(cli->outbuf,smb_vwv0,0);
1325         SIVALS(cli->outbuf,smb_vwv1,-1);
1326
1327         p = smb_buf(cli->outbuf);
1328         *p++ = 4;
1329         p += clistr_push(cli, p, path, -1, STR_TERMINATE);
1330
1331         cli_setup_bcc(cli, p);
1332
1333         cli_send_smb(cli);
1334         if (!cli_receive_smb(cli)) {
1335                 return -1;
1336         }
1337
1338         if (cli_is_error(cli)) {
1339                 return -1;
1340         }
1341
1342         /* despite the spec, the result has a -1, followed by
1343            length, followed by name */
1344         p = smb_buf(cli->inbuf);
1345         p += 4;
1346         len = smb_buflen(cli->inbuf) - 4;
1347         if (len <= 0) return -1;
1348
1349         if (tmp_path) {
1350                 pstring path2;
1351                 clistr_pull(cli, path2, p, 
1352                             sizeof(path2), len, STR_ASCII);
1353                 *tmp_path = strdup(path2);
1354         }
1355
1356         return SVAL(cli->inbuf,smb_vwv0);
1357 }
1358
1359
1360 /* 
1361    send a raw ioctl - used by the torture code
1362 */
1363 NTSTATUS cli_raw_ioctl(struct cli_state *cli, int fnum, uint32 code, DATA_BLOB *blob)
1364 {
1365         memset(cli->outbuf,'\0',smb_size);
1366         memset(cli->inbuf,'\0',smb_size);
1367
1368         set_message(cli->outbuf, 3, 0, True);
1369         SCVAL(cli->outbuf,smb_com,SMBioctl);
1370         cli_setup_packet(cli);
1371
1372         SSVAL(cli->outbuf, smb_vwv0, fnum);
1373         SSVAL(cli->outbuf, smb_vwv1, code>>16);
1374         SSVAL(cli->outbuf, smb_vwv2, (code&0xFFFF));
1375
1376         cli_send_smb(cli);
1377         if (!cli_receive_smb(cli)) {
1378                 return NT_STATUS_UNEXPECTED_NETWORK_ERROR;
1379         }
1380
1381         if (cli_is_error(cli)) {
1382                 return cli_nt_error(cli);
1383         }
1384
1385         *blob = data_blob(NULL, 0);
1386
1387         return NT_STATUS_OK;
1388 }
1389
1390 /*********************************************************
1391  Set an extended attribute utility fn.
1392 *********************************************************/
1393
1394 static BOOL cli_set_ea(struct cli_state *cli, uint16 setup, char *param, unsigned int param_len,
1395                         const char *ea_name, const char *ea_val, size_t ea_len)
1396 {       
1397         unsigned int data_len = 0;
1398         char *data = NULL;
1399         char *rparam=NULL, *rdata=NULL;
1400         char *p;
1401         size_t ea_namelen = strlen(ea_name);
1402
1403         data_len = 4 + 4 + ea_namelen + 1 + ea_len;
1404         data = malloc(data_len);
1405         if (!data) {
1406                 return False;
1407         }
1408         p = data;
1409         SIVAL(p,0,data_len);
1410         p += 4;
1411         SCVAL(p, 0, 0); /* EA flags. */
1412         SCVAL(p, 1, ea_namelen);
1413         SSVAL(p, 2, ea_len);
1414         memcpy(p+4, ea_name, ea_namelen+1); /* Copy in the name. */
1415         memcpy(p+4+ea_namelen+1, ea_val, ea_len);
1416
1417         if (!cli_send_trans(cli, SMBtrans2,
1418                 NULL,                        /* name */
1419                 -1, 0,                          /* fid, flags */
1420                 &setup, 1, 0,                   /* setup, length, max */
1421                 param, param_len, 2,            /* param, length, max */
1422                 data,  data_len, cli->max_xmit /* data, length, max */
1423                 )) {
1424                         return False;
1425         }
1426
1427         if (!cli_receive_trans(cli, SMBtrans2,
1428                 &rparam, &param_len,
1429                 &rdata, &data_len)) {
1430                         return False;
1431         }
1432
1433         SAFE_FREE(data);
1434         SAFE_FREE(rdata);
1435         SAFE_FREE(rparam);
1436
1437         return True;
1438 }
1439
1440 /*********************************************************
1441  Set an extended attribute on a pathname.
1442 *********************************************************/
1443
1444 BOOL cli_set_ea_path(struct cli_state *cli, const char *path, const char *ea_name, const char *ea_val, size_t ea_len)
1445 {
1446         uint16 setup = TRANSACT2_SETPATHINFO;
1447         unsigned int param_len = 0;
1448         char param[sizeof(pstring)+6];
1449         size_t srclen = 2*(strlen(path)+1);
1450         char *p;
1451
1452         memset(param, 0, sizeof(param));
1453         SSVAL(param,0,SMB_INFO_SET_EA);
1454         p = &param[6];
1455
1456         p += clistr_push(cli, p, path, MIN(srclen, sizeof(param)-6), STR_TERMINATE);
1457         param_len = PTR_DIFF(p, param);
1458
1459         return cli_set_ea(cli, setup, param, param_len, ea_name, ea_val, ea_len);
1460 }
1461
1462 /*********************************************************
1463  Set an extended attribute on an fnum.
1464 *********************************************************/
1465
1466 BOOL cli_set_ea_fnum(struct cli_state *cli, int fnum, const char *ea_name, const char *ea_val, size_t ea_len)
1467 {
1468         char param[6];
1469         uint16 setup = TRANSACT2_SETFILEINFO;
1470
1471         memset(param, 0, 6);
1472         SSVAL(param,0,fnum);
1473         SSVAL(param,2,SMB_INFO_SET_EA);
1474
1475         return cli_set_ea(cli, setup, param, 6, ea_name, ea_val, ea_len);
1476 }
1477
1478 /*********************************************************
1479  Get an extended attribute list tility fn.
1480 *********************************************************/
1481
1482 static BOOL cli_get_ea_list(struct cli_state *cli,
1483                 uint16 setup, char *param, unsigned int param_len,
1484                 TALLOC_CTX *ctx,
1485                 size_t *pnum_eas,
1486                 struct ea_struct **pea_list)
1487 {
1488         unsigned int data_len = 0;
1489         unsigned int rparam_len, rdata_len;
1490         char *rparam=NULL, *rdata=NULL;
1491         char *p;
1492         size_t ea_size;
1493         size_t num_eas;
1494         BOOL ret = False;
1495         struct ea_struct *ea_list;
1496
1497         *pnum_eas = 0;
1498         *pea_list = NULL;
1499
1500         if (!cli_send_trans(cli, SMBtrans2,
1501                         NULL,           /* Name */
1502                         -1, 0,          /* fid, flags */
1503                         &setup, 1, 0,   /* setup, length, max */
1504                         param, param_len, 10, /* param, length, max */
1505                         NULL, data_len, cli->max_xmit /* data, length, max */
1506                                 )) {
1507                 return False;
1508         }
1509
1510         if (!cli_receive_trans(cli, SMBtrans2,
1511                         &rparam, &rparam_len,
1512                         &rdata, &rdata_len)) {
1513                 return False;
1514         }
1515
1516         if (!rdata || rdata_len < 4) {
1517                 goto out;
1518         }
1519
1520         ea_size = (size_t)IVAL(rdata,0);
1521         if (ea_size > rdata_len) {
1522                 goto out;
1523         }
1524
1525         if (ea_size == 0) {
1526                 /* No EA's present. */
1527                 ret = True;
1528                 goto out;
1529         }
1530
1531         p = rdata + 4;
1532         ea_size -= 4;
1533
1534         /* Validate the EA list and count it. */
1535         for (num_eas = 0; ea_size >= 4; num_eas++) {
1536                 unsigned int ea_namelen = CVAL(p,1);
1537                 unsigned int ea_valuelen = SVAL(p,2);
1538                 if (ea_namelen == 0) {
1539                         goto out;
1540                 }
1541                 if (4 + ea_namelen + 1 + ea_valuelen > ea_size) {
1542                         goto out;
1543                 }
1544                 ea_size -= 4 + ea_namelen + 1 + ea_valuelen;
1545                 p += 4 + ea_namelen + 1 + ea_valuelen;
1546         }
1547
1548         if (num_eas == 0) {
1549                 ret = True;
1550                 goto out;
1551         }
1552
1553         *pnum_eas = num_eas;
1554         if (!pea_list) {
1555                 /* Caller only wants number of EA's. */
1556                 ret = True;
1557                 goto out;
1558         }
1559
1560         ea_list = (struct ea_struct *)talloc(ctx, num_eas*sizeof(struct ea_struct));
1561         if (!ea_list) {
1562                 goto out;
1563         }
1564
1565         ea_size = (size_t)IVAL(rdata,0);
1566         p = rdata + 4;
1567
1568         for (num_eas = 0; num_eas < *pnum_eas; num_eas++ ) {
1569                 struct ea_struct *ea = &ea_list[num_eas];
1570                 fstring unix_ea_name;
1571                 unsigned int ea_namelen = CVAL(p,1);
1572                 unsigned int ea_valuelen = SVAL(p,2);
1573
1574                 ea->flags = CVAL(p,0);
1575                 unix_ea_name[0] = '\0';
1576                 pull_ascii_fstring(unix_ea_name, p + 4);
1577                 ea->name = talloc_strdup(ctx, unix_ea_name);
1578                 /* Ensure the value is null terminated (in case it's a string). */
1579                 ea->value = data_blob_talloc(ctx, NULL, ea_valuelen + 1);
1580                 if (!ea->value.data) {
1581                         goto out;
1582                 }
1583                 if (ea_valuelen) {
1584                         memcpy(ea->value.data, p+4+ea_namelen+1, ea_valuelen);
1585                 }
1586                 ea->value.data[ea_valuelen] = 0;
1587                 ea->value.length--;
1588                 p += 4 + ea_namelen + 1 + ea_valuelen;
1589         }
1590
1591         *pea_list = ea_list;
1592         ret = True;
1593
1594  out :
1595
1596         SAFE_FREE(rdata);
1597         SAFE_FREE(rparam);
1598         return ret;
1599 }
1600
1601 /*********************************************************
1602  Get an extended attribute list from a pathname.
1603 *********************************************************/
1604
1605 BOOL cli_get_ea_list_path(struct cli_state *cli, const char *path,
1606                 TALLOC_CTX *ctx,
1607                 size_t *pnum_eas,
1608                 struct ea_struct **pea_list)
1609 {
1610         uint16 setup = TRANSACT2_QPATHINFO;
1611         unsigned int param_len = 0;
1612         char param[sizeof(pstring)+6];
1613         char *p;
1614
1615         p = param;
1616         memset(p, 0, 6);
1617         SSVAL(p, 0, SMB_INFO_QUERY_ALL_EAS);
1618         p += 6;
1619         p += clistr_push(cli, p, path, sizeof(pstring)-6, STR_TERMINATE);
1620         param_len = PTR_DIFF(p, param);
1621
1622         return cli_get_ea_list(cli, setup, param, param_len, ctx, pnum_eas, pea_list);
1623 }
1624
1625 /*********************************************************
1626  Get an extended attribute list from an fnum.
1627 *********************************************************/
1628
1629 BOOL cli_get_ea_list_fnum(struct cli_state *cli, int fnum,
1630                 TALLOC_CTX *ctx,
1631                 size_t *pnum_eas,
1632                 struct ea_struct **pea_list)
1633 {
1634         uint16 setup = TRANSACT2_QFILEINFO;
1635         char param[6];
1636
1637         memset(param, 0, 6);
1638         SSVAL(param,0,fnum);
1639         SSVAL(param,2,SMB_INFO_SET_EA);
1640
1641         return cli_get_ea_list(cli, setup, param, 6, ctx, pnum_eas, pea_list);
1642 }