libdtrace/common/dt_cg.c

93 dt_cg_xsetx(dt_irlist_t *dlp, dt_ident_t *idp, uint_t lbl, int reg, uint64_t x)
95 	int flag = idp != NULL ? DT_INT_PRIVATE : DT_INT_SHARED;
107 	if (idp != NULL)
108 		dlp->dl_last->di_extern = idp;
541 dt_cg_arglist(dt_ident_t *idp, dt_node_t *args,
544 	const dt_idsig_t *isp = idp->di_data;
628 dt_cg_stvar(const dt_ident_t *idp)
633 	uint_t i = (((idp->di_flags & DT_IDFLG_LOCAL) != 0) << 1) |
634 	    ((idp->di_flags & DT_IDFLG_TLS) != 0);
636 	return (idp->di_kind == DT_IDENT_ARRAY ? aops[i] : sops[i]);
672 		dt_ident_t *idp = dt_ident_resolve(dnp->dn_child->dn_ident);
674 		idp->di_flags |= DT_IDFLG_DIFW;
675 		instr = DIF_INSTR_STV(dt_cg_stvar(idp),
676 		    idp->di_id, dnp->dn_reg);
727 		dt_ident_t *idp = dt_ident_resolve(dnp->dn_child->dn_ident);
729 		idp->di_flags |= DT_IDFLG_DIFW;
730 		instr = DIF_INSTR_STV(dt_cg_stvar(idp), idp->di_id, nreg);
997 	dt_ident_t *idp;
1005 	if ((idp = dt_node_resolve(dnp->dn_right, DT_IDENT_XLSOU)) != NULL) {
1007 		dt_xlator_t *dxp = idp->di_data;
1125 		idp = dt_ident_resolve(dnp->dn_left->dn_ident);
1127 		if (idp->di_kind == DT_IDENT_ARRAY)
1128 			dt_cg_arglist(idp, dnp->dn_left->dn_args, dlp, drp);
1130 		idp->di_flags |= DT_IDFLG_DIFW;
1131 		instr = DIF_INSTR_STV(dt_cg_stvar(idp),
1132 		    idp->di_id, dnp->dn_reg);
1229 	dt_ident_t *idp = dnp->dn_ident;
1237 	assert(!(idp->di_flags & DT_IDFLG_LOCAL));
1249 	if (idp->di_id == DIF_VAR_ARGS) {
1250 		if ((idp->di_kind == DT_IDENT_XLPTR ||
1251 		    idp->di_kind == DT_IDENT_XLSOU) &&
1252 		    dt_xlator_dynamic(idp->di_data)) {
1264 	if (idp->di_flags & DT_IDFLG_TLS)
1269 	idp->di_flags |= DT_IDFLG_DIFR;
1271 	instr = DIF_INSTR_LDA(op, idp->di_id,
1287 	if (idp->di_id != DIF_VAR_ARGS || !dt_node_is_scalar(dnp))
1324 	dt_ident_t *idp = dnp->dn_ident;
1325 	dt_idnode_t *inp = idp->di_iarg;
1331 	assert(idp->di_flags & DT_IDFLG_INLINE);
1332 	assert(idp->di_ops == &dt_idops_inline);
1334 	if (idp->di_kind == DT_IDENT_ARRAY) {
1348 	if (idp->di_kind == DT_IDENT_ARRAY) {
1403 	dt_ident_t *idp = dx->dtxl_idp;
1415 	dxp = idp->di_data;
1511 dt_cg_xlate_expand(dt_node_t *dnp, dt_ident_t *idp, dt_irlist_t *dlp,
1534 	dlm.dtxl_idp = idp;
1555 	dt_ident_t *idp;
1761 			idp = dt_node_resolve(dnp->dn_child, DT_IDENT_XLPTR);
1762 			assert(idp != NULL);
1763 			reg = dt_cg_xlate_expand(dnp, idp, dlp, drp);
1871 		if ((idp = dt_node_resolve(
1873 		    (idp = dt_node_resolve(
1879 			dxp = idp->di_data;
2007 			if ((idp = dnp->dn_ident)->di_kind != DT_IDENT_FUNC) {
2011 				    dt_idkind_name(idp->di_kind), idp->di_name);
2014 			switch (idp->di_id) {
2120 	dt_ident_t *idp;
2166 	if ((idp = dt_node_resolve(dnp, DT_IDENT_XLSOU)) != NULL) {
2167 		int reg = dt_cg_xlate_expand(dnp, idp,