14#include "internal/array.h"
15#include "internal/bits.h"
16#include "internal/error.h"
17#include "internal/numeric.h"
18#include "internal/string.h"
19#include "internal/thread.h"
22VALUE rb_eIOBufferLockedError;
23VALUE rb_eIOBufferAllocationError;
24VALUE rb_eIOBufferAccessError;
25VALUE rb_eIOBufferInvalidatedError;
26VALUE rb_eIOBufferMaskError;
28size_t RUBY_IO_BUFFER_PAGE_SIZE;
29size_t RUBY_IO_BUFFER_DEFAULT_SIZE;
38 RB_IO_BUFFER_HEXDUMP_DEFAULT_WIDTH = 16,
40 RB_IO_BUFFER_INSPECT_HEXDUMP_MAXIMUM_SIZE = 256,
41 RB_IO_BUFFER_INSPECT_HEXDUMP_WIDTH = 16,
44 RB_IO_BUFFER_FLAGS_MASK = RB_IO_BUFFER_EXTERNAL | RB_IO_BUFFER_INTERNAL | RB_IO_BUFFER_MAPPED | RB_IO_BUFFER_SHARED | RB_IO_BUFFER_LOCKED | RB_IO_BUFFER_PRIVATE | RB_IO_BUFFER_READONLY,
50 enum rb_io_buffer_flags flags;
60io_buffer_map_memory(
size_t size,
int flags)
63 void * base = VirtualAlloc(0, size, MEM_COMMIT, PAGE_READWRITE);
66 rb_sys_fail(
"io_buffer_map_memory:VirtualAlloc");
69 int mmap_flags = MAP_ANONYMOUS;
70 if (flags & RB_IO_BUFFER_SHARED) {
71 mmap_flags |= MAP_SHARED;
74 mmap_flags |= MAP_PRIVATE;
77 void * base = mmap(NULL, size, PROT_READ | PROT_WRITE, mmap_flags, -1, 0);
79 if (base == MAP_FAILED) {
80 rb_sys_fail(
"io_buffer_map_memory:mmap");
88io_buffer_map_file(
struct rb_io_buffer *buffer,
int descriptor,
size_t size, rb_off_t offset,
enum rb_io_buffer_flags flags)
91 HANDLE file = (HANDLE)_get_osfhandle(descriptor);
92 if (!file) rb_sys_fail(
"io_buffer_map_descriptor:_get_osfhandle");
94 DWORD protect = PAGE_READONLY, access = FILE_MAP_READ;
96 if (flags & RB_IO_BUFFER_READONLY) {
97 buffer->flags |= RB_IO_BUFFER_READONLY;
100 protect = PAGE_READWRITE;
101 access = FILE_MAP_WRITE;
104 if (flags & RB_IO_BUFFER_PRIVATE) {
105 protect = PAGE_WRITECOPY;
106 access = FILE_MAP_COPY;
107 buffer->flags |= RB_IO_BUFFER_PRIVATE;
111 buffer->flags |= RB_IO_BUFFER_EXTERNAL;
112 buffer->flags |= RB_IO_BUFFER_SHARED;
115 HANDLE mapping = CreateFileMapping(file, NULL, protect, 0, 0, NULL);
116 if (!mapping) rb_sys_fail(
"io_buffer_map_descriptor:CreateFileMapping");
118 void *base = MapViewOfFile(mapping, access, (DWORD)(offset >> 32), (DWORD)(offset & 0xFFFFFFFF), size);
121 CloseHandle(mapping);
122 rb_sys_fail(
"io_buffer_map_file:MapViewOfFile");
125 buffer->mapping = mapping;
127 int protect = PROT_READ, access = 0;
129 if (flags & RB_IO_BUFFER_READONLY) {
130 buffer->flags |= RB_IO_BUFFER_READONLY;
133 protect |= PROT_WRITE;
136 if (flags & RB_IO_BUFFER_PRIVATE) {
137 buffer->flags |= RB_IO_BUFFER_PRIVATE;
138 access |= MAP_PRIVATE;
142 buffer->flags |= RB_IO_BUFFER_EXTERNAL;
143 buffer->flags |= RB_IO_BUFFER_SHARED;
144 access |= MAP_SHARED;
147 void *base = mmap(NULL, size, protect, access, descriptor, offset);
149 if (base == MAP_FAILED) {
150 rb_sys_fail(
"io_buffer_map_file:mmap");
157 buffer->flags |= RB_IO_BUFFER_MAPPED;
158 buffer->flags |= RB_IO_BUFFER_FILE;
162io_buffer_experimental(
void)
164 static int warned = 0;
172 "IO::Buffer is experimental and both the Ruby and C interface may change in the future!"
183 buffer->mapping = NULL;
185 buffer->source =
Qnil;
189io_buffer_initialize(
VALUE self,
struct rb_io_buffer *buffer,
void *base,
size_t size,
enum rb_io_buffer_flags flags,
VALUE source)
196 if (flags & RB_IO_BUFFER_INTERNAL) {
197 base = calloc(size, 1);
199 else if (flags & RB_IO_BUFFER_MAPPED) {
200 base = io_buffer_map_memory(size, flags);
204 rb_raise(rb_eIOBufferAllocationError,
"Could not allocate buffer!");
214 buffer->flags = flags;
222 if (buffer->flags & RB_IO_BUFFER_INTERNAL) {
226 if (buffer->flags & RB_IO_BUFFER_MAPPED) {
228 if (buffer->flags & RB_IO_BUFFER_FILE) {
229 UnmapViewOfFile(buffer->base);
232 VirtualFree(buffer->base, 0, MEM_RELEASE);
235 munmap(buffer->base, buffer->size);
249 buffer->source =
Qnil;
255 if (buffer->mapping) {
256 CloseHandle(buffer->mapping);
257 buffer->mapping = NULL;
265rb_io_buffer_type_mark(
void *_buffer)
268 rb_gc_mark(buffer->source);
272rb_io_buffer_type_free(
void *_buffer)
276 io_buffer_free(buffer);
280rb_io_buffer_type_size(
const void *_buffer)
286 total += buffer->size;
295 .dmark = rb_io_buffer_type_mark,
296 .dfree = rb_io_buffer_type_free,
297 .dsize = rb_io_buffer_type_size,
300 .flags = RUBY_TYPED_FREE_IMMEDIATELY | RUBY_TYPED_WB_PROTECTED | RUBY_TYPED_EMBEDDABLE,
303static inline enum rb_io_buffer_flags
304io_buffer_extract_flags(
VALUE argument)
306 if (rb_int_negative_p(argument)) {
307 rb_raise(rb_eArgError,
"Flags can't be negative!");
310 enum rb_io_buffer_flags flags =
RB_NUM2UINT(argument);
313 return flags & RB_IO_BUFFER_FLAGS_MASK;
318io_buffer_extract_offset(
VALUE argument)
320 if (rb_int_negative_p(argument)) {
321 rb_raise(rb_eArgError,
"Offset can't be negative!");
331io_buffer_extract_length(
VALUE argument)
333 if (rb_int_negative_p(argument)) {
334 rb_raise(rb_eArgError,
"Length can't be negative!");
343io_buffer_extract_size(
VALUE argument)
345 if (rb_int_negative_p(argument)) {
346 rb_raise(rb_eArgError,
"Size can't be negative!");
355io_buffer_extract_width(
VALUE argument,
size_t minimum)
357 if (rb_int_negative_p(argument)) {
358 rb_raise(rb_eArgError,
"Width can't be negative!");
363 if (width < minimum) {
364 rb_raise(rb_eArgError,
"Width must be at least %" PRIuSIZE
"!", minimum);
375io_buffer_default_length(
const struct rb_io_buffer *buffer,
size_t offset)
377 if (offset > buffer->size) {
378 rb_raise(rb_eArgError,
"The given offset is bigger than the buffer size!");
382 return buffer->size - offset;
391io_buffer_extract_length_offset(
VALUE self,
int argc,
VALUE argv[],
size_t *length,
size_t *offset)
396 if (argc >= 2 && !
NIL_P(argv[1])) {
397 *offset = io_buffer_extract_offset(argv[1]);
403 if (argc >= 1 && !
NIL_P(argv[0])) {
404 *length = io_buffer_extract_length(argv[0]);
407 *length = io_buffer_default_length(buffer, *offset);
423io_buffer_extract_offset_length(
VALUE self,
int argc,
VALUE argv[],
size_t *offset,
size_t *length)
428 if (argc >= 1 && !
NIL_P(argv[0])) {
429 *offset = io_buffer_extract_offset(argv[0]);
435 if (argc >= 2 && !
NIL_P(argv[1])) {
436 *length = io_buffer_extract_length(argv[1]);
439 *length = io_buffer_default_length(buffer, *offset);
446rb_io_buffer_type_allocate(
VALUE self)
451 io_buffer_zero(buffer);
456static VALUE io_buffer_for_make_instance(
VALUE klass,
VALUE string,
enum rb_io_buffer_flags flags)
458 VALUE instance = rb_io_buffer_type_allocate(klass);
463 flags |= RB_IO_BUFFER_EXTERNAL;
465 if (RB_OBJ_FROZEN(
string))
466 flags |= RB_IO_BUFFER_READONLY;
468 if (!(flags & RB_IO_BUFFER_READONLY))
469 rb_str_modify(
string);
471 io_buffer_initialize(instance, buffer, RSTRING_PTR(
string), RSTRING_LEN(
string), flags,
string);
480 enum rb_io_buffer_flags flags;
484io_buffer_for_yield_instance(
VALUE _arguments)
488 arguments->instance = io_buffer_for_make_instance(arguments->klass, arguments->string, arguments->flags);
492 return rb_yield(arguments->instance);
496io_buffer_for_yield_instance_ensure(
VALUE _arguments)
500 if (arguments->instance !=
Qnil) {
501 rb_io_buffer_free(arguments->instance);
546rb_io_buffer_type_for(
VALUE klass,
VALUE string)
560 return rb_ensure(io_buffer_for_yield_instance, (
VALUE)&arguments, io_buffer_for_yield_instance_ensure, (
VALUE)&arguments);
564 string = rb_str_tmp_frozen_acquire(
string);
565 return io_buffer_for_make_instance(klass,
string, RB_IO_BUFFER_READONLY);
583rb_io_buffer_type_string(
VALUE klass,
VALUE length)
593 rb_ensure(io_buffer_for_yield_instance, (
VALUE)&arguments, io_buffer_for_yield_instance_ensure, (
VALUE)&arguments);
599rb_io_buffer_new(
void *base,
size_t size,
enum rb_io_buffer_flags flags)
601 VALUE instance = rb_io_buffer_type_allocate(rb_cIOBuffer);
606 io_buffer_initialize(instance, buffer, base, size, flags,
Qnil);
612rb_io_buffer_map(
VALUE io,
size_t size, rb_off_t offset,
enum rb_io_buffer_flags flags)
614 io_buffer_experimental();
616 VALUE instance = rb_io_buffer_type_allocate(rb_cIOBuffer);
623 io_buffer_map_file(buffer, descriptor, size, offset, flags);
666io_buffer_map(
int argc,
VALUE *argv,
VALUE klass)
674 if (argc >= 2 && !
RB_NIL_P(argv[1])) {
675 size = io_buffer_extract_size(argv[1]);
678 rb_off_t file_size = rb_file_size(io);
682 rb_raise(rb_eArgError,
"Invalid negative file size!");
685 else if ((uintmax_t)file_size > SIZE_MAX) {
686 rb_raise(rb_eArgError,
"File larger than address space!");
690 size = (size_t)file_size;
700 enum rb_io_buffer_flags flags = 0;
702 flags = io_buffer_extract_flags(argv[3]);
705 return rb_io_buffer_map(io, size, offset, flags);
709static inline enum rb_io_buffer_flags
710io_flags_for_size(
size_t size)
712 if (size >= RUBY_IO_BUFFER_PAGE_SIZE) {
713 return RB_IO_BUFFER_MAPPED;
716 return RB_IO_BUFFER_INTERNAL;
744rb_io_buffer_initialize(
int argc,
VALUE *argv,
VALUE self)
746 io_buffer_experimental();
755 size = io_buffer_extract_size(argv[0]);
758 size = RUBY_IO_BUFFER_DEFAULT_SIZE;
761 enum rb_io_buffer_flags flags = 0;
763 flags = io_buffer_extract_flags(argv[1]);
766 flags |= io_flags_for_size(size);
769 io_buffer_initialize(self, buffer, NULL, size, flags,
Qnil);
775io_buffer_validate_slice(
VALUE source,
void *base,
size_t size)
777 void *source_base = NULL;
778 size_t source_size = 0;
784 rb_io_buffer_get_bytes(source, &source_base, &source_size);
788 if (source_base == NULL)
return 0;
791 if (base < source_base)
return 0;
793 const void *source_end = (
char*)source_base + source_size;
794 const void *end = (
char*)base + size;
797 if (end > source_end)
return 0;
806 if (buffer->source !=
Qnil) {
808 return io_buffer_validate_slice(buffer->source, buffer->base, buffer->size);
815enum rb_io_buffer_flags
816rb_io_buffer_get_bytes(
VALUE self,
void **base,
size_t *size)
821 if (io_buffer_validate(buffer)) {
823 *base = buffer->base;
824 *size = buffer->size;
826 return buffer->flags;
838io_buffer_get_bytes_for_writing(
struct rb_io_buffer *buffer,
void **base,
size_t *size)
840 if (buffer->flags & RB_IO_BUFFER_READONLY) {
841 rb_raise(rb_eIOBufferAccessError,
"Buffer is not writable!");
844 if (!io_buffer_validate(buffer)) {
845 rb_raise(rb_eIOBufferInvalidatedError,
"Buffer is invalid!");
849 *base = buffer->base;
850 *size = buffer->size;
855 rb_raise(rb_eIOBufferAllocationError,
"The buffer is not allocated!");
859rb_io_buffer_get_bytes_for_writing(
VALUE self,
void **base,
size_t *size)
864 io_buffer_get_bytes_for_writing(buffer, base, size);
868io_buffer_get_bytes_for_reading(
struct rb_io_buffer *buffer,
const void **base,
size_t *size)
870 if (!io_buffer_validate(buffer)) {
871 rb_raise(rb_eIOBufferInvalidatedError,
"Buffer has been invalidated!");
875 *base = buffer->base;
876 *size = buffer->size;
881 rb_raise(rb_eIOBufferAllocationError,
"The buffer is not allocated!");
885rb_io_buffer_get_bytes_for_reading(
VALUE self,
const void **base,
size_t *size)
890 io_buffer_get_bytes_for_reading(buffer, base, size);
903rb_io_buffer_to_s(
VALUE self)
911 rb_str_catf(result,
" %p+%"PRIdSIZE, buffer->base, buffer->size);
913 if (buffer->base == NULL) {
917 if (buffer->flags & RB_IO_BUFFER_EXTERNAL) {
921 if (buffer->flags & RB_IO_BUFFER_INTERNAL) {
925 if (buffer->flags & RB_IO_BUFFER_MAPPED) {
929 if (buffer->flags & RB_IO_BUFFER_FILE) {
933 if (buffer->flags & RB_IO_BUFFER_SHARED) {
937 if (buffer->flags & RB_IO_BUFFER_LOCKED) {
941 if (buffer->flags & RB_IO_BUFFER_PRIVATE) {
945 if (buffer->flags & RB_IO_BUFFER_READONLY) {
949 if (buffer->source !=
Qnil) {
953 if (!io_buffer_validate(buffer)) {
963io_buffer_hexdump_output_size(
size_t width,
size_t size,
int first)
968 size_t whole_lines = (size / width);
969 size_t partial_line = (size % width) ? 1 : 0;
974 total += (whole_lines + partial_line) * (1 + 10 + width*3 + 1 + 1);
977 if (size && first) total -= 1;
986io_buffer_hexdump(
VALUE string,
size_t width,
const char *base,
size_t length,
size_t offset,
int first)
988 char *text = alloca(width+1);
991 for (; offset < length; offset += width) {
992 memset(text,
'\0', width);
994 rb_str_catf(
string,
"0x%08" PRIxSIZE
" ", offset);
998 rb_str_catf(
string,
"\n0x%08" PRIxSIZE
" ", offset);
1001 for (
size_t i = 0; i < width; i += 1) {
1002 if (offset+i < length) {
1003 unsigned char value = ((
unsigned char*)base)[offset+i];
1005 if (value < 127 && isprint(value)) {
1006 text[i] = (char)value;
1012 rb_str_catf(
string,
" %02x", value);
1019 rb_str_catf(
string,
" %s", text);
1038rb_io_buffer_inspect(
VALUE self)
1043 VALUE result = rb_io_buffer_to_s(self);
1045 if (io_buffer_validate(buffer)) {
1047 size_t size = buffer->size;
1050 if (size > RB_IO_BUFFER_INSPECT_HEXDUMP_MAXIMUM_SIZE) {
1051 size = RB_IO_BUFFER_INSPECT_HEXDUMP_MAXIMUM_SIZE;
1055 io_buffer_hexdump(result, RB_IO_BUFFER_INSPECT_HEXDUMP_WIDTH, buffer->base, size, 0, 0);
1058 rb_str_catf(result,
"\n(and %" PRIuSIZE
" more bytes not printed)", buffer->size - size);
1072rb_io_buffer_size(
VALUE self)
1089rb_io_buffer_valid_p(
VALUE self)
1094 return RBOOL(io_buffer_validate(buffer));
1112rb_io_buffer_null_p(
VALUE self)
1117 return RBOOL(buffer->base == NULL);
1128rb_io_buffer_empty_p(
VALUE self)
1133 return RBOOL(buffer->size == 0);
1148rb_io_buffer_external_p(
VALUE self)
1153 return RBOOL(buffer->flags & RB_IO_BUFFER_EXTERNAL);
1173rb_io_buffer_internal_p(
VALUE self)
1178 return RBOOL(buffer->flags & RB_IO_BUFFER_INTERNAL);
1195rb_io_buffer_mapped_p(
VALUE self)
1200 return RBOOL(buffer->flags & RB_IO_BUFFER_MAPPED);
1227rb_io_buffer_shared_p(
VALUE self)
1232 return RBOOL(buffer->flags & RB_IO_BUFFER_SHARED);
1250rb_io_buffer_locked_p(
VALUE self)
1255 return RBOOL(buffer->flags & RB_IO_BUFFER_LOCKED);
1281rb_io_buffer_private_p(
VALUE self)
1286 return RBOOL(buffer->flags & RB_IO_BUFFER_PRIVATE);
1290rb_io_buffer_readonly_p(
VALUE self)
1295 return buffer->flags & RB_IO_BUFFER_READONLY;
1307io_buffer_readonly_p(
VALUE self)
1309 return RBOOL(rb_io_buffer_readonly_p(self));
1315 if (buffer->flags & RB_IO_BUFFER_LOCKED) {
1316 rb_raise(rb_eIOBufferLockedError,
"Buffer already locked!");
1319 buffer->flags |= RB_IO_BUFFER_LOCKED;
1323rb_io_buffer_lock(
VALUE self)
1328 io_buffer_lock(buffer);
1336 if (!(buffer->flags & RB_IO_BUFFER_LOCKED)) {
1337 rb_raise(rb_eIOBufferLockedError,
"Buffer not locked!");
1340 buffer->flags &= ~RB_IO_BUFFER_LOCKED;
1344rb_io_buffer_unlock(
VALUE self)
1349 io_buffer_unlock(buffer);
1355rb_io_buffer_try_unlock(
VALUE self)
1360 if (buffer->flags & RB_IO_BUFFER_LOCKED) {
1361 buffer->flags &= ~RB_IO_BUFFER_LOCKED;
1399rb_io_buffer_locked(
VALUE self)
1404 if (buffer->flags & RB_IO_BUFFER_LOCKED) {
1405 rb_raise(rb_eIOBufferLockedError,
"Buffer already locked!");
1408 buffer->flags |= RB_IO_BUFFER_LOCKED;
1412 buffer->flags &= ~RB_IO_BUFFER_LOCKED;
1443rb_io_buffer_free(
VALUE self)
1448 if (buffer->flags & RB_IO_BUFFER_LOCKED) {
1449 rb_raise(rb_eIOBufferLockedError,
"Buffer is locked!");
1452 io_buffer_free(buffer);
1462 io_buffer_unlock(buffer);
1463 io_buffer_free(buffer);
1471io_buffer_validate_range(
struct rb_io_buffer *buffer,
size_t offset,
size_t length)
1474 if (offset + length > buffer->size) {
1475 rb_raise(rb_eArgError,
"Specified offset+length is bigger than the buffer size!");
1496rb_io_buffer_hexdump(
int argc,
VALUE *argv,
VALUE self)
1500 size_t offset, length;
1501 struct rb_io_buffer *buffer = io_buffer_extract_offset_length(self, argc, argv, &offset, &length);
1503 size_t width = RB_IO_BUFFER_HEXDUMP_DEFAULT_WIDTH;
1505 width = io_buffer_extract_width(argv[2], 1);
1509 io_buffer_validate_range(buffer, offset, length);
1513 if (io_buffer_validate(buffer) && buffer->base) {
1514 result = rb_str_buf_new(io_buffer_hexdump_output_size(width, length, 1));
1516 io_buffer_hexdump(result, width, buffer->base, offset+length, offset, 1);
1523rb_io_buffer_slice(
struct rb_io_buffer *buffer,
VALUE self,
size_t offset,
size_t length)
1525 io_buffer_validate_range(buffer, offset, length);
1531 slice->base = (
char*)buffer->base + offset;
1532 slice->size = length;
1535 if (buffer->source !=
Qnil) {
1536 RB_OBJ_WRITE(instance, &slice->source, buffer->source);
1600io_buffer_slice(
int argc,
VALUE *argv,
VALUE self)
1604 size_t offset, length;
1605 struct rb_io_buffer *buffer = io_buffer_extract_offset_length(self, argc, argv, &offset, &length);
1607 return rb_io_buffer_slice(buffer, self, offset, length);
1629rb_io_buffer_transfer(
VALUE self)
1634 if (buffer->flags & RB_IO_BUFFER_LOCKED) {
1635 rb_raise(rb_eIOBufferLockedError,
"Cannot transfer ownership of locked buffer!");
1642 *transferred = *buffer;
1643 io_buffer_zero(buffer);
1649io_buffer_resize_clear(
struct rb_io_buffer *buffer,
void* base,
size_t size)
1651 if (size > buffer->size) {
1652 memset((
unsigned char*)base+buffer->size, 0, size - buffer->size);
1661 io_buffer_initialize(self, &resized, NULL, size, io_flags_for_size(size),
Qnil);
1664 size_t preserve = buffer->size;
1665 if (preserve > size) preserve = size;
1666 memcpy(resized.base, buffer->base, preserve);
1668 io_buffer_resize_clear(buffer, resized.base, size);
1671 io_buffer_free(buffer);
1676rb_io_buffer_resize(
VALUE self,
size_t size)
1681 if (buffer->flags & RB_IO_BUFFER_LOCKED) {
1682 rb_raise(rb_eIOBufferLockedError,
"Cannot resize locked buffer!");
1685 if (buffer->base == NULL) {
1686 io_buffer_initialize(self, buffer, NULL, size, io_flags_for_size(size),
Qnil);
1690 if (buffer->flags & RB_IO_BUFFER_EXTERNAL) {
1691 rb_raise(rb_eIOBufferAccessError,
"Cannot resize external buffer!");
1694#if defined(HAVE_MREMAP) && defined(MREMAP_MAYMOVE)
1695 if (buffer->flags & RB_IO_BUFFER_MAPPED) {
1696 void *base = mremap(buffer->base, buffer->size, size, MREMAP_MAYMOVE);
1698 if (base == MAP_FAILED) {
1699 rb_sys_fail(
"rb_io_buffer_resize:mremap");
1702 io_buffer_resize_clear(buffer, base, size);
1704 buffer->base = base;
1705 buffer->size = size;
1711 if (buffer->flags & RB_IO_BUFFER_INTERNAL) {
1713 io_buffer_free(buffer);
1717 void *base = realloc(buffer->base, size);
1720 rb_sys_fail(
"rb_io_buffer_resize:realloc");
1723 io_buffer_resize_clear(buffer, base, size);
1725 buffer->base = base;
1726 buffer->size = size;
1731 io_buffer_resize_copy(self, buffer, size);
1755 rb_io_buffer_resize(self, io_buffer_extract_size(size));
1769 const void *ptr1, *ptr2;
1770 size_t size1, size2;
1772 rb_io_buffer_get_bytes_for_reading(self, &ptr1, &size1);
1773 rb_io_buffer_get_bytes_for_reading(other, &ptr2, &size2);
1775 if (size1 < size2) {
1779 if (size1 > size2) {
1783 return RB_INT2NUM(memcmp(ptr1, ptr2, size1));
1787io_buffer_validate_type(
size_t size,
size_t offset)
1789 if (offset > size) {
1790 rb_raise(rb_eArgError,
"Type extends beyond end of buffer! (offset=%"PRIdSIZE
" > size=%"PRIdSIZE
")", offset, size);
1812#define ruby_swap8(value) value
1820ruby_swapf32(
float value)
1822 union swapf32 swap = {.value = value};
1823 swap.integral = ruby_swap32(swap.integral);
1833ruby_swapf64(
double value)
1835 union swapf64 swap = {.value = value};
1836 swap.integral = ruby_swap64(swap.integral);
1840#define IO_BUFFER_DECLARE_TYPE(name, type, endian, wrap, unwrap, swap) \
1841static ID RB_IO_BUFFER_DATA_TYPE_##name; \
1844io_buffer_read_##name(const void* base, size_t size, size_t *offset) \
1846 io_buffer_validate_type(size, *offset + sizeof(type)); \
1848 memcpy(&value, (char*)base + *offset, sizeof(type)); \
1849 if (endian != RB_IO_BUFFER_HOST_ENDIAN) value = swap(value); \
1850 *offset += sizeof(type); \
1851 return wrap(value); \
1855io_buffer_write_##name(const void* base, size_t size, size_t *offset, VALUE _value) \
1857 io_buffer_validate_type(size, *offset + sizeof(type)); \
1858 type value = unwrap(_value); \
1859 if (endian != RB_IO_BUFFER_HOST_ENDIAN) value = swap(value); \
1860 memcpy((char*)base + *offset, &value, sizeof(type)); \
1861 *offset += sizeof(type); \
1865 RB_IO_BUFFER_DATA_TYPE_##name##_SIZE = sizeof(type) \
1873IO_BUFFER_DECLARE_TYPE(s16, int16_t, RB_IO_BUFFER_LITTLE_ENDIAN,
RB_INT2NUM,
RB_NUM2INT, ruby_swap16)
1874IO_BUFFER_DECLARE_TYPE(S16, int16_t, RB_IO_BUFFER_BIG_ENDIAN,
RB_INT2NUM,
RB_NUM2INT, ruby_swap16)
1878IO_BUFFER_DECLARE_TYPE(s32, int32_t, RB_IO_BUFFER_LITTLE_ENDIAN,
RB_INT2NUM,
RB_NUM2INT, ruby_swap32)
1879IO_BUFFER_DECLARE_TYPE(S32, int32_t, RB_IO_BUFFER_BIG_ENDIAN,
RB_INT2NUM,
RB_NUM2INT, ruby_swap32)
1881IO_BUFFER_DECLARE_TYPE(u64, uint64_t, RB_IO_BUFFER_LITTLE_ENDIAN,
RB_ULL2NUM,
RB_NUM2ULL, ruby_swap64)
1882IO_BUFFER_DECLARE_TYPE(U64, uint64_t, RB_IO_BUFFER_BIG_ENDIAN,
RB_ULL2NUM,
RB_NUM2ULL, ruby_swap64)
1883IO_BUFFER_DECLARE_TYPE(s64, int64_t, RB_IO_BUFFER_LITTLE_ENDIAN,
RB_LL2NUM,
RB_NUM2LL, ruby_swap64)
1884IO_BUFFER_DECLARE_TYPE(S64, int64_t, RB_IO_BUFFER_BIG_ENDIAN,
RB_LL2NUM,
RB_NUM2LL, ruby_swap64)
1886IO_BUFFER_DECLARE_TYPE(f32,
float, RB_IO_BUFFER_LITTLE_ENDIAN,
DBL2NUM,
NUM2DBL, ruby_swapf32)
1887IO_BUFFER_DECLARE_TYPE(F32,
float, RB_IO_BUFFER_BIG_ENDIAN,
DBL2NUM,
NUM2DBL, ruby_swapf32)
1888IO_BUFFER_DECLARE_TYPE(f64,
double, RB_IO_BUFFER_LITTLE_ENDIAN,
DBL2NUM,
NUM2DBL, ruby_swapf64)
1889IO_BUFFER_DECLARE_TYPE(F64,
double, RB_IO_BUFFER_BIG_ENDIAN,
DBL2NUM,
NUM2DBL, ruby_swapf64)
1890#undef IO_BUFFER_DECLARE_TYPE
1893io_buffer_buffer_type_size(
ID buffer_type)
1895#define IO_BUFFER_DATA_TYPE_SIZE(name) if (buffer_type == RB_IO_BUFFER_DATA_TYPE_##name) return RB_IO_BUFFER_DATA_TYPE_##name##_SIZE;
1896 IO_BUFFER_DATA_TYPE_SIZE(U8)
1897 IO_BUFFER_DATA_TYPE_SIZE(S8)
1898 IO_BUFFER_DATA_TYPE_SIZE(u16)
1899 IO_BUFFER_DATA_TYPE_SIZE(U16)
1900 IO_BUFFER_DATA_TYPE_SIZE(s16)
1901 IO_BUFFER_DATA_TYPE_SIZE(S16)
1902 IO_BUFFER_DATA_TYPE_SIZE(u32)
1903 IO_BUFFER_DATA_TYPE_SIZE(U32)
1904 IO_BUFFER_DATA_TYPE_SIZE(s32)
1905 IO_BUFFER_DATA_TYPE_SIZE(S32)
1906 IO_BUFFER_DATA_TYPE_SIZE(u64)
1907 IO_BUFFER_DATA_TYPE_SIZE(U64)
1908 IO_BUFFER_DATA_TYPE_SIZE(s64)
1909 IO_BUFFER_DATA_TYPE_SIZE(S64)
1910 IO_BUFFER_DATA_TYPE_SIZE(f32)
1911 IO_BUFFER_DATA_TYPE_SIZE(F32)
1912 IO_BUFFER_DATA_TYPE_SIZE(f64)
1913 IO_BUFFER_DATA_TYPE_SIZE(F64)
1914#undef IO_BUFFER_DATA_TYPE_SIZE
1916 rb_raise(rb_eArgError,
"Invalid type name!");
1930io_buffer_size_of(
VALUE klass,
VALUE buffer_type)
1932 if (RB_TYPE_P(buffer_type,
T_ARRAY)) {
1934 for (
long i = 0; i <
RARRAY_LEN(buffer_type); i++) {
1945rb_io_buffer_get_value(
const void* base,
size_t size,
ID buffer_type,
size_t *offset)
1947#define IO_BUFFER_GET_VALUE(name) if (buffer_type == RB_IO_BUFFER_DATA_TYPE_##name) return io_buffer_read_##name(base, size, offset);
1948 IO_BUFFER_GET_VALUE(U8)
1949 IO_BUFFER_GET_VALUE(S8)
1951 IO_BUFFER_GET_VALUE(u16)
1952 IO_BUFFER_GET_VALUE(U16)
1953 IO_BUFFER_GET_VALUE(s16)
1954 IO_BUFFER_GET_VALUE(S16)
1956 IO_BUFFER_GET_VALUE(u32)
1957 IO_BUFFER_GET_VALUE(U32)
1958 IO_BUFFER_GET_VALUE(s32)
1959 IO_BUFFER_GET_VALUE(S32)
1961 IO_BUFFER_GET_VALUE(u64)
1962 IO_BUFFER_GET_VALUE(U64)
1963 IO_BUFFER_GET_VALUE(s64)
1964 IO_BUFFER_GET_VALUE(S64)
1966 IO_BUFFER_GET_VALUE(f32)
1967 IO_BUFFER_GET_VALUE(F32)
1968 IO_BUFFER_GET_VALUE(f64)
1969 IO_BUFFER_GET_VALUE(F64)
1970#undef IO_BUFFER_GET_VALUE
1972 rb_raise(rb_eArgError,
"Invalid type name!");
2014 size_t offset = io_buffer_extract_offset(_offset);
2016 rb_io_buffer_get_bytes_for_reading(self, &base, &size);
2018 return rb_io_buffer_get_value(base, size,
RB_SYM2ID(
type), &offset);
2034 size_t offset = io_buffer_extract_offset(_offset);
2038 rb_io_buffer_get_bytes_for_reading(self, &base, &size);
2040 if (!RB_TYPE_P(buffer_types,
T_ARRAY)) {
2041 rb_raise(rb_eArgError,
"Argument buffer_types should be an array!");
2046 for (
long i = 0; i <
RARRAY_LEN(buffer_types); i++) {
2047 VALUE type = rb_ary_entry(buffer_types, i);
2049 rb_ary_push(array, value);
2058io_buffer_extract_count(
VALUE argument)
2060 if (rb_int_negative_p(argument)) {
2061 rb_raise(rb_eArgError,
"Count can't be negative!");
2068io_buffer_extract_offset_count(
ID buffer_type,
size_t size,
int argc,
VALUE *argv,
size_t *offset,
size_t *count)
2071 *offset = io_buffer_extract_offset(argv[0]);
2078 *count = io_buffer_extract_count(argv[1]);
2081 if (*offset > size) {
2082 rb_raise(rb_eArgError,
"The given offset is bigger than the buffer size!");
2085 *count = (size - *offset) / io_buffer_buffer_type_size(buffer_type);
2106io_buffer_each(
int argc,
VALUE *argv,
VALUE self)
2113 rb_io_buffer_get_bytes_for_reading(self, &base, &size);
2120 buffer_type = RB_IO_BUFFER_DATA_TYPE_U8;
2123 size_t offset, count;
2124 io_buffer_extract_offset_count(buffer_type, size, argc-1, argv+1, &offset, &count);
2126 for (
size_t i = 0; i < count; i++) {
2127 size_t current_offset = offset;
2128 VALUE value = rb_io_buffer_get_value(base, size, buffer_type, &offset);
2146io_buffer_values(
int argc,
VALUE *argv,
VALUE self)
2151 rb_io_buffer_get_bytes_for_reading(self, &base, &size);
2158 buffer_type = RB_IO_BUFFER_DATA_TYPE_U8;
2161 size_t offset, count;
2162 io_buffer_extract_offset_count(buffer_type, size, argc-1, argv+1, &offset, &count);
2164 VALUE array = rb_ary_new_capa(count);
2166 for (
size_t i = 0; i < count; i++) {
2167 VALUE value = rb_io_buffer_get_value(base, size, buffer_type, &offset);
2168 rb_ary_push(array, value);
2190io_buffer_each_byte(
int argc,
VALUE *argv,
VALUE self)
2197 rb_io_buffer_get_bytes_for_reading(self, &base, &size);
2199 size_t offset, count;
2200 io_buffer_extract_offset_count(RB_IO_BUFFER_DATA_TYPE_U8, size, argc-1, argv+1, &offset, &count);
2202 for (
size_t i = 0; i < count; i++) {
2203 unsigned char *value = (
unsigned char *)base + i + offset;
2211rb_io_buffer_set_value(
const void* base,
size_t size,
ID buffer_type,
size_t *offset,
VALUE value)
2213#define IO_BUFFER_SET_VALUE(name) if (buffer_type == RB_IO_BUFFER_DATA_TYPE_##name) {io_buffer_write_##name(base, size, offset, value); return;}
2214 IO_BUFFER_SET_VALUE(U8);
2215 IO_BUFFER_SET_VALUE(S8);
2217 IO_BUFFER_SET_VALUE(u16);
2218 IO_BUFFER_SET_VALUE(U16);
2219 IO_BUFFER_SET_VALUE(s16);
2220 IO_BUFFER_SET_VALUE(S16);
2222 IO_BUFFER_SET_VALUE(u32);
2223 IO_BUFFER_SET_VALUE(U32);
2224 IO_BUFFER_SET_VALUE(s32);
2225 IO_BUFFER_SET_VALUE(S32);
2227 IO_BUFFER_SET_VALUE(u64);
2228 IO_BUFFER_SET_VALUE(U64);
2229 IO_BUFFER_SET_VALUE(s64);
2230 IO_BUFFER_SET_VALUE(S64);
2232 IO_BUFFER_SET_VALUE(f32);
2233 IO_BUFFER_SET_VALUE(F32);
2234 IO_BUFFER_SET_VALUE(f64);
2235 IO_BUFFER_SET_VALUE(F64);
2236#undef IO_BUFFER_SET_VALUE
2238 rb_raise(rb_eArgError,
"Invalid type name!");
2276 size_t offset = io_buffer_extract_offset(_offset);
2278 rb_io_buffer_get_bytes_for_writing(self, &base, &size);
2280 rb_io_buffer_set_value(base, size,
RB_SYM2ID(
type), &offset, value);
2302 if (!RB_TYPE_P(buffer_types,
T_ARRAY)) {
2303 rb_raise(rb_eArgError,
"Argument buffer_types should be an array!");
2306 if (!RB_TYPE_P(values,
T_ARRAY)) {
2307 rb_raise(rb_eArgError,
"Argument values should be an array!");
2311 rb_raise(rb_eArgError,
"Argument buffer_types and values should have the same length!");
2314 size_t offset = io_buffer_extract_offset(_offset);
2318 rb_io_buffer_get_bytes_for_writing(self, &base, &size);
2320 for (
long i = 0; i <
RARRAY_LEN(buffer_types); i++) {
2321 VALUE type = rb_ary_entry(buffer_types, i);
2322 VALUE value = rb_ary_entry(values, i);
2323 rb_io_buffer_set_value(base, size,
RB_SYM2ID(
type), &offset, value);
2330io_buffer_memcpy(
struct rb_io_buffer *buffer,
size_t offset,
const void *source_base,
size_t source_offset,
size_t source_size,
size_t length)
2334 io_buffer_get_bytes_for_writing(buffer, &base, &size);
2336 io_buffer_validate_range(buffer, offset, length);
2338 if (source_offset + length > source_size) {
2339 rb_raise(rb_eArgError,
"The computed source range exceeds the size of the source buffer!");
2342 memcpy((
unsigned char*)base+offset, (
unsigned char*)source_base+source_offset, length);
2347io_buffer_copy_from(
struct rb_io_buffer *buffer,
const void *source_base,
size_t source_size,
int argc,
VALUE *argv)
2351 size_t source_offset;
2355 offset = io_buffer_extract_offset(argv[0]);
2360 source_offset = io_buffer_extract_offset(argv[2]);
2362 if (source_offset > source_size) {
2363 rb_raise(rb_eArgError,
"The given source offset is bigger than the source itself!");
2371 if (argc >= 2 && !
RB_NIL_P(argv[1])) {
2372 length = io_buffer_extract_length(argv[1]);
2376 length = source_size - source_offset;
2379 io_buffer_memcpy(buffer, offset, source_base, source_offset, source_size, length);
2402rb_io_buffer_initialize_copy(
VALUE self,
VALUE source)
2407 const void *source_base;
2410 rb_io_buffer_get_bytes_for_reading(source, &source_base, &source_size);
2412 io_buffer_initialize(self, buffer, NULL, source_size, io_flags_for_size(source_size),
Qnil);
2414 return io_buffer_copy_from(buffer, source_base, source_size, 0, NULL);
2472io_buffer_copy(
int argc,
VALUE *argv,
VALUE self)
2479 VALUE source = argv[0];
2480 const void *source_base;
2483 rb_io_buffer_get_bytes_for_reading(source, &source_base, &source_size);
2485 return io_buffer_copy_from(buffer, source_base, source_size, argc-1, argv+1);
2503io_buffer_get_string(
int argc,
VALUE *argv,
VALUE self)
2507 size_t offset, length;
2508 struct rb_io_buffer *buffer = io_buffer_extract_offset_length(self, argc, argv, &offset, &length);
2512 io_buffer_get_bytes_for_reading(buffer, &base, &size);
2516 encoding = rb_find_encoding(argv[2]);
2519 encoding = rb_ascii8bit_encoding();
2522 io_buffer_validate_range(buffer, offset, length);
2524 return rb_enc_str_new((
const char*)base + offset, length, encoding);
2551io_buffer_set_string(
int argc,
VALUE *argv,
VALUE self)
2560 const void *source_base = RSTRING_PTR(
string);
2561 size_t source_size = RSTRING_LEN(
string);
2563 return io_buffer_copy_from(buffer, source_base, source_size, argc-1, argv+1);
2567rb_io_buffer_clear(
VALUE self, uint8_t value,
size_t offset,
size_t length)
2574 io_buffer_get_bytes_for_writing(buffer, &base, &size);
2576 io_buffer_validate_range(buffer, offset, length);
2578 memset((
char*)base + offset, value, length);
2613io_buffer_clear(
int argc,
VALUE *argv,
VALUE self)
2622 size_t offset, length;
2623 io_buffer_extract_offset_length(self, argc-1, argv+1, &offset, &length);
2625 rb_io_buffer_clear(self, value, offset, length);
2631io_buffer_default_size(
size_t page_size)
2634 const size_t platform_agnostic_default_size = 64*1024;
2637 const char *default_size = getenv(
"RUBY_IO_BUFFER_DEFAULT_SIZE");
2640 int value = atoi(default_size);
2648 if (platform_agnostic_default_size < page_size) {
2652 return platform_agnostic_default_size;
2657 rb_blocking_function_t *function;
2663io_buffer_blocking_region_begin(
VALUE _argument)
2667 return rb_thread_io_blocking_region(argument->function, argument->data, argument->descriptor);
2671io_buffer_blocking_region_ensure(
VALUE _argument)
2675 io_buffer_unlock(argument->buffer);
2681io_buffer_blocking_region(
struct rb_io_buffer *buffer, rb_blocking_function_t *function,
void *data,
int descriptor)
2685 .function = function,
2687 .descriptor = descriptor,
2691 if (buffer->flags & RB_IO_BUFFER_LOCKED) {
2692 return io_buffer_blocking_region_begin((
VALUE)&argument);
2696 io_buffer_lock(buffer);
2698 return rb_ensure(io_buffer_blocking_region_begin, (
VALUE)&argument, io_buffer_blocking_region_ensure, (
VALUE)&argument);
2714io_buffer_read_internal(
void *_argument)
2720 ssize_t result = read(argument->descriptor, argument->base, argument->size);
2725 else if (result == 0) {
2731 if (total >= argument->length) {
2735 argument->base = argument->base + result;
2736 argument->size = argument->size - result;
2742rb_io_buffer_read(
VALUE self,
VALUE io,
size_t length,
size_t offset)
2745 if (scheduler !=
Qnil) {
2748 if (!UNDEF_P(result)) {
2756 io_buffer_validate_range(buffer, offset, length);
2762 io_buffer_get_bytes_for_writing(buffer, &base, &size);
2764 base = (
unsigned char*)base + offset;
2765 size = size - offset;
2768 .descriptor = descriptor,
2774 return io_buffer_blocking_region(buffer, io_buffer_read_internal, &argument, descriptor);
2804io_buffer_read(
int argc,
VALUE *argv,
VALUE self)
2810 size_t length, offset;
2811 io_buffer_extract_length_offset(self, argc-1, argv+1, &length, &offset);
2813 return rb_io_buffer_read(self, io, length, offset);
2830io_buffer_pread_internal(
void *_argument)
2836 ssize_t result = pread(argument->descriptor, argument->base, argument->size, argument->offset);
2841 else if (result == 0) {
2847 if (total >= argument->length) {
2851 argument->base = argument->base + result;
2852 argument->size = argument->size - result;
2853 argument->offset = argument->offset + result;
2859rb_io_buffer_pread(
VALUE self,
VALUE io, rb_off_t from,
size_t length,
size_t offset)
2862 if (scheduler !=
Qnil) {
2865 if (!UNDEF_P(result)) {
2873 io_buffer_validate_range(buffer, offset, length);
2879 io_buffer_get_bytes_for_writing(buffer, &base, &size);
2881 base = (
unsigned char*)base + offset;
2882 size = size - offset;
2885 .descriptor = descriptor,
2892 return io_buffer_blocking_region(buffer, io_buffer_pread_internal, &argument, descriptor);
2926io_buffer_pread(
int argc,
VALUE *argv,
VALUE self)
2933 size_t length, offset;
2934 io_buffer_extract_length_offset(self, argc-2, argv+2, &length, &offset);
2936 return rb_io_buffer_pread(self, io, from, length, offset);
2951io_buffer_write_internal(
void *_argument)
2957 ssize_t result = write(argument->descriptor, argument->base, argument->size);
2962 else if (result == 0) {
2968 if (total >= argument->length) {
2972 argument->base = argument->base + result;
2973 argument->size = argument->size - result;
2979rb_io_buffer_write(
VALUE self,
VALUE io,
size_t length,
size_t offset)
2982 if (scheduler !=
Qnil) {
2985 if (!UNDEF_P(result)) {
2993 io_buffer_validate_range(buffer, offset, length);
2999 io_buffer_get_bytes_for_reading(buffer, &base, &size);
3001 base = (
unsigned char*)base + offset;
3002 size = size - offset;
3005 .descriptor = descriptor,
3011 return io_buffer_blocking_region(buffer, io_buffer_write_internal, &argument, descriptor);
3034io_buffer_write(
int argc,
VALUE *argv,
VALUE self)
3040 size_t length, offset;
3041 io_buffer_extract_length_offset(self, argc-1, argv+1, &length, &offset);
3043 return rb_io_buffer_write(self, io, length, offset);
3059io_buffer_pwrite_internal(
void *_argument)
3065 ssize_t result = pwrite(argument->descriptor, argument->base, argument->size, argument->offset);
3070 else if (result == 0) {
3076 if (total >= argument->length) {
3080 argument->base = argument->base + result;
3081 argument->size = argument->size - result;
3082 argument->offset = argument->offset + result;
3088rb_io_buffer_pwrite(
VALUE self,
VALUE io, rb_off_t from,
size_t length,
size_t offset)
3091 if (scheduler !=
Qnil) {
3094 if (!UNDEF_P(result)) {
3102 io_buffer_validate_range(buffer, offset, length);
3108 io_buffer_get_bytes_for_reading(buffer, &base, &size);
3110 base = (
unsigned char*)base + offset;
3111 size = size - offset;
3114 .descriptor = descriptor,
3129 return io_buffer_blocking_region(buffer, io_buffer_pwrite_internal, &argument, descriptor);
3157io_buffer_pwrite(
int argc,
VALUE *argv,
VALUE self)
3164 size_t length, offset;
3165 io_buffer_extract_length_offset(self, argc-2, argv+2, &length, &offset);
3167 return rb_io_buffer_pwrite(self, io, from, length, offset);
3173 if (buffer->size == 0)
3174 rb_raise(rb_eIOBufferMaskError,
"Zero-length mask given!");
3178memory_and(
unsigned char * restrict output,
unsigned char * restrict base,
size_t size,
unsigned char * restrict mask,
size_t mask_size)
3180 for (
size_t offset = 0; offset < size; offset += 1) {
3181 output[offset] = base[offset] & mask[offset % mask_size];
3206 io_buffer_check_mask(mask_buffer);
3208 VALUE output = rb_io_buffer_new(NULL, buffer->size, io_flags_for_size(buffer->size));
3212 memory_and(output_buffer->base, buffer->base, buffer->size, mask_buffer->base, mask_buffer->size);
3218memory_or(
unsigned char * restrict output,
unsigned char * restrict base,
size_t size,
unsigned char * restrict mask,
size_t mask_size)
3220 for (
size_t offset = 0; offset < size; offset += 1) {
3221 output[offset] = base[offset] | mask[offset % mask_size];
3246 io_buffer_check_mask(mask_buffer);
3248 VALUE output = rb_io_buffer_new(NULL, buffer->size, io_flags_for_size(buffer->size));
3252 memory_or(output_buffer->base, buffer->base, buffer->size, mask_buffer->base, mask_buffer->size);
3258memory_xor(
unsigned char * restrict output,
unsigned char * restrict base,
size_t size,
unsigned char * restrict mask,
size_t mask_size)
3260 for (
size_t offset = 0; offset < size; offset += 1) {
3261 output[offset] = base[offset] ^ mask[offset % mask_size];
3286 io_buffer_check_mask(mask_buffer);
3288 VALUE output = rb_io_buffer_new(NULL, buffer->size, io_flags_for_size(buffer->size));
3292 memory_xor(output_buffer->base, buffer->base, buffer->size, mask_buffer->base, mask_buffer->size);
3298memory_not(
unsigned char * restrict output,
unsigned char * restrict base,
size_t size)
3300 for (
size_t offset = 0; offset < size; offset += 1) {
3301 output[offset] = ~base[offset];
3318io_buffer_not(
VALUE self)
3323 VALUE output = rb_io_buffer_new(NULL, buffer->size, io_flags_for_size(buffer->size));
3327 memory_not(output_buffer->base, buffer->base, buffer->size);
3335 if (a->base > b->base) {
3336 return io_buffer_overlaps(b, a);
3339 return (b->base >= a->base) && (b->base <= (
void*)((
unsigned char *)a->base + a->size));
3345 if (io_buffer_overlaps(a, b))
3346 rb_raise(rb_eIOBufferMaskError,
"Mask overlaps source buffer!");
3350memory_and_inplace(
unsigned char * restrict base,
size_t size,
unsigned char * restrict mask,
size_t mask_size)
3352 for (
size_t offset = 0; offset < size; offset += 1) {
3353 base[offset] &= mask[offset % mask_size];
3383 io_buffer_check_mask(mask_buffer);
3384 io_buffer_check_overlaps(buffer, mask_buffer);
3388 io_buffer_get_bytes_for_writing(buffer, &base, &size);
3390 memory_and_inplace(base, size, mask_buffer->base, mask_buffer->size);
3396memory_or_inplace(
unsigned char * restrict base,
size_t size,
unsigned char * restrict mask,
size_t mask_size)
3398 for (
size_t offset = 0; offset < size; offset += 1) {
3399 base[offset] |= mask[offset % mask_size];
3429 io_buffer_check_mask(mask_buffer);
3430 io_buffer_check_overlaps(buffer, mask_buffer);
3434 io_buffer_get_bytes_for_writing(buffer, &base, &size);
3436 memory_or_inplace(base, size, mask_buffer->base, mask_buffer->size);
3442memory_xor_inplace(
unsigned char * restrict base,
size_t size,
unsigned char * restrict mask,
size_t mask_size)
3444 for (
size_t offset = 0; offset < size; offset += 1) {
3445 base[offset] ^= mask[offset % mask_size];
3475 io_buffer_check_mask(mask_buffer);
3476 io_buffer_check_overlaps(buffer, mask_buffer);
3480 io_buffer_get_bytes_for_writing(buffer, &base, &size);
3482 memory_xor_inplace(base, size, mask_buffer->base, mask_buffer->size);
3488memory_not_inplace(
unsigned char * restrict base,
size_t size)
3490 for (
size_t offset = 0; offset < size; offset += 1) {
3491 base[offset] = ~base[offset];
3513io_buffer_not_inplace(
VALUE self)
3520 io_buffer_get_bytes_for_writing(buffer, &base, &size);
3522 memory_not_inplace(base, size);
3642 GetSystemInfo(&info);
3643 RUBY_IO_BUFFER_PAGE_SIZE = info.dwPageSize;
3645 RUBY_IO_BUFFER_PAGE_SIZE = sysconf(_SC_PAGESIZE);
3648 RUBY_IO_BUFFER_DEFAULT_SIZE = io_buffer_default_size(RUBY_IO_BUFFER_PAGE_SIZE);
3661 rb_define_method(rb_cIOBuffer,
"initialize_copy", rb_io_buffer_initialize_copy, 1);
3727#define IO_BUFFER_DEFINE_DATA_TYPE(name) RB_IO_BUFFER_DATA_TYPE_##name = rb_intern_const(#name)
3728 IO_BUFFER_DEFINE_DATA_TYPE(U8);
3729 IO_BUFFER_DEFINE_DATA_TYPE(S8);
3731 IO_BUFFER_DEFINE_DATA_TYPE(u16);
3732 IO_BUFFER_DEFINE_DATA_TYPE(U16);
3733 IO_BUFFER_DEFINE_DATA_TYPE(s16);
3734 IO_BUFFER_DEFINE_DATA_TYPE(S16);
3736 IO_BUFFER_DEFINE_DATA_TYPE(u32);
3737 IO_BUFFER_DEFINE_DATA_TYPE(U32);
3738 IO_BUFFER_DEFINE_DATA_TYPE(s32);
3739 IO_BUFFER_DEFINE_DATA_TYPE(S32);
3741 IO_BUFFER_DEFINE_DATA_TYPE(u64);
3742 IO_BUFFER_DEFINE_DATA_TYPE(U64);
3743 IO_BUFFER_DEFINE_DATA_TYPE(s64);
3744 IO_BUFFER_DEFINE_DATA_TYPE(S64);
3746 IO_BUFFER_DEFINE_DATA_TYPE(f32);
3747 IO_BUFFER_DEFINE_DATA_TYPE(F32);
3748 IO_BUFFER_DEFINE_DATA_TYPE(f64);
3749 IO_BUFFER_DEFINE_DATA_TYPE(F64);
3750#undef IO_BUFFER_DEFINE_DATA_TYPE
#define rb_define_method(klass, mid, func, arity)
Defines klass#mid.
#define rb_define_singleton_method(klass, mid, func, arity)
Defines klass.mid.
void rb_include_module(VALUE klass, VALUE module)
Includes a module to a class.
VALUE rb_define_class_under(VALUE outer, const char *name, VALUE super)
Defines a class under the namespace of outer.
int rb_block_given_p(void)
Determines if the current method is given a block.
#define T_STRING
Old name of RUBY_T_STRING.
#define rb_str_cat2
Old name of rb_str_cat_cstr.
#define CLASS_OF
Old name of rb_class_of.
#define SIZET2NUM
Old name of RB_SIZE2NUM.
#define NUM2UINT
Old name of RB_NUM2UINT.
#define NUM2DBL
Old name of rb_num2dbl.
#define Qnil
Old name of RUBY_Qnil.
#define T_ARRAY
Old name of RUBY_T_ARRAY.
#define NIL_P
Old name of RB_NIL_P.
#define DBL2NUM
Old name of rb_float_new.
#define NUM2SIZET
Old name of RB_NUM2SIZE.
void rb_category_warn(rb_warning_category_t category, const char *fmt,...)
Identical to rb_category_warning(), except it reports unless $VERBOSE is nil.
VALUE rb_eRuntimeError
RuntimeError exception.
@ RB_WARN_CATEGORY_EXPERIMENTAL
Warning is for experimental features.
static VALUE rb_class_of(VALUE obj)
Object to class mapping function.
VALUE rb_mComparable
Comparable module.
#define RB_OBJ_WRITE(old, slot, young)
Declaration of a "back" pointer.
#define RETURN_ENUMERATOR_KW(obj, argc, argv, kw_splat)
Identical to RETURN_SIZED_ENUMERATOR_KW(), except its size is unknown.
static int rb_check_arity(int argc, int min, int max)
Ensures that the passed integer is in the passed range.
VALUE rb_str_append(VALUE dst, VALUE src)
Identical to rb_str_buf_append(), except it converts the right hand side before concatenating.
#define rb_str_new(str, len)
Allocates an instance of rb_cString.
VALUE rb_str_locktmp(VALUE str)
Obtains a "temporary lock" of the string.
VALUE rb_str_unlocktmp(VALUE str)
Releases a lock formerly obtained by rb_str_locktmp().
#define rb_str_new_cstr(str)
Identical to rb_str_new, except it assumes the passed pointer is a pointer to a C string.
VALUE rb_class_name(VALUE obj)
Queries the name of the given object's class.
void rb_define_alloc_func(VALUE klass, rb_alloc_func_t func)
Sets the allocator function of a class.
#define RB_SYM2ID
Just another name of rb_sym2id.
void rb_define_const(VALUE klass, const char *name, VALUE val)
Defines a Ruby level constant under a namespace.
int rb_io_descriptor(VALUE io)
Returns an integer representing the numeric file descriptor for io.
#define RB_NUM2INT
Just another name of rb_num2int_inline.
#define RB_UINT2NUM
Just another name of rb_uint2num_inline.
#define RB_INT2NUM
Just another name of rb_int2num_inline.
static unsigned int RB_NUM2UINT(VALUE x)
Converts an instance of rb_cNumeric into C's unsigned int.
#define RB_LL2NUM
Just another name of rb_ll2num_inline.
#define RB_ULL2NUM
Just another name of rb_ull2num_inline.
#define RB_NUM2ULL
Just another name of rb_num2ull_inline.
#define RB_NUM2LL
Just another name of rb_num2ll_inline.
VALUE rb_yield_values(int n,...)
Identical to rb_yield(), except it takes variadic number of parameters and pass them to the block.
VALUE rb_yield(VALUE val)
Yields the block.
static VALUE RB_INT2FIX(long i)
Converts a C's long into an instance of rb_cInteger.
#define RB_NUM2LONG
Just another name of rb_num2long_inline.
VALUE type(ANYARGS)
ANYARGS-ed function type.
VALUE rb_ensure(type *q, VALUE w, type *e, VALUE r)
An equivalent of ensure clause.
#define NUM2OFFT
Converts an instance of rb_cNumeric into C's off_t.
#define RARRAY_LEN
Just another name of rb_array_len.
#define RARRAY_AREF(a, i)
#define StringValue(v)
Ensures that the parameter object is a String.
#define RSTRING_GETMEM(str, ptrvar, lenvar)
Convenient macro to obtain the contents and length at once.
VALUE rb_str_to_str(VALUE obj)
Identical to rb_check_string_type(), except it raises exceptions in case of conversion failures.
#define TypedData_Get_Struct(obj, type, data_type, sval)
Obtains a C struct from inside of a wrapper Ruby object.
#define TypedData_Make_Struct(klass, type, data_type, sval)
Identical to TypedData_Wrap_Struct, except it allocates a new data region internally instead of takin...
#define errno
Ractor-aware version of errno.
#define RB_NO_KEYWORDS
Do not pass keywords.
VALUE rb_fiber_scheduler_current(void)
Identical to rb_fiber_scheduler_get(), except it also returns RUBY_Qnil in case of a blocking fiber.
VALUE rb_fiber_scheduler_io_pwrite(VALUE scheduler, VALUE io, rb_off_t from, VALUE buffer, size_t length, size_t offset)
Non-blocking write to the passed IO at the specified offset.
VALUE rb_fiber_scheduler_io_read(VALUE scheduler, VALUE io, VALUE buffer, size_t length, size_t offset)
Non-blocking read from the passed IO.
static VALUE rb_fiber_scheduler_io_result(ssize_t result, int error)
Wrap a ssize_t and int errno into a single VALUE.
VALUE rb_fiber_scheduler_io_pread(VALUE scheduler, VALUE io, rb_off_t from, VALUE buffer, size_t length, size_t offset)
Non-blocking read from the passed IO at the specified offset.
VALUE rb_fiber_scheduler_io_write(VALUE scheduler, VALUE io, VALUE buffer, size_t length, size_t offset)
Non-blocking write to the passed IO.
static bool RB_NIL_P(VALUE obj)
Checks if the given object is nil.
This is the struct that holds necessary info for a struct.
const char * wrap_struct_name
Name of structs of this kind.
uintptr_t ID
Type that represents a Ruby identifier such as a variable name.
uintptr_t VALUE
Type that represents a Ruby object.