| /mirbsd/src/gnu/usr.bin/perl/ |
| D | hv.h | 180 #define HvARRAY(hv) (*(HE***)&((XPVHV*) SvANY(hv))->xhv_array) argument 181 #define HvFILL(hv) ((XPVHV*) SvANY(hv))->xhv_fill argument 182 #define HvMAX(hv) ((XPVHV*) SvANY(hv))->xhv_max argument 183 #define HvRITER(hv) ((XPVHV*) SvANY(hv))->xhv_riter argument 184 #define HvRITER_get(hv) (0 + ((XPVHV*) SvANY(hv))->xhv_riter) argument 185 #define HvRITER_set(hv,r) (HvRITER(hv) = (r)) argument 186 #define HvEITER(hv) ((XPVHV*) SvANY(hv))->xhv_eiter argument 187 #define HvEITER_get(hv) (0 + ((XPVHV*) SvANY(hv))->xhv_eiter) argument 188 #define HvEITER_set(hv,e) (HvEITER(hv) = (e)) argument 189 #define HvPMROOT(hv) ((XPVHV*) SvANY(hv))->xhv_pmroot argument [all …]
|
| D | hv.c | 215 Perl_hv_store(pTHX_ HV *hv, const char *key, I32 klen_i32, SV *val, U32 hash) in Perl_hv_store() argument 228 hek = hv_fetch_common (hv, NULL, key, klen, flags, in Perl_hv_store() 234 Perl_hv_store_flags(pTHX_ HV *hv, const char *key, I32 klen, SV *val, in Perl_hv_store_flags() argument 237 HE * const hek = hv_fetch_common (hv, NULL, key, klen, flags, in Perl_hv_store_flags() 272 Perl_hv_store_ent(pTHX_ HV *hv, SV *keysv, SV *val, U32 hash) in Perl_hv_store_ent() argument 274 return hv_fetch_common(hv, keysv, NULL, 0, 0, HV_FETCH_ISSTORE, val, hash); in Perl_hv_store_ent() 287 Perl_hv_exists(pTHX_ HV *hv, const char *key, I32 klen_i32) in Perl_hv_exists() argument 299 return hv_fetch_common(hv, NULL, key, klen, flags, HV_FETCH_ISEXISTS, 0, 0) in Perl_hv_exists() 318 Perl_hv_fetch(pTHX_ HV *hv, const char *key, I32 klen_i32, I32 lval) in Perl_hv_fetch() argument 331 hek = hv_fetch_common (hv, NULL, key, klen, flags, in Perl_hv_fetch() [all …]
|
| D | universal.c | 41 HV* hv = Nullhv; in S_isa_lookup() local 65 && (hv = GvHV(gv))) in S_isa_lookup() 69 SV** svp = (SV**)hv_fetch(hv, name, len, FALSE); in S_isa_lookup() 79 hv_clear(hv); in S_isa_lookup() 87 if (!hv || !subgen) { in S_isa_lookup() 95 if (!hv) in S_isa_lookup() 96 hv = GvHVn(gv); in S_isa_lookup() 102 if (hv) { in S_isa_lookup() 118 (void)hv_store(hv,name,len,&PL_sv_yes,0); in S_isa_lookup() 122 (void)hv_store(hv,name,len,&PL_sv_no,0); in S_isa_lookup() [all …]
|
| D | scope.c | 358 HV *ohv, *hv; in Perl_save_hash() local 366 hv = GvHVn(gv); in Perl_save_hash() 368 SvMAGIC_set(hv, SvMAGIC(ohv)); in Perl_save_hash() 369 SvFLAGS((SV*)hv) |= SvMAGICAL(ohv); in Perl_save_hash() 373 SvSETMAGIC((SV*)hv); in Perl_save_hash() 376 return hv; in Perl_save_hash() 578 Perl_save_delete(pTHX_ HV *hv, char *key, I32 klen) in Perl_save_delete() argument 583 SSPUSHPTR(SvREFCNT_inc(hv)); in Perl_save_delete() 643 Perl_save_helem(pTHX_ HV *hv, SV *key, SV **sptr) in Perl_save_helem() argument 647 SSPUSHPTR(SvREFCNT_inc(hv)); in Perl_save_helem() [all …]
|
| D | cop.h | 60 # define CopSTASH_set(c,hv) CopSTASHPV_set(c, (hv) ? HvNAME_get(hv) : Nullch) argument 61 # define CopSTASH_eq(c,hv) ((hv) && stashpv_hvname_match(c,hv)) argument 77 # define CopSTASH_set(c,hv) ((c)->cop_stash = (hv)) argument 81 # define CopSTASH_eq(c,hv) (CopSTASH(c) == (hv)) argument 87 #define CopSTASH_ne(c,hv) (!CopSTASH_eq(c,hv)) argument
|
| D | doop.c | 310 HV* const hv = (HV*)SvRV(rv); in S_do_trans_simple_utf8() local 311 SV** svp = hv_fetch(hv, "NONE", 4, FALSE); in S_do_trans_simple_utf8() 334 svp = hv_fetch(hv, "FINAL", 5, FALSE); in S_do_trans_simple_utf8() 404 HV* const hv = (HV*)SvRV(rv); in S_do_trans_count_utf8() local 405 SV** const svp = hv_fetch(hv, "NONE", 4, FALSE); in S_do_trans_count_utf8() 446 HV * const hv = (HV*)SvRV(rv); in S_do_trans_complex_utf8() local 447 SV** svp = hv_fetch(hv, "NONE", 4, FALSE); in S_do_trans_complex_utf8() 472 svp = hv_fetch(hv, "FINAL", 5, FALSE); in S_do_trans_complex_utf8() 955 HV* hv = (HV*)sv; in Perl_do_chop() local 957 (void)hv_iterinit(hv); in Perl_do_chop() [all …]
|
| D | pp_hot.c | 785 HV *hv; in PP() local 793 hv = (HV*)SvRV(sv); in PP() 794 if (SvTYPE(hv) != SVt_PVHV && SvTYPE(hv) != SVt_PVAV) in PP() 797 SETs((SV*)hv); in PP() 803 SETs((SV*)hv); in PP() 812 hv = (HV*)sv; in PP() 814 SETs((SV*)hv); in PP() 820 SETs((SV*)hv); in PP() 869 hv = GvHVn(gv); in PP() 871 hv = save_hash(gv); in PP() [all …]
|
| D | op.h | 321 # define PmopSTASH_set(o,hv) PmopSTASHPV_set(o, ((hv) ? HvNAME_get(hv) : Nullch)) argument 326 # define PmopSTASH_set(o,hv) ((o)->op_pmstash = (hv)) argument
|
| D | pp.c | 3861 HV * const hv = (HV*)POPs; in PP() local 3862 const U32 hvtype = SvTYPE(hv); in PP() 3865 SV * const sv = hv_delete_ent(hv, *MARK, discard, 0); in PP() 3872 SV * const sv = av_delete((AV*)hv, SvIV(*MARK), discard); in PP() 3878 SV * const sv = avhv_delete_ent((AV*)hv, *MARK, discard, 0); in PP() 3898 HV * const hv = (HV*)POPs; in PP() local 3900 if (SvTYPE(hv) == SVt_PVHV) in PP() 3901 sv = hv_delete_ent(hv, keysv, discard, 0); in PP() 3902 else if (SvTYPE(hv) == SVt_PVAV) { in PP() 3904 sv = av_delete((AV*)hv, SvIV(keysv), discard); in PP() [all …]
|
| D | gv.c | 935 HV* const hv = GvHVn(gv); in Perl_gv_fetchpv() local 937 hv_magic(hv, Nullgv, PERL_MAGIC_overload); in Perl_gv_fetchpv() 942 HV *hv; in Perl_gv_fetchpv() local 950 hv = GvHVn(gv); in Perl_gv_fetchpv() 951 hv_magic(hv, Nullgv, PERL_MAGIC_sig); in Perl_gv_fetchpv() 953 SV * const * const init = hv_fetch(hv, PL_sig_name[i], strlen(PL_sig_name[i]), 1); in Perl_gv_fetchpv() 1154 const HV * const hv = GvSTASH(gv); in Perl_gv_fullname4() local 1155 if (!hv) { in Perl_gv_fullname4() 1161 name = HvNAME_get(hv); in Perl_gv_fullname4() 1238 HV *hv; in Perl_gv_check() local [all …]
|
| /mirbsd/src/gnu/usr.sbin/sendmail/sendmail/ |
| D | ratectrl.c | 224 unsigned int hv; local 232 hv = 0xABC3D20F; 275 hv = (hv << 5) ^ (hv >> 23) ^ *p; 276 hv = (hv ^ (hv >> 16)); 282 hv += (c<<11) ^ (c>>1); 283 hv ^= (d<<14) + (d<<7) + (d<<4) + d; 287 hv = (hv << 4) + *p; 288 d = hv & 0xf0000000; 291 hv ^= (d >> 24); 292 hv ^= d; [all …]
|
| /mirbsd/src/lib/libc/ohash/ |
| D | ohash_lookup_memory.c | 23 ohash_lookup_memory(struct ohash *h, const char *k, size_t size, u_int32_t hv) in ohash_lookup_memory() argument 32 i = hv % h->size; in ohash_lookup_memory() 33 incr = ((hv % (h->size-2)) & ~1) + 1; in ohash_lookup_memory() 41 } else if (h->t[i].hv == hv && in ohash_lookup_memory() 44 h->t[empty].hv = hv; in ohash_lookup_memory() 62 h->t[i].hv = hv; in ohash_lookup_memory()
|
| D | ohash_lookup_interval.c | 24 u_int32_t hv) in ohash_lookup_interval() argument 33 i = hv % h->size; in ohash_lookup_interval() 34 incr = ((hv % (h->size-2)) & ~1) + 1; in ohash_lookup_interval() 42 } else if (h->t[i].hv == hv && in ohash_lookup_interval() 47 h->t[empty].hv = hv; in ohash_lookup_interval() 66 h->t[i].hv = hv; in ohash_lookup_interval()
|
| D | ohash_qlookupi.c | 25 u_int32_t hv; in ohash_qlookupi() local 27 hv = ohash_interval(s, e); in ohash_qlookupi() 28 return ohash_lookup_interval(h, s, *e, hv); in ohash_qlookupi()
|
| D | ohash_do.c | 49 i = h->t[j].hv % ns; in ohash_resize() 50 incr = ((h->t[j].hv % (ns - 2)) & ~1) + 1; in ohash_resize() 56 n[i].hv = h->t[j].hv; in ohash_resize()
|
| /mirbsd/src/gnu/usr.bin/perl/ext/Devel/PPPort/parts/inc/ |
| D | cop | 34 __UNDEFINED__ CopSTASH_set(c,hv) CopSTASHPV_set(c, (hv) ? HvNAME(hv) : Nullch) 35 __UNDEFINED__ CopSTASH_eq(c,hv) ((hv) && (CopSTASHPV(c) == HvNAME(hv) \ 36 || (CopSTASHPV(c) && HvNAME(hv) \ 37 && strEQ(CopSTASHPV(c), HvNAME(hv))))) 48 __UNDEFINED__ CopSTASH_set(c,hv) ((c)->cop_stash = (hv)) 51 __UNDEFINED__ CopSTASH_eq(c,hv) (CopSTASH(c) == (hv))
|
| /mirbsd/src/gnu/usr.bin/perl/ext/Devel/Peek/ |
| D | Peek.xs | 177 _mstats_to_hv(HV *hv, const struct mstats_buffer *b, int level) in _mstats_to_hv() argument 183 svp = hv_fetch(hv, "topbucket", 9, 1); in _mstats_to_hv() 186 svp = hv_fetch(hv, "topbucket_ev", 12, 1); in _mstats_to_hv() 189 svp = hv_fetch(hv, "topbucket_odd", 13, 1); in _mstats_to_hv() 192 svp = hv_fetch(hv, "totfree", 7, 1); in _mstats_to_hv() 195 svp = hv_fetch(hv, "total", 5, 1); in _mstats_to_hv() 198 svp = hv_fetch(hv, "total_chain", 11, 1); in _mstats_to_hv() 201 svp = hv_fetch(hv, "total_sbrk", 10, 1); in _mstats_to_hv() 204 svp = hv_fetch(hv, "sbrks", 5, 1); in _mstats_to_hv() 207 svp = hv_fetch(hv, "sbrk_good", 9, 1); in _mstats_to_hv() [all …]
|
| /mirbsd/src/gnu/usr.bin/perl/ext/Data/Dumper/ |
| D | Dumper.xs | 928 HV *hv; variable 977 && (hv = (HV*)SvRV((SV*)href)) 978 && SvTYPE(hv) == SVt_PVHV) { 980 if ((svp = hv_fetch(hv, "seen", 4, FALSE)) && SvROK(*svp)) 982 if ((svp = hv_fetch(hv, "todump", 6, FALSE)) && SvROK(*svp)) 984 if ((svp = hv_fetch(hv, "names", 5, FALSE)) && SvROK(*svp)) 986 if ((svp = hv_fetch(hv, "indent", 6, FALSE))) 988 if ((svp = hv_fetch(hv, "purity", 6, FALSE))) 990 if ((svp = hv_fetch(hv, "terse", 5, FALSE))) 993 if ((svp = hv_fetch(hv, "useqq", 5, FALSE))) [all …]
|
| /mirbsd/src/gnu/usr.bin/perl/ext/B/B/ |
| D | Bytecode.pm | 148 my $hv = shift; 149 my $ix = $svtab{$$hv}; 152 my $name = $hv->NAME; 156 asm "sv_flags", $hv->FLAGS; 157 $svtab{$$hv} = $varix = $ix = $tix++; 164 asm "newsvx", $hv->FLAGS; 165 $svtab{$$hv} = $varix = $ix = $tix++; 166 my $stashix = $hv->SvSTASH->ix; 167 for (@array = $hv->ARRAY) { 176 asm "xnv", $hv->NVX; [all …]
|
| D | C.pm | 1251 my ($hv) = @_; 1252 my $sym = objsym($hv); 1254 my $name = $hv->NAME; 1263 $decl->add("static HV *hv$hv_index;"); 1270 $sym = savesym($hv, "hv$hv_index"); 1276 $hv->MAX, $hv->RITER)); 1278 $xpvhvsect->index, $hv->REFCNT , $hv->FLAGS)); 1280 my @contents = $hv->ARRAY; 1287 $init->add("{", "\tHV *hv = (HV*)&sv_list[$sv_list_index];"); 1299 $hv->save_magic(); [all …]
|
| /mirbsd/src/gnu/usr.bin/perl/ext/Storable/ |
| D | Storable.xs | 62 #define HvSHAREKEYS_off(hv) /* Ignore */ argument 118 # define HvRITER_set(hv,r) (HvRITER(hv) = r) argument 121 # define HvEITER_set(hv,r) (HvEITER(hv) = r) argument 1076 static int store_hash(pTHX_ stcxt_t *cxt, HV *hv); 2248 static int store_hash(pTHX_ stcxt_t *cxt, HV *hv) in store_hash() argument 2253 HvTOTALKEYS(hv); in store_hash() 2255 HvKEYS(hv); in store_hash() 2261 int flagged_hash = ((SvREADONLY(hv) in store_hash() 2263 || HvHASKFLAGS(hv) in store_hash() 2266 unsigned char hash_flags = (SvREADONLY(hv) ? SHV_RESTRICTED : 0); in store_hash() [all …]
|
| /mirbsd/src/gnu/usr.bin/perl/ext/B/ |
| D | B.xs | 1679 HvFILL(hv) 1680 B::HV hv 1683 HvMAX(hv) 1684 B::HV hv 1687 HvKEYS(hv) 1688 B::HV hv 1691 HvRITER(hv) 1692 B::HV hv 1695 HvNAME(hv) 1696 B::HV hv [all …]
|
| /mirbsd/src/sys/dev/pci/ |
| D | if_txp.c | 539 struct txp_hostvar *hv = sc->sc_hostvar; local 563 if (hv->hv_rx_buf_write_idx == hv->hv_rx_buf_read_idx) 722 struct txp_hostvar *hv = sc->sc_hostvar; local 727 end = TXP_OFFSET2IDX(letoh32(hv->hv_rx_buf_read_idx)); 728 i = TXP_OFFSET2IDX(letoh32(hv->hv_rx_buf_write_idx)); 778 hv->hv_rx_buf_write_idx = htole32(TXP_IDX2OFFSET(i)); 1540 struct txp_hostvar *hv = sc->sc_hostvar; local 1590 idx = letoh32(hv->hv_resp_read_idx); 1591 if (idx != letoh32(hv->hv_resp_write_idx)) { 1618 struct txp_hostvar *hv = sc->sc_hostvar; local [all …]
|
| /mirbsd/src/gnu/usr.bin/perl/ext/Opcode/ |
| D | Opcode.xs | 265 HV *hv; 268 hv = gv_stashpv(Package, GV_ADDWARN); /* should exist already */ 270 if (strNE(HvNAME_get(hv),"main")) { 272 hv_name_set(hv, "main", 4, 0); 273 hv_store(hv,"_",1,(SV *)PL_defgv,0); /* connect _ to global */
|
| /mirbsd/src/usr.bin/make/ |
| D | dir.c | 285 find_file_hashi(Path *p, const char *file, const char *efile, uint32_t hv) in find_file_hashi() argument 289 return ohash_find(h, ohash_lookup_interval(h, file, efile, hv)); in find_file_hashi() 652 uint32_t hv; /* hash value for last component in file name */ in Dir_FindFileComplexi() local 666 hv = ohash_interval(cp, &ename); in Dir_FindFileComplexi() 674 find_file_hashi(dot, cp, ename, hv) != NULL) { in Dir_FindFileComplexi() 693 if (find_file_hashi(p, cp, ename, hv) != NULL) { in Dir_FindFileComplexi()
|