updated the 3.0 branch from the head branch - ready for alpha18
[samba.git] / source / libsmb / clireadwrite.c
1 /* 
2    Unix SMB/CIFS implementation.
3    client file read/write routines
4    Copyright (C) Andrew Tridgell 1994-1998
5    
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 2 of the License, or
9    (at your option) any later version.
10    
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15    
16    You should have received a copy of the GNU General Public License
17    along with this program; if not, write to the Free Software
18    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 */
20
21 #define NO_SYSLOG
22
23 #include "includes.h"
24
25 /****************************************************************************
26 Issue a single SMBread and don't wait for a reply.
27 ****************************************************************************/
28
29 static BOOL cli_issue_read(struct cli_state *cli, int fnum, off_t offset, 
30                            size_t size, int i)
31 {
32         memset(cli->outbuf,'\0',smb_size);
33         memset(cli->inbuf,'\0',smb_size);
34
35         set_message(cli->outbuf,10,0,True);
36                 
37         SCVAL(cli->outbuf,smb_com,SMBreadX);
38         SSVAL(cli->outbuf,smb_tid,cli->cnum);
39         cli_setup_packet(cli);
40
41         SCVAL(cli->outbuf,smb_vwv0,0xFF);
42         SSVAL(cli->outbuf,smb_vwv2,fnum);
43         SIVAL(cli->outbuf,smb_vwv3,offset);
44         SSVAL(cli->outbuf,smb_vwv5,size);
45         SSVAL(cli->outbuf,smb_vwv6,size);
46         SSVAL(cli->outbuf,smb_mid,cli->mid + i);
47
48         return cli_send_smb(cli);
49 }
50
51 /****************************************************************************
52   Read size bytes at offset offset using SMBreadX.
53 ****************************************************************************/
54
55 ssize_t cli_read(struct cli_state *cli, int fnum, char *buf, off_t offset, size_t size)
56 {
57         char *p;
58         int size2;
59         int readsize;
60         ssize_t total = 0;
61
62         if (size == 0) 
63                 return 0;
64
65         /*
66          * Set readsize to the maximum size we can handle in one readX,
67          * rounded down to a multiple of 1024.
68          */
69
70         readsize = (cli->max_xmit - (smb_size+32)) & ~1023;
71
72         while (total < size) {
73                 readsize = MIN(readsize, size-total);
74
75                 /* Issue a read and receive a reply */
76
77                 if (!cli_issue_read(cli, fnum, offset, readsize, 0))
78                         return -1;
79
80                 if (!cli_receive_smb(cli))
81                         return -1;
82
83                 /* Check for error.  Make sure to check for DOS and NT
84                    errors. */
85
86                 if (cli_is_error(cli)) {
87                         NTSTATUS status = NT_STATUS_OK;
88                         uint8 eclass = 0;
89                         uint32 ecode = 0;
90
91                         if (cli_is_nt_error(cli))
92                                 status = cli_nt_error(cli);
93                         else
94                                 cli_dos_error(cli, &eclass, &ecode);
95
96                         if ((eclass == ERRDOS && ecode == ERRmoredata) ||
97                             NT_STATUS_V(status) == NT_STATUS_V(STATUS_MORE_ENTRIES))
98                                 return -1;
99                 }
100
101                 size2 = SVAL(cli->inbuf, smb_vwv5);
102
103                 if (size2 > readsize) {
104                         DEBUG(5,("server returned more than we wanted!\n"));
105                         return -1;
106                 } else if (size2 < 0) {
107                         DEBUG(5,("read return < 0!\n"));
108                         return -1;
109                 }
110
111                 /* Copy data into buffer */
112
113                 p = smb_base(cli->inbuf) + SVAL(cli->inbuf,smb_vwv6);
114                 memcpy(buf + total, p, size2);
115
116                 total += size2;
117                 offset += size2;
118
119                 /*
120                  * If the server returned less than we asked for we're at EOF.
121                  */
122
123                 if (size2 < readsize)
124                         break;
125         }
126
127         return total;
128 }
129
130 #if 0  /* relies on client_recieve_smb(), now a static in libsmb/clientgen.c */
131
132 /* This call is INCOMPATIBLE with SMB signing.  If you remove the #if 0
133    you must fix ensure you don't attempt to sign the packets - data
134    *will* be currupted */
135
136 /****************************************************************************
137 Issue a single SMBreadraw and don't wait for a reply.
138 ****************************************************************************/
139
140 static BOOL cli_issue_readraw(struct cli_state *cli, int fnum, off_t offset, 
141                            size_t size, int i)
142 {
143
144         if (!cli->sign_info.use_smb_signing) {
145                 DEBUG(0, ("Cannot use readraw and SMB Signing\n"));
146                 return False;
147         }
148         
149         memset(cli->outbuf,'\0',smb_size);
150         memset(cli->inbuf,'\0',smb_size);
151
152         set_message(cli->outbuf,10,0,True);
153                 
154         SCVAL(cli->outbuf,smb_com,SMBreadbraw);
155         SSVAL(cli->outbuf,smb_tid,cli->cnum);
156         cli_setup_packet(cli);
157
158         SSVAL(cli->outbuf,smb_vwv0,fnum);
159         SIVAL(cli->outbuf,smb_vwv1,offset);
160         SSVAL(cli->outbuf,smb_vwv2,size);
161         SSVAL(cli->outbuf,smb_vwv3,size);
162         SSVAL(cli->outbuf,smb_mid,cli->mid + i);
163
164         return cli_send_smb(cli);
165 }
166
167 /****************************************************************************
168  Tester for the readraw call.
169 ****************************************************************************/
170
171 ssize_t cli_readraw(struct cli_state *cli, int fnum, char *buf, off_t offset, size_t size)
172 {
173         char *p;
174         int size2;
175         size_t readsize;
176         ssize_t total = 0;
177
178         if (size == 0) 
179                 return 0;
180
181         /*
182          * Set readsize to the maximum size we can handle in one readraw.
183          */
184
185         readsize = 0xFFFF;
186
187         while (total < size) {
188                 readsize = MIN(readsize, size-total);
189
190                 /* Issue a read and receive a reply */
191
192                 if (!cli_issue_readraw(cli, fnum, offset, readsize, 0))
193                         return -1;
194
195                 if (!client_receive_smb(cli->fd, cli->inbuf, cli->timeout))
196                         return -1;
197
198                 size2 = smb_len(cli->inbuf);
199
200                 if (size2 > readsize) {
201                         DEBUG(5,("server returned more than we wanted!\n"));
202                         return -1;
203                 } else if (size2 < 0) {
204                         DEBUG(5,("read return < 0!\n"));
205                         return -1;
206                 }
207
208                 /* Copy data into buffer */
209
210                 if (size2) {
211                         p = cli->inbuf + 4;
212                         memcpy(buf + total, p, size2);
213                 }
214
215                 total += size2;
216                 offset += size2;
217
218                 /*
219                  * If the server returned less than we asked for we're at EOF.
220                  */
221
222                 if (size2 < readsize)
223                         break;
224         }
225
226         return total;
227 }
228 #endif
229 /****************************************************************************
230 issue a single SMBwrite and don't wait for a reply
231 ****************************************************************************/
232
233 static BOOL cli_issue_write(struct cli_state *cli, int fnum, off_t offset, uint16 mode, char *buf,
234                             size_t size, int i)
235 {
236         char *p;
237
238         if (size > cli->bufsize) {
239                 cli->outbuf = realloc(cli->outbuf, size + 1024);
240                 cli->inbuf = realloc(cli->inbuf, size + 1024);
241                 if (cli->outbuf == NULL || cli->inbuf == NULL)
242                         return False;
243                 cli->bufsize = size + 1024;
244         }
245
246         memset(cli->outbuf,'\0',smb_size);
247         memset(cli->inbuf,'\0',smb_size);
248
249         if (size > 0xFFFF)
250                 set_message(cli->outbuf,14,0,True);
251         else
252                 set_message(cli->outbuf,12,0,True);
253         
254         SCVAL(cli->outbuf,smb_com,SMBwriteX);
255         SSVAL(cli->outbuf,smb_tid,cli->cnum);
256         cli_setup_packet(cli);
257         
258         SCVAL(cli->outbuf,smb_vwv0,0xFF);
259         SSVAL(cli->outbuf,smb_vwv2,fnum);
260
261         SIVAL(cli->outbuf,smb_vwv3,offset);
262         SIVAL(cli->outbuf,smb_vwv5,(mode & 0x0008) ? 0xFFFFFFFF : 0);
263         SSVAL(cli->outbuf,smb_vwv7,mode);
264
265         SSVAL(cli->outbuf,smb_vwv8,(mode & 0x0008) ? size : 0);
266         SSVAL(cli->outbuf,smb_vwv9,((size>>16)&1));
267         SSVAL(cli->outbuf,smb_vwv10,size);
268         SSVAL(cli->outbuf,smb_vwv11,
269               smb_buf(cli->outbuf) - smb_base(cli->outbuf));
270         
271         p = smb_base(cli->outbuf) + SVAL(cli->outbuf,smb_vwv11);
272         memcpy(p, buf, size);
273         cli_setup_bcc(cli, p+size);
274
275         SSVAL(cli->outbuf,smb_mid,cli->mid + i);
276         
277         show_msg(cli->outbuf);
278         return cli_send_smb(cli);
279 }
280
281 /****************************************************************************
282   write to a file
283   write_mode: 0x0001 disallow write cacheing
284               0x0002 return bytes remaining
285               0x0004 use raw named pipe protocol
286               0x0008 start of message mode named pipe protocol
287 ****************************************************************************/
288
289 ssize_t cli_write(struct cli_state *cli,
290                   int fnum, uint16 write_mode,
291                   char *buf, off_t offset, size_t size)
292 {
293         int bwritten = 0;
294         int issued = 0;
295         int received = 0;
296         int mpx = MAX(cli->max_mux-1, 1);
297         int block = (cli->max_xmit - (smb_size+32)) & ~1023;
298         int blocks = (size + (block-1)) / block;
299
300         while (received < blocks) {
301
302                 while ((issued - received < mpx) && (issued < blocks)) {
303                         int bsent = issued * block;
304                         int size1 = MIN(block, size - bsent);
305
306                         if (!cli_issue_write(cli, fnum, offset + bsent,
307                                         write_mode,
308                                         buf + bsent,
309                                         size1, issued))
310                                 return -1;
311                         issued++;
312                 }
313
314                 if (!cli_receive_smb(cli))
315                         return bwritten;
316
317                 received++;
318
319                 if (cli_is_error(cli))
320                         break;
321
322                 bwritten += SVAL(cli->inbuf, smb_vwv2);
323                 bwritten += (((int)(SVAL(cli->inbuf, smb_vwv4)))>>16);
324         }
325
326         while (received < issued && cli_receive_smb(cli))
327                 received++;
328         
329         return bwritten;
330 }
331
332 /****************************************************************************
333   write to a file using a SMBwrite and not bypassing 0 byte writes
334 ****************************************************************************/
335
336 ssize_t cli_smbwrite(struct cli_state *cli,
337                      int fnum, char *buf, off_t offset, size_t size1)
338 {
339         char *p;
340         ssize_t total = 0;
341
342         do {
343                 size_t size = MIN(size1, cli->max_xmit - 48);
344                 
345                 memset(cli->outbuf,'\0',smb_size);
346                 memset(cli->inbuf,'\0',smb_size);
347
348                 set_message(cli->outbuf,5, 0,True);
349
350                 SCVAL(cli->outbuf,smb_com,SMBwrite);
351                 SSVAL(cli->outbuf,smb_tid,cli->cnum);
352                 cli_setup_packet(cli);
353                 
354                 SSVAL(cli->outbuf,smb_vwv0,fnum);
355                 SSVAL(cli->outbuf,smb_vwv1,size);
356                 SIVAL(cli->outbuf,smb_vwv2,offset);
357                 SSVAL(cli->outbuf,smb_vwv4,0);
358                 
359                 p = smb_buf(cli->outbuf);
360                 *p++ = 1;
361                 SSVAL(p, 0, size); p += 2;
362                 memcpy(p, buf, size); p += size;
363
364                 cli_setup_bcc(cli, p);
365                 
366                 if (!cli_send_smb(cli))
367                         return -1;
368
369                 if (!cli_receive_smb(cli))
370                         return -1;
371                 
372                 if (cli_is_error(cli))
373                         return -1;
374
375                 size = SVAL(cli->inbuf,smb_vwv0);
376                 if (size == 0)
377                         break;
378
379                 size1 -= size;
380                 total += size;
381                 offset += size;
382
383         } while (size1);
384
385         return total;
386 }