Lines Matching refs:dnp
407 dt_node_promote(dt_node_t *lp, dt_node_t *rp, dt_node_t *dnp) in dt_node_promote() argument
409 dt_type_promote(lp, rp, &dnp->dn_ctfp, &dnp->dn_type); in dt_node_promote()
410 dt_node_type_assign(dnp, dnp->dn_ctfp, dnp->dn_type, B_FALSE); in dt_node_promote()
411 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_node_promote()
415 dt_node_name(const dt_node_t *dnp, char *buf, size_t len) in dt_node_name() argument
424 switch (dnp->dn_kind) { in dt_node_name()
427 (u_longlong_t)dnp->dn_value); in dt_node_name()
430 s = strchr2esc(dnp->dn_string, strlen(dnp->dn_string)); in dt_node_name()
432 s != NULL ? s : dnp->dn_string); in dt_node_name()
436 (void) snprintf(buf, len, "identifier %s", dnp->dn_string); in dt_node_name()
442 switch (dnp->dn_ident->di_kind) { in dt_node_name()
453 dt_idkind_name(dnp->dn_ident->di_kind), in dt_node_name()
454 prefix, dnp->dn_ident->di_name, suffix); in dt_node_name()
457 dts = dnp->dn_ident->di_data; in dt_node_name()
463 dt_node_type_name(dnp, n1, sizeof (n1))); in dt_node_name()
468 (void) snprintf(buf, len, "operator %s", opstr(dnp->dn_op)); in dt_node_name()
472 if (dnp->dn_expr) in dt_node_name()
473 return (dt_node_name(dnp->dn_expr, buf, len)); in dt_node_name()
477 if (dnp->dn_desc->dtpd_id == 0) { in dt_node_name()
480 dnp->dn_desc->dtpd_provider, dnp->dn_desc->dtpd_mod, in dt_node_name()
481 dnp->dn_desc->dtpd_func, dnp->dn_desc->dtpd_name); in dt_node_name()
484 dnp->dn_desc->dtpd_id); in dt_node_name()
491 (void) snprintf(buf, len, "member %s", dnp->dn_membname); in dt_node_name()
495 dt_type_name(dnp->dn_xlator->dx_dst_ctfp, in dt_node_name()
496 dnp->dn_xlator->dx_dst_type, n1, sizeof (n1)), in dt_node_name()
497 dt_type_name(dnp->dn_xlator->dx_src_ctfp, in dt_node_name()
498 dnp->dn_xlator->dx_src_type, n2, sizeof (n2))); in dt_node_name()
504 (void) snprintf(buf, len, "node <%u>", dnp->dn_kind); in dt_node_name()
518 dt_node_t *dnp = dt_alloc(dtp, sizeof (dt_node_t)); in dt_node_xalloc() local
520 if (dnp == NULL) in dt_node_xalloc()
523 dnp->dn_ctfp = NULL; in dt_node_xalloc()
524 dnp->dn_type = CTF_ERR; in dt_node_xalloc()
525 dnp->dn_kind = (uchar_t)kind; in dt_node_xalloc()
526 dnp->dn_flags = 0; in dt_node_xalloc()
527 dnp->dn_op = 0; in dt_node_xalloc()
528 dnp->dn_line = -1; in dt_node_xalloc()
529 dnp->dn_reg = -1; in dt_node_xalloc()
530 dnp->dn_attr = _dtrace_defattr; in dt_node_xalloc()
531 dnp->dn_list = NULL; in dt_node_xalloc()
532 dnp->dn_link = NULL; in dt_node_xalloc()
533 bzero(&dnp->dn_u, sizeof (dnp->dn_u)); in dt_node_xalloc()
535 return (dnp); in dt_node_xalloc()
547 dt_node_t *dnp = dt_node_xalloc(yypcb->pcb_hdl, kind); in dt_node_alloc() local
549 if (dnp == NULL) in dt_node_alloc()
552 dnp->dn_line = yylineno; in dt_node_alloc()
553 dnp->dn_link = yypcb->pcb_list; in dt_node_alloc()
554 yypcb->pcb_list = dnp; in dt_node_alloc()
556 return (dnp); in dt_node_alloc()
560 dt_node_free(dt_node_t *dnp) in dt_node_free() argument
562 uchar_t kind = dnp->dn_kind; in dt_node_free()
564 dnp->dn_kind = DT_NODE_FREE; in dt_node_free()
570 free(dnp->dn_string); in dt_node_free()
571 dnp->dn_string = NULL; in dt_node_free()
577 if (dnp->dn_ident != NULL) { in dt_node_free()
578 if (dnp->dn_ident->di_flags & DT_IDFLG_ORPHAN) in dt_node_free()
579 dt_ident_destroy(dnp->dn_ident); in dt_node_free()
580 dnp->dn_ident = NULL; in dt_node_free()
582 dt_node_list_free(&dnp->dn_args); in dt_node_free()
586 if (dnp->dn_child != NULL) { in dt_node_free()
587 dt_node_free(dnp->dn_child); in dt_node_free()
588 dnp->dn_child = NULL; in dt_node_free()
593 if (dnp->dn_expr != NULL) { in dt_node_free()
594 dt_node_free(dnp->dn_expr); in dt_node_free()
595 dnp->dn_expr = NULL; in dt_node_free()
599 if (dnp->dn_left != NULL) { in dt_node_free()
600 dt_node_free(dnp->dn_left); in dt_node_free()
601 dnp->dn_left = NULL; in dt_node_free()
603 if (dnp->dn_right != NULL) { in dt_node_free()
604 dt_node_free(dnp->dn_right); in dt_node_free()
605 dnp->dn_right = NULL; in dt_node_free()
611 if (dnp->dn_expr != NULL) { in dt_node_free()
612 dt_node_free(dnp->dn_expr); in dt_node_free()
613 dnp->dn_expr = NULL; in dt_node_free()
618 if (dnp->dn_aggfun != NULL) { in dt_node_free()
619 dt_node_free(dnp->dn_aggfun); in dt_node_free()
620 dnp->dn_aggfun = NULL; in dt_node_free()
622 dt_node_list_free(&dnp->dn_aggtup); in dt_node_free()
626 free(dnp->dn_spec); in dt_node_free()
627 dnp->dn_spec = NULL; in dt_node_free()
628 free(dnp->dn_desc); in dt_node_free()
629 dnp->dn_desc = NULL; in dt_node_free()
633 if (dnp->dn_pred != NULL) in dt_node_free()
634 dt_node_free(dnp->dn_pred); in dt_node_free()
635 if (dnp->dn_locals != NULL) in dt_node_free()
636 dt_idhash_destroy(dnp->dn_locals); in dt_node_free()
637 dt_node_list_free(&dnp->dn_pdescs); in dt_node_free()
638 dt_node_list_free(&dnp->dn_acts); in dt_node_free()
642 free(dnp->dn_membname); in dt_node_free()
643 dnp->dn_membname = NULL; in dt_node_free()
644 if (dnp->dn_membexpr != NULL) { in dt_node_free()
645 dt_node_free(dnp->dn_membexpr); in dt_node_free()
646 dnp->dn_membexpr = NULL; in dt_node_free()
651 dt_node_list_free(&dnp->dn_probes); in dt_node_free()
652 free(dnp->dn_provname); in dt_node_free()
653 dnp->dn_provname = NULL; in dt_node_free()
657 dt_node_list_free(&dnp->dn_list); in dt_node_free()
663 dt_node_attr_assign(dt_node_t *dnp, dtrace_attribute_t attr) in dt_node_attr_assign() argument
670 dnerror(dnp, D_ATTR_MIN, "attributes for %s (%s) are less than " in dt_node_attr_assign()
671 "predefined minimum\n", dt_node_name(dnp, s, sizeof (s)), in dt_node_attr_assign()
675 dnp->dn_attr = attr; in dt_node_attr_assign()
679 dt_node_type_assign(dt_node_t *dnp, ctf_file_t *fp, ctf_id_t type, in dt_node_type_assign() argument
686 dnp->dn_flags &= in dt_node_type_assign()
693 dnp->dn_flags |= DT_NF_BITFIELD; in dt_node_type_assign()
696 dnp->dn_flags |= DT_NF_SIGNED; in dt_node_type_assign()
701 dnp->dn_flags |= DT_NF_REF; in dt_node_type_assign()
707 dnp->dn_flags |= DT_NF_REF; in dt_node_type_assign()
710 dnp->dn_flags |= DT_NF_REF; in dt_node_type_assign()
713 dnp->dn_flags |= DT_NF_USERLAND; in dt_node_type_assign()
715 dnp->dn_flags |= DT_NF_COOKED; in dt_node_type_assign()
716 dnp->dn_ctfp = fp; in dt_node_type_assign()
717 dnp->dn_type = type; in dt_node_type_assign()
730 dt_node_type_name(const dt_node_t *dnp, char *buf, size_t len) in dt_node_type_name() argument
732 if (dt_node_is_dynamic(dnp) && dnp->dn_ident != NULL) { in dt_node_type_name()
734 dt_idkind_name(dt_ident_resolve(dnp->dn_ident)->di_kind)); in dt_node_type_name()
738 if (dnp->dn_flags & DT_NF_USERLAND) { in dt_node_type_name()
741 (void) dt_type_name(dnp->dn_ctfp, dnp->dn_type, buf + n, len); in dt_node_type_name()
745 return (dt_type_name(dnp->dn_ctfp, dnp->dn_type, buf, len)); in dt_node_type_name()
749 dt_node_type_size(const dt_node_t *dnp) in dt_node_type_size() argument
754 if (dnp->dn_kind == DT_NODE_STRING) in dt_node_type_size()
755 return (strlen(dnp->dn_string) + 1); in dt_node_type_size()
757 if (dt_node_is_dynamic(dnp) && dnp->dn_ident != NULL) in dt_node_type_size()
758 return (dt_ident_size(dnp->dn_ident)); in dt_node_type_size()
760 base = ctf_type_resolve(dnp->dn_ctfp, dnp->dn_type); in dt_node_type_size()
762 if (ctf_type_kind(dnp->dn_ctfp, base) == CTF_K_FORWARD) in dt_node_type_size()
773 if (ctf_type_kind(dnp->dn_ctfp, base) == CTF_K_POINTER && in dt_node_type_size()
774 ctf_getmodel(dnp->dn_ctfp) == CTF_MODEL_ILP32 && in dt_node_type_size()
775 !(dnp->dn_flags & DT_NF_USERLAND) && in dt_node_type_size()
779 return (ctf_type_size(dnp->dn_ctfp, dnp->dn_type)); in dt_node_type_size()
788 dt_node_resolve(const dt_node_t *dnp, uint_t idkind) in dt_node_resolve() argument
792 switch (dnp->dn_kind) { in dt_node_resolve()
799 idp = dt_ident_resolve(dnp->dn_ident); in dt_node_resolve()
803 if (dt_node_is_dynamic(dnp)) { in dt_node_resolve()
804 idp = dt_ident_resolve(dnp->dn_ident); in dt_node_resolve()
812 dt_node_sizeof(const dt_node_t *dnp) in dt_node_sizeof() argument
827 if (dnp->dn_kind != DT_NODE_SYM) in dt_node_sizeof()
828 return (dt_node_type_size(dnp)); in dt_node_sizeof()
830 sip = dnp->dn_ident->di_data; in dt_node_sizeof()
840 dt_node_is_integer(const dt_node_t *dnp) in dt_node_is_integer() argument
842 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_integer()
847 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_integer()
849 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_integer()
860 dt_node_is_float(const dt_node_t *dnp) in dt_node_is_float() argument
862 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_float()
867 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_float()
869 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_float()
873 ctf_type_encoding(dnp->dn_ctfp, type, &e) == 0 && ( in dt_node_is_float()
879 dt_node_is_scalar(const dt_node_t *dnp) in dt_node_is_scalar() argument
881 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_scalar()
886 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_scalar()
888 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_scalar()
900 dt_node_is_arith(const dt_node_t *dnp) in dt_node_is_arith() argument
902 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_arith()
907 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_arith()
909 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_arith()
919 dt_node_is_vfptr(const dt_node_t *dnp) in dt_node_is_vfptr() argument
921 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_vfptr()
926 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_vfptr()
928 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_vfptr()
940 dt_node_is_dynamic(const dt_node_t *dnp) in dt_node_is_dynamic() argument
942 if (dnp->dn_kind == DT_NODE_VAR && in dt_node_is_dynamic()
943 (dnp->dn_ident->di_flags & DT_IDFLG_INLINE)) { in dt_node_is_dynamic()
944 const dt_idnode_t *inp = dnp->dn_ident->di_iarg; in dt_node_is_dynamic()
948 return (dnp->dn_ctfp == DT_DYN_CTFP(yypcb->pcb_hdl) && in dt_node_is_dynamic()
949 dnp->dn_type == DT_DYN_TYPE(yypcb->pcb_hdl)); in dt_node_is_dynamic()
953 dt_node_is_string(const dt_node_t *dnp) in dt_node_is_string() argument
955 return (dnp->dn_ctfp == DT_STR_CTFP(yypcb->pcb_hdl) && in dt_node_is_string()
956 dnp->dn_type == DT_STR_TYPE(yypcb->pcb_hdl)); in dt_node_is_string()
960 dt_node_is_stack(const dt_node_t *dnp) in dt_node_is_stack() argument
962 return (dnp->dn_ctfp == DT_STACK_CTFP(yypcb->pcb_hdl) && in dt_node_is_stack()
963 dnp->dn_type == DT_STACK_TYPE(yypcb->pcb_hdl)); in dt_node_is_stack()
967 dt_node_is_symaddr(const dt_node_t *dnp) in dt_node_is_symaddr() argument
969 return (dnp->dn_ctfp == DT_SYMADDR_CTFP(yypcb->pcb_hdl) && in dt_node_is_symaddr()
970 dnp->dn_type == DT_SYMADDR_TYPE(yypcb->pcb_hdl)); in dt_node_is_symaddr()
974 dt_node_is_usymaddr(const dt_node_t *dnp) in dt_node_is_usymaddr() argument
976 return (dnp->dn_ctfp == DT_USYMADDR_CTFP(yypcb->pcb_hdl) && in dt_node_is_usymaddr()
977 dnp->dn_type == DT_USYMADDR_TYPE(yypcb->pcb_hdl)); in dt_node_is_usymaddr()
981 dt_node_is_strcompat(const dt_node_t *dnp) in dt_node_is_strcompat() argument
983 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_strcompat()
989 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_strcompat()
991 base = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_strcompat()
1009 dt_node_is_pointer(const dt_node_t *dnp) in dt_node_is_pointer() argument
1011 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_pointer()
1014 assert(dnp->dn_flags & DT_NF_COOKED); in dt_node_is_pointer()
1016 if (dt_node_is_string(dnp)) in dt_node_is_pointer()
1019 kind = ctf_type_kind(fp, ctf_type_resolve(fp, dnp->dn_type)); in dt_node_is_pointer()
1024 dt_node_is_void(const dt_node_t *dnp) in dt_node_is_void() argument
1026 ctf_file_t *fp = dnp->dn_ctfp; in dt_node_is_void()
1030 if (dt_node_is_dynamic(dnp)) in dt_node_is_void()
1033 if (dt_node_is_stack(dnp)) in dt_node_is_void()
1036 if (dt_node_is_symaddr(dnp) || dt_node_is_usymaddr(dnp)) in dt_node_is_void()
1039 type = ctf_type_resolve(fp, dnp->dn_type); in dt_node_is_void()
1219 dt_node_is_posconst(const dt_node_t *dnp) in dt_node_is_posconst() argument
1221 return (dnp->dn_kind == DT_NODE_INT && dnp->dn_value != 0 && ( in dt_node_is_posconst()
1222 (dnp->dn_flags & DT_NF_SIGNED) == 0 || (int64_t)dnp->dn_value > 0)); in dt_node_is_posconst()
1226 dt_node_is_actfunc(const dt_node_t *dnp) in dt_node_is_actfunc() argument
1228 return (dnp->dn_kind == DT_NODE_FUNC && in dt_node_is_actfunc()
1229 dnp->dn_ident->di_kind == DT_IDENT_ACTFUNC); in dt_node_is_actfunc()
1265 dt_node_t *dnp = dt_node_alloc(DT_NODE_INT); in dt_node_int() local
1274 dnp->dn_op = DT_TOK_INT; in dt_node_int()
1275 dnp->dn_value = value; in dt_node_int()
1286 dt_node_type_assign(dnp, in dt_node_int()
1296 return (dt_node_op1(DT_TOK_IPOS, dnp)); in dt_node_int()
1298 return (dt_node_op1(DT_TOK_INEG, dnp)); in dt_node_int()
1300 return (dnp); in dt_node_int()
1315 dt_node_t *dnp; in dt_node_string() local
1320 dnp = dt_node_alloc(DT_NODE_STRING); in dt_node_string()
1321 dnp->dn_op = DT_TOK_STRING; in dt_node_string()
1322 dnp->dn_string = string; in dt_node_string()
1323 dt_node_type_assign(dnp, DT_STR_CTFP(dtp), DT_STR_TYPE(dtp), B_FALSE); in dt_node_string()
1325 return (dnp); in dt_node_string()
1332 dt_node_t *dnp; in dt_node_ident() local
1351 dnp = dt_node_alloc(DT_NODE_INT); in dt_node_ident()
1352 dnp->dn_op = DT_TOK_INT; in dt_node_ident()
1353 dnp->dn_value = inp->din_root->dn_value; in dt_node_ident()
1354 dt_node_type_propagate(inp->din_root, dnp); in dt_node_ident()
1356 return (dnp); in dt_node_ident()
1360 dnp = dt_node_alloc(DT_NODE_IDENT); in dt_node_ident()
1361 dnp->dn_op = name[0] == '@' ? DT_TOK_AGG : DT_TOK_IDENT; in dt_node_ident()
1362 dnp->dn_string = name; in dt_node_ident()
1364 return (dnp); in dt_node_ident()
1377 dt_node_t *dnp; in dt_node_type() local
1396 dnp = dt_node_alloc(DT_NODE_TYPE); in dt_node_type()
1397 dnp->dn_op = DT_TOK_IDENT; in dt_node_type()
1398 dnp->dn_string = name; in dt_node_type()
1400 dt_node_type_assign(dnp, dtt.dtt_ctfp, dtt.dtt_type, dtt.dtt_flags); in dt_node_type()
1404 dt_node_attr_assign(dnp, _dtrace_defattr); in dt_node_type()
1406 dt_node_attr_assign(dnp, _dtrace_typattr); in dt_node_type()
1408 return (dnp); in dt_node_type()
1418 dt_node_t *dnp = dt_node_alloc(DT_NODE_TYPE); in dt_node_vatype() local
1420 dnp->dn_op = DT_TOK_IDENT; in dt_node_vatype()
1421 dnp->dn_ctfp = yypcb->pcb_hdl->dt_cdefs->dm_ctfp; in dt_node_vatype()
1422 dnp->dn_type = CTF_ERR; in dt_node_vatype()
1423 dnp->dn_attr = _dtrace_defattr; in dt_node_vatype()
1425 return (dnp); in dt_node_vatype()
1673 dt_node_t *dnp = ddp->dd_node; in dt_node_decl() local
1676 for (; dnp != NULL; dnp = dnp->dn_list, argc++) { in dt_node_decl()
1682 if (ctf_type_cmp(dnp->dn_ctfp, dnp->dn_type, in dt_node_decl()
1692 dt_node_type_name(dnp, n1, sizeof (n1)), in dt_node_decl()
1779 dt_node_func(dt_node_t *dnp, dt_node_t *args) in dt_node_func() argument
1783 if (dnp->dn_kind != DT_NODE_IDENT) { in dt_node_func()
1788 idp = dt_idstack_lookup(&yypcb->pcb_globals, dnp->dn_string); in dt_node_func()
1792 "undefined function name: %s\n", dnp->dn_string); in dt_node_func()
1802 free(dnp->dn_string); in dt_node_func()
1803 dnp->dn_string = NULL; in dt_node_func()
1805 dnp->dn_kind = DT_NODE_FUNC; in dt_node_func()
1806 dnp->dn_flags &= ~DT_NF_COOKED; in dt_node_func()
1807 dnp->dn_ident = idp; in dt_node_func()
1808 dnp->dn_args = args; in dt_node_func()
1809 dnp->dn_list = NULL; in dt_node_func()
1811 return (dnp); in dt_node_func()
1868 dt_node_t *dnp; in dt_node_op1() local
1921 dnp = dt_node_alloc(DT_NODE_OP1); in dt_node_op1()
1923 dnp->dn_op = (ushort_t)op; in dt_node_op1()
1924 dnp->dn_child = cp; in dt_node_op1()
1926 return (dnp); in dt_node_op1()
1965 dt_node_t *dnp; in dt_node_op2() local
1984 dnp = dt_node_int(0); /* allocate new integer node for result */ in dt_node_op2()
1988 dnp->dn_value = l || r; in dt_node_op2()
1989 dt_node_type_assign(dnp, in dt_node_op2()
1993 dnp->dn_value = (l != 0) ^ (r != 0); in dt_node_op2()
1994 dt_node_type_assign(dnp, in dt_node_op2()
1998 dnp->dn_value = l && r; in dt_node_op2()
1999 dt_node_type_assign(dnp, in dt_node_op2()
2003 dnp->dn_value = l | r; in dt_node_op2()
2004 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2007 dnp->dn_value = l ^ r; in dt_node_op2()
2008 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2011 dnp->dn_value = l & r; in dt_node_op2()
2012 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2015 dnp->dn_value = l == r; in dt_node_op2()
2016 dt_node_type_assign(dnp, in dt_node_op2()
2020 dnp->dn_value = l != r; in dt_node_op2()
2021 dt_node_type_assign(dnp, in dt_node_op2()
2025 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2026 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2027 dnp->dn_value = (intmax_t)l < (intmax_t)r; in dt_node_op2()
2029 dnp->dn_value = l < r; in dt_node_op2()
2030 dt_node_type_assign(dnp, in dt_node_op2()
2034 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2035 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2036 dnp->dn_value = (intmax_t)l <= (intmax_t)r; in dt_node_op2()
2038 dnp->dn_value = l <= r; in dt_node_op2()
2039 dt_node_type_assign(dnp, in dt_node_op2()
2043 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2044 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2045 dnp->dn_value = (intmax_t)l > (intmax_t)r; in dt_node_op2()
2047 dnp->dn_value = l > r; in dt_node_op2()
2048 dt_node_type_assign(dnp, in dt_node_op2()
2052 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2053 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2054 dnp->dn_value = (intmax_t)l >= (intmax_t)r; in dt_node_op2()
2056 dnp->dn_value = l >= r; in dt_node_op2()
2057 dt_node_type_assign(dnp, in dt_node_op2()
2061 dnp->dn_value = l << r; in dt_node_op2()
2062 dt_node_type_propagate(lp, dnp); in dt_node_op2()
2067 dnp->dn_value = l >> r; in dt_node_op2()
2068 dt_node_type_propagate(lp, dnp); in dt_node_op2()
2073 dnp->dn_value = l + r; in dt_node_op2()
2074 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2077 dnp->dn_value = l - r; in dt_node_op2()
2078 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2081 dnp->dn_value = l * r; in dt_node_op2()
2082 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2085 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2086 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2087 dnp->dn_value = (intmax_t)l / (intmax_t)r; in dt_node_op2()
2089 dnp->dn_value = l / r; in dt_node_op2()
2092 dt_node_promote(lp, rp, dnp); in dt_node_op2()
2093 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_op2()
2094 dnp->dn_value = (intmax_t)l % (intmax_t)r; in dt_node_op2()
2096 dnp->dn_value = l % r; in dt_node_op2()
2099 dt_node_free(dnp); in dt_node_op2()
2100 dnp = NULL; in dt_node_op2()
2103 if (dnp != NULL) { in dt_node_op2()
2106 return (dnp); in dt_node_op2()
2124 dnp = dt_node_alloc(DT_NODE_OP2); in dt_node_op2()
2126 dnp->dn_op = (ushort_t)op; in dt_node_op2()
2127 dnp->dn_left = lp; in dt_node_op2()
2128 dnp->dn_right = rp; in dt_node_op2()
2130 return (dnp); in dt_node_op2()
2136 dt_node_t *dnp; in dt_node_op3() local
2141 dnp = dt_node_alloc(DT_NODE_OP3); in dt_node_op3()
2142 dnp->dn_op = DT_TOK_QUESTION; in dt_node_op3()
2143 dnp->dn_expr = expr; in dt_node_op3()
2144 dnp->dn_left = lp; in dt_node_op3()
2145 dnp->dn_right = rp; in dt_node_op3()
2147 return (dnp); in dt_node_op3()
2153 dt_node_t *dnp; in dt_node_statement() local
2160 dnp = dt_node_alloc(DT_NODE_DFUNC); in dt_node_statement()
2162 dnp = dt_node_alloc(DT_NODE_DEXPR); in dt_node_statement()
2164 dnp->dn_expr = expr; in dt_node_statement()
2165 return (dnp); in dt_node_statement()
2171 dt_node_t *dnp = dt_node_alloc(DT_NODE_IF); in dt_node_if() local
2172 dnp->dn_conditional = pred; in dt_node_if()
2173 dnp->dn_body = acts; in dt_node_if()
2174 dnp->dn_alternate_body = else_acts; in dt_node_if()
2176 return (dnp); in dt_node_if()
2183 dt_node_t *dnp; in dt_node_pdesc_by_name() local
2188 dnp = dt_node_alloc(DT_NODE_PDESC); in dt_node_pdesc_by_name()
2189 dnp->dn_spec = spec; in dt_node_pdesc_by_name()
2190 dnp->dn_desc = malloc(sizeof (dtrace_probedesc_t)); in dt_node_pdesc_by_name()
2192 if (dnp->dn_desc == NULL) in dt_node_pdesc_by_name()
2195 if (dtrace_xstr2desc(dtp, yypcb->pcb_pspec, dnp->dn_spec, in dt_node_pdesc_by_name()
2196 yypcb->pcb_sargc, yypcb->pcb_sargv, dnp->dn_desc) != 0) { in dt_node_pdesc_by_name()
2198 dnp->dn_spec, dtrace_errmsg(dtp, dtrace_errno(dtp))); in dt_node_pdesc_by_name()
2201 free(dnp->dn_spec); in dt_node_pdesc_by_name()
2202 dnp->dn_spec = NULL; in dt_node_pdesc_by_name()
2204 return (dnp); in dt_node_pdesc_by_name()
2215 dt_node_t *dnp = dt_node_alloc(DT_NODE_PDESC); in dt_node_pdesc_by_id() local
2217 if ((dnp->dn_desc = malloc(sizeof (dtrace_probedesc_t))) == NULL) in dt_node_pdesc_by_id()
2231 if (dtrace_id2desc(dtp, (dtrace_id_t)id, dnp->dn_desc) != 0) { in dt_node_pdesc_by_id()
2236 return (dnp); in dt_node_pdesc_by_id()
2242 dt_node_t *dnp = dt_node_alloc(DT_NODE_CLAUSE); in dt_node_clause() local
2244 dnp->dn_pdescs = pdescs; in dt_node_clause()
2245 dnp->dn_pred = pred; in dt_node_clause()
2246 dnp->dn_acts = acts; in dt_node_clause()
2248 return (dnp); in dt_node_clause()
2263 dt_node_t *dnp; in dt_node_inline() local
2308 dnp = dt_node_alloc(DT_NODE_INLINE); in dt_node_inline()
2309 dt_node_type_assign(dnp, dtt.dtt_ctfp, dtt.dtt_type, B_FALSE); in dt_node_inline()
2310 dt_node_attr_assign(dnp, _dtrace_defattr); in dt_node_inline()
2312 if (dt_node_is_void(dnp)) { in dt_node_inline()
2317 if (ctf_type_kind(dnp->dn_ctfp, ctf_type_resolve( in dt_node_inline()
2318 dnp->dn_ctfp, dnp->dn_type)) == CTF_K_FORWARD) { in dt_node_inline()
2321 dt_node_type_name(dnp, n, sizeof (n)), dsp->ds_ident); in dt_node_inline()
2329 idp = dnp->dn_ident = dt_ident_create(dsp->ds_ident, in dt_node_inline()
2423 (void) dt_ident_cook(dnp, idp, &ddp->dd_node); in dt_node_inline()
2441 return (dt_node_cook(dnp, DT_IDFLG_REF)); in dt_node_inline()
2448 dt_node_t *dnp; in dt_node_member() local
2459 dnp = dt_node_alloc(DT_NODE_MEMBER); in dt_node_member()
2460 dnp->dn_membname = name; in dt_node_member()
2461 dnp->dn_membexpr = expr; in dt_node_member()
2464 dt_node_type_assign(dnp, dtt.dtt_ctfp, dtt.dtt_type, in dt_node_member()
2467 return (dnp); in dt_node_member()
2477 dt_node_t *dnp; in dt_node_xlator() local
2528 dnp = dt_node_alloc(DT_NODE_XLATOR); in dt_node_xlator()
2529 dnp->dn_xlator = dxp; in dt_node_xlator()
2530 dnp->dn_members = members; in dt_node_xlator()
2532 return (dt_node_cook(dnp, DT_IDFLG_REF)); in dt_node_xlator()
2540 dt_node_t *dnp; in dt_node_probe() local
2559 dnp = dt_node_alloc(DT_NODE_PROBE); in dt_node_probe()
2561 dnp->dn_ident = dt_ident_create(name, DT_IDENT_PROBE, in dt_node_probe()
2581 if (dnp->dn_ident == NULL || dt_probe_create(dtp, in dt_node_probe()
2582 dnp->dn_ident, protoc, nargs, nargc, xargs, xargc) == NULL) in dt_node_probe()
2585 return (dnp); in dt_node_probe()
2592 dt_node_t *dnp = dt_node_alloc(DT_NODE_PROVIDER); in dt_node_provider() local
2596 dnp->dn_provname = name; in dt_node_provider()
2597 dnp->dn_probes = probes; in dt_node_provider()
2600 dnerror(dnp, D_PROV_BADNAME, "provider name may not " in dt_node_provider()
2605 dnerror(dnp, D_PROV_BADNAME, "provider name may not exceed %d " in dt_node_provider()
2610 dnerror(dnp, D_PROV_BADNAME, "provider name may not " in dt_node_provider()
2620 if ((dnp->dn_provider = dt_provider_lookup(dtp, name)) != NULL) in dt_node_provider()
2621 dnp->dn_provred = B_TRUE; in dt_node_provider()
2622 else if ((dnp->dn_provider = dt_provider_create(dtp, name)) == NULL) in dt_node_provider()
2625 dnp->dn_provider->pv_flags |= DT_PROVIDER_INTF; in dt_node_provider()
2638 lnp->dn_link = dnp->dn_provider->pv_nodes; in dt_node_provider()
2639 dnp->dn_provider->pv_nodes = yypcb->pcb_list; in dt_node_provider()
2642 return (dnp); in dt_node_provider()
2648 dt_node_t *dnp = dt_node_alloc(DT_NODE_PROG); in dt_node_program() local
2649 dnp->dn_list = lnp; in dt_node_program()
2650 return (dnp); in dt_node_program()
2662 dt_xcook_ident(dt_node_t *dnp, dt_idhash_t *dhp, uint_t idkind, int create) in dt_xcook_ident() argument
2685 if ((name = strrchr(dnp->dn_string, '`')) != NULL) { in dt_xcook_ident()
2686 if (name > dnp->dn_string && name[-1] == '`') { in dt_xcook_ident()
2691 if (name == dnp->dn_string + uref) in dt_xcook_ident()
2694 scope = dnp->dn_string; in dt_xcook_ident()
2701 name = dnp->dn_string + 1; in dt_xcook_ident()
2705 name = dnp->dn_string; in dt_xcook_ident()
2742 attr = dt_ident_cook(dnp, idp, NULL); in dt_xcook_ident()
2744 dt_node_type_assign(dnp, in dt_xcook_ident()
2749 free(dnp->dn_string); in dt_xcook_ident()
2750 dnp->dn_string = NULL; in dt_xcook_ident()
2751 dnp->dn_kind = dnkind; in dt_xcook_ident()
2752 dnp->dn_ident = idp; in dt_xcook_ident()
2753 dnp->dn_flags |= DT_NF_LVALUE; in dt_xcook_ident()
2756 dnp->dn_flags |= DT_NF_WRITABLE; in dt_xcook_ident()
2758 dt_node_attr_assign(dnp, attr); in dt_xcook_ident()
2815 free(dnp->dn_string); in dt_xcook_ident()
2816 dnp->dn_string = NULL; in dt_xcook_ident()
2817 dnp->dn_kind = DT_NODE_SYM; in dt_xcook_ident()
2818 dnp->dn_ident = idp; in dt_xcook_ident()
2819 dnp->dn_flags |= DT_NF_LVALUE; in dt_xcook_ident()
2821 dt_node_type_assign(dnp, dtt.dtt_ctfp, dtt.dtt_type, in dt_xcook_ident()
2823 dt_node_attr_assign(dnp, _dtrace_symattr); in dt_xcook_ident()
2827 dnp->dn_flags |= DT_NF_USERLAND; in dt_xcook_ident()
2867 attr = dt_ident_cook(dnp, idp, NULL); in dt_xcook_ident()
2869 dt_node_type_assign(dnp, in dt_xcook_ident()
2874 free(dnp->dn_string); in dt_xcook_ident()
2875 dnp->dn_string = NULL; in dt_xcook_ident()
2876 dnp->dn_kind = dnkind; in dt_xcook_ident()
2877 dnp->dn_ident = idp; in dt_xcook_ident()
2878 dnp->dn_flags |= DT_NF_LVALUE | DT_NF_WRITABLE; in dt_xcook_ident()
2880 dt_node_attr_assign(dnp, attr); in dt_xcook_ident()
2884 dnp->dn_string, mark, name, in dt_xcook_ident()
2888 dnp->dn_string, dtrace_errmsg(dtp, dtrace_errno(dtp))); in dt_xcook_ident()
2893 dt_cook_ident(dt_node_t *dnp, uint_t idflags) in dt_cook_ident() argument
2897 if (dnp->dn_op == DT_TOK_AGG) in dt_cook_ident()
2898 dt_xcook_ident(dnp, dtp->dt_aggs, DT_IDENT_AGG, B_FALSE); in dt_cook_ident()
2900 dt_xcook_ident(dnp, dtp->dt_globals, DT_IDENT_SCALAR, B_FALSE); in dt_cook_ident()
2902 return (dt_node_cook(dnp, idflags)); in dt_cook_ident()
2912 dt_cook_var(dt_node_t *dnp, uint_t idflags) in dt_cook_var() argument
2914 dt_ident_t *idp = dnp->dn_ident; in dt_cook_var()
2917 dnerror(dnp, D_VAR_UNDEF, in dt_cook_var()
2924 dt_node_attr_assign(dnp, dt_ident_cook(dnp, idp, &dnp->dn_args)); in dt_cook_var()
2925 return (dnp); in dt_cook_var()
2930 dt_cook_func(dt_node_t *dnp, uint_t idflags) in dt_cook_func() argument
2932 dt_node_attr_assign(dnp, in dt_cook_func()
2933 dt_ident_cook(dnp, dnp->dn_ident, &dnp->dn_args)); in dt_cook_func()
2935 return (dnp); in dt_cook_func()
2939 dt_cook_op1(dt_node_t *dnp, uint_t idflags) in dt_cook_op1() argument
2942 dt_node_t *cp = dnp->dn_child; in dt_cook_op1()
2953 if (dnp->dn_op == DT_TOK_PREINC || dnp->dn_op == DT_TOK_POSTINC || in dt_cook_op1()
2954 dnp->dn_op == DT_TOK_PREDEC || dnp->dn_op == DT_TOK_POSTDEC) in dt_cook_op1()
2966 cp = dnp->dn_child = dt_node_cook(cp, 0); /* don't set idflags yet */ in dt_cook_op1()
2980 switch (dnp->dn_op) { in dt_cook_op1()
2989 dnp->dn_ident = &dxp->dx_souid; in dt_cook_op1()
2990 dt_node_type_assign(dnp, in dt_cook_op1()
2991 dnp->dn_ident->di_ctfp, dnp->dn_ident->di_type, in dt_cook_op1()
3012 dt_node_type_assign(dnp, cp->dn_ctfp, type, in dt_cook_op1()
3028 if (kind != CTF_K_ARRAY || dt_node_is_string(dnp)) in dt_cook_op1()
3029 dnp->dn_flags |= DT_NF_LVALUE; /* see K&R[A7.4.3] */ in dt_cook_op1()
3041 dnp->dn_flags |= DT_NF_WRITABLE; in dt_cook_op1()
3044 (kind == CTF_K_POINTER || (dnp->dn_flags & DT_NF_REF))) in dt_cook_op1()
3045 dnp->dn_flags |= DT_NF_USERLAND; in dt_cook_op1()
3052 "of arithmetic type\n", opstr(dnp->dn_op)); in dt_cook_op1()
3054 dt_node_type_propagate(cp, dnp); /* see K&R[A7.4.4-6] */ in dt_cook_op1()
3060 "integral type\n", opstr(dnp->dn_op)); in dt_cook_op1()
3062 dt_node_type_propagate(cp, dnp); /* see K&R[A7.4.4-6] */ in dt_cook_op1()
3068 "of scalar type\n", opstr(dnp->dn_op)); in dt_cook_op1()
3070 dt_node_type_assign(dnp, DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), in dt_cook_op1()
3105 dt_node_type_assign(dnp, dtt.dtt_ctfp, dtt.dtt_type, in dt_cook_op1()
3120 dt_node_type_assign(dnp, dtp->dt_ddefs->dm_ctfp, in dt_cook_op1()
3132 dt_node_type_assign(dnp, DT_STR_CTFP(dtp), DT_STR_TYPE(dtp), in dt_cook_op1()
3142 "scalar type\n", opstr(dnp->dn_op)); in dt_cook_op1()
3147 "of known size\n", opstr(dnp->dn_op)); in dt_cook_op1()
3152 "lvalue as an operand\n", opstr(dnp->dn_op)); in dt_cook_op1()
3157 "to a writable variable\n", opstr(dnp->dn_op)); in dt_cook_op1()
3160 dt_node_type_propagate(cp, dnp); /* see K&R[A7.4.1] */ in dt_cook_op1()
3164 xyerror(D_UNKNOWN, "invalid unary op %s\n", opstr(dnp->dn_op)); in dt_cook_op1()
3167 dt_node_attr_assign(dnp, cp->dn_attr); in dt_cook_op1()
3168 return (dnp); in dt_cook_op1()
3172 dt_assign_common(dt_node_t *dnp) in dt_assign_common() argument
3174 dt_node_t *lp = dnp->dn_left; in dt_assign_common()
3175 dt_node_t *rp = dnp->dn_right; in dt_assign_common()
3176 int op = dnp->dn_op; in dt_assign_common()
3192 dt_node_type_propagate(lp, dnp); /* see K&R[A7.17] */ in dt_assign_common()
3193 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_assign_common()
3197 dt_cook_op2(dt_node_t *dnp, uint_t idflags) in dt_cook_op2() argument
3200 dt_node_t *lp = dnp->dn_left; in dt_cook_op2()
3201 dt_node_t *rp = dnp->dn_right; in dt_cook_op2()
3202 int op = dnp->dn_op; in dt_cook_op2()
3241 lp = dnp->dn_left = dt_node_cook(lp, 0); in dt_cook_op2()
3268 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3269 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3276 dt_node_promote(lp, rp, dnp); /* see K&R[A7.11-13] */ in dt_cook_op2()
3281 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3282 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3289 dt_node_type_propagate(lp, dnp); /* see K&R[A7.8] */ in dt_cook_op2()
3290 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3294 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3295 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3302 dt_node_promote(lp, rp, dnp); /* see K&R[A7.6] */ in dt_cook_op2()
3307 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3308 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3315 dt_node_promote(lp, rp, dnp); /* see K&R[A7.6] */ in dt_cook_op2()
3321 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3322 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3329 dt_node_type_assign(dnp, DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), in dt_cook_op2()
3331 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3348 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3379 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3407 dt_node_type_assign(dnp, DT_INT_CTFP(dtp), DT_INT_TYPE(dtp), in dt_cook_op2()
3409 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3422 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3423 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3456 dt_node_type_assign(dnp, ctfp, type, B_FALSE); in dt_cook_op2()
3457 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3460 dnp->dn_flags |= DT_NF_USERLAND; in dt_cook_op2()
3475 lp = dnp->dn_left = in dt_cook_op2()
3478 rp = dnp->dn_right = in dt_cook_op2()
3494 lp = dnp->dn_left = in dt_cook_op2()
3497 rp = dnp->dn_right = in dt_cook_op2()
3523 lp = dnp->dn_left = dt_node_cook(lp, 0); /* don't set mod yet */ in dt_cook_op2()
3524 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3570 dnp->dn_left = dnp->dn_right = NULL; in dt_cook_op2()
3571 dt_node_free(dnp); in dt_cook_op2()
3646 lp = dnp->dn_left = in dt_cook_op2()
3649 rp = dnp->dn_right = in dt_cook_op2()
3680 dt_assign_common(dnp); in dt_cook_op2()
3707 dnp->dn_right = dnp->dn_left; in dt_cook_op2()
3708 dt_node_free(dnp); in dt_cook_op2()
3714 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3800 dt_node_type_assign(dnp, ctfp, m.ctm_type, B_FALSE); in dt_cook_op2()
3801 dt_node_attr_assign(dnp, lp->dn_attr); in dt_cook_op2()
3804 dt_node_is_string(dnp))) in dt_cook_op2()
3805 dnp->dn_flags |= DT_NF_LVALUE; /* see K&R[A7.3.3] */ in dt_cook_op2()
3808 (kind != CTF_K_ARRAY || dt_node_is_string(dnp))) in dt_cook_op2()
3809 dnp->dn_flags |= DT_NF_LVALUE; /* see K&R[A7.3.3] */ in dt_cook_op2()
3812 dnp->dn_flags |= DT_NF_WRITABLE; in dt_cook_op2()
3815 (dnp->dn_flags & DT_NF_REF))) in dt_cook_op2()
3816 dnp->dn_flags |= DT_NF_USERLAND; in dt_cook_op2()
3843 dnp->dn_left = dnp->dn_right = NULL; in dt_cook_op2()
3844 dt_node_free(dnp); in dt_cook_op2()
3900 lnp = dnp->dn_link; in dt_cook_op2()
3901 bcopy(lp, dnp, sizeof (dt_node_t)); in dt_cook_op2()
3902 dnp->dn_link = lnp; in dt_cook_op2()
3904 dnp->dn_args = rp; in dt_cook_op2()
3905 dnp->dn_list = NULL; in dt_cook_op2()
3908 return (dt_node_cook(dnp, idflags)); in dt_cook_op2()
3915 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3925 dnp->dn_ident = dt_xlator_ident(dxp, lp->dn_ctfp, lp->dn_type); in dt_cook_op2()
3926 dt_node_type_assign(dnp, DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp), in dt_cook_op2()
3928 dt_node_attr_assign(dnp, in dt_cook_op2()
3929 dt_attr_min(rp->dn_attr, dnp->dn_ident->di_attr)); in dt_cook_op2()
3938 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
3973 dt_node_type_propagate(lp, dnp); /* see K&R[A7.5] */ in dt_cook_op2()
3974 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
3981 dnp->dn_flags |= DT_NF_WRITABLE; in dt_cook_op2()
3987 lp = dnp->dn_left = dt_node_cook(lp, DT_IDFLG_REF); in dt_cook_op2()
3988 rp = dnp->dn_right = dt_node_cook(rp, DT_IDFLG_REF); in dt_cook_op2()
4000 dt_node_type_propagate(rp, dnp); /* see K&R[A7.18] */ in dt_cook_op2()
4001 dt_node_attr_assign(dnp, dt_attr_min(lp->dn_attr, rp->dn_attr)); in dt_cook_op2()
4015 if (dnp->dn_op == DT_TOK_LBRAC && op == DT_TOK_ADD) { in dt_cook_op2()
4024 dnp->dn_op = DT_TOK_ADD; in dt_cook_op2()
4025 pnp = dt_node_op1(DT_TOK_DEREF, dnp); in dt_cook_op2()
4036 pnp->dn_link = dnp->dn_link; in dt_cook_op2()
4037 dnp->dn_link = pnp; in dt_cook_op2()
4042 return (dnp); in dt_cook_op2()
4047 dt_cook_op3(dt_node_t *dnp, uint_t idflags) in dt_cook_op3() argument
4053 dnp->dn_expr = dt_node_cook(dnp->dn_expr, DT_IDFLG_REF); in dt_cook_op3()
4054 lp = dnp->dn_left = dt_node_cook(dnp->dn_left, DT_IDFLG_REF); in dt_cook_op3()
4055 rp = dnp->dn_right = dt_node_cook(dnp->dn_right, DT_IDFLG_REF); in dt_cook_op3()
4057 if (!dt_node_is_scalar(dnp->dn_expr)) { in dt_cook_op3()
4092 dt_node_type_assign(dnp, ctfp, type, B_FALSE); in dt_cook_op3()
4093 dt_node_attr_assign(dnp, dt_attr_min(dnp->dn_expr->dn_attr, in dt_cook_op3()
4096 return (dnp); in dt_cook_op3()
4100 dt_cook_statement(dt_node_t *dnp, uint_t idflags) in dt_cook_statement() argument
4102 dnp->dn_expr = dt_node_cook(dnp->dn_expr, idflags); in dt_cook_statement()
4103 dt_node_attr_assign(dnp, dnp->dn_expr->dn_attr); in dt_cook_statement()
4105 return (dnp); in dt_cook_statement()
4116 dt_cook_aggregation(dt_node_t *dnp, uint_t idflags) in dt_cook_aggregation() argument
4120 if (dnp->dn_aggfun != NULL) { in dt_cook_aggregation()
4121 dnp->dn_aggfun = dt_node_cook(dnp->dn_aggfun, DT_IDFLG_REF); in dt_cook_aggregation()
4122 dt_node_attr_assign(dnp, dt_ident_cook(dnp, in dt_cook_aggregation()
4123 dnp->dn_ident, &dnp->dn_aggtup)); in dt_cook_aggregation()
4125 dt_node_type_assign(dnp, DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp), in dt_cook_aggregation()
4127 dt_node_attr_assign(dnp, dnp->dn_ident->di_attr); in dt_cook_aggregation()
4130 return (dnp); in dt_cook_aggregation()
4177 dt_cook_clause(dt_node_t *dnp, uint_t idflags) in dt_cook_clause() argument
4186 dt_node_attr_assign(dnp, yypcb->pcb_pinfo.dtp_attr); in dt_cook_clause()
4187 dnp->dn_ctxattr = yypcb->pcb_pinfo.dtp_attr; in dt_cook_clause()
4192 if (dnp->dn_pred != NULL && (err = setjmp(yypcb->pcb_jmpbuf)) != 0) { in dt_cook_clause()
4203 dt_node_attr_assign(dnp, in dt_cook_clause()
4204 dt_node_list_cook(&dnp->dn_acts, idflags)); in dt_cook_clause()
4210 if (dnp->dn_pred != NULL) { in dt_cook_clause()
4213 dnp->dn_pred = dt_node_cook(dnp->dn_pred, idflags); in dt_cook_clause()
4214 dt_node_attr_assign(dnp, in dt_cook_clause()
4215 dt_attr_min(dnp->dn_attr, dnp->dn_pred->dn_attr)); in dt_cook_clause()
4217 if (!dt_node_is_scalar(dnp->dn_pred)) { in dt_cook_clause()
4228 dt_node_attr_assign(dnp, in dt_cook_clause()
4229 dt_node_list_cook(&dnp->dn_acts, idflags)); in dt_cook_clause()
4234 return (dnp); in dt_cook_clause()
4239 dt_cook_inline(dt_node_t *dnp, uint_t idflags) in dt_cook_inline() argument
4241 dt_idnode_t *inp = dnp->dn_ident->di_iarg; in dt_cook_inline()
4247 assert(dnp->dn_ident->di_flags & DT_IDFLG_INLINE); in dt_cook_inline()
4258 ctf_file_t *lctfp = dnp->dn_ctfp; in dt_cook_inline()
4259 ctf_id_t ltype = ctf_type_resolve(lctfp, dnp->dn_type); in dt_cook_inline()
4271 dnerror(dnp, D_OP_INCOMPAT, in dt_cook_inline()
4273 "\"%s\" = \"%s\"\n", dnp->dn_ident->di_name, in dt_cook_inline()
4278 } else if (dt_node_is_argcompat(dnp, inp->din_root) == 0) { in dt_cook_inline()
4279 dnerror(dnp, D_OP_INCOMPAT, in dt_cook_inline()
4281 "\"%s\" = \"%s\"\n", dnp->dn_ident->di_name, in dt_cook_inline()
4282 dt_node_type_name(dnp, n1, sizeof (n1)), in dt_cook_inline()
4286 return (dnp); in dt_cook_inline()
4290 dt_cook_member(dt_node_t *dnp, uint_t idflags) in dt_cook_member() argument
4292 dnp->dn_membexpr = dt_node_cook(dnp->dn_membexpr, idflags); in dt_cook_member()
4293 dt_node_attr_assign(dnp, dnp->dn_membexpr->dn_attr); in dt_cook_member()
4294 return (dnp); in dt_cook_member()
4299 dt_cook_xlator(dt_node_t *dnp, uint_t idflags) in dt_cook_xlator() argument
4302 dt_xlator_t *dxp = dnp->dn_xlator; in dt_cook_xlator()
4318 for (mnp = dnp->dn_members; mnp != NULL; mnp = mnp->dn_list) { in dt_cook_xlator()
4348 dt_node_type_assign(dnp, DT_DYN_CTFP(dtp), DT_DYN_TYPE(dtp), B_FALSE); in dt_cook_xlator()
4349 dt_node_attr_assign(dnp, _dtrace_defattr); in dt_cook_xlator()
4351 return (dnp); in dt_cook_xlator()
4426 dt_cook_probe(dt_node_t *dnp, dt_provider_t *pvp) in dt_cook_probe() argument
4429 dt_probe_t *prp = dnp->dn_ident->di_data; in dt_cook_probe()
4454 dnerror(dnp, D_PROV_PRXLATOR, "translator for %s:%s output " in dt_cook_probe()
4456 pvp->pv_desc.dtvd_name, dnp->dn_ident->di_name, i + 1, in dt_cook_probe()
4464 dt_cook_provider(dt_node_t *dnp, uint_t idflags) in dt_cook_provider() argument
4466 dt_provider_t *pvp = dnp->dn_provider; in dt_cook_provider()
4474 for (pnp = dnp->dn_probes; pnp != NULL; pnp = pnp->dn_list) { in dt_cook_provider()
4480 if (prp != NULL && dnp->dn_provred) { in dt_cook_provider()
4483 } else if (prp == NULL && dnp->dn_provred) { in dt_cook_provider()
4488 dnp->dn_provname, dnp->dn_provname, in dt_cook_provider()
4489 probename, dnp->dn_provname, probename); in dt_cook_provider()
4492 dnp->dn_provname, probename); in dt_cook_provider()
4499 return (dnp); in dt_cook_provider()
4504 dt_cook_none(dt_node_t *dnp, uint_t idflags) in dt_cook_none() argument
4506 return (dnp); in dt_cook_none()
4541 dt_node_cook(dt_node_t *dnp, uint_t idflags) in dt_node_cook() argument
4545 yylineno = dnp->dn_line; in dt_node_cook()
4547 assert(dnp->dn_kind < in dt_node_cook()
4549 dnp = dt_cook_funcs[dnp->dn_kind](dnp, idflags); in dt_node_cook()
4550 dnp->dn_flags |= DT_NF_COOKED; in dt_node_cook()
4552 if (dnp->dn_kind == DT_NODE_VAR || dnp->dn_kind == DT_NODE_AGG) in dt_node_cook()
4553 dnp->dn_ident->di_flags |= idflags; in dt_node_cook()
4556 return (dnp); in dt_node_cook()
4563 dt_node_t *dnp, *nnp; in dt_node_list_cook() local
4565 for (dnp = (pnp != NULL ? *pnp : NULL); dnp != NULL; dnp = nnp) { in dt_node_list_cook()
4566 nnp = dnp->dn_list; in dt_node_list_cook()
4567 dnp = *pnp = dt_node_cook(dnp, idflags); in dt_node_list_cook()
4568 attr = dt_attr_min(attr, dnp->dn_attr); in dt_node_list_cook()
4569 dnp->dn_list = nnp; in dt_node_list_cook()
4570 pnp = &dnp->dn_list; in dt_node_list_cook()
4579 dt_node_t *dnp, *nnp; in dt_node_list_free() local
4581 for (dnp = (pnp != NULL ? *pnp : NULL); dnp != NULL; dnp = nnp) { in dt_node_list_free()
4582 nnp = dnp->dn_list; in dt_node_list_free()
4583 dt_node_free(dnp); in dt_node_list_free()
4593 dt_node_t *dnp, *nnp; in dt_node_link_free() local
4595 for (dnp = (pnp != NULL ? *pnp : NULL); dnp != NULL; dnp = nnp) { in dt_node_link_free()
4596 nnp = dnp->dn_link; in dt_node_link_free()
4597 dt_node_free(dnp); in dt_node_link_free()
4600 for (dnp = (pnp != NULL ? *pnp : NULL); dnp != NULL; dnp = nnp) { in dt_node_link_free()
4601 nnp = dnp->dn_link; in dt_node_link_free()
4602 free(dnp); in dt_node_link_free()
4612 dt_node_t *dnp; in dt_node_link() local
4619 for (dnp = lp; dnp->dn_list != NULL; dnp = dnp->dn_list) in dt_node_link()
4622 dnp->dn_list = rp; in dt_node_link()
4632 dt_node_diftype(dtrace_hdl_t *dtp, const dt_node_t *dnp, dtrace_diftype_t *tp) in dt_node_diftype() argument
4634 if (dnp->dn_ctfp == DT_STR_CTFP(dtp) && in dt_node_diftype()
4635 dnp->dn_type == DT_STR_TYPE(dtp)) { in dt_node_diftype()
4640 tp->dtdt_ckind = ctf_type_kind(dnp->dn_ctfp, in dt_node_diftype()
4641 ctf_type_resolve(dnp->dn_ctfp, dnp->dn_type)); in dt_node_diftype()
4644 tp->dtdt_flags = (dnp->dn_flags & DT_NF_REF) ? in dt_node_diftype()
4645 (dnp->dn_flags & DT_NF_USERLAND) ? DIF_TF_BYUREF : in dt_node_diftype()
4648 tp->dtdt_size = ctf_type_size(dnp->dn_ctfp, dnp->dn_type); in dt_node_diftype()
4667 dt_printd(dt_node_t *dnp, FILE *fp, int depth) in dt_printd() argument
4671 switch (dnp->dn_kind) { in dt_printd()
4673 (void) fprintf(fp, "0x%llx", (u_longlong_t)dnp->dn_value); in dt_printd()
4674 if (!(dnp->dn_flags & DT_NF_SIGNED)) in dt_printd()
4679 char *escd = strchr2esc(dnp->dn_string, strlen(dnp->dn_string)); in dt_printd()
4686 (void) fprintf(fp, "%s", dnp->dn_string); in dt_printd()
4691 (dnp->dn_ident->di_flags & DT_IDFLG_LOCAL) ? "this->" : in dt_printd()
4692 (dnp->dn_ident->di_flags & DT_IDFLG_TLS) ? "self->" : "", in dt_printd()
4693 dnp->dn_ident->di_name); in dt_printd()
4695 if (dnp->dn_args != NULL) { in dt_printd()
4698 for (arg = dnp->dn_args; arg != NULL; in dt_printd()
4710 const dtrace_syminfo_t *dts = dnp->dn_ident->di_data; in dt_printd()
4715 (void) fprintf(fp, "%s(", dnp->dn_ident->di_name); in dt_printd()
4717 for (arg = dnp->dn_args; arg != NULL; arg = arg->dn_list) { in dt_printd()
4726 (void) fprintf(fp, "%s(", opstr(dnp->dn_op)); in dt_printd()
4727 dt_printd(dnp->dn_child, fp, 0); in dt_printd()
4733 dt_printd(dnp->dn_left, fp, 0); in dt_printd()
4734 if (dnp->dn_op == DT_TOK_LPAR) { in dt_printd()
4736 dt_printd(dnp->dn_right, fp, 0); in dt_printd()
4739 if (dnp->dn_op == DT_TOK_PTR || dnp->dn_op == DT_TOK_DOT || in dt_printd()
4740 dnp->dn_op == DT_TOK_LBRAC) in dt_printd()
4741 (void) fprintf(fp, "%s", opstr(dnp->dn_op)); in dt_printd()
4743 (void) fprintf(fp, " %s ", opstr(dnp->dn_op)); in dt_printd()
4744 dt_printd(dnp->dn_right, fp, 0); in dt_printd()
4745 if (dnp->dn_op == DT_TOK_LBRAC) { in dt_printd()
4746 dt_node_t *ln = dnp->dn_right; in dt_printd()
4759 dt_printd(dnp->dn_expr, fp, 0); in dt_printd()
4761 dt_printd(dnp->dn_left, fp, 0); in dt_printd()
4763 dt_printd(dnp->dn_right, fp, 0); in dt_printd()
4770 dt_printd(dnp->dn_expr, fp, depth + 1); in dt_printd()
4776 dnp->dn_desc->dtpd_provider, dnp->dn_desc->dtpd_mod, in dt_printd()
4777 dnp->dn_desc->dtpd_func, dnp->dn_desc->dtpd_name); in dt_printd()
4781 for (arg = dnp->dn_pdescs; arg != NULL; arg = arg->dn_list) { in dt_printd()
4788 if (dnp->dn_pred != NULL) { in dt_printd()
4790 dt_printd(dnp->dn_pred, fp, 0); in dt_printd()
4795 for (arg = dnp->dn_acts; arg != NULL; arg = arg->dn_list) in dt_printd()
4803 dt_printd(dnp->dn_conditional, fp, 0); in dt_printd()
4806 for (arg = dnp->dn_body; arg != NULL; arg = arg->dn_list) in dt_printd()
4808 if (dnp->dn_alternate_body == NULL) { in dt_printd()
4812 for (arg = dnp->dn_alternate_body; arg != NULL; in dt_printd()
4822 (void *)dnp, dnp->dn_kind); in dt_printd()
4827 dt_node_printr(dt_node_t *dnp, FILE *fp, int depth) in dt_node_printr() argument
4835 (void) dt_attr_str(dnp->dn_attr, a, sizeof (a)); in dt_node_printr()
4837 if (dnp->dn_ctfp != NULL && dnp->dn_type != CTF_ERR && in dt_node_printr()
4838 ctf_type_name(dnp->dn_ctfp, dnp->dn_type, n, sizeof (n)) != NULL) { in dt_node_printr()
4842 dnp->dn_type, a); in dt_node_printr()
4845 if (dnp->dn_flags != 0) { in dt_node_printr()
4847 if (dnp->dn_flags & DT_NF_SIGNED) in dt_node_printr()
4849 if (dnp->dn_flags & DT_NF_COOKED) in dt_node_printr()
4851 if (dnp->dn_flags & DT_NF_REF) in dt_node_printr()
4853 if (dnp->dn_flags & DT_NF_LVALUE) in dt_node_printr()
4855 if (dnp->dn_flags & DT_NF_WRITABLE) in dt_node_printr()
4857 if (dnp->dn_flags & DT_NF_BITFIELD) in dt_node_printr()
4859 if (dnp->dn_flags & DT_NF_USERLAND) in dt_node_printr()
4865 switch (dnp->dn_kind) { in dt_node_printr()
4867 (void) fprintf(fp, "FREE <node %p>\n", (void *)dnp); in dt_node_printr()
4872 (u_longlong_t)dnp->dn_value, buf); in dt_node_printr()
4876 (void) fprintf(fp, "STRING \"%s\" (%s)\n", dnp->dn_string, buf); in dt_node_printr()
4880 (void) fprintf(fp, "IDENT %s (%s)\n", dnp->dn_string, buf); in dt_node_printr()
4885 (dnp->dn_ident->di_flags & DT_IDFLG_LOCAL) ? "this->" : in dt_node_printr()
4886 (dnp->dn_ident->di_flags & DT_IDFLG_TLS) ? "self->" : "", in dt_node_printr()
4887 dnp->dn_ident->di_name, buf); in dt_node_printr()
4889 if (dnp->dn_args != NULL) in dt_node_printr()
4892 for (arg = dnp->dn_args; arg != NULL; arg = arg->dn_list) { in dt_node_printr()
4898 if (dnp->dn_args != NULL) in dt_node_printr()
4903 dts = dnp->dn_ident->di_data; in dt_node_printr()
4909 if (dnp->dn_string != NULL) { in dt_node_printr()
4911 buf, dnp->dn_string); in dt_node_printr()
4918 dnp->dn_ident->di_name, buf); in dt_node_printr()
4920 for (arg = dnp->dn_args; arg != NULL; arg = arg->dn_list) { in dt_node_printr()
4928 (void) fprintf(fp, "OP1 %s (%s)\n", opstr(dnp->dn_op), buf); in dt_node_printr()
4929 dt_node_printr(dnp->dn_child, fp, depth + 1); in dt_node_printr()
4933 (void) fprintf(fp, "OP2 %s (%s)\n", opstr(dnp->dn_op), buf); in dt_node_printr()
4934 dt_node_printr(dnp->dn_left, fp, depth + 1); in dt_node_printr()
4935 dt_node_printr(dnp->dn_right, fp, depth + 1); in dt_node_printr()
4936 if (dnp->dn_op == DT_TOK_LBRAC) { in dt_node_printr()
4937 dt_node_t *ln = dnp->dn_right; in dt_node_printr()
4947 dt_node_printr(dnp->dn_expr, fp, depth + 1); in dt_node_printr()
4949 dt_node_printr(dnp->dn_left, fp, depth + 1); in dt_node_printr()
4951 dt_node_printr(dnp->dn_right, fp, depth + 1); in dt_node_printr()
4957 dt_node_printr(dnp->dn_expr, fp, depth + 1); in dt_node_printr()
4962 dnp->dn_ident->di_name, a); in dt_node_printr()
4964 for (arg = dnp->dn_aggtup; arg != NULL; arg = arg->dn_list) { in dt_node_printr()
4970 if (dnp->dn_aggfun) { in dt_node_printr()
4972 dt_node_printr(dnp->dn_aggfun, fp, depth + 1); in dt_node_printr()
4976 if (dnp->dn_aggfun) in dt_node_printr()
4982 dnp->dn_desc->dtpd_provider, dnp->dn_desc->dtpd_mod, in dt_node_printr()
4983 dnp->dn_desc->dtpd_func, dnp->dn_desc->dtpd_name, in dt_node_printr()
4984 dnp->dn_desc->dtpd_id); in dt_node_printr()
4990 for (arg = dnp->dn_pdescs; arg != NULL; arg = arg->dn_list) in dt_node_printr()
4994 dt_attr_str(dnp->dn_ctxattr, a, sizeof (a))); in dt_node_printr()
4996 if (dnp->dn_pred != NULL) { in dt_node_printr()
4998 dt_node_printr(dnp->dn_pred, fp, depth + 1); in dt_node_printr()
5002 for (arg = dnp->dn_acts; arg != NULL; arg = arg->dn_list) in dt_node_printr()
5008 inp = dnp->dn_ident->di_iarg; in dt_node_printr()
5011 dnp->dn_ident->di_name, buf); in dt_node_printr()
5016 (void) fprintf(fp, "MEMBER %s (%s)\n", dnp->dn_membname, buf); in dt_node_printr()
5017 if (dnp->dn_membexpr) in dt_node_printr()
5018 dt_node_printr(dnp->dn_membexpr, fp, depth + 1); in dt_node_printr()
5024 if (ctf_type_name(dnp->dn_xlator->dx_src_ctfp, in dt_node_printr()
5025 dnp->dn_xlator->dx_src_type, n, sizeof (n)) != NULL) in dt_node_printr()
5028 if (ctf_type_name(dnp->dn_xlator->dx_dst_ctfp, in dt_node_printr()
5029 dnp->dn_xlator->dx_dst_type, n, sizeof (n)) != NULL) in dt_node_printr()
5034 for (arg = dnp->dn_members; arg != NULL; arg = arg->dn_list) in dt_node_printr()
5039 (void) fprintf(fp, "PROBE %s\n", dnp->dn_ident->di_name); in dt_node_printr()
5044 dnp->dn_provname, dnp->dn_provred ? "redecl" : "decl"); in dt_node_printr()
5045 for (arg = dnp->dn_probes; arg != NULL; arg = arg->dn_list) in dt_node_printr()
5051 for (arg = dnp->dn_list; arg != NULL; arg = arg->dn_list) in dt_node_printr()
5058 dt_node_printr(dnp->dn_conditional, fp, depth + 1); in dt_node_printr()
5061 for (arg = dnp->dn_body; arg != NULL; arg = arg->dn_list) in dt_node_printr()
5064 if (dnp->dn_alternate_body != NULL) { in dt_node_printr()
5066 for (arg = dnp->dn_alternate_body; arg != NULL; in dt_node_printr()
5075 (void *)dnp, dnp->dn_kind); in dt_node_printr()
5080 dt_node_root(dt_node_t *dnp) in dt_node_root() argument
5082 yypcb->pcb_root = dnp; in dt_node_root()
5088 dnerror(const dt_node_t *dnp, dt_errtag_t tag, const char *format, ...) in dnerror() argument
5093 yylineno = dnp->dn_line; in dnerror()
5105 dnwarn(const dt_node_t *dnp, dt_errtag_t tag, const char *format, ...) in dnwarn() argument
5110 yylineno = dnp->dn_line; in dnwarn()