| /openbsd/src/gnu/usr.bin/perl/ |
| D | mathoms.c | 167 Perl_sv_2pv(pTHX_ SV *sv, STRLEN *lp) in Perl_sv_2pv() 267 Perl_sv_catpvn(pTHX_ SV *dsv, const char* sstr, STRLEN slen) in Perl_sv_catpvn() 275 Perl_sv_catpvn_mg(pTHX_ SV *dsv, const char *sstr, STRLEN len) in Perl_sv_catpvn_mg() 331 Perl_sv_pvn_force(pTHX_ SV *sv, STRLEN *lp) in Perl_sv_pvn_force() 383 STRLEN 478 Perl_is_utf8_string_loc(const U8 *s, const STRLEN len, const U8 **ep) in Perl_is_utf8_string_loc() 531 Perl_sv_usepvn_mg(pTHX_ SV *sv, char *ptr, STRLEN len) in Perl_sv_usepvn_mg() 540 Perl_sv_usepvn(pTHX_ SV *sv, char *ptr, STRLEN len) in Perl_sv_usepvn() 590 STRLEN klen; in Perl_hv_store() 607 STRLEN klen; in Perl_hv_exists() [all …]
|
| D | doop.c | 42 STRLEN len; in S_do_trans_simple() 79 STRLEN ulen; in S_do_trans_simple() 128 STRLEN len; in S_do_trans_count() 149 STRLEN ulen; in S_do_trans_count() 177 STRLEN len; in S_do_trans_complex() 264 STRLEN len; in S_do_trans_complex() 338 STRLEN len; in S_do_trans_count_invmap() 362 STRLEN s_len; in S_do_trans_count_invmap() 410 STRLEN len; in S_do_trans_invmap() 425 STRLEN s_len; in S_do_trans_invmap() [all …]
|
| D | utf8.c | 210 STRLEN utf8_skip = OFFUNISKIP(input_uv); in Perl_uvoffuni_to_utf8_flags_msgs() 495 S_is_utf8_overlong(const U8 * const s, const STRLEN len) in S_is_utf8_overlong() 560 S_isFF_overlong(const U8 * const s, const STRLEN len) in S_isFF_overlong() 642 const STRLEN len = e - s; in S_does_utf8_overflow() 757 STRLEN 939 Perl__byte_dump_string(pTHX_ const U8 * const start, const STRLEN len, const bool format) in Perl__byte_dump_string() 952 const STRLEN output_len = 4 * len + 1; /* 4 bytes per each input, plus a in Perl__byte_dump_string() 1002 STRLEN print_len, in S_unexpected_non_continuation_text() 1005 const STRLEN non_cont_byte_pos, in S_unexpected_non_continuation_text() 1008 const STRLEN expect_len) in S_unexpected_non_continuation_text() [all …]
|
| D | util.h | 113 STRLEN object_name_offset; /* pathname of the shared object */ 114 STRLEN object_name_size; /* length of the pathname */ 115 STRLEN symbol_name_offset; /* symbol name */ 116 STRLEN symbol_name_size; /* length of the symbol name */ 117 STRLEN source_name_offset; /* source code file name */ 118 STRLEN source_name_size; /* length of the source code file name */ 119 STRLEN source_line_number; /* source code line number */
|
| D | proto.h | 91 Perl__byte_dump_string(pTHX_ const U8 * const start, const STRLEN len, const bool format); 143 Perl__to_uni_fold_flags(pTHX_ UV c, U8 *p, STRLEN *lenp, U8 flags); 148 Perl__to_utf8_fold_flags(pTHX_ const U8 *p, const U8 *e, U8 *ustrp, STRLEN *lenp, U8 flags); 153 Perl__to_utf8_lower_flags(pTHX_ const U8 *p, const U8 *e, U8 *ustrp, STRLEN *lenp, bool flags); 158 Perl__to_utf8_title_flags(pTHX_ const U8 *p, const U8 *e, U8 *ustrp, STRLEN *lenp, bool flags); 163 Perl__to_utf8_upper_flags(pTHX_ const U8 *p, const U8 *e, U8 *ustrp, STRLEN *lenp, bool flags); 168 Perl__utf8n_to_uvchr_msgs_helper(const U8 *s, STRLEN curlen, STRLEN *retlen, const U32 flags, U32 *… 185 Perl_allocmy(pTHX_ const char * const name, const STRLEN len, const U32 flags) 217 Perl_apply_attrs_string(pTHX_ const char *stashpv, CV *cv, const char *attrstr, STRLEN len); 412 Perl_bytes_cmp_utf8(pTHX_ const U8 *b, STRLEN blen, const U8 *u, STRLEN ulen); [all …]
|
| D | embed.fnc | 212 : =for apidoc Am|char* |SvPV |SV* sv|STRLEN len 213 : =for apidoc_item |const char*|SvPV_const |SV* sv|STRLEN len 620 |const STRLEN len \ 646 |STRLEN len 736 |const STRLEN len \ 739 |STRLEN blen \ 741 |STRLEN ulen 743 |NN STRLEN *lenp \ 747 |NN STRLEN *lenp \ 751 |NN STRLEN *lenp [all …]
|
| D | inline.h | 285 S_strip_spaces(pTHX_ const char * orig, STRLEN * const len) in S_strip_spaces() 325 PERL_STATIC_INLINE STRLEN 326 S_MgBYTEPOS(pTHX_ MAGIC *mg, SV *sv, const char *s, STRLEN len) in S_MgBYTEPOS() 331 return (STRLEN)mg->mg_len; in S_MgBYTEPOS() 333 const STRLEN pos = (STRLEN)mg->mg_len; in S_MgBYTEPOS() 1262 Perl_valid_utf8_to_uvchr(const U8 *s, STRLEN *retlen) in Perl_valid_utf8_to_uvchr() 1345 Perl_is_utf8_invariant_string_loc(const U8* const s, STRLEN len, const U8 ** ep) in Perl_is_utf8_invariant_string_loc() 1381 if ((STRLEN) (send - x) >= PERL_WORDSIZE in Perl_is_utf8_invariant_string_loc() 1920 if ((STRLEN) (e - x) >= PERL_WORDSIZE in S_variant_under_utf8_count() 2026 Perl_is_utf8_non_invariant_string(const U8* const s, STRLEN len) in Perl_is_utf8_non_invariant_string() [all …]
|
| D | dquote.c | 84 const STRLEN valids_len, /* length of input before first bad char */ in Perl_form_alien_digit_msg() 114 (STRLEN) -1, UNI_DISPLAY_QQ); in Perl_form_alien_digit_msg() 272 STRLEN numbers_len; in Perl_grok_bslash_o() 273 STRLEN trailing_blanks_len = 0; in Perl_grok_bslash_o() 347 if (numbers_len + trailing_blanks_len != (STRLEN) (e - *s)) { in Perl_grok_bslash_o() 419 STRLEN numbers_len; in Perl_grok_bslash_x() 420 STRLEN trailing_blanks_len = 0; in Perl_grok_bslash_x() 537 if (numbers_len + trailing_blanks_len != (STRLEN) (e - *s)) { in Perl_grok_bslash_x()
|
| D | sv.c | 1333 STRLEN delta; in Perl_sv_backoff() 1368 Perl_sv_grow(pTHX_ SV *const sv, STRLEN newlen) in Perl_sv_grow() 1410 STRLEN minlen = SvCUR(sv); in Perl_sv_grow() 1419 STRLEN rounded = PERL_STRLEN_ROUNDUP(newlen); in Perl_sv_grow() 1459 Perl_sv_grow_fresh(pTHX_ SV *const sv, STRLEN newlen) in Perl_sv_grow_fresh() 1751 S_sv_display(pTHX_ SV *const sv, char *tmpbuf, STRLEN tmpbuf_size) { in S_sv_display() 1868 STRLEN len; in Perl_looks_like_number() 2177 const STRLEN cur = SvCUR(sv); in S_sv_2iuv_common() 2920 Perl_sv_2pv_flags(pTHX_ SV *const sv, STRLEN *const lp, const U32 flags) in Perl_sv_2pv_flags() 2970 STRLEN len; in Perl_sv_2pv_flags() [all …]
|
| D | numeric.c | 242 Perl_grok_bin(pTHX_ const char *start, STRLEN *len_p, I32 *flags, NV *result) in Perl_grok_bin() 283 Perl_grok_hex(pTHX_ const char *start, STRLEN *len_p, I32 *flags, NV *result) in Perl_grok_hex() 324 Perl_grok_oct(pTHX_ const char *start, STRLEN *len_p, I32 *flags, NV *result) in Perl_grok_oct() 353 STRLEN *len_p, in Perl_grok_bin_oct_hex() 365 STRLEN len = *len_p; in Perl_grok_bin_oct_hex() 366 STRLEN bytes_so_far; /* How many real digits have been processed */ in Perl_grok_bin_oct_hex() 619 Perl_scan_bin(pTHX_ const char *start, STRLEN len, STRLEN *retlen) in Perl_scan_bin() 632 Perl_scan_oct(pTHX_ const char *start, STRLEN len, STRLEN *retlen) in Perl_scan_oct() 645 Perl_scan_hex(pTHX_ const char *start, STRLEN len, STRLEN *retlen) in Perl_scan_hex() 672 STRLEN len; in Perl_grok_numeric_radix() [all …]
|
| D | toke.c | 742 S_missingterm(pTHX_ char *s, STRLEN len) in S_missingterm() 1102 Perl_lex_grow_linestr(pTHX_ STRLEN len) in Perl_lex_grow_linestr() 1106 STRLEN bufend_pos, bufptr_pos, oldbufptr_pos, oldoldbufptr_pos; in Perl_lex_grow_linestr() 1107 STRLEN linestart_pos, last_uni_pos, last_lop_pos, re_eval_start_pos; in Perl_lex_grow_linestr() 1172 Perl_lex_stuff_pvn(pTHX_ const char *pv, STRLEN len, U32 flags) in Perl_lex_stuff_pvn() 1182 STRLEN highhalf = variant_under_utf8_count((U8 *) pv, in Perl_lex_stuff_pvn() 1199 STRLEN highhalf = 0; in Perl_lex_stuff_pvn() 1296 STRLEN len; in Perl_lex_stuff_sv() 1322 STRLEN unstuff_len; in Perl_lex_unstuff() 1393 STRLEN discard_len; in Perl_lex_discard_to() [all …]
|
| /openbsd/src/gnu/usr.bin/perl/dist/Unicode-Normalize/ |
| D | Normalize.xs | 40 #define Renew_d_if_not_enough_to(need) STRLEN curlen = d - dstart; \ 93 STRLEN pos; /* position */ 193 static char* sv_2pvunicode(pTHX_ SV *sv, STRLEN *lp) in sv_2pvunicode() 196 STRLEN len; in sv_2pvunicode() 211 U8* pv_utf8_decompose(pTHX_ U8* s, STRLEN slen, U8** dp, STRLEN dlen, bool iscompat) in pv_utf8_decompose() 219 STRLEN retlen; in pv_utf8_decompose() 233 STRLEN len = (STRLEN)strlen((char *)r); in pv_utf8_decompose() 249 U8* pv_utf8_reorder(pTHX_ U8* s, STRLEN slen, U8** dp, STRLEN dlen) in pv_utf8_reorder() 259 STRLEN seq_max = CC_SEQ_SIZE; in pv_utf8_reorder() 260 STRLEN cc_pos = 0; in pv_utf8_reorder() [all …]
|
| /openbsd/src/gnu/usr.bin/perl/dist/Data-Dumper/ |
| D | Dumper.xs | 64 static STRLEN num_q (const char *s, STRLEN slen); 65 static STRLEN esc_q (char *dest, const char *src, STRLEN slen); 66 static STRLEN esc_q_utf8 (pTHX_ SV *sv, const char *src, STRLEN slen, I32 do_utf8, I32 useqq); 67 static bool globname_needs_quote(const char *s, STRLEN len); 69 static bool globname_supra_ascii(const char *s, STRLEN len); 71 static bool key_needs_quote(const char *s, STRLEN len); 72 static bool safe_decimal_number(const char *p, STRLEN len); 73 static SV *sv_x (pTHX_ SV *sv, const char *str, STRLEN len, I32 n); 74 static I32 DD_dump (pTHX_ SV *val, const char *name, STRLEN namelen, SV *retval, 82 globname_needs_quote(const char *ss, STRLEN len) in globname_needs_quote() [all …]
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Encode/ |
| D | encengine.c | 95 do_encode(const encpage_t * enc, const U8 * src, STRLEN * slen, U8 * dst, in do_encode() 96 STRLEN dlen, STRLEN * dout, int approx, const U8 *term, STRLEN tlen) in do_encode() 114 STRLEN n; in do_encode() 138 if (term && (STRLEN)(d-dlast) == tlen && memEQ(dlast, term, tlen)) { in do_encode()
|
| D | Encode.xs | 61 utf8_safe_downgrade(pTHX_ SV ** src, U8 ** s, STRLEN * slen, bool modify) in utf8_safe_downgrade() 80 utf8_safe_upgrade(pTHX_ SV ** src, U8 ** s, STRLEN * slen, bool modify) in utf8_safe_upgrade() 121 do_bytes_fallback_cb(pTHX_ U8 *s, STRLEN slen, SV *fallback_cb) in do_bytes_fallback_cb() 125 STRLEN i; in do_bytes_fallback_cb() 147 encode_method(pTHX_ const encode_t * enc, const encpage_t * dir, SV * src, U8 * s, STRLEN slen, in encode_method() 148 IV check, STRLEN * offset, SV * term, int * retcode, in encode_method() 152 STRLEN tlen = slen; in encode_method() 153 STRLEN ddone = 0; in encode_method() 154 STRLEN sdone = 0; in encode_method() 159 STRLEN dlen = SvLEN(dst)-1; in encode_method() [all …]
|
| /openbsd/src/gnu/usr.bin/perl/ext/Opcode/ |
| D | Opcode.xs | 23 static const STRLEN opset_len = (PL_maxo + 7) / 8; 37 static void put_op_bitspec (pTHX_ const char *optag, STRLEN len, SV *opset); 38 static SV *get_op_bitspec (pTHX_ const char *opname, STRLEN len, int fatal); 53 STRLEN len; in op_names_init() 85 put_op_bitspec(pTHX_ const char *optag, STRLEN len, SV *mask) in put_op_bitspec() 106 get_op_bitspec(pTHX_ const char *opname, STRLEN len, int fatal) in get_op_bitspec() 182 STRLEN len; in set_opset_bits() 202 STRLEN len; in opmask_add() 213 for (STRLEN i=0; i < opset_len; i++) { in opmask_add() 351 STRLEN len = opset_len; in invert_opset() [all …]
|
| /openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/ |
| D | apidoc.fnc | 36 Amd|STRLEN|C_ARRAY_LENGTH|void *a 58 Amxd|COPHH *|cophh_delete_pvn|COPHH *cophh|const char *keypv|STRLEN keylen|U32 hash|U32 flags 62 Amxd|bool|cophh_exists_pvn|const COPHH *cophh|const char *keypv|STRLEN keylen|U32 hash|U32 flags 66 Amxd|SV *|cophh_fetch_pvn|const COPHH *cophh|const char *keypv|STRLEN keylen|U32 hash|U32 flags 73 Amxd|COPHH *|cophh_store_pvn|COPHH *cophh|const char *keypv|STRLEN keylen|U32 hash|SV *value|U32 fl… 78 Amd|bool|cop_hints_exists_pvn|const COP *cop|const char *keypv|STRLEN keylen|U32 hash|U32 flags 82 Amd|SV *|cop_hints_fetch_pvn|const COP *cop|const char *keypv|STRLEN keylen|U32 hash|U32 flags 86 Amd|const char *|CopLABEL_len|COP *const cop|STRLEN *len 87 Amd|const char *|CopLABEL_len_flags|COP *const cop|STRLEN *len|U32 *flags 88 Amd|STRLEN|CopLINE|const COP * c [all …]
|
| D | embed.fnc | 192 : =for apidoc Am|char* |SvPV |SV* sv|STRLEN len 193 : =for apidoc_item |const char*|SvPV_const |SV* sv|STRLEN len 627 Apx |void |apply_attrs_string|NN const char *stashpv|NN CV *cv|NN const char *attrstr|STRLEN len 731 |NULLOK const char* p|const STRLEN len \ 872 xp |bool |do_open_raw |NN GV *gv|NN const char *oname|STRLEN len \ 874 xp |bool |do_open6 |NN GV *gv|NN const char *oname|STRLEN len \ 891 p |UV |do_vecget |NN SV* sv|STRLEN offset|int size 951 |STRLEN len|I32 method 956 |STRLEN len|U32 flags 962 Adp |GV* |gv_fetchfile_flags|NN const char *const name|const STRLEN len\ [all …]
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Encode/Encode/ |
| D | encode.h | 77 extern int do_encode(const encpage_t *enc, const U8 *src, STRLEN *slen, 78 U8 *dst, STRLEN dlen, STRLEN *dout, int approx, 79 const U8 *term, STRLEN tlen); 294 _byte_dump_string(const U8 * const start, const STRLEN len) in _byte_dump_string() 298 const STRLEN output_len = 4 * len + 1; /* 4 bytes per each input, plus a in _byte_dump_string() 340 STRLEN print_len, in S_unexpected_non_continuation_text() 343 const STRLEN non_cont_byte_pos, in S_unexpected_non_continuation_text() 346 const STRLEN expect_len) in S_unexpected_non_continuation_text() 385 S_is_utf8_overlong_given_start_byte_ok(const U8 * const s, const STRLEN len); 397 const STRLEN len = e - s; in S_does_utf8_overflow() [all …]
|
| /openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/inc/ |
| D | SvPV | 95 …__UNDEFINED__ sv_2pv(sv, lp) ({ SV *_sv_2pv = (sv); STRLEN sv_2pv_dummy_; STRLEN *_lp_2pv = (lp); … 107 … sv_2pv_flags(sv, lp, flags) ({ SV *_sv = (sv); STRLEN sv_2pv_dummy_; const I32 _flags = (flags); … 108 …n_force_flags(sv, lp, flags) ({ SV *_sv = (sv); STRLEN sv_2pv_dummy_; const I32 _flags = (flags); … 123 …v_flags(sv, lp, flags) ({ SV *_sv_2pv = (sv); STRLEN sv_2pv_dummy_; const I32 _flags_2pv = (flags)… 210 STRLEN len; 233 STRLEN len; 245 STRLEN len; 257 STRLEN len; 269 STRLEN len; 292 STRLEN len; [all …]
|
| D | pv_tools | 48 const STRLEN count, const STRLEN max, 49 STRLEN * const escaped, const U32 flags) 54 STRLEN wrote = 0; 55 STRLEN chsize = 0; 56 STRLEN readsize = 1; 143 pv_pretty(pTHX_ SV *dsv, char const * const str, const STRLEN count, 144 const STRLEN max, char const * const start_color, char const * const end_color, 148 STRLEN escaped; 184 pv_display(pTHX_ SV *dsv, const char *pv, STRLEN cur, STRLEN len, STRLEN pvlim)
|
| /openbsd/src/gnu/usr.bin/perl/cpan/MIME-Base64/ |
| D | Base64.xs | 70 my_sv_2pvbyte(pTHX_ SV *sv, STRLEN *lp) in my_sv_2pvbyte() 99 STRLEN eollen; /* length of the EOL sequence */ 101 STRLEN rlen; /* length of result string */ 182 STRLEN len; 191 STRLEN rlen = len * 3 / 4; 244 STRLEN eollen; /* length of the EOL sequence */ 278 STRLEN len; 317 STRLEN eol_len; 319 STRLEN sv_len; 320 STRLEN linelen; [all …]
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Encode/Unicode/ |
| D | Unicode.xs | 46 STRLEN newlen = 1 + SvCUR(result); /* include the NUL byte */ \ 56 enc_unpack(pTHX_ U8 **sp, U8 *e, STRLEN size, U8 endian) in enc_unpack() 90 enc_pack(pTHX_ SV *result, STRLEN size, U8 endian, UV value) in enc_pack() 140 STRLEN usize = (size > 0 ? size : 1); /* protect against rogue size<=0 */ 141 STRLEN ulen; 142 STRLEN resultbuflen; 319 STRLEN remaining = (e - s)/usize + 1; /* +1 to avoid the leak */ 320 STRLEN max_alloc = remaining + (8*1024*1024); 321 STRLEN est_alloc = remaining * UTF8_MAXLEN; 322 STRLEN newlen = SvLEN(result) + /* min(max_alloc, est_alloc) */ [all …]
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Win32API-File/ |
| D | buffers.h | 252 STRLEN n_a; \ 282 STRLEN n_a; \ 300 STRLEN n_a; \ 315 STRLEN n_a; \ 327 STRLEN n_a; \ 340 STRLEN n_a; \ 351 STRLEN n_a; \ 362 STRLEN n_a; \
|
| /openbsd/src/gnu/usr.bin/perl/dist/ExtUtils-ParseXS/t/ |
| D | XSMore.xs | 49 STRLEN lena = strlen(a); in outlist_bool() 50 STRLEN lenb = strlen(b); in outlist_bool() 51 STRLEN lenc = lena + lenb; in outlist_bool() 64 STRLEN lena = strlen(a); in outlist_int() 65 STRLEN lenb = strlen(b); in outlist_int() 66 STRLEN lenc = lena + lenb; in outlist_int()
|