| … | |
… | |
| 2495 | RETVAL = 0; |
2495 | RETVAL = 0; |
| 2496 | #endif |
2496 | #endif |
| 2497 | OUTPUT: |
2497 | OUTPUT: |
| 2498 | RETVAL |
2498 | RETVAL |
| 2499 | |
2499 | |
|
|
2500 | void |
|
|
2501 | accept4 (aio_rfd rfh, SV *sockaddr, int salen, int flags) |
|
|
2502 | PPCODE: |
|
|
2503 | { |
|
|
2504 | SV *retval; |
|
|
2505 | #if HAVE_ACCEPT4 |
|
|
2506 | socklen_t salen_ = salen ? salen + 1 : 0; |
|
|
2507 | |
|
|
2508 | if (salen) |
|
|
2509 | { |
|
|
2510 | sv_upgrade (sockaddr, SVt_PV); |
|
|
2511 | sv_grow (sockaddr, salen_); |
|
|
2512 | } |
|
|
2513 | |
|
|
2514 | int res = accept4 (rfh, salen ? (struct sockaddr *)SvPVX (sockaddr) : 0, salen ? &salen_ : 0, flags); |
|
|
2515 | |
|
|
2516 | retval = newmortalFH (res, O_RDWR); |
|
|
2517 | |
|
|
2518 | if (res >= 0 && salen > 0) |
|
|
2519 | { |
|
|
2520 | if (salen_ > salen + 1) |
|
|
2521 | salen_ = salen + 1; |
|
|
2522 | |
|
|
2523 | SvPOK_only (sockaddr); |
|
|
2524 | SvCUR_set (sockaddr, salen_); |
|
|
2525 | } |
|
|
2526 | #else |
|
|
2527 | errno = ENOSYS; |
|
|
2528 | retval = &PL_sv_undef; |
|
|
2529 | #endif |
|
|
2530 | XPUSHs (retval); |
|
|
2531 | } |
|
|
2532 | |
| 2500 | int |
2533 | int |
| 2501 | splice (aio_rfd rfh, SV *off_in, aio_wfd wfh, SV *off_out, size_t length, unsigned int flags) |
2534 | splice (aio_rfd rfh, SV *off_in, aio_wfd wfh, SV *off_out, size_t length, unsigned int flags) |
| 2502 | CODE: |
2535 | CODE: |
| 2503 | { |
2536 | { |
| 2504 | #if HAVE_LINUX_SPLICE |
2537 | #if HAVE_LINUX_SPLICE |
