r23508: Fix sync_file() to return NTSTATUS and return this
[sfrench/samba-autobuild/.git] / source / smbd / aio.c
1 /*
2    Unix SMB/Netbios implementation.
3    Version 3.0
4    async_io read handling using POSIX async io.
5    Copyright (C) Jeremy Allison 2005.
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 #include "includes.h"
23
24 #if defined(WITH_AIO)
25
26 /* The signal we'll use to signify aio done. */
27 #ifndef RT_SIGNAL_AIO
28 #define RT_SIGNAL_AIO (SIGRTMIN+3)
29 #endif
30
31 /****************************************************************************
32  The buffer we keep around whilst an aio request is in process.
33 *****************************************************************************/
34
35 struct aio_extra {
36         struct aio_extra *next, *prev;
37         SMB_STRUCT_AIOCB acb;
38         files_struct *fsp;
39         BOOL read_req;
40         uint16 mid;
41         char *inbuf;
42         char *outbuf;
43 };
44
45 static struct aio_extra *aio_list_head;
46
47 /****************************************************************************
48  Create the extended aio struct we must keep around for the lifetime
49  of the aio_read call.
50 *****************************************************************************/
51
52 static struct aio_extra *create_aio_ex_read(files_struct *fsp,
53                                                 size_t buflen,
54                                                 uint16 mid,
55                                                 const char *inbuf)
56 {
57         struct aio_extra *aio_ex = SMB_MALLOC_P(struct aio_extra);
58
59         if (!aio_ex) {
60                 return NULL;
61         }
62         ZERO_STRUCTP(aio_ex);
63         /* The output buffer stored in the aio_ex is the start of
64            the smb return buffer. The buffer used in the acb
65            is the start of the reply data portion of that buffer. */
66         aio_ex->outbuf = SMB_MALLOC_ARRAY(char, buflen);
67         if (!aio_ex->outbuf) {
68                 SAFE_FREE(aio_ex);
69                 return NULL;
70         }
71         /* Save the first 8 bytes of inbuf for possible enc data. */
72         aio_ex->inbuf = SMB_MALLOC_ARRAY(char, 8);
73         if (!aio_ex->inbuf) {
74                 SAFE_FREE(aio_ex->outbuf);
75                 SAFE_FREE(aio_ex);
76                 return NULL;
77         }
78         memcpy(aio_ex->inbuf, inbuf, 8);
79         DLIST_ADD(aio_list_head, aio_ex);
80         aio_ex->fsp = fsp;
81         aio_ex->read_req = True;
82         aio_ex->mid = mid;
83         return aio_ex;
84 }
85
86 /****************************************************************************
87  Create the extended aio struct we must keep around for the lifetime
88  of the aio_write call.
89 *****************************************************************************/
90
91 static struct aio_extra *create_aio_ex_write(files_struct *fsp,
92                                              size_t inbuflen,
93                                              size_t outbuflen,
94                                              uint16 mid)
95 {
96         struct aio_extra *aio_ex = SMB_MALLOC_P(struct aio_extra);
97
98         if (!aio_ex) {
99                 return NULL;
100         }
101         ZERO_STRUCTP(aio_ex);
102
103         /* We need space for an output reply of outbuflen bytes. */
104         aio_ex->outbuf = SMB_MALLOC_ARRAY(char, outbuflen);
105         if (!aio_ex->outbuf) {
106                 SAFE_FREE(aio_ex);
107                 return NULL;
108         }
109
110         if (!(aio_ex->inbuf = SMB_MALLOC_ARRAY(char, inbuflen))) {
111                 SAFE_FREE(aio_ex->outbuf);
112                 SAFE_FREE(aio_ex);
113                 return NULL;
114         }
115
116         DLIST_ADD(aio_list_head, aio_ex);
117         aio_ex->fsp = fsp;
118         aio_ex->read_req = False;
119         aio_ex->mid = mid;
120         return aio_ex;
121 }
122
123 /****************************************************************************
124  Delete the extended aio struct.
125 *****************************************************************************/
126
127 static void delete_aio_ex(struct aio_extra *aio_ex)
128 {
129         DLIST_REMOVE(aio_list_head, aio_ex);
130         SAFE_FREE(aio_ex->inbuf);
131         SAFE_FREE(aio_ex->outbuf);
132         SAFE_FREE(aio_ex);
133 }
134
135 /****************************************************************************
136  Given the aiocb struct find the extended aio struct containing it.
137 *****************************************************************************/
138
139 static struct aio_extra *find_aio_ex(uint16 mid)
140 {
141         struct aio_extra *p;
142
143         for( p = aio_list_head; p; p = p->next) {
144                 if (mid == p->mid) {
145                         return p;
146                 }
147         }
148         return NULL;
149 }
150
151 /****************************************************************************
152  We can have these many aio buffers in flight.
153 *****************************************************************************/
154
155 #define AIO_PENDING_SIZE 10
156 static sig_atomic_t signals_received;
157 static int outstanding_aio_calls;
158 static uint16 aio_pending_array[AIO_PENDING_SIZE];
159
160 /****************************************************************************
161  Signal handler when an aio request completes.
162 *****************************************************************************/
163
164 static void signal_handler(int sig, siginfo_t *info, void *unused)
165 {
166         if (signals_received < AIO_PENDING_SIZE) {
167                 aio_pending_array[signals_received] = info->si_value.sival_int;
168                 signals_received++;
169         } /* Else signal is lost. */
170         sys_select_signal(RT_SIGNAL_AIO);
171 }
172
173 /****************************************************************************
174  Is there a signal waiting ?
175 *****************************************************************************/
176
177 BOOL aio_finished(void)
178 {
179         return (signals_received != 0);
180 }
181
182 /****************************************************************************
183  Initialize the signal handler for aio read/write.
184 *****************************************************************************/
185
186 void initialize_async_io_handler(void)
187 {
188         struct sigaction act;
189
190         ZERO_STRUCT(act);
191         act.sa_sigaction = signal_handler;
192         act.sa_flags = SA_SIGINFO;
193         sigemptyset( &act.sa_mask );
194         if (sigaction(RT_SIGNAL_AIO, &act, NULL) != 0) {
195                 DEBUG(0,("Failed to setup RT_SIGNAL_AIO handler\n"));
196         }
197
198         /* the signal can start off blocked due to a bug in bash */
199         BlockSignals(False, RT_SIGNAL_AIO);
200 }
201
202 /****************************************************************************
203  Set up an aio request from a SMBreadX call.
204 *****************************************************************************/
205
206 BOOL schedule_aio_read_and_X(connection_struct *conn,
207                              char *inbuf, char *outbuf,
208                              int length, int len_outbuf,
209                              files_struct *fsp, SMB_OFF_T startpos,
210                              size_t smb_maxcnt)
211 {
212         struct aio_extra *aio_ex;
213         SMB_STRUCT_AIOCB *a;
214         size_t bufsize;
215         size_t min_aio_read_size = lp_aio_read_size(SNUM(conn));
216
217         if (!min_aio_read_size || (smb_maxcnt < min_aio_read_size)) {
218                 /* Too small a read for aio request. */
219                 DEBUG(10,("schedule_aio_read_and_X: read size (%u) too small "
220                           "for minimum aio_read of %u\n",
221                           (unsigned int)smb_maxcnt,
222                           (unsigned int)min_aio_read_size ));
223                 return False;
224         }
225
226         /* Only do this on non-chained and non-chaining reads not using the
227          * write cache. */
228         if (chain_size !=0 || (CVAL(inbuf,smb_vwv0) != 0xFF)
229             || (lp_write_cache_size(SNUM(conn)) != 0) ) {
230                 return False;
231         }
232
233         if (outstanding_aio_calls >= AIO_PENDING_SIZE) {
234                 DEBUG(10,("schedule_aio_read_and_X: Already have %d aio "
235                           "activities outstanding.\n",
236                           outstanding_aio_calls ));
237                 return False;
238         }
239
240         /* The following is safe from integer wrap as we've already
241            checked smb_maxcnt is 128k or less. */
242         bufsize = PTR_DIFF(smb_buf(outbuf),outbuf) + smb_maxcnt;
243
244         if ((aio_ex = create_aio_ex_read(fsp, bufsize,
245                                          SVAL(inbuf,smb_mid), inbuf)) == NULL) {
246                 DEBUG(10,("schedule_aio_read_and_X: malloc fail.\n"));
247                 return False;
248         }
249
250         /* Copy the SMB header already setup in outbuf. */
251         memcpy(aio_ex->outbuf, outbuf, smb_buf(outbuf) - outbuf);
252         SCVAL(aio_ex->outbuf,smb_vwv0,0xFF); /* Never a chained reply. */
253
254         a = &aio_ex->acb;
255
256         /* Now set up the aio record for the read call. */
257         
258         a->aio_fildes = fsp->fh->fd;
259         a->aio_buf = smb_buf(aio_ex->outbuf);
260         a->aio_nbytes = smb_maxcnt;
261         a->aio_offset = startpos;
262         a->aio_sigevent.sigev_notify = SIGEV_SIGNAL;
263         a->aio_sigevent.sigev_signo  = RT_SIGNAL_AIO;
264         a->aio_sigevent.sigev_value.sival_int = aio_ex->mid;
265
266         if (SMB_VFS_AIO_READ(fsp,a) == -1) {
267                 DEBUG(0,("schedule_aio_read_and_X: aio_read failed. "
268                          "Error %s\n", strerror(errno) ));
269                 delete_aio_ex(aio_ex);
270                 return False;
271         }
272
273         DEBUG(10,("schedule_aio_read_and_X: scheduled aio_read for file %s, "
274                   "offset %.0f, len = %u (mid = %u)\n",
275                   fsp->fsp_name, (double)startpos, (unsigned int)smb_maxcnt,
276                   (unsigned int)aio_ex->mid ));
277
278         srv_defer_sign_response(aio_ex->mid);
279         outstanding_aio_calls++;
280         return True;
281 }
282
283 /****************************************************************************
284  Set up an aio request from a SMBwriteX call.
285 *****************************************************************************/
286
287 BOOL schedule_aio_write_and_X(connection_struct *conn,
288                                 char *inbuf, char *outbuf,
289                                 int length, int len_outbuf,
290                                 files_struct *fsp, char *data,
291                                 SMB_OFF_T startpos,
292                                 size_t numtowrite)
293 {
294         struct aio_extra *aio_ex;
295         SMB_STRUCT_AIOCB *a;
296         size_t inbufsize, outbufsize;
297         size_t min_aio_write_size = lp_aio_write_size(SNUM(conn));
298
299         if (!min_aio_write_size || (numtowrite < min_aio_write_size)) {
300                 /* Too small a write for aio request. */
301                 DEBUG(10,("schedule_aio_write_and_X: write size (%u) too "
302                           "small for minimum aio_write of %u\n",
303                           (unsigned int)numtowrite,
304                           (unsigned int)min_aio_write_size ));
305                 return False;
306         }
307
308         /* Only do this on non-chained and non-chaining reads not using the
309          * write cache. */
310         if (chain_size !=0 || (CVAL(inbuf,smb_vwv0) != 0xFF)
311             || (lp_write_cache_size(SNUM(conn)) != 0) ) {
312                 return False;
313         }
314
315         if (outstanding_aio_calls >= AIO_PENDING_SIZE) {
316                 DEBUG(3,("schedule_aio_write_and_X: Already have %d aio "
317                          "activities outstanding.\n",
318                           outstanding_aio_calls ));
319                 DEBUG(10,("schedule_aio_write_and_X: failed to schedule "
320                           "aio_write for file %s, offset %.0f, len = %u "
321                           "(mid = %u)\n",
322                           fsp->fsp_name, (double)startpos,
323                           (unsigned int)numtowrite,
324                           (unsigned int)SVAL(inbuf,smb_mid) ));
325                 return False;
326         }
327
328         inbufsize =  smb_len(inbuf) + 4;
329         outbufsize = smb_len(outbuf) + 4;
330         if (!(aio_ex = create_aio_ex_write(fsp, inbufsize, outbufsize,
331                                            SVAL(inbuf,smb_mid)))) {
332                 DEBUG(0,("schedule_aio_write_and_X: malloc fail.\n"));
333                 return False;
334         }
335
336         /* Copy the SMB header already setup in outbuf. */
337         memcpy(aio_ex->inbuf, inbuf, inbufsize);
338
339         /* Copy the SMB header already setup in outbuf. */
340         memcpy(aio_ex->outbuf, outbuf, outbufsize);
341         SCVAL(aio_ex->outbuf,smb_vwv0,0xFF); /* Never a chained reply. */
342
343         a = &aio_ex->acb;
344
345         /* Now set up the aio record for the write call. */
346         
347         a->aio_fildes = fsp->fh->fd;
348         a->aio_buf = aio_ex->inbuf + (PTR_DIFF(data, inbuf));
349         a->aio_nbytes = numtowrite;
350         a->aio_offset = startpos;
351         a->aio_sigevent.sigev_notify = SIGEV_SIGNAL;
352         a->aio_sigevent.sigev_signo  = RT_SIGNAL_AIO;
353         a->aio_sigevent.sigev_value.sival_int = aio_ex->mid;
354
355         if (SMB_VFS_AIO_WRITE(fsp,a) == -1) {
356                 DEBUG(3,("schedule_aio_wrote_and_X: aio_write failed. "
357                          "Error %s\n", strerror(errno) ));
358                 delete_aio_ex(aio_ex);
359                 return False;
360         }
361
362         srv_defer_sign_response(aio_ex->mid);
363         outstanding_aio_calls++;
364
365         DEBUG(10,("schedule_aio_write_and_X: scheduled aio_write for file "
366                   "%s, offset %.0f, len = %u (mid = %u) "
367                   "outstanding_aio_calls = %d\n",
368                   fsp->fsp_name, (double)startpos, (unsigned int)numtowrite,
369                   (unsigned int)aio_ex->mid, outstanding_aio_calls ));
370
371         return True;
372 }
373
374
375 /****************************************************************************
376  Complete the read and return the data or error back to the client.
377  Returns errno or zero if all ok.
378 *****************************************************************************/
379
380 static int handle_aio_read_complete(struct aio_extra *aio_ex)
381 {
382         int ret = 0;
383         int outsize;
384         char *outbuf = aio_ex->outbuf;
385         char *inbuf = aio_ex->inbuf;
386         char *data = smb_buf(outbuf);
387         ssize_t nread = SMB_VFS_AIO_RETURN(aio_ex->fsp,&aio_ex->acb);
388
389         if (nread < 0) {
390                 /* We're relying here on the fact that if the fd is
391                    closed then the aio will complete and aio_return
392                    will return an error. Hopefully this is
393                    true.... JRA. */
394
395                 /* If errno is ECANCELED then don't return anything to the
396                  * client. */
397                 if (errno == ECANCELED) {
398                         srv_cancel_sign_response(aio_ex->mid);
399                         return 0;
400                 }
401
402                 DEBUG( 3,( "handle_aio_read_complete: file %s nread == -1. "
403                            "Error = %s\n",
404                            aio_ex->fsp->fsp_name, strerror(errno) ));
405
406                 outsize = (UNIXERROR(ERRDOS,ERRnoaccess));
407                 ret = errno;
408         } else {
409                 outsize = set_message(inbuf,outbuf,12,nread,False);
410                 SSVAL(outbuf,smb_vwv2,0xFFFF); /* Remaining - must be * -1. */
411                 SSVAL(outbuf,smb_vwv5,nread);
412                 SSVAL(outbuf,smb_vwv6,smb_offset(data,outbuf));
413                 SSVAL(outbuf,smb_vwv7,((nread >> 16) & 1));
414                 SSVAL(smb_buf(outbuf),-2,nread);
415
416                 DEBUG( 3, ( "handle_aio_read_complete file %s max=%d "
417                             "nread=%d\n",
418                             aio_ex->fsp->fsp_name,
419                             aio_ex->acb.aio_nbytes, (int)nread ) );
420
421         }
422         smb_setlen(inbuf,outbuf,outsize - 4);
423         show_msg(outbuf);
424         if (!send_smb(smbd_server_fd(),outbuf)) {
425                 exit_server_cleanly("handle_aio_read_complete: send_smb "
426                                     "failed.");
427         }
428
429         DEBUG(10,("handle_aio_read_complete: scheduled aio_read completed "
430                   "for file %s, offset %.0f, len = %u\n",
431                   aio_ex->fsp->fsp_name, (double)aio_ex->acb.aio_offset,
432                   (unsigned int)nread ));
433
434         return ret;
435 }
436
437 /****************************************************************************
438  Complete the write and return the data or error back to the client.
439  Returns errno or zero if all ok.
440 *****************************************************************************/
441
442 static int handle_aio_write_complete(struct aio_extra *aio_ex)
443 {
444         int ret = 0;
445         files_struct *fsp = aio_ex->fsp;
446         char *outbuf = aio_ex->outbuf;
447         char *inbuf = aio_ex->inbuf;
448         ssize_t numtowrite = aio_ex->acb.aio_nbytes;
449         ssize_t nwritten = SMB_VFS_AIO_RETURN(fsp,&aio_ex->acb);
450
451         /* We don't need outsize or set_message here as we've already set the
452            fixed size length when we set up the aio call. */
453
454         if(nwritten == -1) {
455                 DEBUG( 3,( "handle_aio_write: file %s wanted %u bytes. "
456                            "nwritten == %d. Error = %s\n",
457                            fsp->fsp_name, (unsigned int)numtowrite,
458                            (int)nwritten, strerror(errno) ));
459
460                 /* If errno is ECANCELED then don't return anything to the
461                  * client. */
462                 if (errno == ECANCELED) {
463                         srv_cancel_sign_response(aio_ex->mid);
464                         return 0;
465                 }
466
467                 UNIXERROR(ERRHRD,ERRdiskfull);
468                 ret = errno;
469         } else {
470                 BOOL write_through = BITSETW(aio_ex->inbuf+smb_vwv7,0);
471                 NTSTATUS status;
472
473                 SSVAL(outbuf,smb_vwv2,nwritten);
474                 SSVAL(outbuf,smb_vwv4,(nwritten>>16)&1);
475                 if (nwritten < (ssize_t)numtowrite) {
476                         SCVAL(outbuf,smb_rcls,ERRHRD);
477                         SSVAL(outbuf,smb_err,ERRdiskfull);
478                 }
479
480                 DEBUG(3,("handle_aio_write: fnum=%d num=%d wrote=%d\n",
481                          fsp->fnum, (int)numtowrite, (int)nwritten));
482                 status = sync_file(fsp->conn,fsp, write_through);
483                 if (!NT_STATUS_IS_OK(status)) {
484                         UNIXERROR(ERRHRD,ERRdiskfull);
485                         ret = errno;
486                         DEBUG(5,("handle_aio_write: sync_file for %s returned %s\n",
487                                 fsp->fsp_name, nt_errstr(status) ));
488                 }
489         }
490
491         show_msg(outbuf);
492         if (!send_smb(smbd_server_fd(),outbuf)) {
493                 exit_server_cleanly("handle_aio_write: send_smb failed.");
494         }
495
496         DEBUG(10,("handle_aio_write_complete: scheduled aio_write completed "
497                   "for file %s, offset %.0f, requested %u, written = %u\n",
498                   fsp->fsp_name, (double)aio_ex->acb.aio_offset,
499                   (unsigned int)numtowrite, (unsigned int)nwritten ));
500
501         return ret;
502 }
503
504 /****************************************************************************
505  Handle any aio completion. Returns True if finished (and sets *perr if err
506  was non-zero), False if not.
507 *****************************************************************************/
508
509 static BOOL handle_aio_completed(struct aio_extra *aio_ex, int *perr)
510 {
511         int err;
512
513         /* Ensure the operation has really completed. */
514         if (SMB_VFS_AIO_ERROR(aio_ex->fsp, &aio_ex->acb) == EINPROGRESS) {
515                 DEBUG(10,( "handle_aio_completed: operation mid %u still in "
516                            "process for file %s\n",
517                            aio_ex->mid, aio_ex->fsp->fsp_name ));
518                 return False;
519         }
520
521         if (aio_ex->read_req) {
522                 err = handle_aio_read_complete(aio_ex);
523         } else {
524                 err = handle_aio_write_complete(aio_ex);
525         }
526
527         if (err) {
528                 *perr = err; /* Only save non-zero errors. */
529         }
530
531         return True;
532 }
533
534 /****************************************************************************
535  Handle any aio completion inline.
536  Returns non-zero errno if fail or zero if all ok.
537 *****************************************************************************/
538
539 int process_aio_queue(void)
540 {
541         int i;
542         int ret = 0;
543
544         BlockSignals(True, RT_SIGNAL_AIO);
545
546         DEBUG(10,("process_aio_queue: signals_received = %d\n",
547                   (int)signals_received));
548         DEBUG(10,("process_aio_queue: outstanding_aio_calls = %d\n",
549                   outstanding_aio_calls));
550
551         if (!signals_received) {
552                 BlockSignals(False, RT_SIGNAL_AIO);
553                 return 0;
554         }
555
556         /* Drain all the complete aio_reads. */
557         for (i = 0; i < signals_received; i++) {
558                 uint16 mid = aio_pending_array[i];
559                 files_struct *fsp = NULL;
560                 struct aio_extra *aio_ex = find_aio_ex(mid);
561
562                 if (!aio_ex) {
563                         DEBUG(3,("process_aio_queue: Can't find record to "
564                                  "match mid %u.\n", (unsigned int)mid));
565                         srv_cancel_sign_response(mid);
566                         continue;
567                 }
568
569                 fsp = aio_ex->fsp;
570                 if (fsp == NULL) {
571                         /* file was closed whilst I/O was outstanding. Just
572                          * ignore. */
573                         DEBUG( 3,( "process_aio_queue: file closed whilst "
574                                    "aio outstanding.\n"));
575                         srv_cancel_sign_response(mid);
576                         continue;
577                 }
578
579                 if (!handle_aio_completed(aio_ex, &ret)) {
580                         continue;
581                 }
582
583                 delete_aio_ex(aio_ex);
584         }
585
586         outstanding_aio_calls -= signals_received;
587         signals_received = 0;
588         BlockSignals(False, RT_SIGNAL_AIO);
589         return ret;
590 }
591
592 /****************************************************************************
593  Cancel any outstanding aio requests. The client doesn't care about the reply.
594 *****************************************************************************/
595
596 void cancel_aio_by_fsp(files_struct *fsp)
597 {
598         struct aio_extra *aio_ex;
599
600         for( aio_ex = aio_list_head; aio_ex; aio_ex = aio_ex->next) {
601                 if (aio_ex->fsp == fsp) {
602                         /* Don't delete the aio_extra record as we may have
603                            completed and don't yet know it. Just do the
604                            aio_cancel call and return. */
605                         SMB_VFS_AIO_CANCEL(fsp,fsp->fh->fd, &aio_ex->acb);
606                         aio_ex->fsp = NULL; /* fsp will be closed when we
607                                              * return. */
608                 }
609         }
610 }
611
612 #else
613 BOOL aio_finished(void)
614 {
615         return False;
616 }
617
618 void initialize_async_io_handler(void)
619 {
620 }
621
622 int process_aio_queue(void)
623 {
624         return False;
625 }
626
627 BOOL schedule_aio_read_and_X(connection_struct *conn,
628                              char *inbuf, char *outbuf,
629                              int length, int len_outbuf,
630                              files_struct *fsp, SMB_OFF_T startpos,
631                              size_t smb_maxcnt)
632 {
633         return False;
634 }
635
636 BOOL schedule_aio_write_and_X(connection_struct *conn,
637                                 char *inbuf, char *outbuf,
638                                 int length, int len_outbuf,
639                                 files_struct *fsp, char *data,
640                                 SMB_OFF_T startpos,
641                                 size_t numtowrite)
642 {
643         return False;
644 }
645
646 void cancel_aio_by_fsp(files_struct *fsp)
647 {
648 }
649
650 #endif