event 0.4.1 → 0.6.0

data/ext/event/backend/kqueue.c

@@ -24,9 +24,10 @@
 #include <sys/event.h>
 #include <sys/ioctl.h>
 #include <time.h>
+#include <errno.h>
 
 static VALUE Event_Backend_KQueue = Qnil;
-static ID id_fileno, id_transfer;
+static ID id_fileno;
 
 enum {KQUEUE_MAX_EVENTS = 64};
 
@@ -112,6 +113,86 @@ VALUE Event_Backend_KQueue_close(VALUE self) {
 	return Qnil;
 }
 
+struct process_wait_arguments {
+	struct Event_Backend_KQueue *data;
+	pid_t pid;
+	int flags;
+};
+
+static
+int process_add_filters(int descriptor, int ident, VALUE fiber) {
+	struct kevent event = {0};
+	
+	event.ident = ident;
+	event.filter = EVFILT_PROC;
+	event.flags = EV_ADD | EV_ENABLE | EV_ONESHOT;
+	event.fflags = NOTE_EXIT;
+	event.udata = (void*)fiber;
+	
+	int result = kevent(descriptor, &event, 1, NULL, 0, NULL);
+	
+	if (result == -1) {
+		// No such process - the process has probably already terminated:
+		if (errno == ESRCH) {
+			return 0;
+		}
+		
+		rb_sys_fail("kevent(process_add_filters)");
+	}
+	
+	return 1;
+}
+
+static
+void process_remove_filters(int descriptor, int ident) {
+	struct kevent event = {0};
+	
+	event.ident = ident;
+	event.filter = EVFILT_PROC;
+	event.flags = EV_DELETE;
+	event.fflags = NOTE_EXIT;
+	
+	// Ignore the result.
+	kevent(descriptor, &event, 1, NULL, 0, NULL);
+}
+
+static
+VALUE process_wait_transfer(VALUE _arguments) {
+	struct process_wait_arguments *arguments = (struct process_wait_arguments *)_arguments;
+	
+	Event_Backend_transfer(arguments->data->loop);
+	
+	return Event_Backend_process_status_wait(arguments->pid);
+}
+
+static
+VALUE process_wait_rescue(VALUE _arguments, VALUE exception) {
+	struct process_wait_arguments *arguments = (struct process_wait_arguments *)_arguments;
+	
+	process_remove_filters(arguments->data->descriptor, arguments->pid);
+	
+	rb_exc_raise(exception);
+}
+
+VALUE Event_Backend_KQueue_process_wait(VALUE self, VALUE fiber, VALUE pid, VALUE flags) {
+	struct Event_Backend_KQueue *data = NULL;
+	TypedData_Get_Struct(self, struct Event_Backend_KQueue, &Event_Backend_KQueue_Type, data);
+	
+	struct process_wait_arguments process_wait_arguments = {
+		.data = data,
+		.pid = NUM2PIDT(pid),
+		.flags = RB_NUM2INT(flags),
+	};
+	
+	int waiting = process_add_filters(data->descriptor, process_wait_arguments.pid, fiber);
+	
+	if (waiting) {
+		return rb_rescue(process_wait_transfer, (VALUE)&process_wait_arguments, process_wait_rescue, (VALUE)&process_wait_arguments);
+	} else {
+		return Event_Backend_process_status_wait(process_wait_arguments.pid);
+	}
+}
+
 static
 int io_add_filters(int descriptor, int ident, int events, VALUE fiber) {
 	int count = 0;
@@ -143,7 +224,7 @@ int io_add_filters(int descriptor, int ident, int events, VALUE fiber) {
 	int result = kevent(descriptor, kevents, count, NULL, 0, NULL);
 	
 	if (result == -1) {
-		rb_sys_fail("kevent(register)");
+		rb_sys_fail("kevent(io_add_filters)");
 	}
 	
 	return events;
@@ -186,7 +267,7 @@ VALUE io_wait_rescue(VALUE _arguments, VALUE exception) {
 	io_remove_filters(arguments->data->descriptor, arguments->descriptor, arguments->events);
 	
 	rb_exc_raise(exception);
-};
+}
 
 static inline
 int events_from_kqueue_filter(int filter) {
@@ -200,19 +281,19 @@ static
 VALUE io_wait_transfer(VALUE _arguments) {
 	struct io_wait_arguments *arguments = (struct io_wait_arguments *)_arguments;
 	
-	VALUE result = rb_funcall(arguments->data->loop, id_transfer, 0);
+	VALUE result = Event_Backend_transfer(arguments->data->loop);
 	
-	return INT2NUM(events_from_kqueue_filter(NUM2INT(result)));
-};
+	return INT2NUM(events_from_kqueue_filter(RB_NUM2INT(result)));
+}
 
 VALUE Event_Backend_KQueue_io_wait(VALUE self, VALUE fiber, VALUE io, VALUE events) {
 	struct Event_Backend_KQueue *data = NULL;
 	TypedData_Get_Struct(self, struct Event_Backend_KQueue, &Event_Backend_KQueue_Type, data);
 	
-	int descriptor = NUM2INT(rb_funcall(io, id_fileno, 0));
+	int descriptor = RB_NUM2INT(rb_funcall(io, id_fileno, 0));
 	
 	struct io_wait_arguments io_wait_arguments = {
-		.events = io_add_filters(data->descriptor, descriptor, NUM2INT(events), fiber),
+		.events = io_add_filters(data->descriptor, descriptor, RB_NUM2INT(events), fiber),
 		.data = data,
 		.descriptor = descriptor,
 	};
@@ -220,6 +301,154 @@ VALUE Event_Backend_KQueue_io_wait(VALUE self, VALUE fiber, VALUE io, VALUE even
 	return rb_rescue(io_wait_transfer, (VALUE)&io_wait_arguments, io_wait_rescue, (VALUE)&io_wait_arguments);
 }
 
+struct io_read_arguments {
+	VALUE self;
+	VALUE fiber;
+	VALUE io;
+	
+	int flags;
+	
+	int descriptor;
+	
+	VALUE buffer;
+	size_t offset;
+	size_t length;
+};
+
+static
+VALUE io_read_loop(VALUE _arguments) {
+	struct io_read_arguments *arguments = (struct io_read_arguments *)_arguments;
+	
+	size_t offset = arguments->offset;
+	size_t length = arguments->length;
+	size_t total = 0;
+	
+	while (length > 0) {
+		char *buffer = Event_Backend_resize_to_capacity(arguments->buffer, offset, length);
+		ssize_t result = read(arguments->descriptor, buffer+offset, length);
+		
+		if (result >= 0) {
+			offset += result;
+			length -= result;
+			total += result;
+		} else if (errno == EAGAIN || errno == EWOULDBLOCK) {
+			Event_Backend_KQueue_io_wait(arguments->self, arguments->fiber, arguments->io, RB_INT2NUM(READABLE));
+		} else {
+			rb_sys_fail("Event_Backend_KQueue_io_read");
+		}
+	}
+	
+	Event_Backend_resize_to_fit(arguments->buffer, arguments->offset, arguments->length);
+	
+	return SIZET2NUM(total);
+}
+
+static
+VALUE io_read_ensure(VALUE _arguments) {
+	struct io_read_arguments *arguments = (struct io_read_arguments *)_arguments;
+	
+	Event_Backend_nonblock_restore(arguments->descriptor, arguments->flags);
+	
+	return Qnil;
+}
+
+VALUE Event_Backend_KQueue_io_read(VALUE self, VALUE fiber, VALUE io, VALUE buffer, VALUE _offset, VALUE _length) {
+	struct Event_Backend_KQueue *data = NULL;
+	TypedData_Get_Struct(self, struct Event_Backend_KQueue, &Event_Backend_KQueue_Type, data);
+	
+	int descriptor = RB_NUM2INT(rb_funcall(io, id_fileno, 0));
+	
+	size_t offset = NUM2SIZET(_offset);
+	size_t length = NUM2SIZET(_length);
+	
+	struct io_read_arguments io_read_arguments = {
+		.self = self,
+		.fiber = fiber,
+		.io = io,
+		
+		.flags = Event_Backend_nonblock_set(descriptor),
+		.descriptor = descriptor,
+		.buffer = buffer,
+		.offset = offset,
+		.length = length,
+	};
+	
+	return rb_ensure(io_read_loop, (VALUE)&io_read_arguments, io_read_ensure, (VALUE)&io_read_arguments);
+}
+
+struct io_write_arguments {
+	VALUE self;
+	VALUE fiber;
+	VALUE io;
+	
+	int flags;
+	
+	int descriptor;
+	
+	VALUE buffer;
+	size_t offset;
+	size_t length;
+};
+
+static
+VALUE io_write_loop(VALUE _arguments) {
+	struct io_write_arguments *arguments = (struct io_write_arguments *)_arguments;
+	
+	size_t offset = arguments->offset;
+	size_t length = arguments->length;
+	size_t total = 0;
+	
+	while (length > 0) {
+		char *buffer = Event_Backend_verify_size(arguments->buffer, offset, length);
+		ssize_t result = write(arguments->descriptor, buffer+offset, length);
+		
+		if (result >= 0) {
+			length -= result;
+			offset += result;
+			total += result;
+		} else if (errno == EAGAIN || errno == EWOULDBLOCK) {
+			Event_Backend_KQueue_io_wait(arguments->self, arguments->fiber, arguments->io, RB_INT2NUM(WRITABLE));
+		} else {
+			rb_sys_fail("Event_Backend_KQueue_io_write");
+		}
+	}
+	
+	return SIZET2NUM(total);
+};
+
+static
+VALUE io_write_ensure(VALUE _arguments) {
+	struct io_write_arguments *arguments = (struct io_write_arguments *)_arguments;
+	
+	Event_Backend_nonblock_restore(arguments->descriptor, arguments->flags);
+	
+	return Qnil;
+};
+
+VALUE Event_Backend_KQueue_io_write(VALUE self, VALUE fiber, VALUE io, VALUE buffer, VALUE _offset, VALUE _length) {
+	struct Event_Backend_KQueue *data = NULL;
+	TypedData_Get_Struct(self, struct Event_Backend_KQueue, &Event_Backend_KQueue_Type, data);
+	
+	int descriptor = NUM2INT(rb_funcall(io, id_fileno, 0));
+	
+	size_t offset = NUM2SIZET(_offset);
+	size_t length = NUM2SIZET(_length);
+	
+	struct io_write_arguments io_write_arguments = {
+		.self = self,
+		.fiber = fiber,
+		.io = io,
+		
+		.flags = Event_Backend_nonblock_set(descriptor),
+		.descriptor = descriptor,
+		.buffer = buffer,
+		.offset = offset,
+		.length = length,
+	};
+	
+	return rb_ensure(io_write_loop, (VALUE)&io_write_arguments, io_write_ensure, (VALUE)&io_write_arguments);
+}
+
 static
 struct timespec * make_timeout(VALUE duration, struct timespec * storage) {
 	if (duration == Qnil) {
@@ -325,7 +554,8 @@ VALUE Event_Backend_KQueue_select(VALUE self, VALUE duration) {
 	for (int i = 0; i < arguments.count; i += 1) {
 		VALUE fiber = (VALUE)arguments.events[i].udata;
 		VALUE result = INT2NUM(arguments.events[i].filter);
-		rb_funcall(fiber, id_transfer, 1, result);
+		
+		Event_Backend_transfer_result(fiber, result);
 	}
 	
 	return INT2NUM(arguments.count);
@@ -333,14 +563,17 @@ VALUE Event_Backend_KQueue_select(VALUE self, VALUE duration) {
 
 void Init_Event_Backend_KQueue(VALUE Event_Backend) {
 	id_fileno = rb_intern("fileno");
-	id_transfer = rb_intern("transfer");
 	
 	Event_Backend_KQueue = rb_define_class_under(Event_Backend, "KQueue", rb_cObject);
 	
 	rb_define_alloc_func(Event_Backend_KQueue, Event_Backend_KQueue_allocate);
 	rb_define_method(Event_Backend_KQueue, "initialize", Event_Backend_KQueue_initialize, 1);
+	rb_define_method(Event_Backend_KQueue, "select", Event_Backend_KQueue_select, 1);
 	rb_define_method(Event_Backend_KQueue, "close", Event_Backend_KQueue_close, 0);
 	
 	rb_define_method(Event_Backend_KQueue, "io_wait", Event_Backend_KQueue_io_wait, 3);
-	rb_define_method(Event_Backend_KQueue, "select", Event_Backend_KQueue_select, 1);
+	rb_define_method(Event_Backend_KQueue, "io_read", Event_Backend_KQueue_io_read, 5);
+	rb_define_method(Event_Backend_KQueue, "io_write", Event_Backend_KQueue_io_write, 5);
+	
+	rb_define_method(Event_Backend_KQueue, "process_wait", Event_Backend_KQueue_process_wait, 3);
 }

data/ext/event/backend/pidfd.c

@@ -0,0 +1,36 @@
+// Copyright, 2021, by Samuel G. D. Williams. <http://www.codeotaku.com>
+// 
+// Permission is hereby granted, free of charge, to any person obtaining a copy
+// of this software and associated documentation files (the "Software"), to deal
+// in the Software without restriction, including without limitation the rights
+// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+// copies of the Software, and to permit persons to whom the Software is
+// furnished to do so, subject to the following conditions:
+// 
+// The above copyright notice and this permission notice shall be included in
+// all copies or substantial portions of the Software.
+// 
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+// THE SOFTWARE.
+
+#include <sys/types.h>
+#include <sys/syscall.h>
+#include <unistd.h>
+#include <poll.h>
+#include <stdlib.h>
+#include <stdio.h>
+
+#ifndef __NR_pidfd_open
+#define __NR_pidfd_open 434   /* System call # on most architectures */
+#endif
+
+static int
+pidfd_open(pid_t pid, unsigned int flags)
+{
+	return syscall(__NR_pidfd_open, pid, flags);
+}

data/ext/event/backend/uring.c

@@ -25,8 +25,10 @@
 #include <poll.h>
 #include <time.h>
 
+#include "pidfd.c"
+
 static VALUE Event_Backend_URing = Qnil;
-static ID id_fileno, id_transfer;
+static ID id_fileno;
 
 enum {URING_ENTRIES = 128};
 enum {URING_MAX_EVENTS = 128};
@@ -111,6 +113,66 @@ VALUE Event_Backend_URing_close(VALUE self) {
 	return Qnil;
 }
 
+struct io_uring_sqe * io_get_sqe(struct Event_Backend_URing *data) {
+	struct io_uring_sqe *sqe = io_uring_get_sqe(&data->ring);
+	
+	while (sqe == NULL) {
+		io_uring_submit(&data->ring);
+		sqe = io_uring_get_sqe(&data->ring);
+	}
+	
+	// fprintf(stderr, "io_get_sqe -> %p\n", sqe);
+	
+	return sqe;
+}
+
+struct process_wait_arguments {
+	struct Event_Backend_URing *data;
+	pid_t pid;
+	int flags;
+	int descriptor;
+};
+
+static
+VALUE process_wait_transfer(VALUE _arguments) {
+	struct process_wait_arguments *arguments = (struct process_wait_arguments *)_arguments;
+	
+	Event_Backend_transfer(arguments->data->loop);
+	
+	return Event_Backend_process_status_wait(arguments->pid);
+}
+
+static
+VALUE process_wait_ensure(VALUE _arguments) {
+	struct process_wait_arguments *arguments = (struct process_wait_arguments *)_arguments;
+	
+	close(arguments->descriptor);
+	
+	return Qnil;
+}
+
+VALUE Event_Backend_URing_process_wait(VALUE self, VALUE fiber, VALUE pid, VALUE flags) {
+	struct Event_Backend_URing *data = NULL;
+	TypedData_Get_Struct(self, struct Event_Backend_URing, &Event_Backend_URing_Type, data);
+	
+	struct process_wait_arguments process_wait_arguments = {
+		.data = data,
+		.pid = NUM2PIDT(pid),
+		.flags = NUM2INT(flags),
+	};
+	
+	process_wait_arguments.descriptor = pidfd_open(process_wait_arguments.pid, 0);
+	rb_update_max_fd(process_wait_arguments.descriptor);
+	
+	struct io_uring_sqe *sqe = io_get_sqe(data);
+	assert(sqe);
+	
+	io_uring_prep_poll_add(sqe, process_wait_arguments.descriptor, POLLIN|POLLHUP|POLLERR);
+	io_uring_sqe_set_data(sqe, (void*)fiber);
+	
+	return rb_ensure(process_wait_transfer, (VALUE)&process_wait_arguments, process_wait_ensure, (VALUE)&process_wait_arguments);
+}
+
 static inline
 short poll_flags_from_events(int events) {
 	short flags = 0;
@@ -142,22 +204,13 @@ struct io_wait_arguments {
 	short flags;
 };
 
-struct io_uring_sqe * io_get_sqe(struct Event_Backend_URing *data) {
-	struct io_uring_sqe *sqe = io_uring_get_sqe(&data->ring);
-	
-	while (sqe == NULL) {
-		sqe = io_uring_get_sqe(&data->ring);
-	}
-	
-	return sqe;
-}
-
 static
 VALUE io_wait_rescue(VALUE _arguments, VALUE exception) {
 	struct io_wait_arguments *arguments = (struct io_wait_arguments *)_arguments;
 	struct Event_Backend_URing *data = arguments->data;
 	
 	struct io_uring_sqe *sqe = io_get_sqe(data);
+	assert(sqe);
 	
 	// fprintf(stderr, "poll_remove(%p, %p)\n", sqe, (void*)arguments->fiber);
 	
@@ -171,8 +224,8 @@ static
 VALUE io_wait_transfer(VALUE _arguments) {
 	struct io_wait_arguments *arguments = (struct io_wait_arguments *)_arguments;
 	struct Event_Backend_URing *data = arguments->data;
-	
-	VALUE result = rb_funcall(data->loop, id_transfer, 0);
+
+	VALUE result = Event_Backend_transfer(data->loop);
 	
 	// We explicitly filter the resulting events based on the requested events.
 	// In some cases, poll will report events we didn't ask for.
@@ -187,8 +240,7 @@ VALUE Event_Backend_URing_io_wait(VALUE self, VALUE fiber, VALUE io, VALUE event
 	
 	int descriptor = NUM2INT(rb_funcall(io, id_fileno, 0));
 	struct io_uring_sqe *sqe = io_get_sqe(data);
-	
-	if (!sqe) return INT2NUM(0);
+	assert(sqe);
 	
 	short flags = poll_flags_from_events(NUM2INT(events));
 	
@@ -196,7 +248,8 @@ VALUE Event_Backend_URing_io_wait(VALUE self, VALUE fiber, VALUE io, VALUE event
 	
 	io_uring_prep_poll_add(sqe, descriptor, flags);
 	io_uring_sqe_set_data(sqe, (void*)fiber);
-	io_uring_submit(&data->ring);
+	// fprintf(stderr, "io_uring_submit\n");
+	// io_uring_submit(&data->ring);
 	
 	struct io_wait_arguments io_wait_arguments = {
 		.data = data,
@@ -207,87 +260,98 @@ VALUE Event_Backend_URing_io_wait(VALUE self, VALUE fiber, VALUE io, VALUE event
 	return rb_rescue(io_wait_transfer, (VALUE)&io_wait_arguments, io_wait_rescue, (VALUE)&io_wait_arguments);
 }
 
-inline static
-void resize_to_capacity(VALUE string, size_t offset, size_t length) {
-	size_t current_length = RSTRING_LEN(string);
-	long difference = (long)(offset + length) - (long)current_length;
+static
+int io_read(struct Event_Backend_URing *data, VALUE fiber, int descriptor, char *buffer, size_t length) {
+	struct io_uring_sqe *sqe = io_get_sqe(data);
+	assert(sqe);
 	
-	difference += 1;
+	struct iovec iovecs[1];
+	iovecs[0].iov_base = buffer;
+	iovecs[0].iov_len = length;
 	
-	if (difference > 0) {
-		rb_str_modify_expand(string, difference);
-	} else {
-		rb_str_modify(string);
-	}
-}
-
-inline static
-void resize_to_fit(VALUE string, size_t offset, size_t length) {
-	size_t current_length = RSTRING_LEN(string);
+	io_uring_prep_readv(sqe, descriptor, iovecs, 1, 0);
+	io_uring_sqe_set_data(sqe, (void*)fiber);
+	io_uring_submit(&data->ring);
 	
-	if (current_length < (offset + length)) {
-		rb_str_set_len(string, offset + length);
-	}
+	return NUM2INT(Event_Backend_transfer(data->loop));
 }
 
-VALUE Event_Backend_URing_io_read(VALUE self, VALUE fiber, VALUE io, VALUE buffer, VALUE offset, VALUE length) {
+VALUE Event_Backend_URing_io_read(VALUE self, VALUE fiber, VALUE io, VALUE _buffer, VALUE _offset, VALUE _length) {
 	struct Event_Backend_URing *data = NULL;
 	TypedData_Get_Struct(self, struct Event_Backend_URing, &Event_Backend_URing_Type, data);
 	
-	resize_to_capacity(buffer, NUM2SIZET(offset), NUM2SIZET(length));
+	int descriptor = RB_NUM2INT(rb_funcall(io, id_fileno, 0));
 	
-	int descriptor = NUM2INT(rb_funcall(io, id_fileno, 0));
-	struct io_uring_sqe *sqe = io_get_sqe(data);
-	
-	struct iovec iovecs[1];
-	iovecs[0].iov_base = RSTRING_PTR(buffer) + NUM2SIZET(offset);
-	iovecs[0].iov_len = NUM2SIZET(length);
-	
-	io_uring_prep_readv(sqe, descriptor, iovecs, 1, 0);
-	io_uring_sqe_set_data(sqe, (void*)fiber);
-	io_uring_submit(&data->ring);
+	size_t offset = NUM2SIZET(_offset);
+	size_t length = NUM2SIZET(_length);
 	
-	// fprintf(stderr, "prep_readv(%p, %d, %ld)\n", sqe, descriptor, iovecs[0].iov_len);
+	size_t start = offset;
+	size_t total = 0;
 	
-	int result = NUM2INT(rb_funcall(data->loop, id_transfer, 0));
-	
-	if (result < 0) {
-		rb_syserr_fail(-result, strerror(-result));
+	while (length > 0) {
+		char *buffer = Event_Backend_resize_to_capacity(_buffer, offset, length);
+		int result = io_read(data, fiber, descriptor, buffer+offset, length);
+		
+		if (result >= 0) {
+			offset += result;
+			length -= result;
+			total += result;
+		} else if (-result == EAGAIN || -result == EWOULDBLOCK) {
+			Event_Backend_URing_io_wait(self, fiber, io, RB_INT2NUM(READABLE));
+		} else {
+			rb_syserr_fail(-result, strerror(-result));
+		}
 	}
 	
-	resize_to_fit(buffer, NUM2SIZET(offset), (size_t)result);
+	Event_Backend_resize_to_fit(_buffer, start, total);
 	
-	return INT2NUM(result);
+	return SIZET2NUM(total);
 }
 
-VALUE Event_Backend_URing_io_write(VALUE self, VALUE fiber, VALUE io, VALUE buffer, VALUE offset, VALUE length) {
-	struct Event_Backend_URing *data = NULL;
-	TypedData_Get_Struct(self, struct Event_Backend_URing, &Event_Backend_URing_Type, data);
-	
-	if ((size_t)RSTRING_LEN(buffer) < NUM2SIZET(offset) + NUM2SIZET(length)) {
-		rb_raise(rb_eRuntimeError, "invalid offset/length exceeds bounds of buffer");
-	}
-	
-	int descriptor = NUM2INT(rb_funcall(io, id_fileno, 0));
+static
+int io_write(struct Event_Backend_URing *data, VALUE fiber, int descriptor, char *buffer, size_t length) {
 	struct io_uring_sqe *sqe = io_get_sqe(data);
+	assert(sqe);
 	
 	struct iovec iovecs[1];
-	iovecs[0].iov_base = RSTRING_PTR(buffer) + NUM2SIZET(offset);
-	iovecs[0].iov_len = NUM2SIZET(length);
+	iovecs[0].iov_base = buffer;
+	iovecs[0].iov_len = length;
 	
 	io_uring_prep_writev(sqe, descriptor, iovecs, 1, 0);
 	io_uring_sqe_set_data(sqe, (void*)fiber);
 	io_uring_submit(&data->ring);
 	
-	// fprintf(stderr, "prep_writev(%p, %d, %ld)\n", sqe, descriptor, iovecs[0].iov_len);
+	return NUM2INT(Event_Backend_transfer(data->loop));
+}
+
+VALUE Event_Backend_URing_io_write(VALUE self, VALUE fiber, VALUE io, VALUE _buffer, VALUE _offset, VALUE _length) {
+	struct Event_Backend_URing *data = NULL;
+	TypedData_Get_Struct(self, struct Event_Backend_URing, &Event_Backend_URing_Type, data);
+	
+	int descriptor = RB_NUM2INT(rb_funcall(io, id_fileno, 0));
 	
-	int result = NUM2INT(rb_funcall(data->loop, id_transfer, 0));
+	size_t offset = NUM2SIZET(_offset);
+	size_t length = NUM2SIZET(_length);
 	
-	if (result < 0) {
-		rb_syserr_fail(-result, strerror(-result));
+	char *buffer = Event_Backend_verify_size(_buffer, offset, length);
+	
+	size_t total = 0;
+	
+	while (length > 0) {
+		int result = io_write(data, fiber, descriptor, buffer+offset, length);
+		
+		if (result >= 0) {
+			length -= result;
+			offset += result;
+			total += result;
+		} else if (-result == EAGAIN || -result == EWOULDBLOCK) {
+			Event_Backend_URing_io_wait(self, fiber, io, RB_INT2NUM(WRITABLE));
+		} else {
+			rb_syserr_fail(-result, strerror(-result));
+		}
 	}
 	
-	return INT2NUM(result);
+	return SIZET2NUM(total);
 }
 
 static
@@ -324,8 +388,7 @@ int timeout_nonblocking(struct __kernel_timespec *timespec) {
 struct select_arguments {
 	struct Event_Backend_URing *data;
 	
-	int count;
-	struct io_uring_cqe **cqes;
+	int result;
 	
 	struct __kernel_timespec storage;
 	struct __kernel_timespec *timeout;
@@ -335,12 +398,10 @@ static
 void * select_internal(void *_arguments) {
 	struct select_arguments * arguments = (struct select_arguments *)_arguments;
 	
-	arguments->count = io_uring_wait_cqes(&arguments->data->ring, arguments->cqes, 1, arguments->timeout, NULL);
+	io_uring_submit(&arguments->data->ring);
 	
-	// If waiting resulted in a timeout, there are 0 events.
-	if (arguments->count == -ETIME) {
-		arguments->count = 0;
-	}
+	struct io_uring_cqe *cqe = NULL;
+	arguments->result = io_uring_wait_cqe_timeout(&arguments->data->ring, &cqe, arguments->timeout);
 	
 	return NULL;
 }
@@ -349,21 +410,52 @@ static
 int select_internal_without_gvl(struct select_arguments *arguments) {
 	rb_thread_call_without_gvl(select_internal, (void *)arguments, RUBY_UBF_IO, 0);
 	
-	if (arguments->count < 0) {
-		rb_syserr_fail(-arguments->count, "select_internal_without_gvl:io_uring_wait_cqes");
+	if (arguments->result == -ETIME) {
+		arguments->result = 0;
+	} else if (arguments->result < 0) {
+		rb_syserr_fail(-arguments->result, "select_internal_without_gvl:io_uring_wait_cqes");
+	} else {
+		// At least 1 event is waiting:
+		arguments->result = 1;
+	}
+	
+	return arguments->result;
+}
+
+static inline
+unsigned select_process_completions(struct io_uring *ring) {
+	unsigned completed = 0;
+	unsigned head;
+	struct io_uring_cqe *cqe;
+	
+	io_uring_for_each_cqe(ring, head, cqe) {
+		++completed;
+		
+		// If the operation was cancelled, or the operation has no user data (fiber):
+		if (cqe->res == -ECANCELED || cqe->user_data == 0 || cqe->user_data == LIBURING_UDATA_TIMEOUT) {
+			continue;
+		}
+		
+		VALUE fiber = (VALUE)cqe->user_data;
+		VALUE result = INT2NUM(cqe->res);
+		
+		// fprintf(stderr, "cqe res=%d user_data=%p\n", cqe->res, (void*)cqe->user_data);
+		
+		Event_Backend_transfer_result(fiber, result);
+	}
+	
+	if (completed) {
+		io_uring_cq_advance(ring, completed);
 	}
 	
-	return arguments->count;
+	return completed;
 }
 
 VALUE Event_Backend_URing_select(VALUE self, VALUE duration) {
 	struct Event_Backend_URing *data = NULL;
 	TypedData_Get_Struct(self, struct Event_Backend_URing, &Event_Backend_URing_Type, data);
 	
-	struct io_uring_cqe *cqes[URING_MAX_EVENTS];
-	
-	// This is a non-blocking operation:
-	int result = io_uring_peek_batch_cqe(&data->ring, cqes, URING_MAX_EVENTS);
+	int result = select_process_completions(&data->ring);
 	
 	if (result < 0) {
 		rb_syserr_fail(-result, strerror(-result));
@@ -371,7 +463,6 @@ VALUE Event_Backend_URing_select(VALUE self, VALUE duration) {
 		// We might need to wait for events:
 		struct select_arguments arguments = {
 			.data = data,
-			.cqes = cqes,
 			.timeout = NULL,
 		};
 		
@@ -379,43 +470,29 @@ VALUE Event_Backend_URing_select(VALUE self, VALUE duration) {
 		
 		if (!timeout_nonblocking(arguments.timeout)) {
 			result = select_internal_without_gvl(&arguments);
+		} else {
+			io_uring_submit(&data->ring);
 		}
 	}
 	
-	// fprintf(stderr, "cqes count=%d\n", result);
-	
-	for (int i = 0; i < result; i += 1) {
-		// If the operation was cancelled, or the operation has no user data (fiber):
-		if (cqes[i]->res == -ECANCELED || cqes[i]->user_data == 0) {
-			continue;
-		}
-		
-		VALUE fiber = (VALUE)io_uring_cqe_get_data(cqes[i]);
-		VALUE result = INT2NUM(cqes[i]->res);
-		
-		// fprintf(stderr, "cqes[i] res=%d user_data=%p\n", cqes[i]->res, (void*)cqes[i]->user_data);
-		
-		io_uring_cqe_seen(&data->ring, cqes[i]);
-		
-		rb_funcall(fiber, id_transfer, 1, result);
-	}
+	result = select_process_completions(&data->ring);
 	
 	return INT2NUM(result);
 }
 
 void Init_Event_Backend_URing(VALUE Event_Backend) {
 	id_fileno = rb_intern("fileno");
-	id_transfer = rb_intern("transfer");
 	
 	Event_Backend_URing = rb_define_class_under(Event_Backend, "URing", rb_cObject);
 	
 	rb_define_alloc_func(Event_Backend_URing, Event_Backend_URing_allocate);
 	rb_define_method(Event_Backend_URing, "initialize", Event_Backend_URing_initialize, 1);
+	rb_define_method(Event_Backend_URing, "select", Event_Backend_URing_select, 1);
 	rb_define_method(Event_Backend_URing, "close", Event_Backend_URing_close, 0);
 	
 	rb_define_method(Event_Backend_URing, "io_wait", Event_Backend_URing_io_wait, 3);
-	rb_define_method(Event_Backend_URing, "select", Event_Backend_URing_select, 1);
-	
 	rb_define_method(Event_Backend_URing, "io_read", Event_Backend_URing_io_read, 5);
 	rb_define_method(Event_Backend_URing, "io_write", Event_Backend_URing_io_write, 5);
+	
+	rb_define_method(Event_Backend_URing, "process_wait", Event_Backend_URing_process_wait, 3);
 }