libdtrace/common/dt_parser.c

73  * 2. dn_ctfp = DT_DYN_CTFP(dtp), dn_type = DT_DYN_TYPE(dtp)
86  * 3. dn_ctfp = DT_STR_CTFP(dtp), dn_type = DT_STR_TYPE(dtp)
199 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
239 					return (dt_set_errno(dtp,
242 					return (dt_set_errno(dtp,
246 			return (dtrace_lookup_by_type(dtp, object, type, tip));
255 	return (dtrace_lookup_by_type(dtp, obj, s, tip));
270 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
286 		dmp = dtp->dt_cdefs;
288 		dmp = dtp->dt_ddefs;
292 		dtp->dt_ctferr = ctf_errno(dmp->dm_ctfp);
293 		return (dt_set_errno(dtp, EDT_CTF));
299 		dtp->dt_ctferr = ctf_errno(dmp->dm_ctfp);
300 		return (dt_set_errno(dtp, EDT_CTF));
314 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
316 	if (ctfp == DT_FPTR_CTFP(dtp) && type == DT_FPTR_TYPE(dtp))
318 	else if (ctfp == DT_FUNC_CTFP(dtp) && type == DT_FUNC_TYPE(dtp))
320 	else if (ctfp == DT_DYN_CTFP(dtp) && type == DT_DYN_TYPE(dtp))
350 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
358 		lfp = DT_INT_CTFP(dtp);
359 		ltype = lbase = DT_INT_TYPE(dtp);
363 		rfp = DT_INT_CTFP(dtp);
364 		rtype = rbase = DT_INT_TYPE(dtp);
516 dt_node_xalloc(dtrace_hdl_t *dtp, int kind)
518 	dt_node_t *dnp = dt_alloc(dtp, sizeof (dt_node_t));
752 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
776 	    dtp->dt_conf.dtc_ctfmodel == CTF_MODEL_LP64)
816 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
832 	if (dtrace_lookup_by_name(dtp, sip->dts_object,
1243 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
1261 	for (; i < sizeof (dtp->dt_ints) / sizeof (dtp->dt_ints[0]); i += n) {
1262 		if (value <= dtp->dt_ints[i].did_limit) {
1264 			    dtp->dt_ints[i].did_ctfp,
1265 			    dtp->dt_ints[i].did_type, B_FALSE);
1291 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
1300 	dt_node_type_assign(dnp, DT_STR_CTFP(dtp), DT_STR_TYPE(dtp), B_FALSE);
1352 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
1379 	if (dtt.dtt_ctfp == dtp->dt_cdefs->dm_ctfp ||
1380 	    dtt.dtt_ctfp == dtp->dt_ddefs->dm_ctfp)
1415 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
1456 		dmp = dtp->dt_cdefs;
1458 		dmp = dtp->dt_ddefs;
1481 		int exists = dtrace_lookup_by_name(dtp,
1484 		if (exists && (dtrace_symbol_type(dtp, &sym, &dts, &ott) != 0 ||
1494 		} else if (!exists && dt_module_extern(dtp, dmp,
1498 			    dtrace_errmsg(dtp, dtrace_errno(dtp)));
1567 			dhp = dtp->dt_tls;
1572 			dhp = dtp->dt_globals;
1590 		if (dtrace_lookup_by_type(dtp, DTRACE_OBJ_CDEFS,
1592 		    dtrace_lookup_by_type(dtp, DTRACE_OBJ_DDEFS,
1725 			    &dt_idops_thaw, NULL, dtp->dt_gen);
1879 		dtrace_hdl_t *dtp = yypcb->pcb_hdl;
1887 		dt_node_type_assign(cp, dtp->dt_ddefs->dm_ctfp,
1888 		    ctf_lookup_by_name(dtp->dt_ddefs->dm_ctfp, "size_t"),
1941 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
1967 			    DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), B_FALSE);
1972 			    DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), B_FALSE);
1977 			    DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), B_FALSE);
1994 			    DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), B_FALSE);
1999 			    DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), B_FALSE);
2008 			    DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), B_FALSE);
2017 			    DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), B_FALSE);
2026 			    DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), B_FALSE);
2035 			    DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), B_FALSE);
2159 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
2172 	if (dtrace_xstr2desc(dtp, yypcb->pcb_pspec, dnp->dn_spec,
2175 		    dnp->dn_spec, dtrace_errmsg(dtp, dtrace_errno(dtp)));
2191 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
2208 	if (dtrace_id2desc(dtp, (dtrace_id_t)id, dnp->dn_desc) != 0) {
2210 		    (u_longlong_t)id, dtrace_errmsg(dtp, dtrace_errno(dtp)));
2231 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
2309 	    _dtrace_defattr, 0, &dt_idops_inline, inp, dtp->dt_gen);
2355 			    pinp, dtp->dt_gen);
2417 	dt_idhash_xinsert(dtp->dt_globals, idp);
2450 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
2478 	if (dt_xlator_lookup(dtp, &sn, &dn, DT_XLATE_EXACT) != NULL) {
2498 	dxp = dt_xlator_create(dtp, &src, &dst, name, members, yypcb->pcb_list);
2515 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
2540 	    &dt_idops_probe, NULL, dtp->dt_gen);
2558 	if (dnp->dn_ident == NULL || dt_probe_create(dtp,
2568 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
2597 	if ((dnp->dn_provider = dt_provider_lookup(dtp, name)) != NULL)
2599 	else if ((dnp->dn_provider = dt_provider_create(dtp, name)) == NULL)
2641 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
2692 	(void) dt_set_errno(dtp, EDT_NOVAR);
2696 	    (dhp != dtp->dt_globals &&
2698 	    (dhp == dtp->dt_globals &&
2706 		if (idp->di_kind != idkind && dhp == dtp->dt_globals) {
2722 			    DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp), B_FALSE);
2737 	} else if (dhp == dtp->dt_globals && scope != DTRACE_OBJ_EXEC &&
2738 	    dtrace_lookup_by_name(dtp, scope, name, &sym, &dts) == 0) {
2740 		dt_module_t *mp = dt_module_lookup_by_name(dtp, dts.dts_object);
2753 		if (dtrace_symbol_type(dtp, &sym, &dts, &dtt) != 0) {
2758 			if (dtp->dt_errno == EDT_DATAMODEL) {
2763 				    dt_module_modelname(dtp->dt_ddefs));
2769 			    dtrace_errmsg(dtp, dtrace_errno(dtp)));
2773 		    _dtrace_symattr, 0, &dt_idops_thaw, NULL, dtp->dt_gen);
2781 		idp->di_next = dtp->dt_externs;
2782 		dtp->dt_externs = idp;
2818 		else if (dhp == dtp->dt_tls)
2827 			    &dt_idops_assc, NULL, dtp->dt_gen);
2831 			    &dt_idops_thaw, NULL, dtp->dt_gen);
2847 			    DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp), B_FALSE);
2862 		    dtrace_errmsg(dtp, dtrace_errno(dtp)));
2865 		    dnp->dn_string, dtrace_errmsg(dtp, dtrace_errno(dtp)));
2872 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
2875 		dt_xcook_ident(dnp, dtp->dt_aggs, DT_IDENT_AGG, B_FALSE);
2877 		dt_xcook_ident(dnp, dtp->dt_globals, DT_IDENT_SCALAR, B_FALSE);
2918 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
2941 		dt_xcook_ident(cp, dtp->dt_globals, DT_IDENT_SCALAR, B_TRUE);
2978 				dtp->dt_ctferr = ctf_errno(cp->dn_ctfp);
3047 		dt_node_type_assign(dnp, DT_INT_CTFP(dtp), DT_INT_TYPE(dtp),
3097 		dt_node_type_assign(dnp, dtp->dt_ddefs->dm_ctfp,
3098 		    ctf_lookup_by_name(dtp->dt_ddefs->dm_ctfp, "size_t"),
3109 		dt_node_type_assign(dnp, DT_STR_CTFP(dtp), DT_STR_TYPE(dtp),
3176 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
3203 				dhp = dtp->dt_aggs;
3207 				dhp = dtp->dt_globals;
3306 		dt_node_type_assign(dnp, DT_INT_CTFP(dtp), DT_INT_TYPE(dtp),
3384 		dt_node_type_assign(dnp, DT_INT_CTFP(dtp), DT_INT_TYPE(dtp),
3423 			ctfp = dtp->dt_ddefs->dm_ctfp;
3448 			dt_xcook_ident(lp, dtp->dt_globals,
3467 			dt_xcook_ident(lp, dtp->dt_globals,
3492 				dt_xcook_ident(lp, dtp->dt_aggs,
3495 				dt_xcook_ident(lp, dtp->dt_globals,
3619 			dt_xcook_ident(lp, dtp->dt_globals,
3670 				dhp = dtp->dt_tls;
3893 		dxp = dt_xlator_lookup(dtp, rp, lp, DT_XLATE_FUZZY);
3903 		dt_node_type_assign(dnp, DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp),
4095 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
4102 		dt_node_type_assign(dnp, DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp),
4278 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
4325 	dt_node_type_assign(dnp, DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp), B_FALSE);
4405 	dtrace_hdl_t *dtp = yypcb->pcb_hdl;
4421 		if ((dxp = dt_xlator_lookup(dtp,
4423 			if (dt_provider_xref(dtp, pvp, dxp->dx_id) != 0)
4606  * is valid: any references to handle-specific data must be made through 'dtp'.
4609 dt_node_diftype(dtrace_hdl_t *dtp, const dt_node_t *dnp, dtrace_diftype_t *tp)
4611 	if (dnp->dn_ctfp == DT_STR_CTFP(dtp) &&
4612 	    dnp->dn_type == DT_STR_TYPE(dtp)) {
5164 		dtrace_hdl_t *dtp = yypcb->pcb_hdl;
5165 		size_t len = strlen(dtp->dt_errmsg);
5166 		char *p, *s = dtp->dt_errmsg + len;
5167 		size_t n = sizeof (dtp->dt_errmsg) - len;