Lines Matching refs:dnp
402 dt_node_promote(dt_node_t *lp, dt_node_t *rp, dt_node_t *dnp) in dt_node_promote() argument
404 dt_type_promote(lp, rp, &dnp->dn_ctfp, &dnp->dn_type); in dt_node_promote()
405 dt_node_type_assign(dnp, dnp->dn_ctfp, dnp->dn_type, B_FALSE); in dt_node_promote()
406 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_node_promote()
410 dt_node_name(const dt_node_t *dnp, char *buf, size_t len) in dt_node_name() argument
419 switch (dnp->dn_kind) { in dt_node_name()
422 (u_longlong_t)dnp->dn_value); in dt_node_name()
425 s = strchr2esc(dnp->dn_string, strlen(dnp->dn_string)); in dt_node_name()
427 s != NULL ? s : dnp->dn_string); in dt_node_name()
431 (void) snprintf(buf, len, "identifier %s", dnp->dn_string); in dt_node_name()
437 switch (dnp->dn_ident->di_kind) { in dt_node_name()
448 dt_idkind_name(dnp->dn_ident->di_kind), in dt_node_name()
449 prefix, dnp->dn_ident->di_name, suffix); in dt_node_name()
452 dts = dnp->dn_ident->di_data; in dt_node_name()
458 dt_node_type_name(dnp, n1, sizeof (n1))); in dt_node_name()
463 (void) snprintf(buf, len, "operator %s", opstr(dnp->dn_op)); in dt_node_name()
467 if (dnp->dn_expr) in dt_node_name()
468 return (dt_node_name(dnp->dn_expr, buf, len)); in dt_node_name()
472 if (dnp->dn_desc->dtpd_id == 0) { in dt_node_name()
475 dnp->dn_desc->dtpd_provider, dnp->dn_desc->dtpd_mod, in dt_node_name()
476 dnp->dn_desc->dtpd_func, dnp->dn_desc->dtpd_name); in dt_node_name()
479 dnp->dn_desc->dtpd_id); in dt_node_name()
486 (void) snprintf(buf, len, "member %s", dnp->dn_membname); in dt_node_name()
490 dt_type_name(dnp->dn_xlator->dx_dst_ctfp, in dt_node_name()
491 dnp->dn_xlator->dx_dst_type, n1, sizeof (n1)), in dt_node_name()
492 dt_type_name(dnp->dn_xlator->dx_src_ctfp, in dt_node_name()
493 dnp->dn_xlator->dx_src_type, n2, sizeof (n2))); in dt_node_name()
499 (void) snprintf(buf, len, "node <%u>", dnp->dn_kind); in dt_node_name()
513 dt_node_t *dnp = dt_alloc(dtp, sizeof (dt_node_t)); in dt_node_xalloc() local
515 if (dnp == NULL) in dt_node_xalloc()
518 dnp->dn_ctfp = NULL; in dt_node_xalloc()
519 dnp->dn_type = CTF_ERR; in dt_node_xalloc()
520 dnp->dn_kind = (uchar_t)kind; in dt_node_xalloc()
521 dnp->dn_flags = 0; in dt_node_xalloc()
522 dnp->dn_op = 0; in dt_node_xalloc()
523 dnp->dn_line = -1; in dt_node_xalloc()
524 dnp->dn_reg = -1; in dt_node_xalloc()
525 dnp->dn_attr = _dtrace_defattr; in dt_node_xalloc()
526 dnp->dn_list = NULL; in dt_node_xalloc()
527 dnp->dn_link = NULL; in dt_node_xalloc()
528 bzero(&dnp->dn_u, sizeof (dnp->dn_u)); in dt_node_xalloc()
530 return (dnp); in dt_node_xalloc()
542 dt_node_t *dnp = dt_node_xalloc(yypcb->pcb_hdl, kind); in dt_node_alloc() local
544 if (dnp == NULL) in dt_node_alloc()
547 dnp->dn_line = yylineno; in dt_node_alloc()
548 dnp->dn_link = yypcb->pcb_list; in dt_node_alloc()
549 yypcb->pcb_list = dnp; in dt_node_alloc()
551 return (dnp); in dt_node_alloc()
555 dt_node_free(dt_node_t *dnp) in dt_node_free() argument
557 uchar_t kind = dnp->dn_kind; in dt_node_free()
559 dnp->dn_kind = DT_NODE_FREE; in dt_node_free()
565 free(dnp->dn_string); in dt_node_free()
566 dnp->dn_string = NULL; in dt_node_free()
572 if (dnp->dn_ident != NULL) { in dt_node_free()
573 if (dnp->dn_ident->di_flags & DT_IDFLG_ORPHAN) in dt_node_free()
574 dt_ident_destroy(dnp->dn_ident); in dt_node_free()
575 dnp->dn_ident = NULL; in dt_node_free()
577 dt_node_list_free(&dnp->dn_args); in dt_node_free()
581 if (dnp->dn_child != NULL) { in dt_node_free()
582 dt_node_free(dnp->dn_child); in dt_node_free()
583 dnp->dn_child = NULL; in dt_node_free()
588 if (dnp->dn_expr != NULL) { in dt_node_free()
589 dt_node_free(dnp->dn_expr); in dt_node_free()
590 dnp->dn_expr = NULL; in dt_node_free()
594 if (dnp->dn_left != NULL) { in dt_node_free()
595 dt_node_free(dnp->dn_left); in dt_node_free()
596 dnp->dn_left = NULL; in dt_node_free()
598 if (dnp->dn_right != NULL) { in dt_node_free()
599 dt_node_free(dnp->dn_right); in dt_node_free()
600 dnp->dn_right = NULL; in dt_node_free()
606 if (dnp->dn_expr != NULL) { in dt_node_free()
607 dt_node_free(dnp->dn_expr); in dt_node_free()
608 dnp->dn_expr = NULL; in dt_node_free()
613 if (dnp->dn_aggfun != NULL) { in dt_node_free()
614 dt_node_free(dnp->dn_aggfun); in dt_node_free()
615 dnp->dn_aggfun = NULL; in dt_node_free()
617 dt_node_list_free(&dnp->dn_aggtup); in dt_node_free()
621 free(dnp->dn_spec); in dt_node_free()
622 dnp->dn_spec = NULL; in dt_node_free()
623 free(dnp->dn_desc); in dt_node_free()
624 dnp->dn_desc = NULL; in dt_node_free()
628 if (dnp->dn_pred != NULL) in dt_node_free()
629 dt_node_free(dnp->dn_pred); in dt_node_free()
630 if (dnp->dn_locals != NULL) in dt_node_free()
631 dt_idhash_destroy(dnp->dn_locals); in dt_node_free()
632 dt_node_list_free(&dnp->dn_pdescs); in dt_node_free()
633 dt_node_list_free(&dnp->dn_acts); in dt_node_free()
637 free(dnp->dn_membname); in dt_node_free()
638 dnp->dn_membname = NULL; in dt_node_free()
639 if (dnp->dn_membexpr != NULL) { in dt_node_free()
640 dt_node_free(dnp->dn_membexpr); in dt_node_free()
641 dnp->dn_membexpr = NULL; in dt_node_free()
646 dt_node_list_free(&dnp->dn_probes); in dt_node_free()
647 free(dnp->dn_provname); in dt_node_free()
648 dnp->dn_provname = NULL; in dt_node_free()
652 dt_node_list_free(&dnp->dn_list); in dt_node_free()
658 dt_node_attr_assign(dt_node_t *dnp, dtrace_attribute_t attr) in dt_node_attr_assign() argument
665 dnerror(dnp, D_ATTR_MIN, "attributes for %s (%s) are less than " in dt_node_attr_assign()
666 "predefined minimum\n", dt_node_name(dnp, s, sizeof (s)), in dt_node_attr_assign()
670 dnp->dn_attr = attr; in dt_node_attr_assign()
674 dt_node_type_assign(dt_node_t *dnp, ctf_file_t *fp, ctf_id_t type, in dt_node_type_assign() argument
681 dnp->dn_flags &= in dt_node_type_assign()
688 dnp->dn_flags |= DT_NF_BITFIELD; in dt_node_type_assign()
691 dnp->dn_flags |= DT_NF_SIGNED; in dt_node_type_assign()
696 dnp->dn_flags |= DT_NF_REF; in dt_node_type_assign()
702 dnp->dn_flags |= DT_NF_REF; in dt_node_type_assign()
705 dnp->dn_flags |= DT_NF_REF; in dt_node_type_assign()
708 dnp->dn_flags |= DT_NF_USERLAND; in dt_node_type_assign()
710 dnp->dn_flags |= DT_NF_COOKED; in dt_node_type_assign()
711 dnp->dn_ctfp = fp; in dt_node_type_assign()
712 dnp->dn_type = type; in dt_node_type_assign()
725 dt_node_type_name(const dt_node_t *dnp, char *buf, size_t len) in dt_node_type_name() argument
727 if (dt_node_is_dynamic(dnp) && dnp->dn_ident != NULL) { in dt_node_type_name()
729 dt_idkind_name(dt_ident_resolve(dnp->dn_ident)->di_kind)); in dt_node_type_name()
733 if (dnp->dn_flags & DT_NF_USERLAND) { in dt_node_type_name()
736 (void) dt_type_name(dnp->dn_ctfp, dnp->dn_type, buf + n, len); in dt_node_type_name()
740 return (dt_type_name(dnp->dn_ctfp, dnp->dn_type, buf, len)); in dt_node_type_name()
744 dt_node_type_size(const dt_node_t *dnp) in dt_node_type_size() argument
749 if (dnp->dn_kind == DT_NODE_STRING) in dt_node_type_size()
750 return (strlen(dnp->dn_string) + 1); in dt_node_type_size()
752 if (dt_node_is_dynamic(dnp) && dnp->dn_ident != NULL) in dt_node_type_size()
753 return (dt_ident_size(dnp->dn_ident)); in dt_node_type_size()
755 base = ctf_type_resolve(dnp->dn_ctfp, dnp->dn_type); in dt_node_type_size()
757 if (ctf_type_kind(dnp->dn_ctfp, base) == CTF_K_FORWARD) in dt_node_type_size()
768 if (ctf_type_kind(dnp->dn_ctfp, base) == CTF_K_POINTER && in dt_node_type_size()
769 ctf_getmodel(dnp->dn_ctfp) == CTF_MODEL_ILP32 && in dt_node_type_size()
770 !(dnp->dn_flags & DT_NF_USERLAND) && in dt_node_type_size()
774 return (ctf_type_size(dnp->dn_ctfp, dnp->dn_type)); in dt_node_type_size()
783 dt_node_resolve(const dt_node_t *dnp, uint_t idkind) in dt_node_resolve() argument
787 switch (dnp->dn_kind) { in dt_node_resolve()
794 idp = dt_ident_resolve(dnp->dn_ident); in dt_node_resolve()
798 if (dt_node_is_dynamic(dnp)) { in dt_node_resolve()
799 idp = dt_ident_resolve(dnp->dn_ident); in dt_node_resolve()
807 dt_node_sizeof(const dt_node_t *dnp) in dt_node_sizeof() argument
822 if (dnp->dn_kind != DT_NODE_SYM) in dt_node_sizeof()
823 return (dt_node_type_size(dnp)); in dt_node_sizeof()
825 sip = dnp->dn_ident->di_data; in dt_node_sizeof()
835 dt_node_is_integer(const dt_node_t *dnp) in dt_node_is_integer() argument
837 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_integer()
842 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_integer()
844 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_integer()
855 dt_node_is_float(const dt_node_t *dnp) in dt_node_is_float() argument
857 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_float()
862 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_float()
864 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_float()
868 ctf_type_encoding(dnp->dn_ctfp, type, &e) == 0 && ( in dt_node_is_float()
874 dt_node_is_scalar(const dt_node_t *dnp) in dt_node_is_scalar() argument
876 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_scalar()
881 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_scalar()
883 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_scalar()
895 dt_node_is_arith(const dt_node_t *dnp) in dt_node_is_arith() argument
897 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_arith()
902 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_arith()
904 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_arith()
914 dt_node_is_vfptr(const dt_node_t *dnp) in dt_node_is_vfptr() argument
916 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_vfptr()
921 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_vfptr()
923 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_vfptr()
935 dt_node_is_dynamic(const dt_node_t *dnp) in dt_node_is_dynamic() argument
937 if (dnp->dn_kind == DT_NODE_VAR && in dt_node_is_dynamic()
938 (dnp->dn_ident->di_flags & DT_IDFLG_INLINE)) { in dt_node_is_dynamic()
939 const dt_idnode_t *inp = dnp->dn_ident->di_iarg; in dt_node_is_dynamic()
943 return (dnp->dn_ctfp == DT_DYN_CTFP(yypcb->pcb_hdl) && in dt_node_is_dynamic()
944 dnp->dn_type == DT_DYN_TYPE(yypcb->pcb_hdl)); in dt_node_is_dynamic()
948 dt_node_is_string(const dt_node_t *dnp) in dt_node_is_string() argument
950 return (dnp->dn_ctfp == DT_STR_CTFP(yypcb->pcb_hdl) && in dt_node_is_string()
951 dnp->dn_type == DT_STR_TYPE(yypcb->pcb_hdl)); in dt_node_is_string()
955 dt_node_is_stack(const dt_node_t *dnp) in dt_node_is_stack() argument
957 return (dnp->dn_ctfp == DT_STACK_CTFP(yypcb->pcb_hdl) && in dt_node_is_stack()
958 dnp->dn_type == DT_STACK_TYPE(yypcb->pcb_hdl)); in dt_node_is_stack()
962 dt_node_is_symaddr(const dt_node_t *dnp) in dt_node_is_symaddr() argument
964 return (dnp->dn_ctfp == DT_SYMADDR_CTFP(yypcb->pcb_hdl) && in dt_node_is_symaddr()
965 dnp->dn_type == DT_SYMADDR_TYPE(yypcb->pcb_hdl)); in dt_node_is_symaddr()
969 dt_node_is_usymaddr(const dt_node_t *dnp) in dt_node_is_usymaddr() argument
971 return (dnp->dn_ctfp == DT_USYMADDR_CTFP(yypcb->pcb_hdl) && in dt_node_is_usymaddr()
972 dnp->dn_type == DT_USYMADDR_TYPE(yypcb->pcb_hdl)); in dt_node_is_usymaddr()
976 dt_node_is_strcompat(const dt_node_t *dnp) in dt_node_is_strcompat() argument
978 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_strcompat()
984 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_strcompat()
986 base = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_strcompat()
1004 dt_node_is_pointer(const dt_node_t *dnp) in dt_node_is_pointer() argument
1006 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_pointer()
1009 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_pointer()
1011 if (dt_node_is_string(dnp)) in dt_node_is_pointer()
1014 kind = ctf_type_kind(fp, ctf_type_resolve(fp, dnp->dn_type)); in dt_node_is_pointer()
1019 dt_node_is_void(const dt_node_t *dnp) in dt_node_is_void() argument
1021 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_void()
1025 if (dt_node_is_dynamic(dnp)) in dt_node_is_void()
1028 if (dt_node_is_stack(dnp)) in dt_node_is_void()
1031 if (dt_node_is_symaddr(dnp) || dt_node_is_usymaddr(dnp)) in dt_node_is_void()
1034 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_void()
1191 dt_node_is_posconst(const dt_node_t *dnp) in dt_node_is_posconst() argument
1193 return (dnp->dn_kind == DT_NODE_INT && dnp->dn_value != 0 && ( in dt_node_is_posconst()
1194 (dnp->dn_flags & DT_NF_SIGNED) == 0 || (int64_t)dnp->dn_value > 0)); in dt_node_is_posconst()
1198 dt_node_is_actfunc(const dt_node_t *dnp) in dt_node_is_actfunc() argument
1200 return (dnp->dn_kind == DT_NODE_FUNC && in dt_node_is_actfunc()
1201 dnp->dn_ident->di_kind == DT_IDENT_ACTFUNC); in dt_node_is_actfunc()
1237 dt_node_t *dnp = dt_node_alloc(DT_NODE_INT); in dt_node_int() local
1246 dnp->dn_op = DT_TOK_INT; in dt_node_int()
1247 dnp->dn_value = value; in dt_node_int()
1258 dt_node_type_assign(dnp, in dt_node_int()
1268 return (dt_node_op1(DT_TOK_IPOS, dnp)); in dt_node_int()
1270 return (dt_node_op1(DT_TOK_INEG, dnp)); in dt_node_int()
1272 return (dnp); in dt_node_int()
1287 dt_node_t *dnp; in dt_node_string() local
1292 dnp = dt_node_alloc(DT_NODE_STRING); in dt_node_string()
1293 dnp->dn_op = DT_TOK_STRING; in dt_node_string()
1294 dnp->dn_string = string; in dt_node_string()
1295 dt_node_type_assign(dnp, DT_STR_CTFP(dtp), DT_STR_TYPE(dtp), B_FALSE); in dt_node_string()
1297 return (dnp); in dt_node_string()
1304 dt_node_t *dnp; in dt_node_ident() local
1323 dnp = dt_node_alloc(DT_NODE_INT); in dt_node_ident()
1324 dnp->dn_op = DT_TOK_INT; in dt_node_ident()
1325 dnp->dn_value = inp->din_root->dn_value; in dt_node_ident()
1326 dt_node_type_propagate(inp->din_root, dnp); in dt_node_ident()
1328 return (dnp); in dt_node_ident()
1332 dnp = dt_node_alloc(DT_NODE_IDENT); in dt_node_ident()
1333 dnp->dn_op = name[0] == '@' ? DT_TOK_AGG : DT_TOK_IDENT; in dt_node_ident()
1334 dnp->dn_string = name; in dt_node_ident()
1336 return (dnp); in dt_node_ident()
1349 dt_node_t *dnp; in dt_node_type() local
1368 dnp = dt_node_alloc(DT_NODE_TYPE); in dt_node_type()
1369 dnp->dn_op = DT_TOK_IDENT; in dt_node_type()
1370 dnp->dn_string = name; in dt_node_type()
1372 dt_node_type_assign(dnp, dtt.dtt_ctfp, dtt.dtt_type, dtt.dtt_flags); in dt_node_type()
1376 dt_node_attr_assign(dnp, _dtrace_defattr); in dt_node_type()
1378 dt_node_attr_assign(dnp, _dtrace_typattr); in dt_node_type()
1380 return (dnp); in dt_node_type()
1390 dt_node_t *dnp = dt_node_alloc(DT_NODE_TYPE); in dt_node_vatype() local
1392 dnp->dn_op = DT_TOK_IDENT; in dt_node_vatype()
1393 dnp->dn_ctfp = yypcb->pcb_hdl->dt_cdefs->dm_ctfp; in dt_node_vatype()
1394 dnp->dn_type = CTF_ERR; in dt_node_vatype()
1395 dnp->dn_attr = _dtrace_defattr; in dt_node_vatype()
1397 return (dnp); in dt_node_vatype()
1645 dt_node_t *dnp = ddp->dd_node; in dt_node_decl() local
1648 for (; dnp != NULL; dnp = dnp->dn_list, argc++) { in dt_node_decl()
1654 if (ctf_type_cmp(dnp->dn_ctfp, dnp->dn_type, in dt_node_decl()
1664 dt_node_type_name(dnp, n1, sizeof (n1)), in dt_node_decl()
1751 dt_node_func(dt_node_t *dnp, dt_node_t *args) in dt_node_func() argument
1755 if (dnp->dn_kind != DT_NODE_IDENT) { in dt_node_func()
1760 idp = dt_idstack_lookup(&yypcb->pcb_globals, dnp->dn_string); in dt_node_func()
1764 "undefined function name: %s\n", dnp->dn_string); in dt_node_func()
1774 free(dnp->dn_string); in dt_node_func()
1775 dnp->dn_string = NULL; in dt_node_func()
1777 dnp->dn_kind = DT_NODE_FUNC; in dt_node_func()
1778 dnp->dn_flags &= ~DT_NF_COOKED; in dt_node_func()
1779 dnp->dn_ident = idp; in dt_node_func()
1780 dnp->dn_args = args; in dt_node_func()
1781 dnp->dn_list = NULL; in dt_node_func()
1783 return (dnp); in dt_node_func()
1839 dt_node_t *dnp; in dt_node_op1() local
1892 dnp = dt_node_alloc(DT_NODE_OP1); in dt_node_op1()
1894 dnp->dn_op = (ushort_t)op; in dt_node_op1()
1895 dnp->dn_child = cp; in dt_node_op1()
1897 return (dnp); in dt_node_op1()
1936 dt_node_t *dnp; in dt_node_op2() local
1955 dnp = dt_node_int(0); /* allocate new integer node for result */ in dt_node_op2()
1959 dnp->dn_value = l || r; in dt_node_op2()
1960 dt_node_type_assign(dnp, in dt_node_op2()
1964 dnp->dn_value = (l != 0) ^ (r != 0); in dt_node_op2()
1965 dt_node_type_assign(dnp, in dt_node_op2()
1969 dnp->dn_value = l && r; in dt_node_op2()
1970 dt_node_type_assign(dnp, in dt_node_op2()
1974 dnp->dn_value = l | r; in dt_node_op2()
1975 dt_node_promote(lp, rp, dnp); in dt_node_op2()
1978 dnp->dn_value = l ^ r; in dt_node_op2()
1979 dt_node_promote(lp, rp, dnp); in dt_node_op2()
1982 dnp->dn_value = l & r; in dt_node_op2()
1983 dt_node_promote(lp, rp, dnp); in dt_node_op2()
1986 dnp->dn_value = l == r; in dt_node_op2()
1987 dt_node_type_assign(dnp, in dt_node_op2()
1991 dnp->dn_value = l != r; in dt_node_op2()
1992 dt_node_type_assign(dnp, in dt_node_op2()
1996 dt_node_promote(lp, rp, dnp); in dt_node_op2()
1997 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
1998 dnp->dn_value = (intmax_t)l < (intmax_t)r; in dt_node_op2()
2000 dnp->dn_value = l < r; in dt_node_op2()
2001 dt_node_type_assign(dnp, in dt_node_op2()
2005 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2006 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2007 dnp->dn_value = (intmax_t)l <= (intmax_t)r; in dt_node_op2()
2009 dnp->dn_value = l <= r; in dt_node_op2()
2010 dt_node_type_assign(dnp, in dt_node_op2()
2014 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2015 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2016 dnp->dn_value = (intmax_t)l > (intmax_t)r; in dt_node_op2()
2018 dnp->dn_value = l > r; in dt_node_op2()
2019 dt_node_type_assign(dnp, in dt_node_op2()
2023 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2024 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2025 dnp->dn_value = (intmax_t)l >= (intmax_t)r; in dt_node_op2()
2027 dnp->dn_value = l >= r; in dt_node_op2()
2028 dt_node_type_assign(dnp, in dt_node_op2()
2032 dnp->dn_value = l << r; in dt_node_op2()
2033 dt_node_type_propagate(lp, dnp); in dt_node_op2()
2038 dnp->dn_value = l >> r; in dt_node_op2()
2039 dt_node_type_propagate(lp, dnp); in dt_node_op2()
2044 dnp->dn_value = l + r; in dt_node_op2()
2045 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2048 dnp->dn_value = l - r; in dt_node_op2()
2049 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2052 dnp->dn_value = l * r; in dt_node_op2()
2053 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2056 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2057 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2058 dnp->dn_value = (intmax_t)l / (intmax_t)r; in dt_node_op2()
2060 dnp->dn_value = l / r; in dt_node_op2()
2063 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2064 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2065 dnp->dn_value = (intmax_t)l % (intmax_t)r; in dt_node_op2()
2067 dnp->dn_value = l % r; in dt_node_op2()
2070 dt_node_free(dnp); in dt_node_op2()
2071 dnp = NULL; in dt_node_op2()
2074 if (dnp != NULL) { in dt_node_op2()
2077 return (dnp); in dt_node_op2()
2095 dnp = dt_node_alloc(DT_NODE_OP2); in dt_node_op2()
2097 dnp->dn_op = (ushort_t)op; in dt_node_op2()
2098 dnp->dn_left = lp; in dt_node_op2()
2099 dnp->dn_right = rp; in dt_node_op2()
2101 return (dnp); in dt_node_op2()
2107 dt_node_t *dnp; in dt_node_op3() local
2112 dnp = dt_node_alloc(DT_NODE_OP3); in dt_node_op3()
2113 dnp->dn_op = DT_TOK_QUESTION; in dt_node_op3()
2114 dnp->dn_expr = expr; in dt_node_op3()
2115 dnp->dn_left = lp; in dt_node_op3()
2116 dnp->dn_right = rp; in dt_node_op3()
2118 return (dnp); in dt_node_op3()
2124 dt_node_t *dnp; in dt_node_statement() local
2131 dnp = dt_node_alloc(DT_NODE_DFUNC); in dt_node_statement()
2133 dnp = dt_node_alloc(DT_NODE_DEXPR); in dt_node_statement()
2135 dnp->dn_expr = expr; in dt_node_statement()
2136 return (dnp); in dt_node_statement()
2142 dt_node_t *dnp = dt_node_alloc(DT_NODE_IF); in dt_node_if() local
2143 dnp->dn_conditional = pred; in dt_node_if()
2144 dnp->dn_body = acts; in dt_node_if()
2145 dnp->dn_alternate_body = else_acts; in dt_node_if()
2147 return (dnp); in dt_node_if()
2154 dt_node_t *dnp; in dt_node_pdesc_by_name() local
2159 dnp = dt_node_alloc(DT_NODE_PDESC); in dt_node_pdesc_by_name()
2160 dnp->dn_spec = spec; in dt_node_pdesc_by_name()
2161 dnp->dn_desc = malloc(sizeof (dtrace_probedesc_t)); in dt_node_pdesc_by_name()
2163 if (dnp->dn_desc == NULL) in dt_node_pdesc_by_name()
2166 if (dtrace_xstr2desc(dtp, yypcb->pcb_pspec, dnp->dn_spec, in dt_node_pdesc_by_name()
2167 yypcb->pcb_sargc, yypcb->pcb_sargv, dnp->dn_desc) != 0) { in dt_node_pdesc_by_name()
2169 dnp->dn_spec, dtrace_errmsg(dtp, dtrace_errno(dtp))); in dt_node_pdesc_by_name()
2172 free(dnp->dn_spec); in dt_node_pdesc_by_name()
2173 dnp->dn_spec = NULL; in dt_node_pdesc_by_name()
2175 return (dnp); in dt_node_pdesc_by_name()
2186 dt_node_t *dnp = dt_node_alloc(DT_NODE_PDESC); in dt_node_pdesc_by_id() local
2188 if ((dnp->dn_desc = malloc(sizeof (dtrace_probedesc_t))) == NULL) in dt_node_pdesc_by_id()
2202 if (dtrace_id2desc(dtp, (dtrace_id_t)id, dnp->dn_desc) != 0) { in dt_node_pdesc_by_id()
2207 return (dnp); in dt_node_pdesc_by_id()
2213 dt_node_t *dnp = dt_node_alloc(DT_NODE_CLAUSE); in dt_node_clause() local
2215 dnp->dn_pdescs = pdescs; in dt_node_clause()
2216 dnp->dn_pred = pred; in dt_node_clause()
2217 dnp->dn_acts = acts; in dt_node_clause()
2219 return (dnp); in dt_node_clause()
2234 dt_node_t *dnp; in dt_node_inline() local
2279 dnp = dt_node_alloc(DT_NODE_INLINE); in dt_node_inline()
2280 dt_node_type_assign(dnp, dtt.dtt_ctfp, dtt.dtt_type, B_FALSE); in dt_node_inline()
2281 dt_node_attr_assign(dnp, _dtrace_defattr); in dt_node_inline()
2283 if (dt_node_is_void(dnp)) { in dt_node_inline()
2288 if (ctf_type_kind(dnp->dn_ctfp, ctf_type_resolve( in dt_node_inline()
2289 dnp->dn_ctfp, dnp->dn_type)) == CTF_K_FORWARD) { in dt_node_inline()
2292 dt_node_type_name(dnp, n, sizeof (n)), dsp->ds_ident); in dt_node_inline()
2300 idp = dnp->dn_ident = dt_ident_create(dsp->ds_ident, in dt_node_inline()
2394 (void) dt_ident_cook(dnp, idp, &ddp->dd_node); in dt_node_inline()
2412 return (dt_node_cook(dnp, DT_IDFLG_REF)); in dt_node_inline()
2419 dt_node_t *dnp; in dt_node_member() local
2430 dnp = dt_node_alloc(DT_NODE_MEMBER); in dt_node_member()
2431 dnp->dn_membname = name; in dt_node_member()
2432 dnp->dn_membexpr = expr; in dt_node_member()
2435 dt_node_type_assign(dnp, dtt.dtt_ctfp, dtt.dtt_type, in dt_node_member()
2438 return (dnp); in dt_node_member()
2448 dt_node_t *dnp; in dt_node_xlator() local
2499 dnp = dt_node_alloc(DT_NODE_XLATOR); in dt_node_xlator()
2500 dnp->dn_xlator = dxp; in dt_node_xlator()
2501 dnp->dn_members = members; in dt_node_xlator()
2503 return (dt_node_cook(dnp, DT_IDFLG_REF)); in dt_node_xlator()
2511 dt_node_t *dnp; in dt_node_probe() local
2530 dnp = dt_node_alloc(DT_NODE_PROBE); in dt_node_probe()
2532 dnp->dn_ident = dt_ident_create(name, DT_IDENT_PROBE, in dt_node_probe()
2552 if (dnp->dn_ident == NULL || dt_probe_create(dtp, in dt_node_probe()
2553 dnp->dn_ident, protoc, nargs, nargc, xargs, xargc) == NULL) in dt_node_probe()
2556 return (dnp); in dt_node_probe()
2563 dt_node_t *dnp = dt_node_alloc(DT_NODE_PROVIDER); in dt_node_provider() local
2567 dnp->dn_provname = name; in dt_node_provider()
2568 dnp->dn_probes = probes; in dt_node_provider()
2571 dnerror(dnp, D_PROV_BADNAME, "provider name may not " in dt_node_provider()
2576 dnerror(dnp, D_PROV_BADNAME, "provider name may not exceed %d " in dt_node_provider()
2581 dnerror(dnp, D_PROV_BADNAME, "provider name may not " in dt_node_provider()
2591 if ((dnp->dn_provider = dt_provider_lookup(dtp, name)) != NULL) in dt_node_provider()
2592 dnp->dn_provred = B_TRUE; in dt_node_provider()
2593 else if ((dnp->dn_provider = dt_provider_create(dtp, name)) == NULL) in dt_node_provider()
2596 dnp->dn_provider->pv_flags |= DT_PROVIDER_INTF; in dt_node_provider()
2609 lnp->dn_link = dnp->dn_provider->pv_nodes; in dt_node_provider()
2610 dnp->dn_provider->pv_nodes = yypcb->pcb_list; in dt_node_provider()
2613 return (dnp); in dt_node_provider()
2619 dt_node_t *dnp = dt_node_alloc(DT_NODE_PROG); in dt_node_program() local
2620 dnp->dn_list = lnp; in dt_node_program()
2621 return (dnp); in dt_node_program()
2633 dt_xcook_ident(dt_node_t *dnp, dt_idhash_t *dhp, uint_t idkind, int create) in dt_xcook_ident() argument
2656 if ((name = strrchr(dnp->dn_string, '`')) != NULL) { in dt_xcook_ident()
2657 if (name > dnp->dn_string && name[-1] == '`') { in dt_xcook_ident()
2662 if (name == dnp->dn_string + uref) in dt_xcook_ident()
2665 scope = dnp->dn_string; in dt_xcook_ident()
2672 name = dnp->dn_string + 1; in dt_xcook_ident()
2676 name = dnp->dn_string; in dt_xcook_ident()
2713 attr = dt_ident_cook(dnp, idp, NULL); in dt_xcook_ident()
2715 dt_node_type_assign(dnp, in dt_xcook_ident()
2720 free(dnp->dn_string); in dt_xcook_ident()
2721 dnp->dn_string = NULL; in dt_xcook_ident()
2722 dnp->dn_kind = dnkind; in dt_xcook_ident()
2723 dnp->dn_ident = idp; in dt_xcook_ident()
2724 dnp->dn_flags |= DT_NF_LVALUE; in dt_xcook_ident()
2727 dnp->dn_flags |= DT_NF_WRITABLE; in dt_xcook_ident()
2729 dt_node_attr_assign(dnp, attr); in dt_xcook_ident()
2786 free(dnp->dn_string); in dt_xcook_ident()
2787 dnp->dn_string = NULL; in dt_xcook_ident()
2788 dnp->dn_kind = DT_NODE_SYM; in dt_xcook_ident()
2789 dnp->dn_ident = idp; in dt_xcook_ident()
2790 dnp->dn_flags |= DT_NF_LVALUE; in dt_xcook_ident()
2792 dt_node_type_assign(dnp, dtt.dtt_ctfp, dtt.dtt_type, in dt_xcook_ident()
2794 dt_node_attr_assign(dnp, _dtrace_symattr); in dt_xcook_ident()
2798 dnp->dn_flags |= DT_NF_USERLAND; in dt_xcook_ident()
2838 attr = dt_ident_cook(dnp, idp, NULL); in dt_xcook_ident()
2840 dt_node_type_assign(dnp, in dt_xcook_ident()
2845 free(dnp->dn_string); in dt_xcook_ident()
2846 dnp->dn_string = NULL; in dt_xcook_ident()
2847 dnp->dn_kind = dnkind; in dt_xcook_ident()
2848 dnp->dn_ident = idp; in dt_xcook_ident()
2849 dnp->dn_flags |= DT_NF_LVALUE | DT_NF_WRITABLE; in dt_xcook_ident()
2851 dt_node_attr_assign(dnp, attr); in dt_xcook_ident()
2855 dnp->dn_string, mark, name, in dt_xcook_ident()
2859 dnp->dn_string, dtrace_errmsg(dtp, dtrace_errno(dtp))); in dt_xcook_ident()
2864 dt_cook_ident(dt_node_t *dnp, uint_t idflags) in dt_cook_ident() argument
2868 if (dnp->dn_op == DT_TOK_AGG) in dt_cook_ident()
2869 dt_xcook_ident(dnp, dtp->dt_aggs, DT_IDENT_AGG, B_FALSE); in dt_cook_ident()
2871 dt_xcook_ident(dnp, dtp->dt_globals, DT_IDENT_SCALAR, B_FALSE); in dt_cook_ident()
2873 return (dt_node_cook(dnp, idflags)); in dt_cook_ident()
2883 dt_cook_var(dt_node_t *dnp, uint_t idflags) in dt_cook_var() argument
2885 dt_ident_t *idp = dnp->dn_ident; in dt_cook_var()
2888 dnerror(dnp, D_VAR_UNDEF, in dt_cook_var()
2895 dt_node_attr_assign(dnp, dt_ident_cook(dnp, idp, &dnp->dn_args)); in dt_cook_var()
2896 return (dnp); in dt_cook_var()
2901 dt_cook_func(dt_node_t *dnp, uint_t idflags) in dt_cook_func() argument
2903 dt_node_attr_assign(dnp, in dt_cook_func()
2904 dt_ident_cook(dnp, dnp->dn_ident, &dnp->dn_args)); in dt_cook_func()
2906 return (dnp); in dt_cook_func()
2910 dt_cook_op1(dt_node_t *dnp, uint_t idflags) in dt_cook_op1() argument
2913 dt_node_t *cp = dnp->dn_child; in dt_cook_op1()
2924 if (dnp->dn_op == DT_TOK_PREINC || dnp->dn_op == DT_TOK_POSTINC || in dt_cook_op1()
2925 dnp->dn_op == DT_TOK_PREDEC || dnp->dn_op == DT_TOK_POSTDEC) in dt_cook_op1()
2937 cp = dnp->dn_child = dt_node_cook(cp, 0); /* don't set idflags yet */ in dt_cook_op1()
2951 switch (dnp->dn_op) { in dt_cook_op1()
2960 dnp->dn_ident = &dxp->dx_souid; in dt_cook_op1()
2961 dt_node_type_assign(dnp, in dt_cook_op1()
2962 dnp->dn_ident->di_ctfp, dnp->dn_ident->di_type, in dt_cook_op1()
2983 dt_node_type_assign(dnp, cp->dn_ctfp, type, in dt_cook_op1()
2999 if (kind != CTF_K_ARRAY || dt_node_is_string(dnp)) in dt_cook_op1()
3000 dnp->dn_flags |= DT_NF_LVALUE; /* see K&R[A7.4.3] */ in dt_cook_op1()
3012 dnp->dn_flags |= DT_NF_WRITABLE; in dt_cook_op1()
3015 (kind == CTF_K_POINTER || (dnp->dn_flags & DT_NF_REF))) in dt_cook_op1()
3016 dnp->dn_flags |= DT_NF_USERLAND; in dt_cook_op1()
3023 "of arithmetic type\n", opstr(dnp->dn_op)); in dt_cook_op1()
3025 dt_node_type_propagate(cp, dnp); /* see K&R[A7.4.4-6] */ in dt_cook_op1()
3031 "integral type\n", opstr(dnp->dn_op)); in dt_cook_op1()
3033 dt_node_type_propagate(cp, dnp); /* see K&R[A7.4.4-6] */ in dt_cook_op1()
3039 "of scalar type\n", opstr(dnp->dn_op)); in dt_cook_op1()
3041 dt_node_type_assign(dnp, DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), in dt_cook_op1()
3075 dt_node_type_assign(dnp, dtt.dtt_ctfp, dtt.dtt_type, in dt_cook_op1()
3090 dt_node_type_assign(dnp, dtp->dt_ddefs->dm_ctfp, in dt_cook_op1()
3102 dt_node_type_assign(dnp, DT_STR_CTFP(dtp), DT_STR_TYPE(dtp), in dt_cook_op1()
3112 "scalar type\n", opstr(dnp->dn_op)); in dt_cook_op1()
3117 "of known size\n", opstr(dnp->dn_op)); in dt_cook_op1()
3122 "lvalue as an operand\n", opstr(dnp->dn_op)); in dt_cook_op1()
3127 "to a writable variable\n", opstr(dnp->dn_op)); in dt_cook_op1()
3130 dt_node_type_propagate(cp, dnp); /* see K&R[A7.4.1] */ in dt_cook_op1()
3134 xyerror(D_UNKNOWN, "invalid unary op %s\n", opstr(dnp->dn_op)); in dt_cook_op1()
3137 dt_node_attr_assign(dnp, cp->dn_attr); in dt_cook_op1()
3138 return (dnp); in dt_cook_op1()
3142 dt_assign_common(dt_node_t *dnp) in dt_assign_common() argument
3144 dt_node_t *lp = dnp->dn_left; in dt_assign_common()
3145 dt_node_t *rp = dnp->dn_right; in dt_assign_common()
3146 int op = dnp->dn_op; in dt_assign_common()
3162 dt_node_type_propagate(lp, dnp); /* see K&R[A7.17] */ in dt_assign_common()
3163 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_assign_common()
3167 dt_cook_op2(dt_node_t *dnp, uint_t idflags) in dt_cook_op2() argument
3170 dt_node_t *lp = dnp->dn_left; in dt_cook_op2()
3171 dt_node_t *rp = dnp->dn_right; in dt_cook_op2()
3172 int op = dnp->dn_op; in dt_cook_op2()
3211 lp = dnp->dn_left = dt_node_cook(lp, 0); in dt_cook_op2()
3238 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3239 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3246 dt_node_promote(lp, rp, dnp); /* see K&R[A7.11-13] */ in dt_cook_op2()
3251 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3252 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3259 dt_node_type_propagate(lp, dnp); /* see K&R[A7.8] */ in dt_cook_op2()
3260 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3264 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3265 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3272 dt_node_promote(lp, rp, dnp); /* see K&R[A7.6] */ in dt_cook_op2()
3277 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3278 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3285 dt_node_promote(lp, rp, dnp); /* see K&R[A7.6] */ in dt_cook_op2()
3291 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3292 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3299 dt_node_type_assign(dnp, DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), in dt_cook_op2()
3301 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3318 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3349 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3377 dt_node_type_assign(dnp, DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), in dt_cook_op2()
3379 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3392 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3393 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3426 dt_node_type_assign(dnp, ctfp, type, B_FALSE); in dt_cook_op2()
3427 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3430 dnp->dn_flags |= DT_NF_USERLAND; in dt_cook_op2()
3445 lp = dnp->dn_left = in dt_cook_op2()
3448 rp = dnp->dn_right = in dt_cook_op2()
3464 lp = dnp->dn_left = in dt_cook_op2()
3467 rp = dnp->dn_right = in dt_cook_op2()
3493 lp = dnp->dn_left = dt_node_cook(lp, 0); /* don't set mod yet */ in dt_cook_op2()
3494 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3540 dnp->dn_left = dnp->dn_right = NULL; in dt_cook_op2()
3541 dt_node_free(dnp); in dt_cook_op2()
3616 lp = dnp->dn_left = in dt_cook_op2()
3619 rp = dnp->dn_right = in dt_cook_op2()
3650 dt_assign_common(dnp); in dt_cook_op2()
3677 dnp->dn_right = dnp->dn_left; in dt_cook_op2()
3678 dt_node_free(dnp); in dt_cook_op2()
3684 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3770 dt_node_type_assign(dnp, ctfp, m.ctm_type, B_FALSE); in dt_cook_op2()
3771 dt_node_attr_assign(dnp, lp->dn_attr); in dt_cook_op2()
3774 dt_node_is_string(dnp))) in dt_cook_op2()
3775 dnp->dn_flags |= DT_NF_LVALUE; /* see K&R[A7.3.3] */ in dt_cook_op2()
3778 (kind != CTF_K_ARRAY || dt_node_is_string(dnp))) in dt_cook_op2()
3779 dnp->dn_flags |= DT_NF_LVALUE; /* see K&R[A7.3.3] */ in dt_cook_op2()
3782 dnp->dn_flags |= DT_NF_WRITABLE; in dt_cook_op2()
3785 (dnp->dn_flags & DT_NF_REF))) in dt_cook_op2()
3786 dnp->dn_flags |= DT_NF_USERLAND; in dt_cook_op2()
3813 dnp->dn_left = dnp->dn_right = NULL; in dt_cook_op2()
3814 dt_node_free(dnp); in dt_cook_op2()
3870 lnp = dnp->dn_link; in dt_cook_op2()
3871 bcopy(lp, dnp, sizeof (dt_node_t)); in dt_cook_op2()
3872 dnp->dn_link = lnp; in dt_cook_op2()
3874 dnp->dn_args = rp; in dt_cook_op2()
3875 dnp->dn_list = NULL; in dt_cook_op2()
3878 return (dt_node_cook(dnp, idflags)); in dt_cook_op2()
3885 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3895 dnp->dn_ident = dt_xlator_ident(dxp, lp->dn_ctfp, lp->dn_type); in dt_cook_op2()
3896 dt_node_type_assign(dnp, DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp), in dt_cook_op2()
3898 dt_node_attr_assign(dnp, in dt_cook_op2()
3899 dt_attr_min(rp->dn_attr, dnp->dn_ident->di_attr)); in dt_cook_op2()
3908 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3943 dt_node_type_propagate(lp, dnp); /* see K&R[A7.5] */ in dt_cook_op2()
3944 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3951 dnp->dn_flags |= DT_NF_WRITABLE; in dt_cook_op2()
3957 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3958 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3970 dt_node_type_propagate(rp, dnp); /* see K&R[A7.18] */ in dt_cook_op2()
3971 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3985 if (dnp->dn_op == DT_TOK_LBRAC && op == DT_TOK_ADD) { in dt_cook_op2()
3994 dnp->dn_op = DT_TOK_ADD; in dt_cook_op2()
3995 pnp = dt_node_op1(DT_TOK_DEREF, dnp); in dt_cook_op2()
4006 pnp->dn_link = dnp->dn_link; in dt_cook_op2()
4007 dnp->dn_link = pnp; in dt_cook_op2()
4012 return (dnp); in dt_cook_op2()
4017 dt_cook_op3(dt_node_t *dnp, uint_t idflags) in dt_cook_op3() argument
4023 dnp->dn_expr = dt_node_cook(dnp->dn_expr, DT_IDFLG_REF); in dt_cook_op3()
4024 lp = dnp->dn_left = dt_node_cook(dnp->dn_left, DT_IDFLG_REF); in dt_cook_op3()
4025 rp = dnp->dn_right = dt_node_cook(dnp->dn_right, DT_IDFLG_REF); in dt_cook_op3()
4027 if (!dt_node_is_scalar(dnp->dn_expr)) { in dt_cook_op3()
4062 dt_node_type_assign(dnp, ctfp, type, B_FALSE); in dt_cook_op3()
4063 dt_node_attr_assign(dnp, dt_attr_min(dnp->dn_expr->dn_attr, in dt_cook_op3()
4066 return (dnp); in dt_cook_op3()
4070 dt_cook_statement(dt_node_t *dnp, uint_t idflags) in dt_cook_statement() argument
4072 dnp->dn_expr = dt_node_cook(dnp->dn_expr, idflags); in dt_cook_statement()
4073 dt_node_attr_assign(dnp, dnp->dn_expr->dn_attr); in dt_cook_statement()
4075 return (dnp); in dt_cook_statement()
4086 dt_cook_aggregation(dt_node_t *dnp, uint_t idflags) in dt_cook_aggregation() argument
4090 if (dnp->dn_aggfun != NULL) { in dt_cook_aggregation()
4091 dnp->dn_aggfun = dt_node_cook(dnp->dn_aggfun, DT_IDFLG_REF); in dt_cook_aggregation()
4092 dt_node_attr_assign(dnp, dt_ident_cook(dnp, in dt_cook_aggregation()
4093 dnp->dn_ident, &dnp->dn_aggtup)); in dt_cook_aggregation()
4095 dt_node_type_assign(dnp, DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp), in dt_cook_aggregation()
4097 dt_node_attr_assign(dnp, dnp->dn_ident->di_attr); in dt_cook_aggregation()
4100 return (dnp); in dt_cook_aggregation()
4147 dt_cook_clause(dt_node_t *dnp, uint_t idflags) in dt_cook_clause() argument
4156 dt_node_attr_assign(dnp, yypcb->pcb_pinfo.dtp_attr); in dt_cook_clause()
4157 dnp->dn_ctxattr = yypcb->pcb_pinfo.dtp_attr; in dt_cook_clause()
4162 if (dnp->dn_pred != NULL && (err = setjmp(yypcb->pcb_jmpbuf)) != 0) { in dt_cook_clause()
4173 dt_node_attr_assign(dnp, in dt_cook_clause()
4174 dt_node_list_cook(&dnp->dn_acts, idflags)); in dt_cook_clause()
4180 if (dnp->dn_pred != NULL) { in dt_cook_clause()
4183 dnp->dn_pred = dt_node_cook(dnp->dn_pred, idflags); in dt_cook_clause()
4184 dt_node_attr_assign(dnp, in dt_cook_clause()
4185 dt_attr_min(dnp->dn_attr, dnp->dn_pred->dn_attr)); in dt_cook_clause()
4187 if (!dt_node_is_scalar(dnp->dn_pred)) { in dt_cook_clause()
4198 dt_node_attr_assign(dnp, in dt_cook_clause()
4199 dt_node_list_cook(&dnp->dn_acts, idflags)); in dt_cook_clause()
4204 return (dnp); in dt_cook_clause()
4209 dt_cook_inline(dt_node_t *dnp, uint_t idflags) in dt_cook_inline() argument
4211 dt_idnode_t *inp = dnp->dn_ident->di_iarg; in dt_cook_inline()
4217 assert(dnp->dn_ident->di_flags & DT_IDFLG_INLINE); in dt_cook_inline()
4228 ctf_file_t *lctfp = dnp->dn_ctfp; in dt_cook_inline()
4229 ctf_id_t ltype = ctf_type_resolve(lctfp, dnp->dn_type); in dt_cook_inline()
4241 dnerror(dnp, D_OP_INCOMPAT, in dt_cook_inline()
4243 "\"%s\" = \"%s\"\n", dnp->dn_ident->di_name, in dt_cook_inline()
4248 } else if (dt_node_is_argcompat(dnp, inp->din_root) == 0) { in dt_cook_inline()
4249 dnerror(dnp, D_OP_INCOMPAT, in dt_cook_inline()
4251 "\"%s\" = \"%s\"\n", dnp->dn_ident->di_name, in dt_cook_inline()
4252 dt_node_type_name(dnp, n1, sizeof (n1)), in dt_cook_inline()
4256 return (dnp); in dt_cook_inline()
4260 dt_cook_member(dt_node_t *dnp, uint_t idflags) in dt_cook_member() argument
4262 dnp->dn_membexpr = dt_node_cook(dnp->dn_membexpr, idflags); in dt_cook_member()
4263 dt_node_attr_assign(dnp, dnp->dn_membexpr->dn_attr); in dt_cook_member()
4264 return (dnp); in dt_cook_member()
4269 dt_cook_xlator(dt_node_t *dnp, uint_t idflags) in dt_cook_xlator() argument
4272 dt_xlator_t *dxp = dnp->dn_xlator; in dt_cook_xlator()
4288 for (mnp = dnp->dn_members; mnp != NULL; mnp = mnp->dn_list) { in dt_cook_xlator()
4318 dt_node_type_assign(dnp, DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp), B_FALSE); in dt_cook_xlator()
4319 dt_node_attr_assign(dnp, _dtrace_defattr); in dt_cook_xlator()
4321 return (dnp); in dt_cook_xlator()
4396 dt_cook_probe(dt_node_t *dnp, dt_provider_t *pvp) in dt_cook_probe() argument
4399 dt_probe_t *prp = dnp->dn_ident->di_data; in dt_cook_probe()
4424 dnerror(dnp, D_PROV_PRXLATOR, "translator for %s:%s output " in dt_cook_probe()
4426 pvp->pv_desc.dtvd_name, dnp->dn_ident->di_name, i + 1, in dt_cook_probe()
4434 dt_cook_provider(dt_node_t *dnp, uint_t idflags) in dt_cook_provider() argument
4436 dt_provider_t *pvp = dnp->dn_provider; in dt_cook_provider()
4444 for (pnp = dnp->dn_probes; pnp != NULL; pnp = pnp->dn_list) { in dt_cook_provider()
4450 if (prp != NULL && dnp->dn_provred) { in dt_cook_provider()
4453 } else if (prp == NULL && dnp->dn_provred) { in dt_cook_provider()
4458 dnp->dn_provname, dnp->dn_provname, in dt_cook_provider()
4459 probename, dnp->dn_provname, probename); in dt_cook_provider()
4462 dnp->dn_provname, probename); in dt_cook_provider()
4469 return (dnp); in dt_cook_provider()
4474 dt_cook_none(dt_node_t *dnp, uint_t idflags) in dt_cook_none() argument
4476 return (dnp); in dt_cook_none()
4511 dt_node_cook(dt_node_t *dnp, uint_t idflags) in dt_node_cook() argument
4515 yylineno = dnp->dn_line; in dt_node_cook()
4517 assert(dnp->dn_kind < in dt_node_cook()
4519 dnp = dt_cook_funcs[dnp->dn_kind](dnp, idflags); in dt_node_cook()
4520 dnp->dn_flags |= DT_NF_COOKED; in dt_node_cook()
4522 if (dnp->dn_kind == DT_NODE_VAR || dnp->dn_kind == DT_NODE_AGG) in dt_node_cook()
4523 dnp->dn_ident->di_flags |= idflags; in dt_node_cook()
4526 return (dnp); in dt_node_cook()
4533 dt_node_t *dnp, *nnp; in dt_node_list_cook() local
4535 for (dnp = (pnp != NULL ? *pnp : NULL); dnp != NULL; dnp = nnp) { in dt_node_list_cook()
4536 nnp = dnp->dn_list; in dt_node_list_cook()
4537 dnp = *pnp = dt_node_cook(dnp, idflags); in dt_node_list_cook()
4538 attr = dt_attr_min(attr, dnp->dn_attr); in dt_node_list_cook()
4539 dnp->dn_list = nnp; in dt_node_list_cook()
4540 pnp = &dnp->dn_list; in dt_node_list_cook()
4549 dt_node_t *dnp, *nnp; in dt_node_list_free() local
4551 for (dnp = (pnp != NULL ? *pnp : NULL); dnp != NULL; dnp = nnp) { in dt_node_list_free()
4552 nnp = dnp->dn_list; in dt_node_list_free()
4553 dt_node_free(dnp); in dt_node_list_free()
4563 dt_node_t *dnp, *nnp; in dt_node_link_free() local
4565 for (dnp = (pnp != NULL ? *pnp : NULL); dnp != NULL; dnp = nnp) { in dt_node_link_free()
4566 nnp = dnp->dn_link; in dt_node_link_free()
4567 dt_node_free(dnp); in dt_node_link_free()
4570 for (dnp = (pnp != NULL ? *pnp : NULL); dnp != NULL; dnp = nnp) { in dt_node_link_free()
4571 nnp = dnp->dn_link; in dt_node_link_free()
4572 free(dnp); in dt_node_link_free()
4582 dt_node_t *dnp; in dt_node_link() local
4589 for (dnp = lp; dnp->dn_list != NULL; dnp = dnp->dn_list) in dt_node_link()
4592 dnp->dn_list = rp; in dt_node_link()
4602 dt_node_diftype(dtrace_hdl_t *dtp, const dt_node_t *dnp, dtrace_diftype_t *tp) in dt_node_diftype() argument
4604 if (dnp->dn_ctfp == DT_STR_CTFP(dtp) && in dt_node_diftype()
4605 dnp->dn_type == DT_STR_TYPE(dtp)) { in dt_node_diftype()
4610 tp->dtdt_ckind = ctf_type_kind(dnp->dn_ctfp, in dt_node_diftype()
4611 ctf_type_resolve(dnp->dn_ctfp, dnp->dn_type)); in dt_node_diftype()
4614 tp->dtdt_flags = (dnp->dn_flags & DT_NF_REF) ? in dt_node_diftype()
4615 (dnp->dn_flags & DT_NF_USERLAND) ? DIF_TF_BYUREF : in dt_node_diftype()
4618 tp->dtdt_size = ctf_type_size(dnp->dn_ctfp, dnp->dn_type); in dt_node_diftype()
4637 dt_printd(dt_node_t *dnp, FILE *fp, int depth) in dt_printd() argument
4641 switch (dnp->dn_kind) { in dt_printd()
4643 (void) fprintf(fp, "0x%llx", (u_longlong_t)dnp->dn_value); in dt_printd()
4644 if (!(dnp->dn_flags & DT_NF_SIGNED)) in dt_printd()
4649 char *escd = strchr2esc(dnp->dn_string, strlen(dnp->dn_string)); in dt_printd()
4656 (void) fprintf(fp, "%s", dnp->dn_string); in dt_printd()
4661 (dnp->dn_ident->di_flags & DT_IDFLG_LOCAL) ? "this->" : in dt_printd()
4662 (dnp->dn_ident->di_flags & DT_IDFLG_TLS) ? "self->" : "", in dt_printd()
4663 dnp->dn_ident->di_name); in dt_printd()
4665 if (dnp->dn_args != NULL) { in dt_printd()
4668 for (arg = dnp->dn_args; arg != NULL; in dt_printd()
4680 const dtrace_syminfo_t *dts = dnp->dn_ident->di_data; in dt_printd()
4685 (void) fprintf(fp, "%s(", dnp->dn_ident->di_name); in dt_printd()
4687 for (arg = dnp->dn_args; arg != NULL; arg = arg->dn_list) { in dt_printd()
4696 (void) fprintf(fp, "%s(", opstr(dnp->dn_op)); in dt_printd()
4697 dt_printd(dnp->dn_child, fp, 0); in dt_printd()
4703 dt_printd(dnp->dn_left, fp, 0); in dt_printd()
4704 if (dnp->dn_op == DT_TOK_LPAR) { in dt_printd()
4706 dt_printd(dnp->dn_right, fp, 0); in dt_printd()
4709 if (dnp->dn_op == DT_TOK_PTR || dnp->dn_op == DT_TOK_DOT || in dt_printd()
4710 dnp->dn_op == DT_TOK_LBRAC) in dt_printd()
4711 (void) fprintf(fp, "%s", opstr(dnp->dn_op)); in dt_printd()
4713 (void) fprintf(fp, " %s ", opstr(dnp->dn_op)); in dt_printd()
4714 dt_printd(dnp->dn_right, fp, 0); in dt_printd()
4715 if (dnp->dn_op == DT_TOK_LBRAC) { in dt_printd()
4716 dt_node_t *ln = dnp->dn_right; in dt_printd()
4729 dt_printd(dnp->dn_expr, fp, 0); in dt_printd()
4731 dt_printd(dnp->dn_left, fp, 0); in dt_printd()
4733 dt_printd(dnp->dn_right, fp, 0); in dt_printd()
4740 dt_printd(dnp->dn_expr, fp, depth + 1); in dt_printd()
4746 dnp->dn_desc->dtpd_provider, dnp->dn_desc->dtpd_mod, in dt_printd()
4747 dnp->dn_desc->dtpd_func, dnp->dn_desc->dtpd_name); in dt_printd()
4751 for (arg = dnp->dn_pdescs; arg != NULL; arg = arg->dn_list) { in dt_printd()
4758 if (dnp->dn_pred != NULL) { in dt_printd()
4760 dt_printd(dnp->dn_pred, fp, 0); in dt_printd()
4765 for (arg = dnp->dn_acts; arg != NULL; arg = arg->dn_list) in dt_printd()
4773 dt_printd(dnp->dn_conditional, fp, 0); in dt_printd()
4776 for (arg = dnp->dn_body; arg != NULL; arg = arg->dn_list) in dt_printd()
4778 if (dnp->dn_alternate_body == NULL) { in dt_printd()
4782 for (arg = dnp->dn_alternate_body; arg != NULL; in dt_printd()
4792 (void *)dnp, dnp->dn_kind); in dt_printd()
4797 dt_node_printr(dt_node_t *dnp, FILE *fp, int depth) in dt_node_printr() argument
4805 (void) dt_attr_str(dnp->dn_attr, a, sizeof (a)); in dt_node_printr()
4807 if (dnp->dn_ctfp != NULL && dnp->dn_type != CTF_ERR && in dt_node_printr()
4808 ctf_type_name(dnp->dn_ctfp, dnp->dn_type, n, sizeof (n)) != NULL) { in dt_node_printr()
4812 dnp->dn_type, a); in dt_node_printr()
4815 if (dnp->dn_flags != 0) { in dt_node_printr()
4817 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_printr()
4819 if (dnp->dn_flags & DT_NF_COOKED) in dt_node_printr()
4821 if (dnp->dn_flags & DT_NF_REF) in dt_node_printr()
4823 if (dnp->dn_flags & DT_NF_LVALUE) in dt_node_printr()
4825 if (dnp->dn_flags & DT_NF_WRITABLE) in dt_node_printr()
4827 if (dnp->dn_flags & DT_NF_BITFIELD) in dt_node_printr()
4829 if (dnp->dn_flags & DT_NF_USERLAND) in dt_node_printr()
4835 switch (dnp->dn_kind) { in dt_node_printr()
4837 (void) fprintf(fp, "FREE <node %p>\n", (void *)dnp); in dt_node_printr()
4842 (u_longlong_t)dnp->dn_value, buf); in dt_node_printr()
4846 (void) fprintf(fp, "STRING \"%s\" (%s)\n", dnp->dn_string, buf); in dt_node_printr()
4850 (void) fprintf(fp, "IDENT %s (%s)\n", dnp->dn_string, buf); in dt_node_printr()
4855 (dnp->dn_ident->di_flags & DT_IDFLG_LOCAL) ? "this->" : in dt_node_printr()
4856 (dnp->dn_ident->di_flags & DT_IDFLG_TLS) ? "self->" : "", in dt_node_printr()
4857 dnp->dn_ident->di_name, buf); in dt_node_printr()
4859 if (dnp->dn_args != NULL) in dt_node_printr()
4862 for (arg = dnp->dn_args; arg != NULL; arg = arg->dn_list) { in dt_node_printr()
4868 if (dnp->dn_args != NULL) in dt_node_printr()
4873 dts = dnp->dn_ident->di_data; in dt_node_printr()
4879 if (dnp->dn_string != NULL) { in dt_node_printr()
4881 buf, dnp->dn_string); in dt_node_printr()
4888 dnp->dn_ident->di_name, buf); in dt_node_printr()
4890 for (arg = dnp->dn_args; arg != NULL; arg = arg->dn_list) { in dt_node_printr()
4898 (void) fprintf(fp, "OP1 %s (%s)\n", opstr(dnp->dn_op), buf); in dt_node_printr()
4899 dt_node_printr(dnp->dn_child, fp, depth + 1); in dt_node_printr()
4903 (void) fprintf(fp, "OP2 %s (%s)\n", opstr(dnp->dn_op), buf); in dt_node_printr()
4904 dt_node_printr(dnp->dn_left, fp, depth + 1); in dt_node_printr()
4905 dt_node_printr(dnp->dn_right, fp, depth + 1); in dt_node_printr()
4906 if (dnp->dn_op == DT_TOK_LBRAC) { in dt_node_printr()
4907 dt_node_t *ln = dnp->dn_right; in dt_node_printr()
4917 dt_node_printr(dnp->dn_expr, fp, depth + 1); in dt_node_printr()
4919 dt_node_printr(dnp->dn_left, fp, depth + 1); in dt_node_printr()
4921 dt_node_printr(dnp->dn_right, fp, depth + 1); in dt_node_printr()
4927 dt_node_printr(dnp->dn_expr, fp, depth + 1); in dt_node_printr()
4932 dnp->dn_ident->di_name, a); in dt_node_printr()
4934 for (arg = dnp->dn_aggtup; arg != NULL; arg = arg->dn_list) { in dt_node_printr()
4940 if (dnp->dn_aggfun) { in dt_node_printr()
4942 dt_node_printr(dnp->dn_aggfun, fp, depth + 1); in dt_node_printr()
4946 if (dnp->dn_aggfun) in dt_node_printr()
4952 dnp->dn_desc->dtpd_provider, dnp->dn_desc->dtpd_mod, in dt_node_printr()
4953 dnp->dn_desc->dtpd_func, dnp->dn_desc->dtpd_name, in dt_node_printr()
4954 dnp->dn_desc->dtpd_id); in dt_node_printr()
4960 for (arg = dnp->dn_pdescs; arg != NULL; arg = arg->dn_list) in dt_node_printr()
4964 dt_attr_str(dnp->dn_ctxattr, a, sizeof (a))); in dt_node_printr()
4966 if (dnp->dn_pred != NULL) { in dt_node_printr()
4968 dt_node_printr(dnp->dn_pred, fp, depth + 1); in dt_node_printr()
4972 for (arg = dnp->dn_acts; arg != NULL; arg = arg->dn_list) in dt_node_printr()
4978 inp = dnp->dn_ident->di_iarg; in dt_node_printr()
4981 dnp->dn_ident->di_name, buf); in dt_node_printr()
4986 (void) fprintf(fp, "MEMBER %s (%s)\n", dnp->dn_membname, buf); in dt_node_printr()
4987 if (dnp->dn_membexpr) in dt_node_printr()
4988 dt_node_printr(dnp->dn_membexpr, fp, depth + 1); in dt_node_printr()
4994 if (ctf_type_name(dnp->dn_xlator->dx_src_ctfp, in dt_node_printr()
4995 dnp->dn_xlator->dx_src_type, n, sizeof (n)) != NULL) in dt_node_printr()
4998 if (ctf_type_name(dnp->dn_xlator->dx_dst_ctfp, in dt_node_printr()
4999 dnp->dn_xlator->dx_dst_type, n, sizeof (n)) != NULL) in dt_node_printr()
5004 for (arg = dnp->dn_members; arg != NULL; arg = arg->dn_list) in dt_node_printr()
5009 (void) fprintf(fp, "PROBE %s\n", dnp->dn_ident->di_name); in dt_node_printr()
5014 dnp->dn_provname, dnp->dn_provred ? "redecl" : "decl"); in dt_node_printr()
5015 for (arg = dnp->dn_probes; arg != NULL; arg = arg->dn_list) in dt_node_printr()
5021 for (arg = dnp->dn_list; arg != NULL; arg = arg->dn_list) in dt_node_printr()
5028 dt_node_printr(dnp->dn_conditional, fp, depth + 1); in dt_node_printr()
5031 for (arg = dnp->dn_body; arg != NULL; arg = arg->dn_list) in dt_node_printr()
5034 if (dnp->dn_alternate_body != NULL) { in dt_node_printr()
5036 for (arg = dnp->dn_alternate_body; arg != NULL; in dt_node_printr()
5045 (void *)dnp, dnp->dn_kind); in dt_node_printr()
5050 dt_node_root(dt_node_t *dnp) in dt_node_root() argument
5052 yypcb->pcb_root = dnp; in dt_node_root()
5058 dnerror(const dt_node_t *dnp, dt_errtag_t tag, const char *format, ...) in dnerror() argument
5063 yylineno = dnp->dn_line; in dnerror()
5075 dnwarn(const dt_node_t *dnp, dt_errtag_t tag, const char *format, ...) in dnwarn() argument
5080 yylineno = dnp->dn_line; in dnwarn()