21 #define free(x) xfree(x)
23 #if defined(DOSISH) || defined(__CYGWIN__)
27 #include <sys/types.h>
28 #if defined HAVE_NET_SOCKET_H
29 # include <net/socket.h>
30 #elif defined HAVE_SYS_SOCKET_H
31 # include <sys/socket.h>
34 #if defined(__BOW__) || defined(__CYGWIN__) || defined(_WIN32) || defined(__EMX__) || defined(__BEOS__) || defined(__HAIKU__)
35 # define NO_SAFE_RENAME
38 #if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__DragonFly__) || defined(sun) || defined(_nec_ews)
46 #include <sys/types.h>
47 #if defined(HAVE_SYS_IOCTL_H) && !defined(_WIN32)
48 #include <sys/ioctl.h>
50 #if defined(HAVE_FCNTL_H) || defined(_WIN32)
52 #elif defined(HAVE_SYS_FCNTL_H)
53 #include <sys/fcntl.h>
56 #if !HAVE_OFF_T && !defined(off_t)
63 #if defined(HAVE_SYS_PARAM_H) && !(defined(__EMX__) || defined(__HIUX_MPP__))
64 # include <sys/param.h>
77 #elif defined HAVE_SYS_SYSCALL_H
78 #include <sys/syscall.h>
81 #if defined(__BEOS__) || defined(__HAIKU__)
83 # define NOFILE (OPEN_MAX)
90 #define O_ACCMODE (O_RDONLY | O_WRONLY | O_RDWR)
93 #if SIZEOF_OFF_T > SIZEOF_LONG && !defined(HAVE_LONG_LONG)
94 # error off_t is bigger than long, but you have no long long...
98 # ifdef _POSIX_PIPE_BUF
99 # define PIPE_BUF _POSIX_PIPE_BUF
101 # define PIPE_BUF 512
105 #if defined(HAVE___SYSCALL) && (defined(__APPLE__) || defined(__OpenBSD__))
107 off_t __syscall(quad_t number, ...);
110 #define numberof(array) (int)(sizeof(array) / sizeof((array)[0]))
112 #define IO_RBUF_CAPA_MIN 8192
113 #define IO_CBUF_CAPA_MIN (128*1024)
114 #define IO_RBUF_CAPA_FOR(fptr) (NEED_READCONV(fptr) ? IO_CBUF_CAPA_MIN : IO_RBUF_CAPA_MIN)
115 #define IO_WBUF_CAPA_MIN 8192
120 #define open rb_w32_uopen
160 rb_bug(
"rb_update_max_fd: invalid fd (%d) given.", fd);
170 int flags, flags2, ret;
171 flags =
fcntl(fd, F_GETFD);
176 flags2 = flags & ~FD_CLOEXEC;
178 flags2 = flags | FD_CLOEXEC;
179 if (flags != flags2) {
180 ret =
fcntl(fd, F_SETFD, flags2);
182 rb_bug(
"rb_maygvl_fd_fix_cloexec: fcntl(%d, F_SETFD, %d) failed: %s", fd, flags2,
strerror(
errno));
193 #if defined(HAVE_FCNTL) && defined(F_DUPFD_CLOEXEC)
194 static int try_dupfd_cloexec = 1;
195 if (try_dupfd_cloexec) {
196 ret =
fcntl(fd, F_DUPFD_CLOEXEC, minfd);
203 if (
errno == EINVAL) {
204 ret =
fcntl(fd, F_DUPFD, minfd);
206 try_dupfd_cloexec = 0;
211 ret =
fcntl(fd, F_DUPFD, minfd);
213 #elif defined(F_DUPFD)
214 ret =
fcntl(fd, F_DUPFD, minfd);
219 if (ret == -1)
return -1;
224 #define argf_of(obj) (*(struct argf *)DATA_PTR(obj))
225 #define ARGF argf_of(argf)
227 #ifdef _STDIO_USES_IOSTREAM
229 # define STDIO_READ_DATA_PENDING(fp) ((fp)->_IO_read_ptr != (fp)->_IO_read_end)
231 # define STDIO_READ_DATA_PENDING(fp) ((fp)->_gptr < (fp)->_egptr)
233 #elif defined(FILE_COUNT)
234 # define STDIO_READ_DATA_PENDING(fp) ((fp)->FILE_COUNT > 0)
235 #elif defined(FILE_READEND)
236 # define STDIO_READ_DATA_PENDING(fp) ((fp)->FILE_READPTR < (fp)->FILE_READEND)
237 #elif defined(__BEOS__) || defined(__HAIKU__)
238 # define STDIO_READ_DATA_PENDING(fp) ((fp)->_state._eof == 0)
240 # define STDIO_READ_DATA_PENDING(fp) (!feof(fp))
243 #define GetWriteIO(io) rb_io_get_write_io(io)
245 #define READ_DATA_PENDING(fptr) ((fptr)->rbuf.len)
246 #define READ_DATA_PENDING_COUNT(fptr) ((fptr)->rbuf.len)
247 #define READ_DATA_PENDING_PTR(fptr) ((fptr)->rbuf.ptr+(fptr)->rbuf.off)
248 #define READ_DATA_BUFFERED(fptr) READ_DATA_PENDING(fptr)
250 #define READ_CHAR_PENDING(fptr) ((fptr)->cbuf.len)
251 #define READ_CHAR_PENDING_COUNT(fptr) ((fptr)->cbuf.len)
252 #define READ_CHAR_PENDING_PTR(fptr) ((fptr)->cbuf.ptr+(fptr)->cbuf.off)
255 #define WAIT_FD_IN_WIN32(fptr) \
256 (rb_w32_io_cancelable_p((fptr)->fd) ? 0 : rb_thread_wait_fd((fptr)->fd))
258 #define WAIT_FD_IN_WIN32(fptr)
261 #define READ_CHECK(fptr) do {\
262 if (!READ_DATA_PENDING(fptr)) {\
263 WAIT_FD_IN_WIN32(fptr);\
264 rb_io_check_closed(fptr);\
270 # define S_ISSOCK(m) _S_ISSOCK(m)
273 # define S_ISSOCK(m) (((m) & S_IFMT) == _S_IFSOCK)
276 # define S_ISSOCK(m) (((m) & S_IFMT) == S_IFSOCK)
282 #define rb_sys_fail_path(path) rb_sys_fail_str(path)
287 #define NEED_NEWLINE_DECORATOR_ON_READ(fptr) ((fptr)->mode & FMODE_TEXTMODE)
288 #define NEED_NEWLINE_DECORATOR_ON_WRITE(fptr) ((fptr)->mode & FMODE_TEXTMODE)
289 #if defined(RUBY_TEST_CRLF_ENVIRONMENT) || defined(_WIN32)
291 # define DEFAULT_TEXTMODE FMODE_TEXTMODE
292 # define TEXTMODE_NEWLINE_DECORATOR_ON_WRITE ECONV_CRLF_NEWLINE_DECORATOR
300 #define NEED_READCONV(fptr) ((fptr)->encs.enc2 != NULL || (fptr)->encs.ecflags & ~ECONV_CRLF_NEWLINE_DECORATOR)
301 #define NEED_WRITECONV(fptr) (((fptr)->encs.enc != NULL && (fptr)->encs.enc != rb_ascii8bit_encoding()) || ((fptr)->encs.ecflags & ((ECONV_DECORATOR_MASK & ~ECONV_CRLF_NEWLINE_DECORATOR)|ECONV_STATEFUL_DECORATOR_MASK)))
302 #define SET_BINARY_MODE(fptr) setmode((fptr)->fd, O_BINARY)
304 #define NEED_NEWLINE_DECORATOR_ON_READ_CHECK(fptr) do {\
305 if (NEED_NEWLINE_DECORATOR_ON_READ(fptr)) {\
306 if (((fptr)->mode & FMODE_READABLE) &&\
307 !((fptr)->encs.ecflags & ECONV_NEWLINE_DECORATOR_MASK)) {\
308 setmode((fptr)->fd, O_BINARY);\
311 setmode((fptr)->fd, O_TEXT);\
316 #define SET_UNIVERSAL_NEWLINE_DECORATOR_IF_ENC2(enc2, ecflags) do {\
317 if ((enc2) && ((ecflags) & ECONV_DEFAULT_NEWLINE_DECORATOR)) {\
318 (ecflags) |= ECONV_UNIVERSAL_NEWLINE_DECORATOR;\
344 if (r < 0 &&
errno) {
356 if (pos < 0 &&
errno) {
371 for (i = 0; i < fptr->
rbuf.
len; i++) {
372 if (*p ==
'\n') newlines++;
373 if (extra_max == newlines)
break;
378 while (newlines >= 0) {
380 if (newlines == 0)
break;
385 read_size = _read(fptr->
fd, buf, fptr->
rbuf.
len + newlines);
390 if (read_size == fptr->
rbuf.
len) {
412 set_binary_mode_with_seek_cur(
rb_io_t *fptr)
422 #define SET_BINARY_MODE_WITH_SEEK_CUR(fptr) set_binary_mode_with_seek_cur(fptr)
426 # define DEFAULT_TEXTMODE 0
427 #define NEED_READCONV(fptr) ((fptr)->encs.enc2 != NULL || NEED_NEWLINE_DECORATOR_ON_READ(fptr))
428 #define NEED_WRITECONV(fptr) (((fptr)->encs.enc != NULL && (fptr)->encs.enc != rb_ascii8bit_encoding()) || NEED_NEWLINE_DECORATOR_ON_WRITE(fptr) || ((fptr)->encs.ecflags & (ECONV_DECORATOR_MASK|ECONV_STATEFUL_DECORATOR_MASK)))
429 #define SET_BINARY_MODE(fptr) (void)(fptr)
430 #define NEED_NEWLINE_DECORATOR_ON_READ_CHECK(fptr) (void)(fptr)
431 #define SET_UNIVERSAL_NEWLINE_DECORATOR_IF_ENC2(enc2, ecflags) ((void)(enc2), (void)(ecflags))
432 #define SET_BINARY_MODE_WITH_SEEK_CUR(fptr) (void)(fptr)
435 #if !defined HAVE_SHUTDOWN && !defined shutdown
436 #define shutdown(a,b) 0
440 #define is_socket(fd, path) rb_w32_is_socket(fd)
441 #elif !defined(S_ISSOCK)
442 #define is_socket(fd, path) 0
448 if (
fstat(fd, &sbuf) < 0)
450 return S_ISSOCK(sbuf.st_mode);
504 write_io =
RFILE(io)->fptr->tied_io_for_writing;
522 write_io =
RFILE(io)->fptr->tied_io_for_writing;
523 RFILE(io)->fptr->tied_io_for_writing = w;
524 return write_io ? write_io :
Qnil;
550 #if !(defined(RUBY_TEST_CRLF_ENVIRONMENT) || defined(_WIN32))
561 if (r < 0 &&
errno) {
583 #if SIZEOF_LONG > SIZEOF_INT
617 #define io_seek(fptr, ofs, whence) (errno = 0, lseek(flush_before_seek(fptr)->fd, (ofs), (whence)))
618 #define io_tell(fptr) lseek(flush_before_seek(fptr)->fd, 0, SEEK_CUR)
626 #define FMODE_SYNCWRITE (FMODE_SYNC|FMODE_WRITABLE)
749 # define S_ISREG(m) (((m) & S_IFMT) == S_IFREG)
755 #if defined(HAVE_FCNTL) && defined(F_GETFL) && defined(O_NONBLOCK)
761 if (
fstat(fptr->
fd, &buf) == 0 &&
763 #
if defined(HAVE_FCNTL) && defined(F_GETFL) && defined(
O_NONBLOCK)
764 && (r =
fcntl(fptr->
fd, F_GETFL)) != -1 &&
791 return read(iis->
fd, iis->
buf, iis->
capa);
798 return write(iis->
fd, iis->
buf, iis->
capa);
897 #if defined(ERESTART)
904 #if defined(EWOULDBLOCK) && EWOULDBLOCK != EAGAIN
923 #if defined(ERESTART)
930 #if defined(EWOULDBLOCK) && EWOULDBLOCK != EAGAIN
945 const char *senc, *denc;
1021 long n, r, offset = 0;
1023 if ((n = len) <= 0)
return n;
1057 arg.
ptr = ptr + offset;
1067 if (r == n)
return len;
1091 # define MODE_BTMODE(a,b,c) ((fmode & FMODE_BINMODE) ? (b) : \
1092 (fmode & FMODE_TEXTMODE) ? (c) : (a))
1103 #define fmode (fptr->mode)
1107 rb_raise(
rb_eArgError,
"ASCII incompatible string written for text mode IO without encoding conversion: %s",
1119 if (!
NIL_P(common_encoding)) {
1128 #if defined(RUBY_TEST_CRLF_ENVIRONMENT) || defined(_WIN32)
1129 #define fmode (fptr->mode)
1136 setmode(fptr->
fd, O_TEXT);
1139 rb_raise(
rb_eArgError,
"ASCII incompatible string written for text mode IO without encoding conversion: %s",
1154 if (len > 0)
return len;
1169 return (ssize_t)
io_binwrite(0, buf, (
long)size, fptr, 0);
1330 pos =
io_seek(fptr, pos, whence);
1360 VALUE offset, ptrname;
1363 if (
rb_scan_args(argc, argv,
"11", &offset, &ptrname) == 2) {
1425 if (io ==
ARGF.current_file) {
1513 #if defined(RUBY_TEST_CRLF_ENVIRONMENT) || defined(_WIN32)
1579 static VALUE nogvl_fsync(
void *
ptr)
1617 #define rb_io_fsync rb_f_notimplement
1620 #ifdef HAVE_FDATASYNC
1621 static VALUE nogvl_fdatasync(
void *ptr)
1625 return (
VALUE)fdatasync(fptr->
fd);
1657 #define rb_io_fdatasync rb_io_fsync
1728 static const char closed[] =
" (closed)";
1772 if (n <= 0)
return 0;
1773 if (n > len) n = (int)len;
1798 if ((n -= c) <= 0)
break;
1808 if ((n -= c) <= 0)
break;
1839 return (ssize_t)
io_bufread(buf, (
long)size, fptr);
1842 #define SMALLBUF 100
1852 #
if defined(__BEOS__) || defined(__HAIKU__)
1860 if (st.st_size >= pos && pos >= 0) {
1861 siz += st.st_size - pos;
1887 const char *sname, *dname;
1908 #define MORE_CHAR_SUSPENDED Qtrue
1909 #define MORE_CHAR_FINISHED Qnil
1913 const unsigned char *ss, *sp, *se;
1914 unsigned char *ds, *
dp, *de;
1934 ss = sp = (
const unsigned char *)fptr->
rbuf.
ptr + fptr->
rbuf.
off;
1939 fptr->
rbuf.
off += (int)(sp - ss);
1940 fptr->
rbuf.
len -= (int)(sp - ss);
1941 fptr->
cbuf.
len += (int)(dp - ds);
1946 fptr->
rbuf.
off -= putbackable;
1947 fptr->
rbuf.
len += putbackable;
1954 if (cbuf_len0 != fptr->
cbuf.
len)
1971 fptr->
cbuf.
len += (int)(dp - ds);
1978 if (cbuf_len0 != fptr->
cbuf.
len)
2086 if (siz == 0) siz = BUFSIZ;
2091 if (n == 0 && bytes == 0) {
2097 if (bytes < siz)
break;
2112 oflags =
fcntl(fptr->
fd, F_GETFL);
2136 if ((len =
NUM2LONG(length)) < 0) {
2455 #if defined(RUBY_TEST_CRLF_ENVIRONMENT) || defined(_WIN32)
2461 if (
NIL_P(length)) {
2475 if (len == 0)
return str;
2478 #if defined(RUBY_TEST_CRLF_ENVIRONMENT) || defined(_WIN32)
2479 previous_mode = set_binary_mode_with_seek_cur(fptr);
2482 #if defined(RUBY_TEST_CRLF_ENVIRONMENT) || defined(_WIN32)
2483 if (previous_mode == O_TEXT) {
2484 setmode(fptr->
fd, O_TEXT);
2488 if (fptr->
fd < 0)
return Qnil;
2521 if (0 < limit && limit < searchlen)
2522 searchlen = (int)limit;
2523 e = memchr(p, delim, searchlen);
2525 int len = (int)(e-p+1);
2564 if (limit > 0 && pending > limit) pending = limit;
2565 e = memchr(p, delim, pending);
2566 if (e) pending = e - p + 1;
2579 if (e)
return delim;
2603 if (*p != term)
return TRUE;
2605 while (--i && *++p == term);
2608 const char *e = p +
cnt;
2610 while ((p += i) < e &&
rb_enc_ascget(p, e, &i, enc) == term);
2626 if (cnt >
sizeof buf) cnt =
sizeof buf;
2627 if (*p != term)
return TRUE;
2629 while (--i && *++p == term);
2653 e = memchr(p,
'\n', pending);
2655 pending = (int)(e - p + 1);
2681 if (io ==
ARGF.current_file) {
2708 else if (2 <= argc) {
2719 if (enc_io != enc_rs &&
2747 if (
NIL_P(rs) && limit < 0) {
2751 else if (limit == 0) {
2760 int c, newline = -1;
2761 const char *rsptr = 0;
2764 int extra_limit = 16;
2788 newline = (
unsigned char)rsptr[rslen - 1];
2792 while ((c =
appendline(fptr, newline, &str, &limit)) !=
EOF) {
2793 const char *s, *
p, *pp, *e;
2801 if (pp != p)
continue;
2802 if (!rspara)
rscheck(rsptr, rslen, rs);
2803 if (
memcmp(p, rsptr, rslen) == 0)
break;
2835 if (io ==
ARGF.current_file) {
2998 VALUE line, ary, rs;
3527 #if SIZEOF_LONG > SIZEOF_INT
3569 if (isatty(fptr->
fd) == 0)
3574 #if defined(HAVE_FCNTL) && defined(F_GETFD) && defined(F_SETFD) && defined(FD_CLOEXEC)
3597 if (io != write_io) {
3599 if (fptr && 0 <= (fd = fptr->
fd)) {
3601 if (!(ret & FD_CLOEXEC))
return Qfalse;
3606 if (fptr && 0 <= (fd = fptr->
fd)) {
3608 if (!(ret & FD_CLOEXEC))
return Qfalse;
3613 #define rb_io_close_on_exec_p rb_f_notimplement
3616 #if defined(HAVE_FCNTL) && defined(F_GETFD) && defined(F_SETFD) && defined(FD_CLOEXEC)
3632 int flag =
RTEST(arg) ? FD_CLOEXEC : 0;
3638 if (io != write_io) {
3640 if (fptr && 0 <= (fd = fptr->
fd)) {
3642 if ((ret & FD_CLOEXEC) != flag) {
3643 ret = (ret & ~FD_CLOEXEC) | flag;
3644 ret =
fcntl(fd, F_SETFD, ret);
3652 if (fptr && 0 <= (fd = fptr->
fd)) {
3654 if ((ret & FD_CLOEXEC) != flag) {
3655 ret = (ret & ~FD_CLOEXEC) | flag;
3656 ret =
fcntl(fd, F_SETFD, ret);
3663 #define rb_io_set_close_on_exec rb_f_notimplement
3666 #define FMODE_PREP (1<<16)
3667 #define IS_PREP_STDIO(f) ((f)->mode & FMODE_PREP)
3668 #define PREP_STDIO_NAME(f) (RSTRING_PTR((f)->pathv))
3673 unsigned char *ds, *
dp, *de;
3677 unsigned char buf[1024];
3683 de = buf +
sizeof(
buf);
3720 fptr->
wbuf.
len += (int)(dp - ds);
3776 else if (0 <= fptr->
fd) {
3780 if (close(fptr->
fd) < 0 &&
NIL_P(err))
3788 if (!
NIL_P(err) && !noraise) {
3845 if (!fptr)
return 0;
3886 if (io != write_io) {
3887 write_fptr =
RFILE(write_io)->fptr;
3888 if (write_fptr && 0 <= write_fptr->
fd) {
3893 fptr =
RFILE(io)->fptr;
3894 if (!fptr)
return Qnil;
3895 if (fptr->
fd < 0)
return Qnil;
3898 #if defined __APPLE__ && defined(__MACH__) && \
3899 (!defined(MAC_OS_X_VERSION_MIN_ALLOWED) || MAC_OS_X_VERSION_MIN_ALLOWED <= 1050)
3979 if (io != write_io) {
3980 write_fptr =
RFILE(write_io)->fptr;
3981 if (write_fptr && 0 <= write_fptr->
fd) {
3986 fptr =
RFILE(io)->fptr;
4032 if (io != write_io) {
4036 RFILE(io)->fptr = wfptr;
4095 if (io != write_io) {
4119 VALUE offset, ptrname;
4124 if (
rb_scan_args(argc, argv,
"11", &offset, &ptrname) == 2) {
4134 rb_warn(
"sysseek for buffered IO");
4137 pos = lseek(fptr->
fd, pos, whence);
4171 rb_warn(
"syswrite for buffered IO");
4211 if (ilen == 0)
return str;
4232 if (n == 0 && ilen > 0) {
4346 case FMODE_READWRITE:
4359 static const char bom_prefix[] =
"bom|utf-";
4360 enum {bom_prefix_len = (int)
sizeof(bom_prefix) - 1};
4362 const char *
p =
strchr(name,
':');
4365 return len > bom_prefix_len &&
STRNCASECMP(name, bom_prefix, bom_prefix_len) == 0;
4372 const char *m = modestr, *
p =
NULL;
4422 switch (oflags & (O_RDONLY|O_WRONLY|O_RDWR)) {
4434 if (oflags & O_APPEND) {
4437 if (oflags & O_TRUNC) {
4440 if (oflags & O_CREAT) {
4464 case FMODE_READWRITE:
4497 # define MODE_BINARY(a,b) ((oflags & O_BINARY) ? (b) : (a))
4499 # define MODE_BINARY(a,b) (a)
4501 int accmode = oflags & (O_RDONLY|O_WRONLY|O_RDWR);
4502 if (oflags & O_APPEND) {
4503 if (accmode == O_WRONLY) {
4506 if (accmode == O_RDWR) {
4510 switch (oflags & (O_RDONLY|O_WRONLY|O_RDWR)) {
4530 int default_ext = 0;
4541 *enc = (default_ext && intern != ext) ?
NULL : ext;
4562 long len = (p++) - estr;
4571 memcpy(encname, estr, len);
4572 encname[
len] =
'\0';
4583 memcpy(encname, estr, len);
4584 encname[
len] =
'\0';
4594 rb_warn(
"Unsupported encoding %s ignored", estr);
4600 if (*p ==
'-' && *(p+1) ==
'\0') {
4607 rb_warn(
"Unsupported encoding %s ignored", p);
4608 else if (idx2 == idx) {
4609 rb_warn(
"Ignoring internal encoding %s: it is identical to external encoding %s", p, estr);
4631 const char *
p =
strchr(modestr,
':');
4648 if (v !=
Qnil) encoding =
v;
4650 if (v !=
Qnil) extenc =
v;
4657 rb_warn(
"Ignoring encoding parameter '%s': %s_encoding is used",
4659 extenc ==
Qundef ?
"internal" :
"external");
4667 if (
NIL_P(intenc)) {
4674 if (*p ==
'-' && *(p+1) ==
'\0') {
4685 if (extencoding == intencoding) {
4689 if (!
NIL_P(encoding)) {
4710 int fmode = *fmode_p;
4718 if (!(fmode & FMODE_BINMODE) &&
4723 #if !DEFAULT_TEXTMODE
4724 else if (!(ecflags & ECONV_NEWLINE_DECORATOR_MASK)) {
4734 if (!
NIL_P(opthash)) {
4750 int *oflags_p,
int *fmode_p,
convconfig_t *convconfig_p)
4757 int has_enc = 0, has_vmode = 0;
4795 if (
NIL_P(opthash)) {
4799 #ifdef TEXTMODE_NEWLINE_DECORATOR_ON_WRITE
4802 0, TEXTMODE_NEWLINE_DECORATOR_ON_WRITE) : 0;
4814 #if DEFAULT_TEXTMODE
4815 else if (
NIL_P(vmode)) {
4822 if (!
NIL_P(vmode)) {
4833 if (!
NIL_P(*vperm_p)) {
4845 #ifdef TEXTMODE_NEWLINE_DECORATOR_ON_WRITE
4848 0, TEXTMODE_NEWLINE_DECORATOR_ON_WRITE) : 0;
4866 convconfig_p->enc = enc;
4867 convconfig_p->enc2 = enc2;
4868 convconfig_p->ecflags = ecflags;
4869 convconfig_p->ecopts = ecopts;
4928 file = fdopen(fd, modestr);
4939 file = fdopen(fd, modestr);
4953 if (setvbuf(file,
NULL, _IOFBF, 0) != 0)
4954 rb_warn(
"setvbuf() can't be honoured (fd=%d)", fd);
4962 if (isatty(fptr->
fd))
4972 VALUE b1, b2, b3, b4;
5058 convconfig->enc, convconfig->enc2);
5062 fptr->
encs = *convconfig;
5075 const char *
p =
strchr(modestr,
':');
5087 convconfig.ecflags = 0;
5088 convconfig.ecopts =
Qnil;
5111 #if defined(__CYGWIN__) || !defined(HAVE_FORK)
5134 if (list->
fptr == fptr) {
5140 while (list->
next) {
5167 #if !defined(HAVE_FORK) && !defined(_WIN32)
5222 popen_redirect(
struct popen_arg *
p)
5225 close(p->write_pair[1]);
5226 if (p->write_pair[0] != 0) {
5227 dup2(p->write_pair[0], 0);
5228 close(p->write_pair[0]);
5231 if (p->pair[1] != 1) {
5232 dup2(p->pair[1], 1);
5238 if (p->pair[1] != 1) {
5239 dup2(p->pair[1], 1);
5245 if (p->pair[0] != 0) {
5246 dup2(p->pair[0], 0);
5259 for (fd = lowfd; fd <=
max; fd++) {
5260 if (!
NIL_P(noclose_fds) &&
5264 ret =
fcntl(fd, F_GETFD);
5265 if (ret != -1 && !(ret & FD_CLOEXEC)) {
5266 fcntl(fd, F_SETFD, ret|FD_CLOEXEC);
5271 #define CONTIGUOUS_CLOSED_FDS 20
5273 if (max < fd + CONTIGUOUS_CLOSED_FDS)
5274 max = fd + CONTIGUOUS_CLOSED_FDS;
5280 popen_exec(
void *pp,
char *errmsg,
size_t errmsg_len)
5282 struct popen_arg *p = (
struct popen_arg*)pp;
5297 #if defined(HAVE_FORK)
5299 struct popen_arg arg;
5300 char errmsg[80] = {
'\0' };
5301 #elif defined(_WIN32)
5302 volatile VALUE argbuf;
5304 int pair[2], write_pair[2];
5306 #if !defined(HAVE_FORK)
5312 const char *cmd = 0;
5324 else if (eargp->
argc) {
5335 #if defined(HAVE_FORK)
5338 arg.pair[0] = arg.pair[1] = -1;
5339 arg.write_pair[0] = arg.write_pair[1] = -1;
5342 if (
rb_pipe(arg.write_pair) < 0)
5346 close(arg.write_pair[0]);
5347 close(arg.write_pair[1]);
5373 pid =
rb_fork_err(&status, popen_exec, &arg, arg.execp->redirect_fds, errmsg,
sizeof(errmsg));
5380 popen_redirect(&arg);
5393 close(arg.write_pair[0]);
5394 close(arg.write_pair[1]);
5404 close(arg.write_pair[0]);
5405 write_fd = arg.write_pair[1];
5407 else if (fmode & FMODE_READABLE) {
5415 #elif defined(_WIN32)
5419 if (argc >= (
int)(
FIXNUM_MAX /
sizeof(
char *))) {
5424 for (i = 0; i <
argc; ++
i) {
5429 switch (fmode & (FMODE_READABLE|FMODE_WRITABLE)) {
5430 case FMODE_READABLE|FMODE_WRITABLE:
5435 close(write_pair[0]);
5436 close(write_pair[1]);
5445 case FMODE_READABLE:
5451 case FMODE_WRITABLE:
5464 while ((pid = (args ?
5470 #if defined(EWOULDBLOCK) && EWOULDBLOCK != EAGAIN
5482 if ((fmode & (FMODE_READABLE|FMODE_WRITABLE)) == (FMODE_READABLE|FMODE_WRITABLE)) {
5483 close(write_pair[0]);
5484 close(write_pair[1]);
5497 if ((fmode & FMODE_READABLE) && (fmode & FMODE_WRITABLE)) {
5500 close(write_pair[0]);
5501 write_fd = write_pair[1];
5503 else if (fmode & FMODE_READABLE) {
5520 fp = popen(cmd, modestr);
5533 fptr->
encs = *convconfig;
5534 #if defined(RUBY_TEST_CRLF_ENVIRONMENT) || defined(_WIN32)
5544 #ifdef TEXTMODE_NEWLINE_DECORATOR_ON_WRITE
5546 fptr->
encs.
ecflags |= TEXTMODE_NEWLINE_DECORATOR_ON_WRITE;
5552 if (0 <= write_fd) {
5555 write_fptr->
fd = write_fd;
5557 fptr->
mode &= ~FMODE_WRITABLE;
5562 #if defined (__CYGWIN__) || !defined(HAVE_FORK)
5575 return pipe_open(&earg, prog, modestr, fmode, convconfig);
5587 #if !defined(HAVE_FORK)
5589 "fork() function is unimplemented on this machine");
5591 return pipe_open(0, 0, modestr, fmode, convconfig);
5595 return pipe_open(&earg, prog, modestr, fmode, convconfig);
5684 const char *modestr;
5685 VALUE pname, pmode, port, tmp, opt;
5689 argc =
rb_scan_args(argc, argv,
"11:", &pname, &pmode, &opt);
5697 #if SIZEOF_LONG > SIZEOF_INT
5698 if (len > INT_MAX) {
5709 port =
pipe_open_s(pname, modestr, fmode, &convconfig);
5721 RBASIC(port)->klass = klass;
5730 VALUE *fname_p,
int *oflags_p,
int *fmode_p,
5733 VALUE opt, fname, vmode, vperm;
5737 argc =
rb_scan_args(argc, argv,
"12:", &fname, &vmode, &vperm, &opt);
5825 VALUE fname, vmode, vperm;
5830 rb_scan_args(argc, argv,
"12", &fname, &vmode, &vperm);
5841 if (
NIL_P(vperm)) perm = 0666;
5979 int redirect =
FALSE;
5987 VALUE tmp = argv[0];
6028 oflags, fmode, &convconfig, perm);
6057 if (fptr == orig)
return io;
6063 "%s can't change access mode from \"%s\" to \"%s\"",
6090 #
if defined (__CYGWIN__) || !defined(HAVE_FORK)
6100 if (
dup2(fd2, fd) < 0)
6108 if (
dup2(fd2, fd) < 0)
6156 if (
rb_scan_args(argc, argv,
"11", &fname, &nmode) == 1) {
6165 fptr =
RFILE(file)->fptr;
6171 if (!
NIL_P(nmode)) {
6175 (fptr->
mode & FMODE_READWRITE)) {
6177 "%s can't change access mode from \"%s\" to \"%s\"",
6212 if (close(fptr->
fd) < 0)
6231 if (dest == io)
return dest;
6244 #if defined (__CYGWIN__) || !defined(HAVE_FORK)
6259 if (io != write_io) {
6300 if (argc == 0)
return Qnil;
6348 for (i=0; i<
argc; i++) {
6454 if (len == 0)
return 0;
6456 return ptr[len - 1] == c;
6458 return rb_enc_ascget(ptr + ((len - 1) / n) * n, ptr + len, &n, enc) == c;
6510 for (i=0; i<
argc; i++) {
6589 for (i=0; i<
argc; i++) {
6595 else if (argc > 1) {
6647 (void)fwrite(mesg,
sizeof(
char),
len, stderr);
6704 if (path && strcmp(path,
"-")) klass =
rb_cFile;
6716 #ifdef TEXTMODE_NEWLINE_DECORATOR_ON_WRITE
6717 fptr->
encs.
ecflags |= TEXTMODE_NEWLINE_DECORATOR_ON_WRITE;
6830 int fd,
fmode, oflags = O_RDONLY;
6833 #if defined(HAVE_FCNTL) && defined(F_GETFL)
6841 argc =
rb_scan_args(argc, argv,
"11:", &fnum, &vmode, &opt);
6848 #if defined(HAVE_FCNTL) && defined(F_GETFL)
6849 oflags =
fcntl(fd, F_GETFL);
6855 #if defined(HAVE_FCNTL) && defined(F_GETFL)
6871 fp->
encs = convconfig;
6876 else if (
fileno(stdout) == fd)
6878 else if (
fileno(stderr) == fd)
6915 if (
RFILE(io)->fptr) {
6918 if (0 < argc && argc < 3) {
6938 rb_warn(
"%s::new() does not take block; use %s::open() instead",
7001 if (!
RTEST(autoclose))
7011 struct argf *p = ptr;
7021 struct argf *p = ptr;
7122 #define next_argv() argf_next_argv(argf)
7123 #define ARGF_GENERIC_INPUT_P() \
7124 (ARGF.current_file == rb_stdin && TYPE(ARGF.current_file) != T_FILE)
7125 #define ARGF_FORWARD(argc, argv) do {\
7126 if (ARGF_GENERIC_INPUT_P())\
7127 return argf_forward((argc), (argv), argf);\
7129 #define NEXT_ARGF_FORWARD(argc, argv) do {\
7130 if (!next_argv()) return Qnil;\
7131 ARGF_FORWARD((argc), (argv));\
7149 int stdout_binmode = 0;
7158 if (
ARGF.init_p == 0) {
7176 if (
ARGF.next_p == 1) {
7181 if (
strlen(fn) == 1 && fn[0] ==
'-') {
7184 rb_warn(
"Can't do inplace edit for stdio; skipping");
7194 #ifndef NO_SAFE_RENAME
7204 if (*
ARGF.inplace) {
7207 #ifdef NO_SAFE_RENAME
7211 rb_warn(
"Can't rename %s to %s: %s, skipping file",
7218 rb_warn(
"Can't rename %s to %s: %s, skipping file",
7226 #ifdef NO_SAFE_RENAME
7227 rb_fatal(
"Can't do inplace edit without backup");
7229 if (unlink(fn) < 0) {
7230 rb_warn(
"Can't remove %s: %s, skipping file",
7238 #ifndef NO_SAFE_RENAME
7241 fchmod(fw, st.st_mode);
7243 chmod(fn, st.st_mode);
7245 if (st.st_uid!=st2.st_uid || st.st_gid!=st2.st_gid) {
7248 err = fchown(fw, st.st_uid, st.st_gid);
7250 err =
chown(fn, st.st_uid, st.st_gid);
7252 if (err &&
getuid() == 0 && st2.st_uid == 0) {
7254 rb_warn(
"Can't set owner/group of %s to same as %s: %s, skipping file",
7268 if (!
ARGF.binmode) {
7272 if (!
NIL_P(write_io)) {
7278 if (
ARGF.encs.enc) {
7284 if (!
ARGF.binmode) {
7286 #ifdef TEXTMODE_NEWLINE_DECORATOR_ON_WRITE
7287 fptr->
encs.
ecflags |= TEXTMODE_NEWLINE_DECORATOR_ON_WRITE;
7298 else if (
ARGF.next_p == -1) {
7302 rb_warn(
"Can't do inplace edit for stdio");
7313 long lineno =
ARGF.lineno;
7334 ARGF.lineno = ++lineno;
7352 ARGF.last_lineno =
ARGF.lineno = n;
7544 long lineno =
ARGF.lineno;
7582 volatile VALUE port;
7597 #ifdef HAVE_SYS_SELECT_H
7598 #include <sys/select.h>
7621 if (max < fptr->fd) max = fptr->
fd;
7632 if (!
NIL_P(write)) {
7638 if (max < fptr->fd) max = fptr->
fd;
7645 if (!
NIL_P(except)) {
7652 if (max < fptr->fd) max = fptr->
fd;
7653 if (io != write_io) {
7656 if (max < fptr->fd) max = fptr->
fd;
7671 if (!pending && n == 0)
return Qnil;
7714 else if (io != write_io) {
7754 #ifdef HAVE_POSIX_FADVISE
7755 struct io_advise_struct {
7763 io_advise_internal(
void *
arg)
7765 struct io_advise_struct *ptr =
arg;
7766 return posix_fadvise(ptr->fd, ptr->offset, ptr->len, ptr->advice);
7772 #ifdef POSIX_FADV_NORMAL
7773 if (sym == sym_normal)
7774 return INT2NUM(POSIX_FADV_NORMAL);
7777 #ifdef POSIX_FADV_RANDOM
7778 if (sym == sym_random)
7779 return INT2NUM(POSIX_FADV_RANDOM);
7782 #ifdef POSIX_FADV_SEQUENTIAL
7783 if (sym == sym_sequential)
7784 return INT2NUM(POSIX_FADV_SEQUENTIAL);
7787 #ifdef POSIX_FADV_WILLNEED
7788 if (sym == sym_willneed)
7789 return INT2NUM(POSIX_FADV_WILLNEED);
7792 #ifdef POSIX_FADV_DONTNEED
7793 if (sym == sym_dontneed)
7794 return INT2NUM(POSIX_FADV_DONTNEED);
7797 #ifdef POSIX_FADV_NOREUSE
7798 if (sym == sym_noreuse)
7799 return INT2NUM(POSIX_FADV_NOREUSE);
7809 struct io_advise_struct ias;
7812 num_adv = io_advise_sym_to_const(advice);
7818 if (num_adv ==
Qnil)
7822 ias.advice =
NUM2INT(num_adv);
7823 ias.offset = offset;
7843 if (advice != sym_normal &&
7844 advice != sym_sequential &&
7845 advice != sym_random &&
7846 advice != sym_willneed &&
7847 advice != sym_dontneed &&
7848 advice != sym_noreuse) {
7903 rb_scan_args(argc, argv,
"12", &advice, &offset, &len);
7912 #ifdef HAVE_POSIX_FADVISE
7913 return do_io_advise(fptr, advice, off, l);
7980 if (
NIL_P(timeout)) {
7994 #if defined(__linux__) || defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__APPLE__)
7996 #define NUM2IOCTLREQ(num) NUM2ULONG(num)
7999 #define NUM2IOCTLREQ(num) NUM2INT(num)
8030 #define DEFULT_IOCTL_NARG_LEN (256)
8034 linux_iocparm_len(ioctl_req_t
cmd)
8038 if ((cmd & 0xFFFF0000) == 0) {
8043 len = _IOC_SIZE(cmd);
8060 #define IOCPARM_LEN(x) (((x) >> 16) & IOCPARM_MASK)
8064 len = IOCPARM_LEN(cmd);
8065 #elif defined(__linux__)
8066 len = linux_iocparm_len(cmd);
8077 typedef long fcntl_arg_t;
8080 typedef int fcntl_arg_t;
8091 len =
sizeof(fcntl_arg_t);
8099 #ifdef F_DUPFD_CLOEXEC
8100 case F_DUPFD_CLOEXEC:
8101 len =
sizeof(fcntl_arg_t);
8111 len =
sizeof(fcntl_arg_t);
8121 len =
sizeof(fcntl_arg_t);
8131 len =
sizeof(fcntl_arg_t);
8136 len =
sizeof(
struct f_owner_ex);
8141 len =
sizeof(
struct f_owner_ex);
8146 len =
sizeof(
struct flock);
8151 len =
sizeof(
struct flock);
8156 len =
sizeof(
struct flock);
8176 len =
sizeof(fcntl_arg_t);
8186 len =
sizeof(fcntl_arg_t);
8191 len =
sizeof(fcntl_arg_t);
8222 else if (arg ==
Qtrue) {
8304 static VALUE nogvl_fcntl(
void *ptr)
8306 struct fcntl_arg *
arg = ptr;
8308 #if defined(F_DUPFD)
8309 if (arg->cmd == F_DUPFD)
8312 return (
VALUE)
fcntl(arg->fd, arg->cmd, arg->narg);
8316 do_fcntl(
int fd,
int cmd,
long narg)
8319 struct fcntl_arg arg;
8326 #if defined(F_DUPFD)
8327 if (retval != -1 && cmd == F_DUPFD) {
8347 retval = do_fcntl(fptr->
fd, cmd, narg);
8387 return rb_fcntl(io, req, arg);
8390 #define rb_io_fcntl rb_f_notimplement
8393 #if defined(HAVE_SYSCALL) || defined(HAVE___SYSCALL)
8435 #if SIZEOF_VOIDP == 8 && defined(HAVE___SYSCALL) && SIZEOF_INT != 8
8436 # define SYSCALL __syscall
8437 # define NUM2SYSCALLID(x) NUM2LONG(x)
8438 # define RETVAL2NUM(x) LONG2NUM(x)
8439 # if SIZEOF_LONG == 8
8440 long num, retval = -1;
8441 # elif SIZEOF_LONG_LONG == 8
8442 long long num, retval = -1;
8444 # error ---->> it is asserted that __syscall takes the first argument and returns retval in 64bit signed integer. <<----
8447 # define SYSCALL syscall
8448 # define NUM2SYSCALLID(x) NUM2LONG(x)
8449 # define RETVAL2NUM(x) LONG2NUM(x)
8457 long num, retval = -1;
8459 # define SYSCALL syscall
8460 # define NUM2SYSCALLID(x) NUM2INT(x)
8461 # define RETVAL2NUM(x) INT2NUM(x)
8462 int num, retval = -1;
8467 rb_warning(
"We plan to remove a syscall function at future release. DL(Fiddle) provides safer alternative.");
8475 num = NUM2SYSCALLID(argv[0]); ++
argv;
8476 for (i = argc - 1; i--; ) {
8491 retval = SYSCALL(num);
8494 retval = SYSCALL(num, arg[0]);
8497 retval = SYSCALL(num, arg[0],arg[1]);
8500 retval = SYSCALL(num, arg[0],arg[1],arg[2]);
8503 retval = SYSCALL(num, arg[0],arg[1],arg[2],arg[3]);
8506 retval = SYSCALL(num, arg[0],arg[1],arg[2],arg[3],arg[4]);
8509 retval = SYSCALL(num, arg[0],arg[1],arg[2],arg[3],arg[4],arg[5]);
8512 retval = SYSCALL(num, arg[0],arg[1],arg[2],arg[3],arg[4],arg[5],arg[6]);
8516 retval = SYSCALL(num, arg[0],arg[1],arg[2],arg[3],arg[4],arg[5],arg[6],
8520 retval = SYSCALL(num, arg[0],arg[1],arg[2],arg[3],arg[4],arg[5],arg[6],
8524 retval = SYSCALL(num, arg[0],arg[1],arg[2],arg[3],arg[4],arg[5],arg[6],
8525 arg[7], arg[8], arg[9]);
8528 retval = SYSCALL(num, arg[0],arg[1],arg[2],arg[3],arg[4],arg[5],arg[6],
8529 arg[7], arg[8], arg[9], arg[10]);
8532 retval = SYSCALL(num, arg[0],arg[1],arg[2],arg[3],arg[4],arg[5],arg[6],
8533 arg[7], arg[8], arg[9], arg[10], arg[11]);
8536 retval = SYSCALL(num, arg[0],arg[1],arg[2],arg[3],arg[4],arg[5],arg[6],
8537 arg[7], arg[8], arg[9], arg[10], arg[11], arg[12]);
8544 return RETVAL2NUM(retval);
8546 #undef NUM2SYSCALLID
8550 #define rb_f_syscall rb_f_notimplement
8687 int pipes[2],
state;
8694 argc =
rb_scan_args(argc, argv,
"02:", &v1, &v2, &opt);
8721 #if DEFAULT_TEXTMODE
8726 #if defined(RUBY_TEST_CRLF_ENVIRONMENT) || defined(_WIN32)
8733 #if DEFAULT_TEXTMODE
8779 #if SIZEOF_LONG > SIZEOF_INT
8835 int orig_argc =
argc;
8942 if (!
NIL_P(offset)) {
8983 arg.
argc = (argc > 1) ? 1 : 0;
8984 if (!
NIL_P(offset)) {
8999 VALUE string, offset, opt;
9010 int mode = O_WRONLY|O_CREAT;
9014 if (
NIL_P(offset)) mode |= O_TRUNC;
9024 if (!
NIL_P(offset)) {
9148 #if defined(ERESTART)
9209 #ifdef HAVE_SENDFILE
9212 # define USE_SENDFILE
9214 # ifdef HAVE_SYS_SENDFILE_H
9215 # include <sys/sendfile.h>
9221 return sendfile(out_fd, in_fd, offset, (
size_t)count);
9224 # elif 0 || defined(__APPLE__)
9228 # define USE_SENDFILE
9230 # ifdef HAVE_SYS_UIO_H
9231 # include <sys/uio.h>
9235 simple_sendfile(
int out_fd,
int in_fd,
off_t *offset,
off_t count)
9241 r = sendfile(in_fd, out_fd, pos, &count,
NULL, 0);
9244 r = sendfile(in_fd, out_fd, pos, (
size_t)count,
NULL, &sbytes, 0);
9246 if (r != 0 && sbytes == 0)
return -1;
9253 return (ssize_t)sbytes;
9264 struct stat src_stat, dst_stat;
9278 if (!
S_ISREG(src_stat.st_mode))
9287 if ((dst_stat.st_mode & S_IFMT) != S_IFSOCK)
9291 use_pread = src_offset != (
off_t)-1;
9294 if (copy_length == (
off_t)-1) {
9296 copy_length = src_stat.st_size - src_offset;
9306 copy_length = src_stat.st_size - cur;
9311 # if SIZEOF_OFF_T > SIZEOF_SIZE_T
9315 ss = (ssize_t)copy_length;
9318 ss = simple_sendfile(stp->
dst_fd, stp->
src_fd, &src_offset, ss);
9326 if (0 < copy_length) {
9327 goto retry_sendfile;
9332 goto retry_sendfile;
9340 #if defined(EWOULDBLOCK) && EWOULDBLOCK != EAGAIN
9356 goto retry_sendfile;
9358 stp->
syserr =
"sendfile";
9372 return read(fd, buf, count);
9380 if (offset == (
off_t)-1) {
9385 ss = pread(stp->
src_fd, buf, len, offset);
9399 #if defined(EWOULDBLOCK) && EWOULDBLOCK != EAGAIN
9411 stp->
syserr = offset == (
off_t)-1 ?
"read" :
"pread";
9424 ss = write(stp->
dst_fd, buf+off, len);
9457 use_eof = copy_length == (
off_t)-1;
9459 use_pread = src_offset != (
off_t)-1;
9470 src_offset = (
off_t)-1;
9474 while (use_eof || 0 < copy_length) {
9475 if (!use_eof && copy_length < (
off_t)
sizeof(
buf)) {
9476 len = (size_t)copy_length;
9510 ret = nogvl_copy_stream_sendfile(stp);
9527 const int buflen = 16*1024;
9549 l = buflen < rest ? buflen : (
long)rest;
9564 if (off != (
off_t)-1)
9569 stp->
total += numwrote;
9595 VALUE src_io, dst_io;
9596 rb_io_t *src_fptr = 0, *dst_fptr = 0;
9611 if (
NIL_P(src_io)) {
9613 int oflags = O_RDONLY;
9626 src_fd = src_fptr->
fd;
9638 if (
NIL_P(dst_io)) {
9640 int oflags = O_WRONLY|O_CREAT|O_TRUNC;
9658 dst_fd = dst_fptr->fd;
9670 size_t len = src_fptr->
rbuf.
len;
9689 if (dst_fptr &&
io_fflush(dst_fptr) < 0) {
9696 if (src_fd == -1 || dst_fd == -1) {
9763 rb_scan_args(argc, argv,
"22", &src, &dst, &length, &src_offset);
9773 if (
NIL_P(src_offset))
9856 argc =
rb_scan_args(argc, argv,
"11:", &v1, &v2, &opt);
10084 return ARGF.current_file;
10160 VALUE tmp, str, length;
10164 if (!
NIL_P(length)) {
10183 if (
NIL_P(str)) str = tmp;
10186 if (
ARGF.next_p != -1) {
10192 else if (argc >= 1) {
10269 VALUE tmp, str, length;
10293 if (
ARGF.next_p == -1) {
10631 return ARGF.filename;
10662 return ARGF.current_file;
10722 if (
ARGF.init_p &&
ARGF.next_p == 0) {
10752 if (
ARGF.next_p != -1) {
10855 return ARGF.inplace;
11117 #define rb_intern(str) rb_intern_const(str)
11121 #include <sys/cygwin.h>
11122 static struct __cygwin_perfile pf[] =
11130 cygwin_internal(CW_PERFILE, pf);
11401 #if defined (_WIN32) || defined(__CYGWIN__)
11421 #if defined(O_NDELAY) || defined(O_NONBLOCK)
11422 # ifndef O_NONBLOCK
11423 # define O_NONBLOCK O_NDELAY
11435 # define O_BINARY 0
#define STRNCASECMP(s1, s2, n)
VALUE rb_thread_blocking_region(rb_blocking_function_t *func, void *data1, rb_unblock_function_t *ubf, void *data2)
void rb_define_global_const(const char *, VALUE)
struct timeval rb_time_interval(VALUE num)
#define RSTRING_LEN(string)
static long NUM2LONG(VALUE x)
VALUE rb_econv_open_exc(const char *senc, const char *denc, int ecflags)
static void make_readconv(rb_io_t *fptr, int size)
static VALUE rb_io_rewind(VALUE io)
const char * rb_econv_asciicompat_encoding(const char *encname)
void rb_thread_atfork_before_exec(void)
static VALUE rb_io_close_read(VALUE io)
static VALUE rb_obj_display(int argc, VALUE *argv, VALUE self)
static int nogvl_copy_stream_wait_write(struct copy_stream_struct *stp)
VALUE rb_io_getbyte(VALUE io)
static long fcntl_narg_len(int cmd)
static VALUE rb_io_set_lineno(VALUE io, VALUE lineno)
int rb_io_wait_writable(int f)
static ID id_set_encoding
#define MBCLEN_CHARFOUND_P(ret)
static VALUE rb_io_open_with_args(int argc, VALUE *argv)
void rb_thread_atfork(void)
#define ECONV_NEWLINE_DECORATOR_WRITE_MASK
static VALUE argf_getpartial(int argc, VALUE *argv, VALUE argf, int nonblock)
static VALUE UINT2NUM(unsigned int v)
VALUE rb_ary_new4(long n, const VALUE *elts)
static VALUE rb_io_set_sync(VALUE io, VALUE sync)
VALUE rb_ary_entry(VALUE ary, long offset)
#define MBCLEN_CHARFOUND_LEN(ret)
void rb_bug(const char *fmt,...)
static VALUE rb_io_internal_encoding(VALUE)
static VALUE rb_io_s_readlines(int argc, VALUE *argv, VALUE io)
long rb_str_coderange_scan_restartable(const char *, const char *, rb_encoding *, int *)
static VALUE rb_io_closed(VALUE io)
size_t strlen(const char *)
static VALUE io_enc_str(VALUE str, rb_io_t *fptr)
void rb_io_check_writable(rb_io_t *fptr)
static VALUE sym_autoclose
static long setup_narg(ioctl_req_t cmd, VALUE *argp, int io_p)
static VALUE sym_encoding
static VALUE argf_set_pos(VALUE argf, VALUE offset)
int rb_io_modestr_fmode(const char *modestr)
static VALUE argf_set_lineno(VALUE argf, VALUE val)
void rb_syserr_fail(int e, const char *mesg)
static VALUE argf_inplace_mode_get(VALUE argf)
VALUE rb_file_open_str(VALUE fname, const char *modestr)
static VALUE rb_f_putc(VALUE recv, VALUE ch)
void rb_define_virtual_variable(const char *, VALUE(*)(ANYARGS), void(*)(ANYARGS))
static VALUE argf_readpartial(int argc, VALUE *argv, VALUE argf)
VALUE rb_hash_dup(VALUE hash)
static VALUE io_call_close(VALUE io)
static int io_fflush(rb_io_t *)
VALUE rb_io_eof(VALUE io)
static int max(int a, int b)
void rb_define_singleton_method(VALUE obj, const char *name, VALUE(*func)(ANYARGS), int argc)
Defines a singleton method for obj.
static const char * rb_io_fmode_modestr(int fmode)
static void argf_init(struct argf *p, VALUE v)
static VALUE rb_io_ioctl(int argc, VALUE *argv, VALUE io)
static VALUE argf_inplace_mode_set(VALUE argf, VALUE val)
VALUE rb_f_sprintf(int, const VALUE *)
size_t rb_econv_memsize(rb_econv_t *)
static void must_respond_to(ID mid, VALUE val, ID id)
if(len<=MAX_WORD_LENGTH &&len >=MIN_WORD_LENGTH)
static VALUE io_s_write(int argc, VALUE *argv, int binary)
void rb_io_set_nonblock(rb_io_t *fptr)
void rb_file_const(const char *name, VALUE value)
static VALUE select_call(VALUE arg)
VALUE rb_str_cat(VALUE, const char *, long)
static VALUE argf_readbyte(VALUE argf)
#define ARGF_FORWARD(argc, argv)
static VALUE argf_gets(int, VALUE *, VALUE)
VALUE rb_io_binmode(VALUE io)
static void argf_mark(void *ptr)
static VALUE io_puts_ary(VALUE ary, VALUE out, int recur)
static VALUE rb_io_binmode_p(VALUE io)
static VALUE rb_io_write_nonblock(VALUE io, VALUE str)
#define ENC_CODERANGE_SET(obj, cr)
#define READ_DATA_PENDING_COUNT(fptr)
VALUE rb_ary_shift(VALUE ary)
#define rb_block_call(arg1, arg2, arg3, arg4, arg5, arg6)
#define ECONV_ERROR_HANDLER_MASK
static VALUE io_s_foreach(struct foreach_arg *arg)
rb_encoding * rb_to_encoding(VALUE enc)
void rb_econv_close(rb_econv_t *ec)
static VALUE io_flush_buffer_async(VALUE arg)
static VALUE io_binwrite_string(VALUE arg)
VALUE rb_str_unlocktmp(VALUE)
static void io_encoding_set(rb_io_t *, VALUE, VALUE, VALUE)
static VALUE rb_io_syswrite(VALUE io, VALUE str)
#define FMODE_WSPLIT_INITIALIZED
VALUE rb_enc_from_encoding(rb_encoding *encoding)
ID rb_frame_this_func(void)
static VALUE argf_external_encoding(VALUE argf)
SOCKET rb_w32_get_osfhandle(int)
static VALUE argf_each_line(int argc, VALUE *argv, VALUE argf)
static VALUE rb_io_close_write(VALUE io)
rb_encoding * rb_default_internal_encoding(void)
static VALUE argf_filename(VALUE argf)
VALUE rb_ary_push(VALUE ary, VALUE item)
static void fptr_finalize(rb_io_t *fptr, int noraise)
void rb_close_before_exec(int lowfd, int maxhint, VALUE noclose_fds)
static VALUE opt_i_get(ID id, VALUE *var)
int rb_thread_alone(void)
VALUE rb_ary_tmp_new(long capa)
static VALUE argf_argv(VALUE argf)
static int io_encname_bom_p(const char *name, long len)
static VALUE rb_io_seek(VALUE io, VALUE offset, int whence)
VALUE rb_io_print(int argc, VALUE *argv, VALUE out)
static VALUE INT2NUM(int v)
int rb_thread_fd_select(int, rb_fdset_t *, rb_fdset_t *, rb_fdset_t *, struct timeval *)
static VALUE rb_io_getline_fast(rb_io_t *fptr, rb_encoding *enc, VALUE io)
static VALUE rb_io_sync(VALUE io)
VALUE rb_funcall(VALUE, ID, int,...)
Calls a method.
int writeconv_pre_ecflags
VALUE rb_protect(VALUE(*proc)(VALUE), VALUE data, int *state)
#define RSTRING_PTR(string)
static VALUE rb_io_readchar(VALUE io)
int rb_enc_str_coderange(VALUE)
static VALUE argf_write(VALUE argf, VALUE str)
static int rb_sysopen_internal(struct sysopen_struct *data)
void rb_raise(VALUE exc, const char *fmt,...)
static VALUE rb_io_sysseek(int argc, VALUE *argv, VALUE io)
#define SET_BINARY_MODE_WITH_SEEK_CUR(fptr)
int writeconv_initialized
VALUE rb_enc_associate(VALUE obj, rb_encoding *enc)
VALUE rb_ary_clear(VALUE ary)
static void pipe_add_fptr(rb_io_t *fptr)
VALUE rb_convert_type(VALUE, int, const char *, const char *)
static VALUE argf_binmode_p(VALUE argf)
VALUE rb_exec_recursive(VALUE(*)(VALUE, VALUE, int), VALUE, VALUE)
#define NEED_WRITECONV(fptr)
static VALUE rb_file_initialize(int argc, VALUE *argv, VALUE io)
static VALUE argf_write_io(VALUE argf)
void rb_define_alloc_func(VALUE, rb_alloc_func_t)
int rb_io_modestr_oflags(const char *modestr)
static int ruby_dup(int orig)
#define ENCODING_MAXNAMELEN
int rb_enc_mbclen(const char *p, const char *e, rb_encoding *enc)
#define RARRAY_LEN(ARRAY)
#define STDIO_READ_DATA_PENDING(fp)
void rb_include_module(VALUE klass, VALUE module)
#define MORE_CHAR_FINISHED
void rb_syswait(rb_pid_t pid)
void rb_gc_mark(VALUE ptr)
static VALUE more_char(rb_io_t *fptr)
static VALUE rb_io_s_sysopen(int argc, VALUE *argv)
static VALUE argf_lineno(VALUE argf)
static void prepare_getline_args(int argc, VALUE *argv, VALUE *rsp, long *limit, VALUE io)
void rb_define_global_function(const char *name, VALUE(*func)(ANYARGS), int argc)
Defines a global function.
static VALUE rb_file_open_generic(VALUE io, VALUE filename, int oflags, int fmode, convconfig_t *convconfig, mode_t perm)
static VALUE internal_write_func(void *ptr)
void rb_io_check_initialized(rb_io_t *fptr)
static VALUE rb_io_each_byte(VALUE io)
VALUE writeconv_pre_ecopts
static void argf_close(VALUE file)
static void open_key_args(int argc, VALUE *argv, VALUE opt, struct foreach_arg *arg)
static VALUE argf_readchar(VALUE argf)
static int max_file_descriptor
void rb_update_max_fd(int fd)
static VALUE rb_io_external_encoding(VALUE io)
static VALUE rb_f_readlines(int argc, VALUE *argv, VALUE recv)
static int argf_next_argv(VALUE argf)
VALUE rb_str_tmp_new(long)
VALUE rb_check_to_integer(VALUE, const char *)
static long io_fwrite(VALUE str, rb_io_t *fptr, int nosync)
static VALUE rb_f_open(int argc, VALUE *argv)
static VALUE argf_each_codepoint(VALUE argf)
RUBY_FUNC_EXPORTED size_t rb_io_memsize(const rb_io_t *fptr)
static VALUE nogvl_copy_stream_func(void *arg)
#define GetOpenFile(obj, fp)
VALUE rb_io_printf(int argc, VALUE *argv, VALUE out)
static VALUE nogvl_ioctl(void *ptr)
static void validate_enc_binmode(int *fmode_p, int ecflags, rb_encoding *enc, rb_encoding *enc2)
VALUE rb_io_ascii8bit_binmode(VALUE io)
static VALUE rb_io_tell(VALUE io)
static void io_check_tty(rb_io_t *fptr)
#define ENC_CODERANGE_7BIT
const char * rb_obj_classname(VALUE)
static VALUE argf_seek_m(int argc, VALUE *argv, VALUE argf)
static void opt_i_set(VALUE val, ID id, VALUE *var)
RUBY_EXTERN void * memmove(void *, const void *, size_t)
static VALUE read_all(rb_io_t *fptr, long siz, VALUE str)
int rb_io_extract_encoding_option(VALUE opt, rb_encoding **enc_p, rb_encoding **enc2_p, int *fmode_p)
static void * exec_interrupts(void *arg)
VALUE rb_io_write(VALUE io, VALUE str)
VALUE rb_str_buf_cat(VALUE, const char *, long)
void rb_thread_fd_close(int)
static VALUE rb_io_set_autoclose(VALUE io, VALUE autoclose)
#define rb_fd_isset(n, f)
static ssize_t maygvl_read(int has_gvl, int fd, void *buf, size_t count)
static rb_encoding * io_read_encoding(rb_io_t *fptr)
static VALUE rb_io_s_popen(int argc, VALUE *argv, VALUE klass)
rb_pid_t rb_fork(int *, int(*)(void *), void *, VALUE)
void rb_exc_raise(VALUE mesg)
#define SET_UNIVERSAL_NEWLINE_DECORATOR_IF_ENC2(enc2, ecflags)
#define rb_io_set_close_on_exec
VALUE rb_io_close(VALUE io)
static VALUE rb_io_sysread(int argc, VALUE *argv, VALUE io)
static void io_ungetbyte(VALUE str, rb_io_t *fptr)
#define RB_TYPE_P(obj, type)
static VALUE rb_file_open_internal(VALUE io, VALUE filename, const char *modestr)
static int str_end_with_asciichar(VALUE str, int c)
static VALUE argf_binmode_m(VALUE argf)
int rb_thread_fd_writable(int)
VALUE rb_econv_make_exception(rb_econv_t *ec)
#define MEMZERO(p, type, n)
static VALUE pipe_open(struct rb_exec_arg *eargp, VALUE prog, const char *modestr, int fmode, convconfig_t *convconfig)
void rb_econv_check_error(rb_econv_t *ec)
VALUE rb_lastline_get(void)
int rb_to_encoding_index(VALUE enc)
rb_encoding * rb_default_external_encoding(void)
void rb_str_setter(VALUE, ID, VALUE *)
void rb_maygvl_fd_fix_cloexec(int fd)
VALUE rb_rescue(VALUE(*b_proc)(ANYARGS), VALUE data1, VALUE(*r_proc)(ANYARGS), VALUE data2)
static VALUE copy_stream_fallback_body(VALUE arg)
void rb_thread_sleep(int)
VALUE rb_class_new_instance(int, VALUE *, VALUE)
#define ECONV_NEWLINE_DECORATOR_READ_MASK
VALUE rb_class_name(VALUE)
int rb_block_given_p(void)
VALUE rb_hash_aset(VALUE hash, VALUE key, VALUE val)
void rb_io_unbuffered(rb_io_t *fptr)
void rb_write_error2(const char *mesg, long len)
static VALUE argf_internal_encoding(VALUE argf)
VALUE rb_str_encode_ospath(VALUE path)
VALUE rb_str_substr(VALUE, long, long)
static VALUE io_readpartial(int argc, VALUE *argv, VALUE io)
static VALUE argf_getbyte(VALUE argf)
#define rb_sys_fail_path(path)
static void stdout_setter(VALUE val, ID id, VALUE *variable)
RUBY_EXTERN VALUE rb_cObject
static VALUE rb_f_backquote(VALUE obj, VALUE str)
#define PREP_STDIO_NAME(f)
static struct pipe_list * pipe_list
static VALUE argf_readlines(int, VALUE *, VALUE)
static VALUE argf_getline(int argc, VALUE *argv, VALUE argf)
#define FMODE_SETENC_BY_BOM
#define MBCLEN_NEEDMORE_P(ret)
static VALUE rb_io_s_binread(int argc, VALUE *argv, VALUE io)
char * ruby_strdup(const char *)
static VALUE io_flush_buffer_sync(void *arg)
FILE * rb_io_stdio_file(rb_io_t *fptr)
int rb_io_oflags_fmode(int oflags)
rb_pid_t rb_w32_spawn(int, const char *, const char *)
static int io_strip_bom(VALUE io)
static void mode_enc(rb_io_t *fptr, const char *estr)
VALUE rb_str_cat2(VALUE, const char *)
VALUE rb_obj_as_string(VALUE)
static VALUE io_s_readlines(struct foreach_arg *arg)
#define ECONV_STATEFUL_DECORATOR_MASK
static ssize_t maygvl_copy_stream_read(int has_gvl, struct copy_stream_struct *stp, char *buf, size_t len, off_t offset)
VALUE rb_thread_io_blocking_region(rb_blocking_function_t *func, void *data1, int fd)
rb_econv_t * rb_econv_open_opts(const char *source_encoding, const char *destination_encoding, int ecflags, VALUE ecopts)
VALUE rb_io_get_write_io(VALUE io)
static int swallow(rb_io_t *fptr, int term)
static VALUE argf_set_encoding(int argc, VALUE *argv, VALUE argf)
#define ARGF_GENERIC_INPUT_P()
#define ECONV_PARTIAL_INPUT
VALUE rb_io_ungetbyte(VALUE io, VALUE b)
#define ECONV_AFTER_OUTPUT
RUBY_EXTERN VALUE rb_mKernel
VALUE rb_thread_current(void)
int rb_cloexec_fcntl_dupfd(int fd, int minfd)
static void pipe_finalize(rb_io_t *fptr, int noraise)
static VALUE copy_stream_fallback(struct copy_stream_struct *stp)
VALUE rb_io_flush(VALUE io)
static VALUE sym_textmode
static VALUE finish_writeconv_sync(VALUE arg)
static VALUE io_write(VALUE io, VALUE str, int nosync)
static VALUE rb_f_puts(int argc, VALUE *argv, VALUE recv)
VALUE rb_define_class(const char *name, VALUE super)
Defines a top-level class.
static VALUE pipe_pair_close(VALUE rw)
const char * ruby_get_inplace_mode(void)
static int appendline(rb_io_t *fptr, int delim, VALUE *strp, long *lp)
int chown(const char *, int, int)
#define ECONV_DEFAULT_NEWLINE_DECORATOR
VALUE rb_mutex_synchronize(VALUE mutex, VALUE(*func)(VALUE arg), VALUE arg)
static VALUE rb_io_each_line(int argc, VALUE *argv, VALUE io)
#define MODE_BINARY(a, b)
void rb_define_const(VALUE, const char *, VALUE)
int rb_io_wait_readable(int f)
static VALUE select_internal(VALUE read, VALUE write, VALUE except, struct timeval *tp, rb_fdset_t *fds)
#define NEWOBJ(obj, type)
rb_atomic_t cnt[RUBY_NSIG]
static VALUE rb_io_each_char(VALUE io)
void rb_lastline_set(VALUE)
static VALUE rb_io_getline(int argc, VALUE *argv, VALUE io)
struct rb_io_t::rb_io_enc_t encs
#define NUM2IOCTLREQ(num)
#define READ_DATA_PENDING(fptr)
VALUE writeconv_asciicompat
static VALUE finish_writeconv(rb_io_t *fptr, int noalloc)
#define NEED_NEWLINE_DECORATOR_ON_READ_CHECK(fptr)
void rb_gc_register_mark_object(VALUE obj)
static VALUE rb_io_gets_m(int argc, VALUE *argv, VALUE io)
VALUE rb_io_get_io(VALUE io)
#define RUBY_FUNC_EXPORTED
static VALUE argf_eof(VALUE argf)
#define ENC_CODERANGE_BROKEN
static void io_setstrbuf(VALUE *str, long len)
VALUE rb_obj_alloc(VALUE)
static int io_flush_buffer(rb_io_t *fptr)
#define rb_enc_codepoint(p, e, enc)
#define rb_enc_mbminlen(enc)
VALUE rb_io_gets(VALUE io)
static VALUE rb_f_printf(int argc, VALUE *argv)
static void rscheck(const char *rsptr, long rslen, VALUE rs)
static int nogvl_copy_stream_write(struct copy_stream_struct *stp, char *buf, size_t len)
static void rb_io_ext_int_to_encs(rb_encoding *ext, rb_encoding *intern, rb_encoding **enc, rb_encoding **enc2)
static VALUE argf_initialize(VALUE argf, VALUE argv)
#define ENC_CODERANGE_VALID
static VALUE io_getpartial(int argc, VALUE *argv, VALUE io, int nonblock)
static VALUE rb_io_seek_m(int argc, VALUE *argv, VALUE io)
rb_pid_t rb_fork_err(int *, int(*)(void *, char *, size_t), void *, VALUE, char *, size_t)
VALUE rb_str_resize(VALUE, long)
static void io_set_encoding_by_bom(VALUE io)
static void advice_arg_check(VALUE advice)
int rb_enc_ascget(const char *p, const char *e, int *len, rb_encoding *enc)
static VALUE argf_alloc(VALUE klass)
#define NEXT_ARGF_FORWARD(argc, argv)
static VALUE prep_io(int fd, int fmode, VALUE klass, const char *path)
void rb_define_alias(VALUE klass, const char *name1, const char *name2)
Defines an alias of a method.
static VALUE rb_f_gets(int argc, VALUE *argv, VALUE recv)
void ruby_set_inplace_mode(const char *suffix)
void rb_define_readonly_variable(const char *, VALUE *)
static VALUE copy_stream_body(VALUE arg)
static VALUE seek_before_access(VALUE argp)
static VALUE rb_io_set_pos(VALUE io, VALUE offset)
VALUE rb_funcall2(VALUE, ID, int, const VALUE *)
Calls a method.
static VALUE rb_io_init_copy(VALUE dest, VALUE io)
static void nogvl_copy_stream_read_write(struct copy_stream_struct *stp)
static rb_encoding * io_input_encoding(rb_io_t *fptr)
static VALUE io_close(VALUE io)
static VALUE rb_io_check_io(VALUE io)
static int rb_sysopen(VALUE fname, int oflags, mode_t perm)
int rb_enc_precise_mbclen(const char *p, const char *e, rb_encoding *enc)
#define IO_RBUF_CAPA_FOR(fptr)
static VALUE argf_rewind(VALUE argf)
#define NEED_READCONV(fptr)
static VALUE rb_io_pid(VALUE io)
void rb_fatal(const char *fmt,...)
static VALUE io_s_read(struct foreach_arg *arg)
#define RB_GC_GUARD(object)
VALUE rb_eSystemCallError
static int maygvl_copy_stream_continue_p(int has_gvl, struct copy_stream_struct *stp)
void rb_last_status_set(int status, rb_pid_t pid)
static VALUE rb_io_readlines(int argc, VALUE *argv, VALUE io)
int rb_run_exec_options(const struct rb_exec_arg *e, struct rb_exec_arg *s)
static VALUE rb_io_s_for_fd(int argc, VALUE *argv, VALUE klass)
static VALUE rb_f_select(int argc, VALUE *argv, VALUE obj)
#define MEMMOVE(p1, p2, type, n)
static int wsplit_p(rb_io_t *fptr)
static VALUE rb_io_s_open(int argc, VALUE *argv, VALUE klass)
static VALUE rb_f_print(int argc, VALUE *argv)
static void argf_lineno_setter(VALUE val, ID id, VALUE *var)
int rb_scan_args(int argc, const VALUE *argv, const char *fmt,...)
static VALUE argf_read_nonblock(int argc, VALUE *argv, VALUE argf)
static VALUE argf_to_io(VALUE argf)
VALUE rb_ivar_set(VALUE, ID, VALUE)
static void io_unread(rb_io_t *fptr)
unsigned char buf[MIME_BUF_SIZE]
VALUE rb_assoc_new(VALUE car, VALUE cdr)
static void rb_scan_open_args(int argc, VALUE *argv, VALUE *fname_p, int *oflags_p, int *fmode_p, convconfig_t *convconfig_p, mode_t *perm_p)
void rb_thread_wait_fd(int)
VALUE tied_io_for_writing
#define RUBY_METHOD_FUNC(func)
static VALUE rb_io_close_m(VALUE io)
static VALUE argf_lineno_getter(ID id, VALUE *var)
static ssize_t rb_write_internal(int fd, const void *buf, size_t count)
static void rb_io_extract_modeenc(VALUE *vmode_p, VALUE *vperm_p, VALUE opthash, int *oflags_p, int *fmode_p, convconfig_t *convconfig_p)
VALUE rb_enc_uint_chr(unsigned int code, rb_encoding *enc)
#define ONIGENC_CONSTRUCT_MBCLEN_CHARFOUND(n)
static VALUE argf_readline(int, VALUE *, VALUE)
static VALUE rb_io_s_binwrite(int argc, VALUE *argv, VALUE io)
static void rb_io_mode_enc(rb_io_t *fptr, const char *modestr)
const char * rb_class2name(VALUE)
char * strchr(char *, char)
static VALUE prep_stdio(FILE *f, int fmode, VALUE klass, const char *path)
#define NEED_NEWLINE_DECORATOR_ON_WRITE(fptr)
int rb_utf8_encindex(void)
#define ECONV_NEWLINE_DECORATOR_MASK
int rb_wait_for_single_fd(int fd, int events, struct timeval *tv)
void rb_io_synchronized(rb_io_t *fptr)
VALUE rb_rescue2(VALUE(*b_proc)(ANYARGS), VALUE data1, VALUE(*r_proc)(ANYARGS), VALUE data2,...)
register unsigned int len
#define RARRAY_PTR(ARRAY)
static VALUE rb_io_s_write(int argc, VALUE *argv, VALUE io)
static long io_bufread(char *ptr, long len, rb_io_t *fptr)
#define rb_enc_asciicompat(enc)
VALUE rb_ensure(VALUE(*b_proc)(ANYARGS), VALUE data1, VALUE(*e_proc)(ANYARGS), VALUE data2)
VALUE rb_str_new_cstr(const char *)
int memcmp(const void *s1, const void *s2, size_t len)
static VALUE argf_read(int argc, VALUE *argv, VALUE argf)
static VALUE sysopen_func(void *ptr)
static int maygvl_select(int has_gvl, int n, rb_fdset_t *rfds, rb_fdset_t *wfds, rb_fdset_t *efds, struct timeval *timeout)
static int maygvl_copy_stream_wait_read(int has_gvl, struct copy_stream_struct *stp)
static VALUE do_writeconv(VALUE str, rb_io_t *fptr)
static VALUE io_shift_cbuf(rb_io_t *fptr, int len, VALUE *strp)
void rb_sys_fail(const char *mesg)
static VALUE pipe_open_v(int argc, VALUE *argv, const char *modestr, int fmode, convconfig_t *convconfig)
static VALUE sym_willneed
static VALUE rb_io_autoclose_p(VALUE io)
static VALUE io_write_m(VALUE io, VALUE str)
void rb_jump_tag(int tag)
VALUE rb_funcall3(VALUE, ID, int, const VALUE *)
Calls a method.
static VALUE rb_io_set_encoding(int argc, VALUE *argv, VALUE io)
int rb_exec_arg_addopt(struct rb_exec_arg *e, VALUE key, VALUE val)
int rb_reserved_fd_p(int fd)
void rb_define_hooked_variable(const char *, VALUE *, VALUE(*)(ANYARGS), void(*)(ANYARGS))
#define READ_DATA_BUFFERED(fptr)
#define Data_Make_Struct(klass, type, mark, free, sval)
#define rb_io_close_on_exec_p
int rb_respond_to(VALUE, ID)
VALUE rb_define_module_under(VALUE outer, const char *name)
#define StringValueCStr(v)
rb_pid_t rb_w32_aspawn(int, const char *, char *const *)
static VALUE argf_tell(VALUE argf)
static VALUE argf_each_byte(VALUE argf)
static int do_ioctl(int fd, ioctl_req_t cmd, long narg)
int rb_econv_putbackable(rb_econv_t *ec)
static VALUE argf_filename_getter(ID id, VALUE *var)
static VALUE rb_io_binmode_m(VALUE io)
void rb_str_modify(VALUE)
VALUE rb_usascii_str_new2(const char *)
static VALUE rb_io_isatty(VALUE io)
static long io_fread(VALUE str, long offset, rb_io_t *fptr)
#define ENCODING_GET(obj)
rb_encoding * rb_enc_get(VALUE obj)
static VALUE io_s_write0(struct write_arg *arg)
void rb_insecure_operation(void)
static VALUE rb_io_lineno(VALUE io)
static long io_writable_length(rb_io_t *fptr, long l)
static VALUE io_read(int argc, VALUE *argv, VALUE io)
VALUE rb_hash_lookup2(VALUE hash, VALUE key, VALUE def)
static void pipe_atexit(void)
static VALUE io_new_instance(VALUE args)
static VALUE rb_io_putc(VALUE io, VALUE ch)
#define MBCLEN_INVALID_P(ret)
VALUE rb_exc_new3(VALUE etype, VALUE str)
rb_econv_result_t rb_econv_convert(rb_econv_t *ec, const unsigned char **source_buffer_ptr, const unsigned char *source_buffer_end, unsigned char **destination_buffer_ptr, unsigned char *destination_buffer_end, int flags)
VALUE rb_check_convert_type(VALUE, int, const char *, const char *)
static int rb_io_fmode_oflags(int fmode)
static VALUE check_pipe_command(VALUE filename_or_command)
int rb_io_fptr_finalize(rb_io_t *fptr)
static VALUE rb_io_s_pipe(int argc, VALUE *argv, VALUE klass)
VALUE rb_io_fdopen(int fd, int oflags, const char *path)
VALUE rb_str_buf_cat_ascii(VALUE, const char *)
static VALUE rb_io_to_io(VALUE io)
static VALUE rb_io_inspect(VALUE obj)
void rb_mod_sys_fail(VALUE mod, const char *mesg)
static VALUE rb_io_s_try_convert(VALUE dummy, VALUE io)
void rb_thread_execute_interrupts(VALUE th)
VALUE rb_check_array_type(VALUE ary)
static void clear_codeconv(rb_io_t *fptr)
void * rb_thread_call_with_gvl(void *(*func)(void *), void *data1)
VALUE rb_hash_aref(VALUE hash, VALUE key)
static void rb_io_fptr_cleanup(rb_io_t *fptr, int noraise)
#define rb_fd_select(n, rfds, wfds, efds, timeout)
static void parse_mode_enc(const char *estr, rb_encoding **enc_p, rb_encoding **enc2_p, int *fmode_p)
VALUE rb_str_catf(VALUE str, const char *format,...)
int rb_exec_err(const struct rb_exec_arg *, char *, size_t)
long rb_w32_write_console(uintptr_t, int)
VALUE rb_check_string_type(VALUE)
#define is_socket(fd, path)
void rb_gvar_readonly_setter(VALUE val, ID id, void *data, struct rb_global_variable *gvar)
RUBY_EXTERN char * strerror(int)
static VALUE argf_each_char(VALUE argf)
static VALUE rb_io_advise(int argc, VALUE *argv, VALUE io)
static VALUE rb_io_getc(VALUE io)
#define rb_str_set_len(str, length)
VALUE rb_str_locktmp(VALUE)
static long io_binwrite(VALUE str, const char *ptr, long len, rb_io_t *fptr, int nosync)
void(* finalize)(struct rb_io_t *, int)
static VALUE argf_closed(VALUE argf)
struct rb_encoding_entry * list
int rb_method_basic_definition_p(VALUE, ID)
void rb_define_variable(const char *, VALUE *)
static VALUE rb_io_s_read(int argc, VALUE *argv, VALUE io)
void rb_io_check_readable(rb_io_t *fptr)
FILE * rb_fdopen(int fd, const char *modestr)
static rb_io_t * flush_before_seek(rb_io_t *fptr)
static VALUE rb_open_file(int argc, VALUE *argv, VALUE io)
#define rb_enc_left_char_head(s, p, e, enc)
VALUE rb_ary_dup(VALUE ary)
void rb_exec_arg_fixup(struct rb_exec_arg *e)
VALUE rb_ary_concat(VALUE x, VALUE y)
static long remain_size(rb_io_t *fptr)
static VALUE argf_argv_getter(ID id, VALUE *var)
#define RETURN_ENUMERATOR(obj, argc, argv)
#define SafeStringValue(v)
VALUE rb_ary_join(VALUE ary, VALUE sep)
VALUE rb_ary_new2(long capa)
static VALUE io_reopen(VALUE io, VALUE nfile)
static VALUE rb_io_readline(int argc, VALUE *argv, VALUE io)
VALUE rb_enc_str_new(const char *, long, rb_encoding *)
VALUE rb_io_addstr(VALUE io, VALUE str)
static long ioctl_narg_len(ioctl_req_t cmd)
static VALUE internal_read_func(void *ptr)
void rb_set_class_path(VALUE, VALUE, const char *)
int rb_thread_interrupted(VALUE thval)
static VALUE rb_io_initialize(int argc, VALUE *argv, VALUE io)
static void make_writeconv(rb_io_t *fptr)
VALUE rb_io_taint_check(VALUE io)
static char NUM2CHR(VALUE x)
VALUE rb_io_puts(int argc, VALUE *argv, VALUE out)
static VALUE rb_io_readbyte(VALUE io)
const char * rb_id2name(ID id)
#define READ_CHAR_PENDING_PTR(fptr)
#define MakeOpenFile(obj, fp)
#define StringValuePtr(v)
#define MORE_CHAR_SUSPENDED
RUBY_EXTERN int dup2(int, int)
static VALUE sym_sequential
VALUE rb_str_new_frozen(VALUE)
static VALUE rb_io_s_copy_stream(int argc, VALUE *argv, VALUE io)
static void clear_writeconv(rb_io_t *fptr)
struct rb_io_enc_t convconfig_t
static VALUE fill_cbuf(rb_io_t *fptr, int ec_flags)
static VALUE rb_io_reopen(int argc, VALUE *argv, VALUE file)
rb_encoding * rb_ascii8bit_encoding(void)
static long read_buffered_data(char *ptr, long len, rb_io_t *fptr)
static VALUE sym_dontneed
void rb_warning(const char *fmt,...)
int rb_enc_find_index(const char *name)
static VALUE sym_open_args
int rb_io_read_pending(rb_io_t *fptr)
#define rb_check_frozen(obj)
#define NEED_NEWLINE_DECORATOR_ON_READ(fptr)
#define CONST_ID(var, str)
static VALUE rb_io_fileno(VALUE io)
ssize_t rb_io_bufread(VALUE io, void *buf, size_t size)
#define MODE_BTMODE(a, b, c)
VALUE rb_obj_freeze(VALUE)
static VALUE rb_f_p(int argc, VALUE *argv, VALUE self)
static VALUE argf_forward(int argc, VALUE *argv, VALUE argf)
static VALUE pipe_open_s(VALUE prog, const char *modestr, int fmode, convconfig_t *convconfig)
static VALUE rb_f_readline(int argc, VALUE *argv, VALUE recv)
VALUE rb_str_encode(VALUE str, VALUE to, int ecflags, VALUE ecopts)
char rb_w32_fd_is_text(int)
#define io_seek(fptr, ofs, whence)
static VALUE argf_fileno(VALUE argf)
static ssize_t rb_read_internal(int fd, void *buf, size_t count)
static VALUE argf_to_s(VALUE argf)
static VALUE io_alloc(VALUE klass)
#define READ_CHAR_PENDING_COUNT(fptr)
static VALUE rb_io_getline_1(VALUE rs, long limit, VALUE io)
void rb_stdio_set_default_encoding(void)
VALUE rb_str_buf_new(long)
VALUE rb_usascii_str_new(const char *, long)
void rb_io_read_check(rb_io_t *fptr)
static VALUE rb_ioctl(VALUE io, VALUE req, VALUE arg)
static VALUE io_read_nonblock(int argc, VALUE *argv, VALUE io)
static const char * rb_io_oflags_modestr(int oflags)
#define DEFULT_IOCTL_NARG_LEN
ssize_t rb_io_bufwrite(VALUE io, const void *buf, size_t size)
static VALUE argf_file(VALUE argf)
static VALUE copy_stream_finalize(VALUE arg)
static VALUE io_getc(rb_io_t *fptr, rb_encoding *enc)
#define READ_CHAR_PENDING(fptr)
static void argf_free(void *ptr)
#define READ_DATA_PENDING_PTR(fptr)
static void extract_binmode(VALUE opthash, int *fmode)
static VALUE argf_close_m(VALUE argf)
#define OBJSETUP(obj, c, t)
static VALUE select_end(VALUE arg)
VALUE rb_class_new(VALUE super)
Creates a new class.
void rb_define_method(VALUE klass, const char *name, VALUE(*func)(ANYARGS), int argc)
VALUE rb_str_append(VALUE, VALUE)
VALUE rb_file_open(const char *fname, const char *modestr)
void rb_io_check_byte_readable(rb_io_t *fptr)
VALUE rb_str_new2(const char *)
static VALUE rb_io_each_codepoint(VALUE io)
static void pipe_del_fptr(rb_io_t *fptr)
void rb_io_check_char_readable(rb_io_t *fptr)
int rb_econv_prepare_options(VALUE opthash, VALUE *ecopts, int ecflags)
void rb_econv_binmode(rb_econv_t *ec)
void rb_warn(const char *fmt,...)
static VALUE rb_io_s_foreach(int argc, VALUE *argv, VALUE self)
static VALUE rb_io_open(VALUE filename, VALUE vmode, VALUE vperm, VALUE opt)
#define ECONV_UNIVERSAL_NEWLINE_DECORATOR
VALUE rb_io_set_write_io(VALUE io, VALUE w)
static VALUE argf_initialize_copy(VALUE argf, VALUE orig)
VALUE rb_io_ungetc(VALUE io, VALUE c)
static VALUE argf_getc(VALUE argf)
void rb_econv_putback(rb_econv_t *ec, unsigned char *p, int n)
static VALUE argf_skip(VALUE argf)
void rb_io_check_closed(rb_io_t *fptr)
#define SET_BINARY_MODE(fptr)
char * strrchr(const char *, const char)
VALUE rb_exec_arg_init(int argc, VALUE *argv, int accept_shell, struct rb_exec_arg *e)
VALUE rb_econv_str_convert(rb_econv_t *ec, VALUE src, int flags)
static VALUE argf_forward_call(VALUE arg)
void rb_read_check(FILE *fp)
void rb_write_error(const char *mesg)
static int io_fillbuf(rb_io_t *fptr)
rb_encoding * rb_enc_from_index(int index)
VALUE rb_obj_class(VALUE)
VALUE rb_str_new(const char *, long)
static VALUE rb_io_s_new(int argc, VALUE *argv, VALUE klass)
static void clear_readconv(rb_io_t *fptr)