This commit was manufactured by cvs2svn to create branch 'SAMBA_3_0'.(This used to...
[kai/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 ****************************************************************************/
29
30 static BOOL cli_link_internal(struct cli_state *cli, const char *fname_src, const char *fname_dst, BOOL hard_link)
31 {
32         unsigned int data_len = 0;
33         unsigned int param_len = 0;
34         uint16 setup = TRANSACT2_SETPATHINFO;
35         char param[sizeof(pstring)+6];
36         pstring data;
37         char *rparam=NULL, *rdata=NULL;
38         char *p;
39
40         memset(param, 0, sizeof(param));
41         SSVAL(param,0,hard_link ? SMB_SET_FILE_UNIX_HLINK : SMB_SET_FILE_UNIX_LINK);
42         p = &param[6];
43
44         p += clistr_push(cli, p, fname_src, -1, STR_TERMINATE);
45         param_len = PTR_DIFF(p, param);
46
47         p = data;
48         p += clistr_push(cli, p, fname_dst, -1, STR_TERMINATE);
49         data_len = PTR_DIFF(p, data);
50
51         if (!cli_send_trans(cli, SMBtrans2,
52                 NULL,                        /* name */
53                 -1, 0,                          /* fid, flags */
54                 &setup, 1, 0,                   /* setup, length, max */
55                 param, param_len, 2,            /* param, length, max */
56                 (char *)&data,  data_len, cli->max_xmit /* data, length, max */
57                 )) {
58                         return False;
59         }
60
61         if (!cli_receive_trans(cli, SMBtrans2,
62                 &rparam, &param_len,
63                 &rdata, &data_len)) {
64                         return False;
65         }
66
67         SAFE_FREE(rdata);
68         SAFE_FREE(rparam);
69
70         return True;
71 }
72
73 /****************************************************************************
74  Map standard UNIX permissions onto wire representations.
75 ****************************************************************************/
76
77 uint32  unix_perms_to_wire(mode_t perms)
78 {
79         unsigned int ret = 0;
80
81         ret |= ((perms & S_IXOTH) ?  UNIX_X_OTH : 0);
82         ret |= ((perms & S_IWOTH) ?  UNIX_W_OTH : 0);
83         ret |= ((perms & S_IROTH) ?  UNIX_R_OTH : 0);
84         ret |= ((perms & S_IXGRP) ?  UNIX_X_GRP : 0);
85         ret |= ((perms & S_IWGRP) ?  UNIX_W_GRP : 0);
86         ret |= ((perms & S_IRGRP) ?  UNIX_R_GRP : 0);
87         ret |= ((perms & S_IXUSR) ?  UNIX_X_USR : 0);
88         ret |= ((perms & S_IWUSR) ?  UNIX_W_USR : 0);
89         ret |= ((perms & S_IRUSR) ?  UNIX_R_USR : 0);
90 #ifdef S_ISVTX
91         ret |= ((perms & S_ISVTX) ?  UNIX_STICKY : 0);
92 #endif
93 #ifdef S_ISGID
94         ret |= ((perms & S_ISGID) ?  UNIX_SET_GID : 0);
95 #endif
96 #ifdef S_ISUID
97         ret |= ((perms & S_ISUID) ?  UNIX_SET_UID : 0);
98 #endif
99         return ret;
100 }
101
102 /****************************************************************************
103  Symlink a file (UNIX extensions).
104 ****************************************************************************/
105
106 BOOL cli_unix_symlink(struct cli_state *cli, const char *fname_src, const char *fname_dst)
107 {
108         return cli_link_internal(cli, fname_src, fname_dst, False);
109 }
110
111 /****************************************************************************
112  Hard a file (UNIX extensions).
113 ****************************************************************************/
114
115 BOOL cli_unix_hardlink(struct cli_state *cli, const char *fname_src, const char *fname_dst)
116 {
117         return cli_link_internal(cli, fname_src, fname_dst, True);
118 }
119
120 /****************************************************************************
121  Chmod or chown a file internal (UNIX extensions).
122 ****************************************************************************/
123
124 static BOOL cli_unix_chmod_chown_internal(struct cli_state *cli, const char *fname, uint32 mode, uint32 uid, uint32 gid)
125 {
126         unsigned int data_len = 0;
127         unsigned int param_len = 0;
128         uint16 setup = TRANSACT2_SETPATHINFO;
129         char param[sizeof(pstring)+6];
130         char data[100];
131         char *rparam=NULL, *rdata=NULL;
132         char *p;
133
134         memset(param, 0, sizeof(param));
135         memset(data, 0, sizeof(data));
136         SSVAL(param,0,SMB_SET_FILE_UNIX_BASIC);
137         p = &param[6];
138
139         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
140         param_len = PTR_DIFF(p, param);
141
142         SIVAL(data,40,uid);
143         SIVAL(data,48,gid);
144         SIVAL(data,84,mode);
145
146         data_len = 100;
147
148         if (!cli_send_trans(cli, SMBtrans2,
149                 NULL,                        /* name */
150                 -1, 0,                          /* fid, flags */
151                 &setup, 1, 0,                   /* setup, length, max */
152                 param, param_len, 2,            /* param, length, max */
153                 (char *)&data,  data_len, cli->max_xmit /* data, length, max */
154                 )) {
155                         return False;
156         }
157
158         if (!cli_receive_trans(cli, SMBtrans2,
159                 &rparam, &param_len,
160                 &rdata, &data_len)) {
161                         return False;
162         }
163
164         SAFE_FREE(rdata);
165         SAFE_FREE(rparam);
166
167         return True;
168 }
169
170 /****************************************************************************
171  chmod a file (UNIX extensions).
172 ****************************************************************************/
173
174 BOOL cli_unix_chmod(struct cli_state *cli, const char *fname, mode_t mode)
175 {
176         return cli_unix_chmod_chown_internal(cli, fname, 
177                 unix_perms_to_wire(mode), SMB_UID_NO_CHANGE, SMB_GID_NO_CHANGE);
178 }
179
180 /****************************************************************************
181  chown a file (UNIX extensions).
182 ****************************************************************************/
183
184 BOOL cli_unix_chown(struct cli_state *cli, const char *fname, uid_t uid, gid_t gid)
185 {
186         return cli_unix_chmod_chown_internal(cli, fname, SMB_MODE_NO_CHANGE, (uint32)uid, (uint32)gid);
187 }
188
189 /****************************************************************************
190  Rename a file.
191 ****************************************************************************/
192
193 BOOL cli_rename(struct cli_state *cli, const char *fname_src, const char *fname_dst)
194 {
195         char *p;
196
197         memset(cli->outbuf,'\0',smb_size);
198         memset(cli->inbuf,'\0',smb_size);
199
200         set_message(cli->outbuf,1, 0, True);
201
202         SCVAL(cli->outbuf,smb_com,SMBmv);
203         SSVAL(cli->outbuf,smb_tid,cli->cnum);
204         cli_setup_packet(cli);
205
206         SSVAL(cli->outbuf,smb_vwv0,aSYSTEM | aHIDDEN | aDIR);
207
208         p = smb_buf(cli->outbuf);
209         *p++ = 4;
210         p += clistr_push(cli, p, fname_src, -1, STR_TERMINATE);
211         *p++ = 4;
212         p += clistr_push(cli, p, fname_dst, -1, STR_TERMINATE);
213
214         cli_setup_bcc(cli, p);
215
216         cli_send_smb(cli);
217         if (!cli_receive_smb(cli))
218                 return False;
219
220         if (cli_is_error(cli))
221                 return False;
222
223         return True;
224 }
225
226 /****************************************************************************
227  Delete a file.
228 ****************************************************************************/
229
230 BOOL cli_unlink(struct cli_state *cli, const char *fname)
231 {
232         char *p;
233
234         memset(cli->outbuf,'\0',smb_size);
235         memset(cli->inbuf,'\0',smb_size);
236
237         set_message(cli->outbuf,1, 0,True);
238
239         SCVAL(cli->outbuf,smb_com,SMBunlink);
240         SSVAL(cli->outbuf,smb_tid,cli->cnum);
241         cli_setup_packet(cli);
242
243         SSVAL(cli->outbuf,smb_vwv0,aSYSTEM | aHIDDEN);
244   
245         p = smb_buf(cli->outbuf);
246         *p++ = 4;      
247         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
248
249         cli_setup_bcc(cli, p);
250         cli_send_smb(cli);
251         if (!cli_receive_smb(cli)) {
252                 return False;
253         }
254
255         if (cli_is_error(cli)) {
256                 return False;
257         }
258
259         return True;
260 }
261
262 /****************************************************************************
263  Create a directory.
264 ****************************************************************************/
265
266 BOOL cli_mkdir(struct cli_state *cli, const char *dname)
267 {
268         char *p;
269
270         memset(cli->outbuf,'\0',smb_size);
271         memset(cli->inbuf,'\0',smb_size);
272
273         set_message(cli->outbuf,0, 0,True);
274
275         SCVAL(cli->outbuf,smb_com,SMBmkdir);
276         SSVAL(cli->outbuf,smb_tid,cli->cnum);
277         cli_setup_packet(cli);
278
279         p = smb_buf(cli->outbuf);
280         *p++ = 4;      
281         p += clistr_push(cli, p, dname, -1, STR_TERMINATE);
282
283         cli_setup_bcc(cli, p);
284
285         cli_send_smb(cli);
286         if (!cli_receive_smb(cli)) {
287                 return False;
288         }
289
290         if (cli_is_error(cli)) {
291                 return False;
292         }
293
294         return True;
295 }
296
297 /****************************************************************************
298  Remove a directory.
299 ****************************************************************************/
300
301 BOOL cli_rmdir(struct cli_state *cli, const char *dname)
302 {
303         char *p;
304
305         memset(cli->outbuf,'\0',smb_size);
306         memset(cli->inbuf,'\0',smb_size);
307
308         set_message(cli->outbuf,0, 0, True);
309
310         SCVAL(cli->outbuf,smb_com,SMBrmdir);
311         SSVAL(cli->outbuf,smb_tid,cli->cnum);
312         cli_setup_packet(cli);
313
314         p = smb_buf(cli->outbuf);
315         *p++ = 4;      
316         p += clistr_push(cli, p, dname, -1, STR_TERMINATE);
317
318         cli_setup_bcc(cli, p);
319
320         cli_send_smb(cli);
321         if (!cli_receive_smb(cli)) {
322                 return False;
323         }
324
325         if (cli_is_error(cli)) {
326                 return False;
327         }
328
329         return True;
330 }
331
332 /****************************************************************************
333  Set or clear the delete on close flag.
334 ****************************************************************************/
335
336 int cli_nt_delete_on_close(struct cli_state *cli, int fnum, BOOL flag)
337 {
338         unsigned int data_len = 1;
339         unsigned int param_len = 6;
340         uint16 setup = TRANSACT2_SETFILEINFO;
341         pstring param;
342         unsigned char data;
343         char *rparam=NULL, *rdata=NULL;
344
345         memset(param, 0, param_len);
346         SSVAL(param,0,fnum);
347         SSVAL(param,2,SMB_SET_FILE_DISPOSITION_INFO);
348
349         data = flag ? 1 : 0;
350
351         if (!cli_send_trans(cli, SMBtrans2,
352                                                 NULL,                        /* name */
353                                                 -1, 0,                          /* fid, flags */
354                                                 &setup, 1, 0,                   /* setup, length, max */
355                                                 param, param_len, 2,            /* param, length, max */
356                                                 (char *)&data,  data_len, cli->max_xmit /* data, length, max */
357                                                 )) {
358                 return False;
359         }
360
361         if (!cli_receive_trans(cli, SMBtrans2,
362                                                 &rparam, &param_len,
363                                                 &rdata, &data_len)) {
364                 return False;
365         }
366
367         SAFE_FREE(rdata);
368         SAFE_FREE(rparam);
369
370         return True;
371 }
372
373 /****************************************************************************
374  Open a file - exposing the full horror of the NT API :-).
375  Used in smbtorture.
376 ****************************************************************************/
377
378 int cli_nt_create_full(struct cli_state *cli, const char *fname, uint32 DesiredAccess,
379                  uint32 FileAttributes, uint32 ShareAccess,
380                  uint32 CreateDisposition, uint32 CreateOptions)
381 {
382         char *p;
383         int len;
384
385         memset(cli->outbuf,'\0',smb_size);
386         memset(cli->inbuf,'\0',smb_size);
387
388         set_message(cli->outbuf,24,0,True);
389
390         SCVAL(cli->outbuf,smb_com,SMBntcreateX);
391         SSVAL(cli->outbuf,smb_tid,cli->cnum);
392         cli_setup_packet(cli);
393
394         SSVAL(cli->outbuf,smb_vwv0,0xFF);
395         if (cli->use_oplocks)
396                 SIVAL(cli->outbuf,smb_ntcreate_Flags, REQUEST_OPLOCK|REQUEST_BATCH_OPLOCK);
397         else
398                 SIVAL(cli->outbuf,smb_ntcreate_Flags, 0);
399         SIVAL(cli->outbuf,smb_ntcreate_RootDirectoryFid, 0x0);
400         SIVAL(cli->outbuf,smb_ntcreate_DesiredAccess, DesiredAccess);
401         SIVAL(cli->outbuf,smb_ntcreate_FileAttributes, FileAttributes);
402         SIVAL(cli->outbuf,smb_ntcreate_ShareAccess, ShareAccess);
403         SIVAL(cli->outbuf,smb_ntcreate_CreateDisposition, CreateDisposition);
404         SIVAL(cli->outbuf,smb_ntcreate_CreateOptions, CreateOptions);
405         SIVAL(cli->outbuf,smb_ntcreate_ImpersonationLevel, 0x02);
406
407         p = smb_buf(cli->outbuf);
408         /* this alignment and termination is critical for netapp filers. Don't change */
409         p += clistr_align_out(cli, p, 0);
410         len = clistr_push(cli, p, fname, -1, 0);
411         p += len;
412         SSVAL(cli->outbuf,smb_ntcreate_NameLength, len);
413         /* sigh. this copes with broken netapp filer behaviour */
414         p += clistr_push(cli, p, "", -1, STR_TERMINATE);
415
416         cli_setup_bcc(cli, p);
417
418         cli_send_smb(cli);
419         if (!cli_receive_smb(cli)) {
420                 return -1;
421         }
422
423         if (cli_is_error(cli)) {
424                 return -1;
425         }
426
427         return SVAL(cli->inbuf,smb_vwv2 + 1);
428 }
429
430 /****************************************************************************
431  Open a file.
432 ****************************************************************************/
433
434 int cli_nt_create(struct cli_state *cli, const char *fname, uint32 DesiredAccess)
435 {
436         return cli_nt_create_full(cli, fname, DesiredAccess, 0,
437                                 FILE_SHARE_READ|FILE_SHARE_WRITE, FILE_EXISTS_OPEN, 0x0);
438 }
439
440 /****************************************************************************
441  Open a file
442  WARNING: if you open with O_WRONLY then getattrE won't work!
443 ****************************************************************************/
444
445 int cli_open(struct cli_state *cli, const char *fname, int flags, int share_mode)
446 {
447         char *p;
448         unsigned openfn=0;
449         unsigned accessmode=0;
450
451         if (flags & O_CREAT)
452                 openfn |= (1<<4);
453         if (!(flags & O_EXCL)) {
454                 if (flags & O_TRUNC)
455                         openfn |= (1<<1);
456                 else
457                         openfn |= (1<<0);
458         }
459
460         accessmode = (share_mode<<4);
461
462         if ((flags & O_ACCMODE) == O_RDWR) {
463                 accessmode |= 2;
464         } else if ((flags & O_ACCMODE) == O_WRONLY) {
465                 accessmode |= 1;
466         } 
467
468 #if defined(O_SYNC)
469         if ((flags & O_SYNC) == O_SYNC) {
470                 accessmode |= (1<<14);
471         }
472 #endif /* O_SYNC */
473
474         if (share_mode == DENY_FCB) {
475                 accessmode = 0xFF;
476         }
477
478         memset(cli->outbuf,'\0',smb_size);
479         memset(cli->inbuf,'\0',smb_size);
480
481         set_message(cli->outbuf,15,0,True);
482
483         SCVAL(cli->outbuf,smb_com,SMBopenX);
484         SSVAL(cli->outbuf,smb_tid,cli->cnum);
485         cli_setup_packet(cli);
486
487         SSVAL(cli->outbuf,smb_vwv0,0xFF);
488         SSVAL(cli->outbuf,smb_vwv2,0);  /* no additional info */
489         SSVAL(cli->outbuf,smb_vwv3,accessmode);
490         SSVAL(cli->outbuf,smb_vwv4,aSYSTEM | aHIDDEN);
491         SSVAL(cli->outbuf,smb_vwv5,0);
492         SSVAL(cli->outbuf,smb_vwv8,openfn);
493
494         if (cli->use_oplocks) {
495                 /* if using oplocks then ask for a batch oplock via
496                    core and extended methods */
497                 SCVAL(cli->outbuf,smb_flg, CVAL(cli->outbuf,smb_flg)|
498                         FLAG_REQUEST_OPLOCK|FLAG_REQUEST_BATCH_OPLOCK);
499                 SSVAL(cli->outbuf,smb_vwv2,SVAL(cli->outbuf,smb_vwv2) | 6);
500         }
501   
502         p = smb_buf(cli->outbuf);
503         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
504
505         cli_setup_bcc(cli, p);
506
507         cli_send_smb(cli);
508         if (!cli_receive_smb(cli)) {
509                 return -1;
510         }
511
512         if (cli_is_error(cli)) {
513                 return -1;
514         }
515
516         return SVAL(cli->inbuf,smb_vwv2);
517 }
518
519 /****************************************************************************
520  Close a file.
521 ****************************************************************************/
522
523 BOOL cli_close(struct cli_state *cli, int fnum)
524 {
525         memset(cli->outbuf,'\0',smb_size);
526         memset(cli->inbuf,'\0',smb_size);
527
528         set_message(cli->outbuf,3,0,True);
529
530         SCVAL(cli->outbuf,smb_com,SMBclose);
531         SSVAL(cli->outbuf,smb_tid,cli->cnum);
532         cli_setup_packet(cli);
533
534         SSVAL(cli->outbuf,smb_vwv0,fnum);
535         SIVALS(cli->outbuf,smb_vwv1,-1);
536
537         cli_send_smb(cli);
538         if (!cli_receive_smb(cli)) {
539                 return False;
540         }
541
542         return !cli_is_error(cli);
543 }
544
545
546 /****************************************************************************
547  send a lock with a specified locktype 
548  this is used for testing LOCKING_ANDX_CANCEL_LOCK
549 ****************************************************************************/
550 NTSTATUS cli_locktype(struct cli_state *cli, int fnum, 
551                       uint32 offset, uint32 len, int timeout, unsigned char locktype)
552 {
553         char *p;
554         int saved_timeout = cli->timeout;
555
556         memset(cli->outbuf,'\0',smb_size);
557         memset(cli->inbuf,'\0', smb_size);
558
559         set_message(cli->outbuf,8,0,True);
560
561         SCVAL(cli->outbuf,smb_com,SMBlockingX);
562         SSVAL(cli->outbuf,smb_tid,cli->cnum);
563         cli_setup_packet(cli);
564
565         SCVAL(cli->outbuf,smb_vwv0,0xFF);
566         SSVAL(cli->outbuf,smb_vwv2,fnum);
567         SCVAL(cli->outbuf,smb_vwv3,locktype);
568         SIVALS(cli->outbuf, smb_vwv4, timeout);
569         SSVAL(cli->outbuf,smb_vwv6,0);
570         SSVAL(cli->outbuf,smb_vwv7,1);
571
572         p = smb_buf(cli->outbuf);
573         SSVAL(p, 0, cli->pid);
574         SIVAL(p, 2, offset);
575         SIVAL(p, 6, len);
576
577         p += 10;
578
579         cli_setup_bcc(cli, p);
580
581         cli_send_smb(cli);
582
583         if (timeout != 0) {
584                 cli->timeout = (timeout == -1) ? 0x7FFFFFFF : (timeout + 2*1000);
585         }
586
587         if (!cli_receive_smb(cli)) {
588                 cli->timeout = saved_timeout;
589                 return NT_STATUS_UNSUCCESSFUL;
590         }
591
592         cli->timeout = saved_timeout;
593
594         return cli_nt_error(cli);
595 }
596
597
598 /****************************************************************************
599  Lock a file.
600 ****************************************************************************/
601
602 BOOL cli_lock(struct cli_state *cli, int fnum, 
603               uint32 offset, uint32 len, int timeout, enum brl_type lock_type)
604 {
605         char *p;
606         int saved_timeout = cli->timeout;
607
608         memset(cli->outbuf,'\0',smb_size);
609         memset(cli->inbuf,'\0', smb_size);
610
611         set_message(cli->outbuf,8,0,True);
612
613         SCVAL(cli->outbuf,smb_com,SMBlockingX);
614         SSVAL(cli->outbuf,smb_tid,cli->cnum);
615         cli_setup_packet(cli);
616
617         SCVAL(cli->outbuf,smb_vwv0,0xFF);
618         SSVAL(cli->outbuf,smb_vwv2,fnum);
619         SCVAL(cli->outbuf,smb_vwv3,(lock_type == READ_LOCK? 1 : 0));
620         SIVALS(cli->outbuf, smb_vwv4, timeout);
621         SSVAL(cli->outbuf,smb_vwv6,0);
622         SSVAL(cli->outbuf,smb_vwv7,1);
623
624         p = smb_buf(cli->outbuf);
625         SSVAL(p, 0, cli->pid);
626         SIVAL(p, 2, offset);
627         SIVAL(p, 6, len);
628
629         p += 10;
630
631         cli_setup_bcc(cli, p);
632
633         cli_send_smb(cli);
634
635         if (timeout != 0) {
636                 cli->timeout = (timeout == -1) ? 0x7FFFFFFF : (timeout + 10*1000);
637         }
638
639         if (!cli_receive_smb(cli)) {
640                 cli->timeout = saved_timeout;
641                 return False;
642         }
643
644         cli->timeout = saved_timeout;
645
646         if (cli_is_error(cli)) {
647                 return False;
648         }
649
650         return True;
651 }
652
653 /****************************************************************************
654  Unlock a file.
655 ****************************************************************************/
656
657 BOOL cli_unlock(struct cli_state *cli, int fnum, uint32 offset, uint32 len)
658 {
659         char *p;
660
661         memset(cli->outbuf,'\0',smb_size);
662         memset(cli->inbuf,'\0',smb_size);
663
664         set_message(cli->outbuf,8,0,True);
665
666         SCVAL(cli->outbuf,smb_com,SMBlockingX);
667         SSVAL(cli->outbuf,smb_tid,cli->cnum);
668         cli_setup_packet(cli);
669
670         SCVAL(cli->outbuf,smb_vwv0,0xFF);
671         SSVAL(cli->outbuf,smb_vwv2,fnum);
672         SCVAL(cli->outbuf,smb_vwv3,0);
673         SIVALS(cli->outbuf, smb_vwv4, 0);
674         SSVAL(cli->outbuf,smb_vwv6,1);
675         SSVAL(cli->outbuf,smb_vwv7,0);
676
677         p = smb_buf(cli->outbuf);
678         SSVAL(p, 0, cli->pid);
679         SIVAL(p, 2, offset);
680         SIVAL(p, 6, len);
681         p += 10;
682         cli_setup_bcc(cli, p);
683         cli_send_smb(cli);
684         if (!cli_receive_smb(cli)) {
685                 return False;
686         }
687
688         if (cli_is_error(cli)) {
689                 return False;
690         }
691
692         return True;
693 }
694
695 /****************************************************************************
696  Lock a file with 64 bit offsets.
697 ****************************************************************************/
698
699 BOOL cli_lock64(struct cli_state *cli, int fnum, 
700                 SMB_BIG_UINT offset, SMB_BIG_UINT len, int timeout, enum brl_type lock_type)
701 {
702         char *p;
703         int saved_timeout = cli->timeout;
704         int ltype;
705
706         if (! (cli->capabilities & CAP_LARGE_FILES)) {
707                 return cli_lock(cli, fnum, offset, len, timeout, lock_type);
708         }
709
710         ltype = (lock_type == READ_LOCK? 1 : 0);
711         ltype |= LOCKING_ANDX_LARGE_FILES;
712
713         memset(cli->outbuf,'\0',smb_size);
714         memset(cli->inbuf,'\0', smb_size);
715
716         set_message(cli->outbuf,8,0,True);
717
718         SCVAL(cli->outbuf,smb_com,SMBlockingX);
719         SSVAL(cli->outbuf,smb_tid,cli->cnum);
720         cli_setup_packet(cli);
721
722         SCVAL(cli->outbuf,smb_vwv0,0xFF);
723         SSVAL(cli->outbuf,smb_vwv2,fnum);
724         SCVAL(cli->outbuf,smb_vwv3,ltype);
725         SIVALS(cli->outbuf, smb_vwv4, timeout);
726         SSVAL(cli->outbuf,smb_vwv6,0);
727         SSVAL(cli->outbuf,smb_vwv7,1);
728
729         p = smb_buf(cli->outbuf);
730         SIVAL(p, 0, cli->pid);
731         SOFF_T_R(p, 4, offset);
732         SOFF_T_R(p, 12, len);
733         p += 20;
734
735         cli_setup_bcc(cli, p);
736         cli_send_smb(cli);
737
738         if (timeout != 0) {
739                 cli->timeout = (timeout == -1) ? 0x7FFFFFFF : (timeout + 5*1000);
740         }
741
742         if (!cli_receive_smb(cli)) {
743                 cli->timeout = saved_timeout;
744                 return False;
745         }
746
747         cli->timeout = saved_timeout;
748
749         if (cli_is_error(cli)) {
750                 return False;
751         }
752
753         return True;
754 }
755
756 /****************************************************************************
757  Unlock a file with 64 bit offsets.
758 ****************************************************************************/
759
760 BOOL cli_unlock64(struct cli_state *cli, int fnum, SMB_BIG_UINT offset, SMB_BIG_UINT len)
761 {
762         char *p;
763
764         if (! (cli->capabilities & CAP_LARGE_FILES)) {
765                 return cli_unlock(cli, fnum, offset, len);
766         }
767
768         memset(cli->outbuf,'\0',smb_size);
769         memset(cli->inbuf,'\0',smb_size);
770
771         set_message(cli->outbuf,8,0,True);
772
773         SCVAL(cli->outbuf,smb_com,SMBlockingX);
774         SSVAL(cli->outbuf,smb_tid,cli->cnum);
775         cli_setup_packet(cli);
776
777         SCVAL(cli->outbuf,smb_vwv0,0xFF);
778         SSVAL(cli->outbuf,smb_vwv2,fnum);
779         SCVAL(cli->outbuf,smb_vwv3,LOCKING_ANDX_LARGE_FILES);
780         SIVALS(cli->outbuf, smb_vwv4, 0);
781         SSVAL(cli->outbuf,smb_vwv6,1);
782         SSVAL(cli->outbuf,smb_vwv7,0);
783
784         p = smb_buf(cli->outbuf);
785         SIVAL(p, 0, cli->pid);
786         SOFF_T_R(p, 4, offset);
787         SOFF_T_R(p, 12, len);
788         p += 20;
789         cli_setup_bcc(cli, p);
790         cli_send_smb(cli);
791         if (!cli_receive_smb(cli)) {
792                 return False;
793         }
794
795         if (cli_is_error(cli)) {
796                 return False;
797         }
798
799         return True;
800 }
801
802
803 /****************************************************************************
804  Do a SMBgetattrE call.
805 ****************************************************************************/
806
807 BOOL cli_getattrE(struct cli_state *cli, int fd, 
808                   uint16 *attr, SMB_BIG_UINT *size, 
809                   time_t *c_time, time_t *a_time, time_t *m_time)
810 {
811         memset(cli->outbuf,'\0',smb_size);
812         memset(cli->inbuf,'\0',smb_size);
813
814         set_message(cli->outbuf,1,0,True);
815
816         SCVAL(cli->outbuf,smb_com,SMBgetattrE);
817         SSVAL(cli->outbuf,smb_tid,cli->cnum);
818         cli_setup_packet(cli);
819
820         SSVAL(cli->outbuf,smb_vwv0,fd);
821
822         cli_send_smb(cli);
823         if (!cli_receive_smb(cli)) {
824                 return False;
825         }
826         
827         if (cli_is_error(cli)) {
828                 return False;
829         }
830
831         if (size) {
832                 *size = IVAL(cli->inbuf, smb_vwv6);
833         }
834
835         if (attr) {
836                 *attr = SVAL(cli->inbuf,smb_vwv10);
837         }
838
839         if (c_time) {
840                 *c_time = make_unix_date3(cli->inbuf+smb_vwv0);
841         }
842
843         if (a_time) {
844                 *a_time = make_unix_date3(cli->inbuf+smb_vwv2);
845         }
846
847         if (m_time) {
848                 *m_time = make_unix_date3(cli->inbuf+smb_vwv4);
849         }
850
851         return True;
852 }
853
854 /****************************************************************************
855  Do a SMBgetatr call
856 ****************************************************************************/
857
858 BOOL cli_getatr(struct cli_state *cli, const char *fname, 
859                 uint16 *attr, size_t *size, time_t *t)
860 {
861         char *p;
862
863         memset(cli->outbuf,'\0',smb_size);
864         memset(cli->inbuf,'\0',smb_size);
865
866         set_message(cli->outbuf,0,0,True);
867
868         SCVAL(cli->outbuf,smb_com,SMBgetatr);
869         SSVAL(cli->outbuf,smb_tid,cli->cnum);
870         cli_setup_packet(cli);
871
872         p = smb_buf(cli->outbuf);
873         *p++ = 4;
874         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
875
876         cli_setup_bcc(cli, p);
877
878         cli_send_smb(cli);
879         if (!cli_receive_smb(cli)) {
880                 return False;
881         }
882         
883         if (cli_is_error(cli)) {
884                 return False;
885         }
886
887         if (size) {
888                 *size = IVAL(cli->inbuf, smb_vwv3);
889         }
890
891         if (t) {
892                 *t = make_unix_date3(cli->inbuf+smb_vwv1);
893         }
894
895         if (attr) {
896                 *attr = SVAL(cli->inbuf,smb_vwv0);
897         }
898
899
900         return True;
901 }
902
903 /****************************************************************************
904  Do a SMBsetatr call.
905 ****************************************************************************/
906
907 BOOL cli_setatr(struct cli_state *cli, const char *fname, uint16 attr, time_t t)
908 {
909         char *p;
910
911         memset(cli->outbuf,'\0',smb_size);
912         memset(cli->inbuf,'\0',smb_size);
913
914         set_message(cli->outbuf,8,0,True);
915
916         SCVAL(cli->outbuf,smb_com,SMBsetatr);
917         SSVAL(cli->outbuf,smb_tid,cli->cnum);
918         cli_setup_packet(cli);
919
920         SSVAL(cli->outbuf,smb_vwv0, attr);
921         put_dos_date3(cli->outbuf,smb_vwv1, t);
922
923         p = smb_buf(cli->outbuf);
924         *p++ = 4;
925         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
926         *p++ = 4;
927
928         cli_setup_bcc(cli, p);
929
930         cli_send_smb(cli);
931         if (!cli_receive_smb(cli)) {
932                 return False;
933         }
934         
935         if (cli_is_error(cli)) {
936                 return False;
937         }
938
939         return True;
940 }
941
942 /****************************************************************************
943  Check for existance of a dir.
944 ****************************************************************************/
945
946 BOOL cli_chkpath(struct cli_state *cli, const char *path)
947 {
948         pstring path2;
949         char *p;
950         
951         pstrcpy(path2,path);
952         trim_string(path2,NULL,"\\");
953         if (!*path2) *path2 = '\\';
954         
955         memset(cli->outbuf,'\0',smb_size);
956         set_message(cli->outbuf,0,0,True);
957         SCVAL(cli->outbuf,smb_com,SMBchkpth);
958         SSVAL(cli->outbuf,smb_tid,cli->cnum);
959         cli_setup_packet(cli);
960         p = smb_buf(cli->outbuf);
961         *p++ = 4;
962         p += clistr_push(cli, p, path2, -1, STR_TERMINATE);
963
964         cli_setup_bcc(cli, p);
965
966         cli_send_smb(cli);
967         if (!cli_receive_smb(cli)) {
968                 return False;
969         }
970
971         if (cli_is_error(cli)) return False;
972
973         return True;
974 }
975
976 /****************************************************************************
977  Query disk space.
978 ****************************************************************************/
979
980 BOOL cli_dskattr(struct cli_state *cli, int *bsize, int *total, int *avail)
981 {
982         memset(cli->outbuf,'\0',smb_size);
983         set_message(cli->outbuf,0,0,True);
984         SCVAL(cli->outbuf,smb_com,SMBdskattr);
985         SSVAL(cli->outbuf,smb_tid,cli->cnum);
986         cli_setup_packet(cli);
987
988         cli_send_smb(cli);
989         if (!cli_receive_smb(cli)) {
990                 return False;
991         }
992
993         *bsize = SVAL(cli->inbuf,smb_vwv1)*SVAL(cli->inbuf,smb_vwv2);
994         *total = SVAL(cli->inbuf,smb_vwv0);
995         *avail = SVAL(cli->inbuf,smb_vwv3);
996         
997         return True;
998 }
999
1000 /****************************************************************************
1001  Create and open a temporary file.
1002 ****************************************************************************/
1003
1004 int cli_ctemp(struct cli_state *cli, const char *path, char **tmp_path)
1005 {
1006         int len;
1007         char *p;
1008
1009         memset(cli->outbuf,'\0',smb_size);
1010         memset(cli->inbuf,'\0',smb_size);
1011
1012         set_message(cli->outbuf,3,0,True);
1013
1014         SCVAL(cli->outbuf,smb_com,SMBctemp);
1015         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1016         cli_setup_packet(cli);
1017
1018         SSVAL(cli->outbuf,smb_vwv0,0);
1019         SIVALS(cli->outbuf,smb_vwv1,-1);
1020
1021         p = smb_buf(cli->outbuf);
1022         *p++ = 4;
1023         p += clistr_push(cli, p, path, -1, STR_TERMINATE);
1024
1025         cli_setup_bcc(cli, p);
1026
1027         cli_send_smb(cli);
1028         if (!cli_receive_smb(cli)) {
1029                 return -1;
1030         }
1031
1032         if (cli_is_error(cli)) {
1033                 return -1;
1034         }
1035
1036         /* despite the spec, the result has a -1, followed by
1037            length, followed by name */
1038         p = smb_buf(cli->inbuf);
1039         p += 4;
1040         len = smb_buflen(cli->inbuf) - 4;
1041         if (len <= 0) return -1;
1042
1043         if (tmp_path) {
1044                 pstring path2;
1045                 clistr_pull(cli, path2, p, 
1046                             sizeof(path2), len, STR_ASCII);
1047                 *tmp_path = strdup(path2);
1048         }
1049
1050         return SVAL(cli->inbuf,smb_vwv0);
1051 }