libdtrace/common/dt_cg.c

50 dt_cg_node_alloc(uint_t label, dif_instr_t instr)
58 	dip->di_instr = instr;
97 	dif_instr_t instr = DIF_INSTR_SETX((uint_t)intoff, reg);
105 	dt_irlist_append(dlp, dt_cg_node_alloc(lbl, instr));
193 	dif_instr_t instr;
217 	instr = DIF_INSTR_FMT(op, dreg, sreg, dreg);
218 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
244 	dif_instr_t instr;
276 		instr = DIF_INSTR_FMT(DIF_OP_SLL, r1, r2, r1);
277 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
280 		instr = DIF_INSTR_FMT(DIF_OP_SRA, r1, r2, r1);
281 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
290 		instr = DIF_INSTR_FMT(DIF_OP_SRL, r1, r2, r1);
291 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
294 		instr = DIF_INSTR_FMT(DIF_OP_AND, r1, r2, r1);
295 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
328 	dif_instr_t instr;
379 	instr = DIF_INSTR_LOAD(
381 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
384 	instr = DIF_INSTR_FMT(DIF_OP_AND, r1, r2, r1);
385 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
388 	instr = DIF_INSTR_FMT(DIF_OP_AND, src->dn_reg, r2, r2);
389 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
392 	instr = DIF_INSTR_FMT(DIF_OP_SLL, r2, r3, r2);
393 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
395 	instr = DIF_INSTR_FMT(DIF_OP_OR, r1, r2, r1);
396 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
408 	dif_instr_t instr;
426 		instr = DIF_INSTR_COPYS(src->dn_reg, reg, dst->dn_reg);
427 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
437 			instr = DIF_INSTR_STORE(DIF_OP_STB, reg, dst->dn_reg);
440 			instr = DIF_INSTR_STORE(DIF_OP_STH, reg, dst->dn_reg);
443 			instr = DIF_INSTR_STORE(DIF_OP_STW, reg, dst->dn_reg);
446 			instr = DIF_INSTR_STORE(DIF_OP_STX, reg, dst->dn_reg);
452 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
473 	dif_instr_t instr;
492 		instr = DIF_INSTR_FMT(DIF_OP_SLL, src->dn_reg, rg, dst->dn_reg);
493 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
496 			instr = DIF_INSTR_FMT(DIF_OP_SRA,
499 			    dt_cg_node_alloc(DT_LBL_NONE, instr));
502 			instr = DIF_INSTR_FMT(DIF_OP_SRA,
505 			    dt_cg_node_alloc(DT_LBL_NONE, instr));
507 			instr = DIF_INSTR_FMT(DIF_OP_SRL,
510 			    dt_cg_node_alloc(DT_LBL_NONE, instr));
517 		instr = DIF_INSTR_FMT(DIF_OP_SLL, src->dn_reg, rg, dst->dn_reg);
518 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
520 		instr = DIF_INSTR_FMT((dst->dn_flags & DT_NF_SIGNED) ?
522 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
555 		dif_instr_t instr;
578 		instr = DIF_INSTR_PUSHTS(op, t.dtdt_kind, reg, dnp->dn_reg);
579 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
600 	dif_instr_t instr;
615 	instr = DIF_INSTR_FMT(op, dnp->dn_left->dn_reg,
618 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
643 	dif_instr_t instr;
660 	instr = DIF_INSTR_FMT(op, dnp->dn_reg, reg, dnp->dn_reg);
661 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
675 		instr = DIF_INSTR_STV(dt_cg_stvar(idp),
677 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
700 	dif_instr_t instr;
716 	instr = DIF_INSTR_FMT(op, dnp->dn_reg, nreg, nreg);
717 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
730 		instr = DIF_INSTR_STV(dt_cg_stvar(idp), idp->di_id, nreg);
731 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
782 	dif_instr_t instr;
793 	instr = DIF_INSTR_CMP(opc, dnp->dn_left->dn_reg, dnp->dn_right->dn_reg);
794 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
798 	instr = DIF_INSTR_BRANCH(op, lbl_true);
799 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
801 	instr = DIF_INSTR_MOV(DIF_REG_R0, dnp->dn_reg);
802 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
804 	instr = DIF_INSTR_BRANCH(DIF_OP_BA, lbl_post);
805 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
827 	dif_instr_t instr;
831 	instr = DIF_INSTR_TST(dnp->dn_expr->dn_reg);
832 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
835 	instr = DIF_INSTR_BRANCH(DIF_OP_BE, lbl_false);
836 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
839 	instr = DIF_INSTR_MOV(dnp->dn_left->dn_reg, DIF_REG_R0);
840 	dip = dt_cg_node_alloc(DT_LBL_NONE, instr); /* save dip for below */
844 	instr = DIF_INSTR_BRANCH(DIF_OP_BA, lbl_post);
845 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
866 	dif_instr_t instr;
869 	instr = DIF_INSTR_TST(dnp->dn_left->dn_reg);
870 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
873 	instr = DIF_INSTR_BRANCH(DIF_OP_BE, lbl_false);
874 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
877 	instr = DIF_INSTR_TST(dnp->dn_right->dn_reg);
878 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
881 	instr = DIF_INSTR_BRANCH(DIF_OP_BE, lbl_false);
882 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
886 	instr = DIF_INSTR_BRANCH(DIF_OP_BA, lbl_post);
887 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
889 	instr = DIF_INSTR_MOV(DIF_REG_R0, dnp->dn_reg);
890 	dt_irlist_append(dlp, dt_cg_node_alloc(lbl_false, instr));
901 	dif_instr_t instr;
904 	instr = DIF_INSTR_TST(dnp->dn_left->dn_reg);
905 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
907 	instr = DIF_INSTR_BRANCH(DIF_OP_BE, lbl_next);
908 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
914 	instr = DIF_INSTR_TST(dnp->dn_right->dn_reg);
915 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
917 	instr = DIF_INSTR_BRANCH(DIF_OP_BE, lbl_tail);
918 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
921 	instr = DIF_INSTR_FMT(DIF_OP_XOR, dnp->dn_left->dn_reg,
924 	dt_irlist_append(dlp, dt_cg_node_alloc(lbl_tail, instr));
937 	dif_instr_t instr;
940 	instr = DIF_INSTR_TST(dnp->dn_left->dn_reg);
941 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
944 	instr = DIF_INSTR_BRANCH(DIF_OP_BNE, lbl_true);
945 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
948 	instr = DIF_INSTR_TST(dnp->dn_right->dn_reg);
949 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
952 	instr = DIF_INSTR_BRANCH(DIF_OP_BE, lbl_false);
953 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
957 	instr = DIF_INSTR_BRANCH(DIF_OP_BA, lbl_post);
958 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
960 	instr = DIF_INSTR_MOV(DIF_REG_R0, dnp->dn_reg);
961 	dt_irlist_append(dlp, dt_cg_node_alloc(lbl_false, instr));
972 	dif_instr_t instr;
977 	instr = DIF_INSTR_TST(dnp->dn_reg);
978 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
980 	instr = DIF_INSTR_BRANCH(DIF_OP_BE, lbl_zero);
981 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
983 	instr = DIF_INSTR_MOV(DIF_REG_R0, dnp->dn_reg);
984 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
986 	instr = DIF_INSTR_BRANCH(DIF_OP_BA, lbl_post);
987 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
996 	dif_instr_t instr;
1036 		instr = DIF_INSTR_ALLOCS(r1, r1);
1037 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1085 				instr = DIF_INSTR_FMT(DIF_OP_ADD, r1, r2, r2);
1087 				    dt_cg_node_alloc(DT_LBL_NONE, instr));
1131 		instr = DIF_INSTR_STV(dt_cg_stvar(idp),
1133 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1154 	dif_instr_t instr;
1171 	instr = DIF_INSTR_LDV(op, dnp->dn_ident->di_id, dnp->dn_reg);
1172 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1203 		instr = DIF_INSTR_TST(dnp->dn_reg);
1204 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1206 		instr = DIF_INSTR_BRANCH(DIF_OP_BNE, label);
1207 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1210 		instr = DIF_INSTR_ALLOCS(dnp->dn_reg, dnp->dn_reg);
1211 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1214 		instr = DIF_INSTR_STV(stvop, dnp->dn_ident->di_id, dnp->dn_reg);
1215 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1217 		instr = DIF_INSTR_LDV(op, dnp->dn_ident->di_id, dnp->dn_reg);
1218 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1231 	dif_instr_t instr;
1271 	instr = DIF_INSTR_LDA(op, idp->di_id,
1274 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1299 	instr = DIF_INSTR_FMT(DIF_OP_SLL, dnp->dn_reg, reg, dnp->dn_reg);
1300 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1302 	instr = DIF_INSTR_FMT((dnp->dn_flags & DT_NF_SIGNED) ?
1305 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1411 	uint32_t instr;
1436 	instr = DIF_INSTR_FMT(DIF_OP_ADD, dx->dtxl_dreg, reg, reg);
1437 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1447 			instr = DIF_INSTR_STORE(DIF_OP_STB, treg, reg);
1450 			instr = DIF_INSTR_STORE(DIF_OP_STH, treg, reg);
1453 			instr = DIF_INSTR_STORE(DIF_OP_STW, treg, reg);
1456 			instr = DIF_INSTR_STORE(DIF_OP_STX, treg, reg);
1463 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1473 		instr = DIF_INSTR_COPYS(treg, szreg, reg);
1474 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1486 		instr = DIF_INSTR_PUSHTS(DIF_OP_PUSHTV, DIF_TYPE_CTF,
1488 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1489 		instr = DIF_INSTR_PUSHTS(DIF_OP_PUSHTV, DIF_TYPE_CTF,
1491 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1492 		instr = DIF_INSTR_PUSHTS(DIF_OP_PUSHTV, DIF_TYPE_CTF,
1494 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1495 		instr = DIF_INSTR_CALL(DIF_SUBR_BCOPY, szreg);
1496 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1515 	uint32_t instr;
1527 	instr = DIF_INSTR_PUSHTS(DIF_OP_PUSHTV, DIF_TYPE_CTF, DIF_REG_R0, dreg);
1528 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1530 	instr = DIF_INSTR_CALL(DIF_SUBR_ALLOCA, dreg);
1531 	dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1554 	dif_instr_t instr;
1720 		instr = DIF_INSTR_NOT(dnp->dn_reg, dnp->dn_reg);
1721 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1749 		instr = DIF_INSTR_FMT(DIF_OP_SUB, DIF_REG_R0,
1752 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1779 			instr = DIF_INSTR_LOAD(dt_cg_load(dnp, ctfp,
1786 			    dt_cg_node_alloc(DT_LBL_NONE, instr));
1832 				instr = DIF_INSTR_MOV(
1835 				    dt_cg_node_alloc(DT_LBL_NONE, instr));
1840 			instr = DIF_INSTR_XLATE(op, 0, dnp->dn_reg);
1842 			    dt_cg_node_alloc(DT_LBL_NONE, instr));
1924 			instr = DIF_INSTR_FMT(DIF_OP_ADD,
1928 			    dt_cg_node_alloc(DT_LBL_NONE, instr));
1943 			instr = DIF_INSTR_LOAD(dt_cg_load(dnp,
1951 			    dt_cg_node_alloc(DT_LBL_NONE, instr));
1971 		instr = DIF_INSTR_SETS((ulong_t)stroff, dnp->dn_reg);
1972 		dt_irlist_append(dlp, dt_cg_node_alloc(DT_LBL_NONE, instr));
1985 			instr = DIF_INSTR_MOV(dnp->dn_ident->di_id,
1988 			    dt_cg_node_alloc(DT_LBL_NONE, instr));
2026 			instr = DIF_INSTR_CALL(dnp->dn_ident->di_id,
2030 			    dt_cg_node_alloc(DT_LBL_NONE, instr));
2066 			instr = DIF_INSTR_LDV(op,
2070 			    dt_cg_node_alloc(DT_LBL_NONE, instr));
2090 				instr = DIF_INSTR_LOAD(dt_cg_load(dnp, ctfp,
2093 				    dt_cg_node_alloc(DT_LBL_NONE, instr));
2118 	dif_instr_t instr;
2173 	instr = DIF_INSTR_RET(dnp->dn_reg);
2175 	dt_irlist_append(&pcb->pcb_ir, dt_cg_node_alloc(DT_LBL_NONE, instr));