1#ifndef INTERNAL_STRING_H
2#define INTERNAL_STRING_H
11#include "ruby/internal/config.h"
13#include "internal/compilers.h"
18#define STR_NOEMBED FL_USER1
19#define STR_SHARED FL_USER2
22# undef rb_fstring_cstr
27VALUE rb_fstring_cstr(
const char *str);
29int rb_str_buf_cat_escaped_char(
VALUE result,
unsigned int c,
int unicode_p);
30int rb_str_symname_p(
VALUE);
32char *rb_str_fill_terminator(
VALUE str,
const int termlen);
33void rb_str_change_terminator_length(
VALUE str,
const int oldtermlen,
const int termlen);
37VALUE rb_str_cat_conv_enc_opts(
VALUE newstr,
long ofs,
const char *ptr,
long len,
41size_t rb_str_memsize(
VALUE);
42char *rb_str_to_cstr(
VALUE str);
43const char *ruby_escaped_char(
int c);
44void rb_str_make_independent(
VALUE str);
46int rb_ascii8bit_appendable_encoding_index(
rb_encoding *enc,
unsigned int code);
49static inline bool STR_EMBED_P(
VALUE str);
50static inline bool STR_SHARED_P(
VALUE str);
52static inline VALUE QUOTE_ID(
ID v);
53static inline bool is_ascii_string(
VALUE str);
54static inline bool is_broken_string(
VALUE str);
55static inline VALUE rb_str_eql_internal(
const VALUE str1,
const VALUE str2);
57RUBY_SYMBOL_EXPORT_BEGIN
60void rb_str_tmp_frozen_release(
VALUE str,
VALUE tmp);
64void rb_str_make_embedded(
VALUE);
65size_t rb_str_size_as_embedded(
VALUE);
66bool rb_str_reembeddable_p(
VALUE);
69VALUE rb_fstring_new(
const char *ptr,
long len);
72VALUE rb_str_concat_literals(
size_t num,
const VALUE *strary);
74VALUE rb_id_quote_unprintable(
ID);
75VALUE rb_sym_proc_call(
ID mid,
int argc,
const VALUE *argv,
int kw_splat,
VALUE passed_proc);
80#define rb_fstring_lit(str) rb_fstring_new((str), rb_strlen_lit(str))
81#define rb_fstring_literal(str) rb_fstring_lit(str)
82#define rb_fstring_enc_lit(str, enc) rb_fstring_enc_new((str), rb_strlen_lit(str), (enc))
83#define rb_fstring_enc_literal(str, enc) rb_fstring_enc_lit(str, enc)
88 return rb_str_quote_unprintable(v);
94 return rb_id_quote_unprintable(i);
104STR_SHARED_P(
VALUE str)
106 return FL_ALL_RAW(str, STR_NOEMBED | STR_SHARED);
110is_ascii_string(
VALUE str)
116is_broken_string(
VALUE str)
122at_char_boundary(
const char *s,
const char *p,
const char *e,
rb_encoding *enc)
128at_char_right_boundary(
const char *s,
const char *p,
const char *e,
rb_encoding *enc)
139rb_str_eql_internal(
const VALUE str1,
const VALUE str2)
141 const long len = RSTRING_LEN(str1);
142 const char *ptr1, *ptr2;
144 if (
len != RSTRING_LEN(str2))
return Qfalse;
146 if ((ptr1 = RSTRING_PTR(str1)) == (ptr2 = RSTRING_PTR(str2)))
148 if (memcmp(ptr1, ptr2,
len) == 0)
153#if __has_builtin(__builtin_constant_p)
154# define rb_fstring_cstr(str) \
155 (__builtin_constant_p(str) ? \
156 rb_fstring_new((str), (long)strlen(str)) : \
157 (rb_fstring_cstr)(str))
#define RUBY_ASSERT(expr)
Asserts that the given expression is truthy if and only if RUBY_DEBUG is truthy.
#define ENC_CODERANGE_7BIT
Old name of RUBY_ENC_CODERANGE_7BIT.
#define FL_TEST_RAW
Old name of RB_FL_TEST_RAW.
#define Qtrue
Old name of RUBY_Qtrue.
#define Qfalse
Old name of RUBY_Qfalse.
#define ENC_CODERANGE_BROKEN
Old name of RUBY_ENC_CODERANGE_BROKEN.
#define FL_ALL_RAW
Old name of RB_FL_ALL_RAW.
static char * rb_enc_left_char_head(const char *s, const char *p, const char *e, rb_encoding *enc)
Queries the left boundary of a character.
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.
int rb_enc_str_coderange(VALUE str)
Scans the passed string to collect its code range.
int rb_str_comparable(VALUE str1, VALUE str2)
Checks if two strings are comparable each other or not.
int len
Length of the buffer.
uintptr_t ID
Type that represents a Ruby identifier such as a variable name.
uintptr_t VALUE
Type that represents a Ruby object.