2 #################################### DBM SECTION
6 datum_key_copy T_DATUM_K_C
20 DBM_ckFilter($arg, filter[store_key], \"filter_store_key\");
21 $var.dptr = SvPVbyte($arg, len);
22 $var.dsize = (int)len;
28 if (db->filter[store_key]){
29 tmpSV = sv_2mortal(newSVsv($arg));
30 DBM_ckFilter(tmpSV, filter[store_key], \"filter_store_key\");
34 $var.dptr = SvPVbyte(tmpSV, len);
35 $var.dsize = (int)len;
38 DBM_ckFilter($arg, filter[store_value], \"filter_store_value\");
41 $var.dptr = SvPVbyte($arg, len);
42 $var.dsize = (int)len;
52 sv_setpvn($arg, $var.dptr, $var.dsize);
53 DBM_ckFilter($arg, filter[fetch_key],\"filter_fetch_key\");
55 sv_setpvn($arg, $var.dptr, $var.dsize);
56 DBM_ckFilter($arg, filter[fetch_value],\"filter_fetch_value\");
58 sv_usepvn($arg, $var.dptr, $var.dsize);
60 sv_setref_pv($arg, dbtype, (void*)$var);