14#include "ruby/internal/config.h"
25#include "internal/error.h"
26#include "internal/hash.h"
27#include "internal/numeric.h"
28#include "internal/object.h"
29#include "internal/sanitizers.h"
30#include "internal/symbol.h"
35#define BIT_DIGITS(N) (((N)*146)/485 + 1)
37static char *fmt_setup(
char*,
size_t,
int,
int,
int,
int);
38static char *ruby_ultoa(
unsigned long val,
char *endp,
int base,
int octzero);
41sign_bits(
int base,
const char *p)
47 if (*p ==
'X') c =
'F';
69 int cr = ENC_CODERANGE(result);\
70 while ((l) >= bsiz - blen) {\
72 if (bsiz<0) rb_raise(rb_eArgError, "too big specifier");\
74 rb_str_resize(result, bsiz);\
75 ENC_CODERANGE_SET(result, cr);\
76 buf = RSTRING_PTR(result);\
79#define PUSH(s, l) do { \
84#define PUSH_(s, l) do { \
85 memcpy(&buf[blen], (s), (l));\
89#define FILL(c, l) do { \
95#define FILL_(c, l) do { \
96 memset(&buf[blen], (c), (l));\
100#define GETARG() (!UNDEF_P(nextvalue) ? nextvalue : \
103#define GETNEXTARG() ( \
104 check_next_arg(posarg, nextarg), \
105 (posarg = nextarg++, GETNTHARG(posarg)))
107#define GETPOSARG(n) ( \
108 check_pos_arg(posarg, (n)), \
109 (posarg = -1, GETNTHARG(n)))
111#define GETNTHARG(nth) \
112 (((nth) >= argc) ? (rb_raise(rb_eArgError, "too few arguments"), 0) : argv[(nth)])
114#define CHECKNAMEARG(name, len, enc) ( \
115 check_name_arg(posarg, name, len, enc), \
118#define GETNUM(n, val) \
119 (!(p = get_num(p, end, enc, &(n))) ? \
120 rb_raise(rb_eArgError, #val " too big") : (void)0)
122#define GETASTER(val) do { \
127 tmp = GETPOSARG(n); \
130 tmp = GETNEXTARG(); \
133 (val) = NUM2INT(tmp); \
137get_num(
const char *p,
const char *end, rb_encoding *enc,
int *valp)
141 if (MUL_OVERFLOW_INT_P(10, next_n))
144 if (INT_MAX - (*p -
'0') < next_n)
149 rb_raise(rb_eArgError,
"malformed format string - %%*[0-9]");
156check_next_arg(
int posarg,
int nextarg)
160 rb_raise(rb_eArgError,
"unnumbered(%d) mixed with numbered", nextarg);
162 rb_raise(rb_eArgError,
"unnumbered(%d) mixed with named", nextarg);
167check_pos_arg(
int posarg,
int n)
170 rb_raise(rb_eArgError,
"numbered(%d) after unnumbered(%d)", n, posarg);
173 rb_raise(rb_eArgError,
"numbered(%d) after named", n);
176 rb_raise(rb_eArgError,
"invalid index - %d$", n);
181check_name_arg(
int posarg,
const char *name,
int len, rb_encoding *enc)
184 rb_enc_raise(enc, rb_eArgError,
"named%.*s after unnumbered(%d)",
len, name, posarg);
187 rb_enc_raise(enc, rb_eArgError,
"named%.*s after numbered",
len, name);
192get_hash(
volatile VALUE *hash,
int argc,
const VALUE *argv)
196 if (!UNDEF_P(*hash))
return *hash;
198 rb_raise(rb_eArgError,
"one hash required");
200 tmp = rb_check_hash_type(argv[1]);
202 rb_raise(rb_eArgError,
"one hash required");
204 return (*hash = tmp);
216 enum {default_float_precision = 6};
225 int width, prec, flags = FNONE;
234#define CHECK_FOR_WIDTH(f) \
235 if ((f) & FWIDTH) { \
236 rb_raise(rb_eArgError, "width given twice"); \
238 if ((f) & FPREC0) { \
239 rb_raise(rb_eArgError, "width after precision"); \
241#define CHECK_FOR_FLAGS(f) \
242 if ((f) & FWIDTH) { \
243 rb_raise(rb_eArgError, "flag after width"); \
245 if ((f) & FPREC0) { \
246 rb_raise(rb_eArgError, "flag after precision"); \
249#define update_coderange(partial) do { \
250 if (coderange != ENC_CODERANGE_BROKEN && scanned < blen) { \
251 int cr = coderange; \
252 scanned += rb_str_coderange_scan_restartable(buf+scanned, buf+blen, enc, &cr); \
253 ENC_CODERANGE_SET(result, \
254 (partial && cr == ENC_CODERANGE_UNKNOWN ? \
255 ENC_CODERANGE_BROKEN : (coderange = cr))); \
261 enc = rb_enc_get(fmt);
264 fmt = rb_str_tmp_frozen_acquire(fmt);
265 p = RSTRING_PTR(fmt);
266 end = p + RSTRING_LEN(fmt);
269 result = rb_str_buf_new(bsiz);
270 rb_enc_associate(result, enc);
271 buf = RSTRING_PTR(result);
272 memset(buf, 0, bsiz);
275 for (; p < end; p++) {
280 for (t = p; t < end && *t !=
'%'; t++) ;
282 rb_raise(rb_eArgError,
"incomplete format specifier; use %%%% (double %%) instead");
285 update_coderange(FALSE);
298 rb_raise(rb_eArgError,
"malformed format string - %%%c", *p);
300 rb_raise(rb_eArgError,
"malformed format string");
304 CHECK_FOR_FLAGS(flags);
310 CHECK_FOR_FLAGS(flags);
316 CHECK_FOR_FLAGS(flags);
322 CHECK_FOR_FLAGS(flags);
328 CHECK_FOR_FLAGS(flags);
333 case '1':
case '2':
case '3':
case '4':
334 case '5':
case '6':
case '7':
case '8':
case '9':
338 if (!UNDEF_P(nextvalue)) {
339 rb_raise(rb_eArgError,
"value given twice - %d$", n);
341 nextvalue = GETPOSARG(n);
345 CHECK_FOR_WIDTH(flags);
353 const char *start = p;
354 char term = (*p ==
'<') ?
'>' :
'}';
357 for (; p < end && *p != term; ) {
358 p += rb_enc_mbclen(p, end, enc);
361 rb_raise(rb_eArgError,
"malformed name - unmatched parenthesis");
363#if SIZEOF_INT < SIZEOF_SIZE_T
364 if ((
size_t)(p - start) >= INT_MAX) {
365 const int message_limit = 20;
368 "too long name (%"PRIuSIZE
" bytes) - %.*s...%c",
369 (
size_t)(p - start - 2),
len, start, term);
372 len = (int)(p - start + 1);
374 rb_enc_raise(enc, rb_eArgError,
"named%.*s after <%"PRIsVALUE
">",
377 CHECKNAMEARG(start,
len, enc);
378 get_hash(&hash, argc, argv);
382 if (!
NIL_P(sym)) nextvalue = rb_hash_lookup2(hash, sym,
Qundef);
383 if (UNDEF_P(nextvalue)) {
385 sym = rb_sym_intern(start + 1,
389 nextvalue = rb_hash_default_value(hash, sym);
390 if (
NIL_P(nextvalue)) {
391 rb_key_err_raise(
rb_enc_sprintf(enc,
"key%.*s not found",
len, start), hash, sym);
394 if (term ==
'}')
goto format_s;
400 CHECK_FOR_WIDTH(flags);
406 if (width < 0) rb_raise(rb_eArgError,
"width too big");
412 if (flags & FPREC0) {
413 rb_raise(rb_eArgError,
"precision given twice");
415 flags |= FPREC|FPREC0;
428 GETNUM(prec, precision);
436 if (flags != FNONE) {
437 rb_raise(rb_eArgError,
"invalid format character - %%");
444 VALUE val = GETARG();
457 if (n >= 0) n = rb_enc_codelen((c = n), enc);
459 rb_raise(rb_eArgError,
"invalid character");
461 int encidx = rb_ascii8bit_appendable_encoding_index(enc, c);
462 if (encidx >= 0 && encidx != rb_enc_to_index(enc)) {
464 rb_enc_associate_index(result, encidx);
465 enc = rb_enc_from_index(encidx);
468 if (!(flags & FWIDTH)) {
470 rb_enc_mbcput(c, &buf[blen], enc);
473 else if ((flags & FMINUS)) {
475 CHECK(n + (width > 0 ? width : 0));
476 rb_enc_mbcput(c, &buf[blen], enc);
478 if (width > 0) FILL_(
' ', width);
482 CHECK(n + (width > 0 ? width : 0));
483 if (width > 0) FILL_(
' ', width);
484 rb_enc_mbcput(c, &buf[blen], enc);
494 VALUE arg = GETARG();
501 str = rb_obj_as_string(arg);
504 len = RSTRING_LEN(str);
505 rb_str_set_len(result, blen);
506 update_coderange(TRUE);
507 enc = rb_enc_check(result, str);
508 if (flags&(FPREC|FWIDTH)) {
511 rb_raise(rb_eArgError,
"invalid mbstring sequence");
513 if ((flags&FPREC) && (prec < slen)) {
514 char *p =
rb_enc_nth(RSTRING_PTR(str), RSTRING_END(str),
517 len = p - RSTRING_PTR(str);
520 if ((flags&FWIDTH) && (width > slen)) {
523 if (!(flags&FMINUS)) {
527 memcpy(&buf[blen], RSTRING_PTR(str),
len);
533 rb_enc_associate(result, enc);
537 PUSH(RSTRING_PTR(str),
len);
539 rb_enc_associate(result, enc);
552 volatile VALUE val = GETARG();
554 char nbuf[BIT_DIGITS(SIZEOF_LONG*CHAR_BIT)+2], *s;
555 const char *prefix = 0;
556 int sign = 0, dots = 0;
559 int base, bignum = 0;
572 if (flags&(FPLUS|FSPACE)) sign = 1;
575 if (flags & FSHARP) {
580 prefix =
"0x";
break;
582 prefix =
"0X";
break;
584 prefix =
"0b";
break;
586 prefix =
"0B";
break;
602 val = rb_str_to_inum(val, 0, TRUE);
632 int numbits = ffs(base)-1;
634 size_t numdigits = rb_absint_numwords(val, numbits, &abs_nlz_bits);
636 if (INT_MAX-1 < numdigits)
637 rb_raise(rb_eArgError,
"size too big");
642 valsign = rb_integer_pack(val, RSTRING_PTR(tmp), RSTRING_LEN(tmp),
644 for (i = 0; i < RSTRING_LEN(tmp); i++)
645 RSTRING_PTR(tmp)[i] = ruby_digitmap[((
unsigned char *)RSTRING_PTR(tmp))[i]];
646 s = RSTRING_PTR(tmp);
651 else if (flags & FPLUS) {
655 else if (flags & FSPACE) {
670 if (numdigits == 0 ||
671 ((abs_nlz_bits != (
size_t)(numbits-1) ||
672 !rb_absint_singlebit_p(val)) &&
673 (!bignum ? v < 0 : BIGNUM_NEGATIVE_P(val))))
676 valsign = rb_integer_pack(val, RSTRING_PTR(tmp), RSTRING_LEN(tmp),
678 for (i = 0; i < RSTRING_LEN(tmp); i++)
679 RSTRING_PTR(tmp)[i] = ruby_digitmap[((
unsigned char *)RSTRING_PTR(tmp))[i]];
680 s = RSTRING_PTR(tmp);
693 else if (flags & FPLUS) {
697 else if (flags & FSPACE) {
701 s = ruby_ultoa((
unsigned long)v, nbuf +
sizeof(nbuf), 10, 0);
702 len = (int)(nbuf +
sizeof(nbuf) - s);
705 tmp = rb_big2str(val, 10);
706 s = RSTRING_PTR(tmp);
714 else if (flags & FPLUS) {
718 else if (flags & FSPACE) {
733 while ((c = (
int)(
unsigned char)*pp) != 0) {
734 *pp = rb_enc_toupper(c, enc);
738 if (prefix && !prefix[1]) {
742 else if (
len == 1 && *s ==
'0') {
744 if (flags & FPREC) prec--;
746 else if ((flags & FPREC) && (prec >
len)) {
750 else if (
len == 1 && *s ==
'0') {
754 width -= (int)strlen(prefix);
756 if ((flags & (FZERO|FMINUS|FPREC)) == FZERO) {
762 if (!prefix && prec == 0 &&
len == 1 && *s ==
'0')
len = 0;
767 if (!(flags&FMINUS)) {
771 if (sc) PUSH(&sc, 1);
773 int plen = (int)strlen(prefix);
776 if (dots) PUSH(
"..", 2);
779 if (!sign && valsign < 0) {
780 char c = sign_bits(base, p);
781 FILL_(c, prec -
len);
783 else if ((flags & (FMINUS|FPREC)) != FMINUS) {
784 FILL_(
'0', prec -
len);
795 VALUE val = GETARG(), num, den;
796 int sign = (flags&FPLUS) ? 1 : 0, zero = 0;
810 if (!(flags&FPREC)) prec = default_float_precision;
818 else if (BIGNUM_NEGATIVE_P(num)) {
820 num = rb_big_uminus(num);
823 num = rb_int_mul(num, rb_int_positive_pow(10, prec));
824 num = rb_int_plus(num, rb_int_idiv(den,
INT2FIX(2)));
825 num = rb_int_idiv(num, den);
827 else if (prec >= 0) {
830 val = rb_int2str(num, 10);
831 len = RSTRING_LEN(val) + zero;
832 if (prec >=
len)
len = prec + 1;
833 if (sign || (flags&FSPACE)) ++
len;
835 fill = width >
len ? width -
len : 0;
837 if (fill && !(flags&(FMINUS|FZERO))) {
840 if (sign || (flags&FSPACE)) {
841 buf[blen++] = sign > 0 ?
'+' : sign < 0 ?
'-' :
' ';
843 if (fill && (flags&(FMINUS|FZERO)) == FZERO) {
846 len = RSTRING_LEN(val) + zero;
847 t = RSTRING_PTR(val);
849 PUSH_(t,
len - prec);
860 else if (prec >
len) {
861 FILL_(
'0', prec -
len);
865 PUSH_(t +
len - prec, prec);
867 if (fill && (flags&FMINUS)) {
882 VALUE val = GETARG();
886 if (!isfinite(fval)) {
898 need = (int)strlen(expr);
900 if (!isnan(fval) && fval < 0.0)
902 else if (flags & (FPLUS|FSPACE))
903 sign = (flags & FPLUS) ?
'+' :
' ';
906 if ((flags & FWIDTH) && need < width)
910 if (flags & FMINUS) {
912 buf[blen - need--] = sign;
913 memcpy(&buf[blen - need], expr, elen);
917 buf[blen - elen - 1] = sign;
918 memcpy(&buf[blen - elen], expr, elen);
924 char fbuf[2*BIT_DIGITS(SIZEOF_INT*CHAR_BIT)+10];
925 char *fmt = fmt_setup(fbuf,
sizeof(fbuf), *p, flags, width, prec);
926 rb_str_set_len(result, blen);
927 rb_str_catf(result, fmt, fval);
938 update_coderange(FALSE);
940 rb_str_tmp_frozen_release(orig, fmt);
943 if (posarg >= 0 && nextarg < argc) {
944 const char *mesg =
"too many arguments for format string";
948 rb_str_resize(result, blen);
954fmt_setup(
char *buf,
size_t size,
int c,
int flags,
int width,
int prec)
961 buf = ruby_ultoa(prec, buf, 10, 0);
965 if (flags & FWIDTH) {
966 buf = ruby_ultoa(width, buf, 10, 0);
969 if (flags & FSPACE) *--buf =
' ';
970 if (flags & FZERO) *--buf =
'0';
971 if (flags & FMINUS) *--buf =
'-';
972 if (flags & FPLUS) *--buf =
'+';
973 if (flags & FSHARP) *--buf =
'#';
979#define FILE rb_printf_buffer
980#define __sbuf rb_printf_sbuf
981#define __sFILE rb_printf_sfile
986#if SIZEOF_LONG < SIZEOF_LONG_LONG
987# if SIZEOF_LONG_LONG == SIZEOF_VOIDP
992# define _HAVE_SANE_QUAD_
993# define quad_t LONG_LONG
994# define u_quad_t unsigned LONG_LONG
996#define FLOATING_POINT 1
997#define BSD__dtoa ruby_dtoa
998#define BSD__hdtoa ruby_hdtoa
999#ifdef RUBY_PRI_VALUE_MARK
1000# define PRI_EXTRA_MARK RUBY_PRI_VALUE_MARK
1002#define lower_hexdigits (ruby_hexdigits+0)
1003#define upper_hexdigits (ruby_hexdigits+16)
1004#include "vsnprintf.c"
1007ruby_ultoa(
unsigned long val,
char *endp,
int base,
int flags)
1009 const char *xdigs = lower_hexdigits;
1010 int octzero = flags & FSHARP;
1011 return BSD__ultoa(val, endp, base, octzero, xdigs);
1014static int ruby_do_vsnprintf(
char *str,
size_t n,
const char *fmt, va_list ap);
1019 if (str && (ssize_t)n < 1)
1021 return ruby_do_vsnprintf(str, n, fmt, ap);
1025ruby_do_vsnprintf(
char *str,
size_t n,
const char *fmt, va_list ap)
1030 f._flags = __SWR | __SSTR;
1031 f._bf._base = f._p = (
unsigned char *)str;
1032 f._bf._size = f._w = str ? (n - 1) : 0;
1033 f.vwrite = BSD__sfvwrite;
1035 ret = BSD_vfprintf(&f, fmt, ap);
1037#if SIZEOF_SIZE_T > SIZEOF_INT
1038 if (n > INT_MAX)
return INT_MAX;
1044ruby_snprintf(
char *str,
size_t n,
char const *fmt, ...)
1049 if (str && (ssize_t)n < 1)
1053 ret = ruby_do_vsnprintf(str, n, fmt, ap);
1059 rb_printf_buffer base;
1060 volatile VALUE value;
1064ruby__sfvwrite(
register rb_printf_buffer *fp,
register struct __suio *uio)
1068 char *buf = (
char*)fp->_p;
1070 long blen = buf - RSTRING_PTR(result), bsiz = fp->_w;
1072 if (
RBASIC(result)->klass) {
1075 if (uio->uio_resid == 0)
1077#if SIZE_MAX > LONG_MAX
1078 if (uio->uio_resid >= LONG_MAX)
1081 len = (long)uio->uio_resid;
1085 for (iov = uio->uio_iov;
len > 0; ++iov) {
1086 MEMCPY(buf, iov->iov_base,
char, n = iov->iov_len);
1090 fp->_p = (
unsigned char *)buf;
1091 rb_str_set_len(result, buf - RSTRING_PTR(result));
1096ruby__sfvextra(rb_printf_buffer *fp,
size_t valsize,
void *valp,
long *sz,
int sign)
1102 if (valsize !=
sizeof(
VALUE))
return 0;
1103 value = *(
VALUE *)valp;
1104 if (
RBASIC(result)->klass) {
1108# define LITERAL(str) (*sz = rb_strlen_lit(str), str)
1111# define LITERAL_CASE(x) case Q##x: return LITERAL(#x)
1114 LITERAL_CASE(
false);
1122 if (sign ==
' ' && !rb_str_symname_p(value)) {
1123 value = rb_str_escape(value);
1127 value = rb_obj_as_string(value);
1128 if (sign ==
' ') value = QUOTE(value);
1130 enc = rb_enc_compatible(result, value);
1132 rb_enc_associate(result, enc);
1135 enc = rb_enc_get(result);
1139 *(
volatile VALUE *)valp = value;
1148ruby_vsprintf0(
VALUE result,
char *p,
const char *fmt, va_list ap)
1151#define f buffer.base
1158 f._flags = __SWR | __SSTR;
1161 f._bf._base = (
unsigned char *)result;
1162 f._p = (
unsigned char *)p;
1163 RBASIC_CLEAR_CLASS(result);
1164 f.vwrite = ruby__sfvwrite;
1165 f.vextra = ruby__sfvextra;
1167 BSD_vfprintf(&f, fmt, ap);
1168 RBASIC_SET_CLASS_RAW(result, klass);
1169 p = RSTRING_PTR(result);
1170 long blen = (
char *)f._p - p;
1171 if (scanned < blen) {
1175 rb_str_resize(result, blen);
1182 const int initial_len = 120;
1185 result = rb_str_buf_new(initial_len);
1189 rb_raise(rb_eArgError,
"cannot construct wchar_t based encoding string: %s",
1192 rb_enc_associate(result, enc);
1194 ruby_vsprintf0(result, RSTRING_PTR(result), fmt, ap);
1204 va_start(ap, format);
1218rb_sprintf(
const char *format, ...)
1223 va_start(ap, format);
1231rb_str_vcatf(
VALUE str,
const char *fmt, va_list ap)
1235 ruby_vsprintf0(str, RSTRING_END(str), fmt, ap);
1241rb_str_catf(
VALUE str,
const char *format, ...)
1245 va_start(ap, format);
1246 str = rb_str_vcatf(str, format, ap);
ruby_coderange_type
What rb_enc_str_coderange() returns.
static bool rb_enc_isprint(OnigCodePoint c, rb_encoding *enc)
Identical to rb_isprint(), except it additionally takes an encoding.
static bool rb_enc_isdigit(OnigCodePoint c, rb_encoding *enc)
Identical to rb_isdigit(), except it additionally takes an encoding.
VALUE rb_enc_vsprintf(rb_encoding *enc, const char *fmt, va_list ap)
Identical to rb_enc_sprintf(), except it takes a va_list instead of variadic arguments.
VALUE rb_enc_sprintf(rb_encoding *enc, const char *fmt,...)
Identical to rb_sprintf(), except it additionally takes an encoding.
#define TYPE(_)
Old name of rb_type.
#define RB_INTEGER_TYPE_P
Old name of rb_integer_type_p.
#define ENC_CODERANGE_7BIT
Old name of RUBY_ENC_CODERANGE_7BIT.
#define ENC_CODERANGE_VALID
Old name of RUBY_ENC_CODERANGE_VALID.
#define RFLOAT_VALUE
Old name of rb_float_value.
#define T_STRING
Old name of RUBY_T_STRING.
#define Qundef
Old name of RUBY_Qundef.
#define INT2FIX
Old name of RB_INT2FIX.
#define T_FLOAT
Old name of RUBY_T_FLOAT.
#define T_BIGNUM
Old name of RUBY_T_BIGNUM.
#define ECONV_UNDEF_REPLACE
Old name of RUBY_ECONV_UNDEF_REPLACE.
#define T_FIXNUM
Old name of RUBY_T_FIXNUM.
#define ENC_CODERANGE(obj)
Old name of RB_ENC_CODERANGE.
#define ENC_CODERANGE_UNKNOWN
Old name of RUBY_ENC_CODERANGE_UNKNOWN.
#define FIXABLE
Old name of RB_FIXABLE.
#define LONG2FIX
Old name of RB_INT2FIX.
#define ECONV_INVALID_REPLACE
Old name of RUBY_ECONV_INVALID_REPLACE.
#define T_RATIONAL
Old name of RUBY_T_RATIONAL.
#define LONG2NUM
Old name of RB_LONG2NUM.
#define NUM2INT
Old name of RB_NUM2INT.
#define Qnil
Old name of RUBY_Qnil.
#define FIX2LONG
Old name of RB_FIX2LONG.
#define NIL_P
Old name of RB_NIL_P.
#define FIXNUM_P
Old name of RB_FIXNUM_P.
#define ENC_CODERANGE_SET(obj, cr)
Old name of RB_ENC_CODERANGE_SET.
#define SYMBOL_P
Old name of RB_SYMBOL_P.
#define ruby_debug
This variable controls whether the interpreter is in debug mode.
#define ruby_verbose
This variable controls whether the interpreter is in debug mode.
VALUE rb_eRuntimeError
RuntimeError exception.
void rb_warn(const char *fmt,...)
Identical to rb_warning(), except it reports unless $VERBOSE is nil.
void rb_enc_raise(rb_encoding *enc, VALUE exc, const char *fmt,...)
Identical to rb_raise(), except it additionally takes an encoding.
VALUE rb_Float(VALUE val)
This is the logic behind Kernel#Float.
VALUE rb_Integer(VALUE val)
This is the logic behind Kernel#Integer.
VALUE rb_inspect(VALUE obj)
Generates a human-readable textual representation of the given object.
static char * rb_enc_right_char_head(const char *s, const char *p, const char *e, rb_encoding *enc)
Queries the right boundary of a character.
static int rb_enc_mbminlen(rb_encoding *enc)
Queries the minimum number of bytes that the passed encoding needs to represent a character.
char * rb_enc_nth(const char *head, const char *tail, long nth, rb_encoding *enc)
Queries the n-th character.
VALUE rb_str_conv_enc_opts(VALUE str, rb_encoding *from, rb_encoding *to, int ecflags, VALUE ecopts)
Identical to rb_str_conv_enc(), except it additionally takes IO encoder options.
long rb_enc_strlen(const char *head, const char *tail, rb_encoding *enc)
Counts the number of characters of the passed string, according to the passed encoding.
long rb_str_coderange_scan_restartable(const char *str, const char *end, rb_encoding *enc, int *cr)
Scans the passed string until it finds something odd.
VALUE rb_check_symbol_cstr(const char *ptr, long len, rb_encoding *enc)
Identical to rb_check_id_cstr(), except for the return type.
#define INTEGER_PACK_BIG_ENDIAN
Big endian combination.
#define INTEGER_PACK_2COMP
Uses 2's complement representation.
VALUE rb_rational_num(VALUE rat)
Queries the numerator of the passed Rational.
VALUE rb_rational_den(VALUE rat)
Queries the denominator of the passed Rational.
#define rb_str_new(str, len)
Allocates an instance of rb_cString.
size_t rb_str_capacity(VALUE str)
Queries the capacity of the given string.
void rb_must_asciicompat(VALUE obj)
Asserts that the given string's encoding is (Ruby's definition of) ASCII compatible.
VALUE rb_check_string_type(VALUE obj)
Try converting an object to its stringised representation using its to_str method,...
VALUE rb_sym2str(VALUE id)
Identical to rb_id2str(), except it takes an instance of rb_cSymbol rather than an ID.
int len
Length of the buffer.
VALUE rb_str_format(int argc, const VALUE *argv, VALUE fmt)
Formats a string.
VALUE rb_f_sprintf(int argc, const VALUE *argv)
Identical to rb_str_format(), except how the arguments are arranged.
VALUE rb_vsprintf(const char *fmt, va_list ap)
Identical to rb_sprintf(), except it takes a va_list.
#define rb_long2int
Just another name of rb_long2int_inline.
#define MEMCPY(p1, p2, type, n)
Handy macro to call memcpy.
#define RB_GC_GUARD(v)
Prevents premature destruction of local objects.
#define RBASIC(obj)
Convenient casting macro.
#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.
#define StringValueCStr(v)
Identical to StringValuePtr, except it additionally checks for the contents for viability as a C stri...
int ruby_vsnprintf(char *str, size_t n, char const *fmt, va_list ap)
Identical to ruby_snprintf(), except it takes a va_list.
#define RTEST
This is an old name of RB_TEST.
intptr_t SIGNED_VALUE
A signed integer type that has the same width with VALUE.
uintptr_t VALUE
Type that represents a Ruby object.