ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Linux-AIO/AIO.xs
(Generate patch)

Comparing Linux-AIO/AIO.xs (file contents):
Revision 1.21 by root, Fri Aug 6 17:18:08 2004 UTC vs.
Revision 1.28 by root, Sat Jul 9 04:02:54 2005 UTC

… …
8#include <sys/stat.h> 8#include <sys/stat.h>
9#include <unistd.h> 9#include <unistd.h>
10#include <fcntl.h> 10#include <fcntl.h>
11#include <signal.h> 11#include <signal.h>
12#include <sched.h> 12#include <sched.h>
13#include <endian.h>
13 14
14typedef void *InputStream; /* hack, but 5.6.1 is simply toooo old ;) */ 15typedef void *InputStream; /* hack, but 5.6.1 is simply toooo old ;) */
15typedef void *OutputStream; /* hack, but 5.6.1 is simply toooo old ;) */ 16typedef void *OutputStream; /* hack, but 5.6.1 is simply toooo old ;) */
16typedef void *InOutStream; /* hack, but 5.6.1 is simply toooo old ;) */ 17typedef void *InOutStream; /* hack, but 5.6.1 is simply toooo old ;) */
17 18
18#define STACKSIZE 1024 /* yeah */ 19#if __i386 || __amd64
20# define STACKSIZE ( 256 * sizeof (long))
21#elif __ia64
22# define STACKSIZE (8192 * sizeof (long))
23#else
24# define STACKSIZE ( 512 * sizeof (long))
25#endif
19 26
20enum { 27enum {
21 REQ_QUIT, 28 REQ_QUIT,
22 REQ_OPEN, REQ_CLOSE, REQ_READ, REQ_WRITE, 29 REQ_OPEN, REQ_CLOSE, REQ_READ, REQ_WRITE,
23 REQ_STAT, REQ_LSTAT, REQ_FSTAT, REQ_UNLINK 30 REQ_STAT, REQ_LSTAT, REQ_FSTAT, REQ_UNLINK
… …
62 aio_thread *thr; 69 aio_thread *thr;
63 70
64 New (0, thr, 1, aio_thread); 71 New (0, thr, 1, aio_thread);
65 72
66 if (clone (aio_proc, 73 if (clone (aio_proc,
67 &(thr->stack[STACKSIZE]), 74 &(thr->stack[STACKSIZE - 16]),
68 CLONE_VM|CLONE_FS|CLONE_FILES, 75 CLONE_VM|CLONE_FS|CLONE_FILES,
69 thr) >= 0) 76 thr) >= 0)
70 started++; 77 started++;
71 else 78 else
72 Safefree (thr); 79 Safefree (thr);
… …
88{ 95{
89 nreqs++; 96 nreqs++;
90 req->next = 0; 97 req->next = 0;
91 98
92 if (qe) 99 if (qe)
100 {
93 qe->next = req; 101 qe->next = req;
102 qe = req;
103 }
94 else 104 else
95 qe = qs = req; 105 qe = qs = req;
96 106
97 send_reqs (); 107 send_reqs ();
98} 108}
… …
154 req->callback = SvREFCNT_inc (callback); 164 req->callback = SvREFCNT_inc (callback);
155 165
156 send_req (req); 166 send_req (req);
157} 167}
158 168
169static void
170poll_wait ()
171{
172 fd_set rfd;
173 FD_ZERO(&rfd);
174 FD_SET(respipe[0], &rfd);
175
176 select (respipe[0] + 1, &rfd, 0, 0, 0);
177}
178
159static int 179static int
160poll_cb (pTHX) 180poll_cb (pTHX)
161{ 181{
162 dSP; 182 dSP;
163 int count = 0; 183 int count = 0;
164 aio_req req; 184 aio_req req;
165 185
166 while (read (respipe[0], (void *)&req, sizeof (req)) == sizeof (req)) 186 while (read (respipe[0], (void *)&req, sizeof (req)) == sizeof (req))
167 { 187 {
188 nreqs--;
189
168 if (req->type == REQ_QUIT) 190 if (req->type == REQ_QUIT)
169 { 191 {
170 Safefree (req->thread); 192 Safefree (req->thread);
171 started--; 193 started--;
172 } 194 }
… …
199 221
200 if (req->callback) 222 if (req->callback)
201 SvREFCNT_dec (req->callback); 223 SvREFCNT_dec (req->callback);
202 224
203 errno = errorno; 225 errno = errorno;
204 nreqs--;
205 count++; 226 count++;
206 } 227 }
207 228
208 Safefree (req); 229 Safefree (req);
209 } 230 }
… …
216 237
217static sigset_t fullsigset; 238static sigset_t fullsigset;
218 239
219#undef errno 240#undef errno
220#include <asm/unistd.h> 241#include <asm/unistd.h>
242#include <linux/types.h>
221#include <sys/prctl.h> 243#include <sys/prctl.h>
244
245#if BYTE_ORDER == LITTLE_ENDIAN
246# define LONG_LONG_PAIR(HI, LO) LO, HI
247#elif BYTE_ORDER == BIG_ENDIAN
248# define LONG_LONG_PAIR(HI, LO) HI, LO
249#endif
250
251#if __alpha || __ia64 || __hppa || __v850__
252# define stat kernelstat
253# define stat64 kernelstat64
254# include <asm/stat.h>
255# undef stat
256# undef stat64
257#else
258# define kernelstat stat
259# define kernelstat64 stat64
260#endif
222 261
223#define COPY_STATDATA \ 262#define COPY_STATDATA \
224 req->statdata->st_dev = statdata.st_dev; \ 263 req->statdata->st_dev = statdata.st_dev; \
225 req->statdata->st_ino = statdata.st_ino; \ 264 req->statdata->st_ino = statdata.st_ino; \
226 req->statdata->st_mode = statdata.st_mode; \ 265 req->statdata->st_mode = statdata.st_mode; \
… …
242 aio_req req; 281 aio_req req;
243 int errno; 282 int errno;
244 283
245 /* this is very much kernel-specific :(:(:( */ 284 /* this is very much kernel-specific :(:(:( */
246 /* we rely on gcc's ability to create closures. */ 285 /* we rely on gcc's ability to create closures. */
247 _syscall3(int,read,int,fd,char *,buf,size_t,count) 286 _syscall3(__kernel_size_t,read,unsigned int,fd,char *,buf,__kernel_size_t,count)
248 _syscall3(int,write,int,fd,char *,buf,size_t,count) 287 _syscall3(__kernel_size_t,write,unsigned int,fd,char *,buf,__kernel_size_t,count)
249 288
250 _syscall3(int,open,char *,pathname,int,flags,mode_t,mode) 289 _syscall3(int,open,char *,pathname,int,flags,int,mode)
251 _syscall1(int,close,int,fd) 290 _syscall1(int,close,unsigned int,fd)
252 291
253#ifdef __NR_pread64 292#ifndef __NR_pread64
254 _syscall5(int,pread64,int,fd,char *,buf,size_t,count,unsigned int,offset_lo,unsigned int,offset_hi) 293# define __NR_pread64 __NR_pread
255 _syscall5(int,pwrite64,int,fd,char *,buf,size_t,count,unsigned int,offset_lo,unsigned int,offset_hi) 294# define __NR_pwrite64 __NR_write
256#elif __NR_pread
257 _syscall4(int,pread,int,fd,char *,buf,size_t,count,offset_t,offset)
258 _syscall4(int,pwrite,int,fd,char *,buf,size_t,count,offset_t,offset)
259#else
260# error "neither pread nor pread64 defined"
261#endif 295#endif
296 _syscall5(__kernel_ssize_t,pread64,unsigned int,fd,char *,buf,__kernel_size_t,count,unsigned int,offset_lh,unsigned int,offset_hl)
297 _syscall5(__kernel_ssize_t,pwrite64,unsigned int,fd,char *,buf,__kernel_size_t,count,unsigned int,offset_lh,unsigned int,offset_hl)
262 298
263
264#ifdef __NR_stat64 299#if __NR_stat64
265 _syscall2(int,stat64, const char *, filename, struct stat64 *, buf) 300 _syscall2(int,stat64, const char *, filename, struct kernelstat64 *, buf)
266 _syscall2(int,lstat64, const char *, filename, struct stat64 *, buf) 301 _syscall2(int,lstat64, const char *, filename, struct kernelstat64 *, buf)
267 _syscall2(int,fstat64, int, fd, struct stat64 *, buf) 302 _syscall2(int,fstat64, int, fd, struct kernelstat64 *, buf)
268#elif __NR_stat 303#elif __NR_stat
269 _syscall2(int,stat, const char *, filename, struct stat *, buf) 304 _syscall2(int,stat, const char *, filename, struct kernelstat *, buf)
270 _syscall2(int,lstat, const char *, filename, struct stat *, buf) 305 _syscall2(int,lstat, const char *, filename, struct kernelstat *, buf)
271 _syscall2(int,fstat, int, fd, struct stat *, buf) 306 _syscall2(int,fstat, int, fd, struct kernelstat *, buf)
272#else 307#else
273# error "neither stat64 nor stat defined" 308# error "neither stat64 nor stat defined"
274#endif 309#endif
275 310
276 _syscall1(int,unlink, char *, filename); 311 _syscall1(int,unlink, char *, filename);
… …
284 req->thread = thr; 319 req->thread = thr;
285 errno = 0; /* strictly unnecessary */ 320 errno = 0; /* strictly unnecessary */
286 321
287 switch (req->type) 322 switch (req->type)
288 { 323 {
289#ifdef __NR_pread64
290 case REQ_READ: req->result = pread64 (req->fd, req->dataptr, req->length, req->offset & 0xffffffff, req->offset >> 32); break;
291 case REQ_WRITE: req->result = pwrite64(req->fd, req->dataptr, req->length, req->offset & 0xffffffff, req->offset >> 32); break;
292#else
293 case REQ_READ: req->result = pread (req->fd, req->dataptr, req->length, req->offset); break; 324 case REQ_READ: req->result = pread64 (req->fd, req->dataptr, req->length,
325 LONG_LONG_PAIR (req->offset >> 32, req->offset & 0xffffffff)); break;
294 case REQ_WRITE: req->result = pwrite (req->fd, req->dataptr, req->length, req->offset); break; 326 case REQ_WRITE: req->result = pwrite64(req->fd, req->dataptr, req->length,
295#endif 327 LONG_LONG_PAIR (req->offset >> 32, req->offset & 0xffffffff)); break;
296#ifdef __NR_stat64 328#if __NR_stat64
297 struct stat64 statdata; 329 struct kernelstat64 statdata;
298 case REQ_STAT: req->result = stat64 (req->dataptr, &statdata); COPY_STATDATA; break; 330 case REQ_STAT: req->result = stat64 (req->dataptr, &statdata); COPY_STATDATA; break;
299 case REQ_LSTAT: req->result = lstat64 (req->dataptr, &statdata); COPY_STATDATA; break; 331 case REQ_LSTAT: req->result = lstat64 (req->dataptr, &statdata); COPY_STATDATA; break;
300 case REQ_FSTAT: req->result = fstat64 (req->fd, &statdata); COPY_STATDATA; break; 332 case REQ_FSTAT: req->result = fstat64 (req->fd, &statdata); COPY_STATDATA; break;
301#else 333#else
302 struct stat statdata; 334 struct kernelstat statdata;
303 case REQ_STAT: req->result = stat (req->dataptr, &statdata); COPY_STATDATA; break; 335 case REQ_STAT: req->result = stat (req->dataptr, &statdata); COPY_STATDATA; break;
304 case REQ_LSTAT: req->result = lstat (req->dataptr, &statdata); COPY_STATDATA; break; 336 case REQ_LSTAT: req->result = lstat (req->dataptr, &statdata); COPY_STATDATA; break;
305 case REQ_FSTAT: req->result = fstat (req->fd, &statdata); COPY_STATDATA; break; 337 case REQ_FSTAT: req->result = fstat (req->fd, &statdata); COPY_STATDATA; break;
306#endif 338#endif
307 case REQ_OPEN: req->result = open (req->dataptr, req->fd, req->mode); break; 339 case REQ_OPEN: req->result = open (req->dataptr, req->fd, req->mode); break;
… …
361 cur--; 393 cur--;
362 } 394 }
363 395
364 while (started > nthreads) 396 while (started > nthreads)
365 { 397 {
366 fd_set rfd; 398 poll_wait ();
367 FD_ZERO(&rfd);
368 FD_SET(respipe[0], &rfd);
369
370 select (respipe[0] + 1, &rfd, 0, 0, 0);
371 poll_cb (aTHX); 399 poll_cb (aTHX);
372 } 400 }
373 401
374void 402void
375aio_open(pathname,flags,mode,callback) 403aio_open(pathname,flags,mode,callback)
… …
508 CODE: 536 CODE:
509 RETVAL = poll_cb (aTHX); 537 RETVAL = poll_cb (aTHX);
510 OUTPUT: 538 OUTPUT:
511 RETVAL 539 RETVAL
512 540
541void
542poll_wait()
543 PROTOTYPE:
544 CODE:
545 poll_wait ();
546
513int 547int
514nreqs() 548nreqs()
515 PROTOTYPE: 549 PROTOTYPE:
516 CODE: 550 CODE:
517 RETVAL = nreqs; 551 RETVAL = nreqs;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines