Re-added readbraw call to test with smbtorture. This code not yet
[abartlet/samba.git/.git] / source3 / libsmb / clireadwrite.c
1 /* 
2    Unix SMB/Netbios implementation.
3    Version 3.0
4    client file read/write routines
5    Copyright (C) Andrew Tridgell 1994-1998
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 Issue a single SMBread and don't wait for a reply.
28 ****************************************************************************/
29
30 static BOOL cli_issue_read(struct cli_state *cli, int fnum, off_t offset, 
31                            size_t size, int i)
32 {
33         memset(cli->outbuf,'\0',smb_size);
34         memset(cli->inbuf,'\0',smb_size);
35
36         set_message(cli->outbuf,10,0,True);
37                 
38         CVAL(cli->outbuf,smb_com) = SMBreadX;
39         SSVAL(cli->outbuf,smb_tid,cli->cnum);
40         cli_setup_packet(cli);
41
42         CVAL(cli->outbuf,smb_vwv0) = 0xFF;
43         SSVAL(cli->outbuf,smb_vwv2,fnum);
44         SIVAL(cli->outbuf,smb_vwv3,offset);
45         SSVAL(cli->outbuf,smb_vwv5,size);
46         SSVAL(cli->outbuf,smb_vwv6,size);
47         SSVAL(cli->outbuf,smb_mid,cli->mid + i);
48
49         return cli_send_smb(cli);
50 }
51
52 /****************************************************************************
53 Issue a single SMBreadraw and don't wait for a reply.
54 ****************************************************************************/
55
56 static BOOL cli_issue_readraw(struct cli_state *cli, int fnum, off_t offset, 
57                            size_t size, int i)
58 {
59         memset(cli->outbuf,'\0',smb_size);
60         memset(cli->inbuf,'\0',smb_size);
61
62         set_message(cli->outbuf,10,0,True);
63                 
64         CVAL(cli->outbuf,smb_com) = SMBreadbraw;
65         SSVAL(cli->outbuf,smb_tid,cli->cnum);
66         cli_setup_packet(cli);
67
68         SSVAL(cli->outbuf,smb_vwv0,fnum);
69         SIVAL(cli->outbuf,smb_vwv1,offset);
70         SSVAL(cli->outbuf,smb_vwv2,size);
71         SSVAL(cli->outbuf,smb_vwv3,size);
72         SSVAL(cli->outbuf,smb_mid,cli->mid + i);
73
74         return cli_send_smb(cli);
75 }
76
77 /****************************************************************************
78   Read size bytes at offset offset using SMBreadX.
79 ****************************************************************************/
80
81 ssize_t cli_read(struct cli_state *cli, int fnum, char *buf, off_t offset, size_t size)
82 {
83         char *p;
84         int size2;
85         int readsize;
86         ssize_t total = 0;
87
88         if (size == 0) 
89                 return 0;
90
91         /*
92          * Set readsize to the maximum size we can handle in one readX,
93          * rounded down to a multiple of 1024.
94          */
95
96         readsize = (cli->max_xmit - (smb_size+32)) & ~1023;
97
98         while (total < size) {
99                 readsize = MIN(readsize, size-total);
100
101                 /* Issue a read and receive a reply */
102
103                 if (!cli_issue_read(cli, fnum, offset, readsize, 0))
104                         return -1;
105
106                 if (!cli_receive_smb(cli))
107                         return -1;
108
109                 /* Check for error.  Make sure to check for DOS and NT
110                    errors. */
111
112                 if (cli_is_error(cli)) {
113                         uint32 status = 0;
114                         uint8 eclass = 0;
115
116                         if (cli_is_nt_error(cli))
117                                 status = cli_nt_error(cli);
118                         else
119                                 cli_dos_error(cli, &eclass, &status);
120
121                         if ((eclass == ERRDOS && status == ERRmoredata) ||
122                             status == STATUS_MORE_ENTRIES)
123                                 return -1;
124                 }
125
126                 size2 = SVAL(cli->inbuf, smb_vwv5);
127
128                 if (size2 > readsize) {
129                         DEBUG(5,("server returned more than we wanted!\n"));
130                         return -1;
131                 } else if (size2 < 0) {
132                         DEBUG(5,("read return < 0!\n"));
133                         return -1;
134                 }
135
136                 /* Copy data into buffer */
137
138                 p = smb_base(cli->inbuf) + SVAL(cli->inbuf,smb_vwv6);
139                 memcpy(buf + total, p, size2);
140
141                 total += size2;
142                 offset += size2;
143
144                 /*
145                  * If the server returned less than we asked for we're at EOF.
146                  */
147
148                 if (size2 < readsize)
149                         break;
150         }
151
152         return total;
153 }
154
155 /****************************************************************************
156  Tester for the readraw call.
157 ****************************************************************************/
158
159 ssize_t cli_readraw(struct cli_state *cli, int fnum, char *buf, off_t offset, size_t size)
160 {
161         char *p;
162         int size2;
163         size_t readsize;
164         ssize_t total = 0;
165
166         if (size == 0) 
167                 return 0;
168
169         /*
170          * Set readsize to the maximum size we can handle in one readraw.
171          */
172
173         readsize = 0xFFFF;
174
175         while (total < size) {
176                 readsize = MIN(readsize, size-total);
177
178                 /* Issue a read and receive a reply */
179
180                 if (!cli_issue_readraw(cli, fnum, offset, readsize, 0))
181                         return -1;
182
183                 if (!client_receive_smb(cli->fd, cli->inbuf, cli->timeout))
184                         return -1;
185
186                 size2 = smb_len(cli->inbuf);
187
188                 if (size2 > readsize) {
189                         DEBUG(5,("server returned more than we wanted!\n"));
190                         return -1;
191                 } else if (size2 < 0) {
192                         DEBUG(5,("read return < 0!\n"));
193                         return -1;
194                 }
195
196                 /* Copy data into buffer */
197
198                 if (size2) {
199                         p = cli->inbuf + 4;
200                         memcpy(buf + total, p, size2);
201                 }
202
203                 total += size2;
204                 offset += size2;
205
206                 /*
207                  * If the server returned less than we asked for we're at EOF.
208                  */
209
210                 if (size2 < readsize)
211                         break;
212         }
213
214         return total;
215 }
216
217 /****************************************************************************
218 issue a single SMBwrite and don't wait for a reply
219 ****************************************************************************/
220
221 static BOOL cli_issue_write(struct cli_state *cli, int fnum, off_t offset, uint16 mode, char *buf,
222                             size_t size, int i)
223 {
224         char *p;
225
226         memset(cli->outbuf,'\0',smb_size);
227         memset(cli->inbuf,'\0',smb_size);
228
229         if (size > 0xFFFF)
230                 set_message(cli->outbuf,14,0,True);
231         else
232                 set_message(cli->outbuf,12,0,True);
233         
234         CVAL(cli->outbuf,smb_com) = SMBwriteX;
235         SSVAL(cli->outbuf,smb_tid,cli->cnum);
236         cli_setup_packet(cli);
237         
238         CVAL(cli->outbuf,smb_vwv0) = 0xFF;
239         SSVAL(cli->outbuf,smb_vwv2,fnum);
240
241         SIVAL(cli->outbuf,smb_vwv3,offset);
242         SIVAL(cli->outbuf,smb_vwv5,(mode & 0x0008) ? 0xFFFFFFFF : 0);
243         SSVAL(cli->outbuf,smb_vwv7,mode);
244
245         SSVAL(cli->outbuf,smb_vwv8,(mode & 0x0008) ? size : 0);
246         SSVAL(cli->outbuf,smb_vwv9,((size>>16)&1));
247         SSVAL(cli->outbuf,smb_vwv10,size);
248         SSVAL(cli->outbuf,smb_vwv11,
249               smb_buf(cli->outbuf) - smb_base(cli->outbuf));
250         
251         p = smb_base(cli->outbuf) + SVAL(cli->outbuf,smb_vwv11);
252         memcpy(p, buf, size);
253         cli_setup_bcc(cli, p+size);
254
255         SSVAL(cli->outbuf,smb_mid,cli->mid + i);
256         
257         show_msg(cli->outbuf);
258         return cli_send_smb(cli);
259 }
260
261 /****************************************************************************
262   write to a file
263   write_mode: 0x0001 disallow write cacheing
264               0x0002 return bytes remaining
265               0x0004 use raw named pipe protocol
266               0x0008 start of message mode named pipe protocol
267 ****************************************************************************/
268
269 ssize_t cli_write(struct cli_state *cli,
270                   int fnum, uint16 write_mode,
271                   char *buf, off_t offset, size_t size)
272 {
273         int bwritten = 0;
274         int issued = 0;
275         int received = 0;
276         int mpx = MAX(cli->max_mux-1, 1);
277         int block = (cli->max_xmit - (smb_size+32)) & ~1023;
278         int blocks = (size + (block-1)) / block;
279
280         while (received < blocks) {
281
282                 while ((issued - received < mpx) && (issued < blocks)) {
283                         int bsent = issued * block;
284                         int size1 = MIN(block, size - bsent);
285
286                         if (!cli_issue_write(cli, fnum, offset + bsent,
287                                         write_mode,
288                                         buf + bsent,
289                                         size1, issued))
290                                 return -1;
291                         issued++;
292                 }
293
294                 if (!cli_receive_smb(cli))
295                         return bwritten;
296
297                 received++;
298
299                 if (CVAL(cli->inbuf,smb_rcls) != 0)
300                         break;
301
302                 bwritten += SVAL(cli->inbuf, smb_vwv2);
303         }
304
305         while (received < issued && cli_receive_smb(cli))
306                 received++;
307         
308         return bwritten;
309 }
310
311 /****************************************************************************
312   write to a file using a SMBwrite and not bypassing 0 byte writes
313 ****************************************************************************/
314
315 ssize_t cli_smbwrite(struct cli_state *cli,
316                      int fnum, char *buf, off_t offset, size_t size1)
317 {
318         char *p;
319         ssize_t total = 0;
320
321         do {
322                 size_t size = MIN(size1, cli->max_xmit - 48);
323                 
324                 memset(cli->outbuf,'\0',smb_size);
325                 memset(cli->inbuf,'\0',smb_size);
326
327                 set_message(cli->outbuf,5, 0,True);
328
329                 CVAL(cli->outbuf,smb_com) = SMBwrite;
330                 SSVAL(cli->outbuf,smb_tid,cli->cnum);
331                 cli_setup_packet(cli);
332                 
333                 SSVAL(cli->outbuf,smb_vwv0,fnum);
334                 SSVAL(cli->outbuf,smb_vwv1,size);
335                 SIVAL(cli->outbuf,smb_vwv2,offset);
336                 SSVAL(cli->outbuf,smb_vwv4,0);
337                 
338                 p = smb_buf(cli->outbuf);
339                 *p++ = 1;
340                 SSVAL(p, 0, size); p += 2;
341                 memcpy(p, buf, size); p += size;
342
343                 cli_setup_bcc(cli, p);
344                 
345                 if (!cli_send_smb(cli))
346                         return -1;
347
348                 if (!cli_receive_smb(cli))
349                         return -1;
350                 
351                 if (CVAL(cli->inbuf,smb_rcls) != 0)
352                         return -1;
353
354                 size = SVAL(cli->inbuf,smb_vwv0);
355                 if (size == 0)
356                         break;
357
358                 size1 -= size;
359                 total += size;
360         } while (size1);
361
362         return total;
363 }