178 dt_stmt_append(dtrace_stmtdesc_t *sdp, const dt_node_t *dnp)  in dt_stmt_append()  argument
192 				dnerror(dnp, D_COMM_COMM, "commit( ) may "  in dt_stmt_append()
197 				dnerror(dnp, D_COMM_DREC, "commit( ) may "  in dt_stmt_append()
205 				dnerror(dnp, D_AGG_COMM, "aggregating actions "  in dt_stmt_append()
215 				dnerror(dnp, D_SPEC_SPEC, "speculate( ) may "  in dt_stmt_append()
220 				dnerror(dnp, D_SPEC_COMM, "speculate( ) may "  in dt_stmt_append()
225 				dnerror(dnp, D_SPEC_DREC, "speculate( ) may "  in dt_stmt_append()
235 				dnerror(dnp, D_AGG_SPEC, "aggregating actions "  in dt_stmt_append()
245 				dnerror(dnp, D_ACT_SPEC, "destructive actions "  in dt_stmt_append()
250 				dnerror(dnp, D_EXIT_SPEC, "exit( ) may not "  in dt_stmt_append()
268 			dnerror(dnp, D_DREC_COMM, "data-recording actions "  in dt_stmt_append()
318 dt_action_clear(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_clear()  argument
327 	for (anp = dnp->dn_args; anp != NULL; anp = anp->dn_list)  in dt_action_clear()
331 		dnerror(dnp, D_CLEAR_PROTO,  in dt_action_clear()
333 		    dnp->dn_ident->di_name, argc);  in dt_action_clear()
336 	anp = dnp->dn_args;  in dt_action_clear()
340 		dnerror(dnp, D_CLEAR_AGGARG,  in dt_action_clear()
343 		    dnp->dn_ident->di_name,  in dt_action_clear()
350 		dnerror(dnp, D_CLEAR_AGGBAD,  in dt_action_clear()
360 dt_action_normalize(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_normalize()  argument
365 	int denormal = (strcmp(dnp->dn_ident->di_name, "denormalize") == 0);  in dt_action_normalize()
370 	for (anp = dnp->dn_args; anp != NULL; anp = anp->dn_list)  in dt_action_normalize()
374 		dnerror(dnp, D_NORMALIZE_PROTO,  in dt_action_normalize()
376 		    dnp->dn_ident->di_name, argc, denormal ? 1 : 2);  in dt_action_normalize()
379 	anp = dnp->dn_args;  in dt_action_normalize()
383 		dnerror(dnp, D_NORMALIZE_AGGARG,  in dt_action_normalize()
386 		    dnp->dn_ident->di_name,  in dt_action_normalize()
391 		dnerror(dnp, D_NORMALIZE_SCALAR,  in dt_action_normalize()
393 		    dnp->dn_ident->di_name);  in dt_action_normalize()
399 		dnerror(dnp, D_NORMALIZE_AGGBAD,  in dt_action_normalize()
423 dt_action_trunc(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_trunc()  argument
432 	for (anp = dnp->dn_args; anp != NULL; anp = anp->dn_list)  in dt_action_trunc()
436 		dnerror(dnp, D_TRUNC_PROTO,  in dt_action_trunc()
438 		    dnp->dn_ident->di_name, argc,  in dt_action_trunc()
442 	anp = dnp->dn_args;  in dt_action_trunc()
447 		dnerror(dnp, D_TRUNC_AGGARG,  in dt_action_trunc()
450 		    dnp->dn_ident->di_name,  in dt_action_trunc()
457 			dnerror(dnp, D_TRUNC_SCALAR,  in dt_action_trunc()
459 			    dnp->dn_ident->di_name);  in dt_action_trunc()
466 		dnerror(dnp, D_TRUNC_AGGBAD,  in dt_action_trunc()
489 dt_action_printa(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_printa()  argument
499 	for (anp = dnp->dn_args; anp != NULL; anp = anp->dn_list)  in dt_action_printa()
502 	switch (dnp->dn_args->dn_kind) {  in dt_action_printa()
504 		format = dnp->dn_args->dn_string;  in dt_action_printa()
505 		anp = dnp->dn_args->dn_list;  in dt_action_printa()
510 		anp = dnp->dn_args;  in dt_action_printa()
515 		anp = dnp->dn_args;  in dt_action_printa()
520 		dnerror(dnp, D_PRINTA_PROTO,  in dt_action_printa()
522 		    dnp->dn_ident->di_name, argc, argr);  in dt_action_printa()
529 			dnerror(dnp, D_PRINTA_AGGARG,  in dt_action_printa()
532 			    "\t argument: %s\n", dnp->dn_ident->di_name, argr,  in dt_action_printa()
541 			dnerror(dnp, D_PRINTA_AGGBAD,  in dt_action_printa()
556 			yylineno = dnp->dn_line;  in dt_action_printa()
561 			    DT_PRINTF_AGGREGATION, dnp->dn_ident, 1,  in dt_action_printa()
575 dt_action_printflike(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp,  in dt_action_printflike()  argument
584 	if (dnp->dn_args->dn_kind != DT_NODE_STRING) {  in dt_action_printflike()
585 		dnerror(dnp, D_PRINTF_ARG_FMT,  in dt_action_printflike()
588 		    dnp->dn_ident->di_name,  in dt_action_printflike()
589 		    dt_node_type_name(dnp->dn_args, n, sizeof (n)));  in dt_action_printflike()
592 	arg1 = dnp->dn_args->dn_list;  in dt_action_printflike()
593 	yylineno = dnp->dn_line;  in dt_action_printflike()
594 	str = dnp->dn_args->dn_string;  in dt_action_printflike()
615 			dnerror(dnp, D_FREOPEN_INVALID,  in dt_action_printflike()
617 			    dnp->dn_ident->di_name, DT_FREOPEN_RESTORE);  in dt_action_printflike()
627 	    dnp->dn_ident, 1, DTRACEACT_AGGREGATION, arg1);  in dt_action_printflike()
660 dt_action_trace(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_trace()  argument
664 	if (dt_node_is_void(dnp->dn_args)) {  in dt_action_trace()
665 		dnerror(dnp->dn_args, D_TRACE_VOID,  in dt_action_trace()
669 	if (dt_node_is_dynamic(dnp->dn_args)) {  in dt_action_trace()
670 		dnerror(dnp->dn_args, D_TRACE_DYN,  in dt_action_trace()
674 	dt_cg(yypcb, dnp->dn_args);  in dt_action_trace()
680 dt_action_tracemem(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_tracemem()  argument
684 	dt_node_t *addr = dnp->dn_args;  in dt_action_tracemem()
685 	dt_node_t *size = dnp->dn_args->dn_list;  in dt_action_tracemem()
737 dt_action_stack(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_stack()  argument
740 	dt_action_stack_args(dtp, ap, dnp->dn_args);  in dt_action_stack()
744 dt_action_ustack_args(dtrace_hdl_t *dtp, dtrace_actdesc_t *ap, dt_node_t *dnp)  in dt_action_ustack_args()  argument
748 	dt_node_t *arg0 = dnp->dn_args;  in dt_action_ustack_args()
751 	assert(dnp->dn_ident->di_id == DT_ACT_JSTACK ||  in dt_action_ustack_args()
752 	    dnp->dn_ident->di_id == DT_ACT_USTACK);  in dt_action_ustack_args()
754 	if (dnp->dn_ident->di_id == DT_ACT_JSTACK) {  in dt_action_ustack_args()
763 		assert(dnp->dn_ident->di_id == DT_ACT_USTACK);  in dt_action_ustack_args()
799 dt_action_ustack(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_ustack()  argument
802 	dt_action_ustack_args(dtp, ap, dnp);  in dt_action_ustack()
806 dt_action_setopt(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_setopt()  argument
815 	arg0 = dnp->dn_args;  in dt_action_setopt()
840     dt_node_t *dnp, dtrace_actkind_t kind)  in dt_action_symmod_args()  argument
846 	dt_cg(yypcb, dnp);  in dt_action_symmod_args()
853 dt_action_symmod(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp,  in dt_action_symmod()  argument
857 	dt_action_symmod_args(dtp, ap, dnp->dn_args, kind);  in dt_action_symmod()
862 dt_action_ftruncate(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_ftruncate()  argument
878 dt_action_stop(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_stop()  argument
888 dt_action_breakpoint(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_breakpoint()  argument
898 dt_action_panic(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_panic()  argument
907 dt_action_chill(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_chill()  argument
911 	dt_cg(yypcb, dnp->dn_args);  in dt_action_chill()
917 dt_action_raise(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_raise()  argument
921 	dt_cg(yypcb, dnp->dn_args);  in dt_action_raise()
927 dt_action_exit(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_exit()  argument
931 	dt_cg(yypcb, dnp->dn_args);  in dt_action_exit()
938 dt_action_speculate(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_speculate()  argument
942 	dt_cg(yypcb, dnp->dn_args);  in dt_action_speculate()
948 dt_action_commit(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_commit()  argument
952 	dt_cg(yypcb, dnp->dn_args);  in dt_action_commit()
958 dt_action_discard(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_action_discard()  argument
962 	dt_cg(yypcb, dnp->dn_args);  in dt_action_discard()
968 dt_compile_fun(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_compile_fun()  argument
970 	switch (dnp->dn_expr->dn_ident->di_id) {  in dt_compile_fun()
972 		dt_action_breakpoint(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
975 		dt_action_chill(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
978 		dt_action_clear(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
981 		dt_action_commit(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
984 		dt_action_normalize(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
987 		dt_action_discard(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
990 		dt_action_exit(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
993 		dt_action_printflike(dtp, dnp->dn_expr, sdp, DTRACEACT_FREOPEN);  in dt_compile_fun()
996 		dt_action_ftruncate(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
999 		dt_action_symmod(dtp, dnp->dn_expr, sdp, DTRACEACT_MOD);  in dt_compile_fun()
1002 		dt_action_normalize(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1005 		dt_action_panic(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1008 		dt_action_printa(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1011 		dt_action_printflike(dtp, dnp->dn_expr, sdp, DTRACEACT_PRINTF);  in dt_compile_fun()
1014 		dt_action_raise(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1017 		dt_action_setopt(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1020 		dt_action_speculate(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1023 		dt_action_stack(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1026 		dt_action_stop(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1029 		dt_action_symmod(dtp, dnp->dn_expr, sdp, DTRACEACT_SYM);  in dt_compile_fun()
1032 		dt_action_printflike(dtp, dnp->dn_expr, sdp, DTRACEACT_SYSTEM);  in dt_compile_fun()
1035 		dt_action_trace(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1038 		dt_action_tracemem(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1041 		dt_action_trunc(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1044 		dt_action_symmod(dtp, dnp->dn_expr, sdp, DTRACEACT_UADDR);  in dt_compile_fun()
1047 		dt_action_symmod(dtp, dnp->dn_expr, sdp, DTRACEACT_UMOD);  in dt_compile_fun()
1050 		dt_action_symmod(dtp, dnp->dn_expr, sdp, DTRACEACT_USYM);  in dt_compile_fun()
1054 		dt_action_ustack(dtp, dnp->dn_expr, sdp);  in dt_compile_fun()
1057 		dnerror(dnp->dn_expr, D_UNKNOWN, "tracing function %s( ) is "  in dt_compile_fun()
1058 		    "not yet supported\n", dnp->dn_expr->dn_ident->di_name);  in dt_compile_fun()
1063 dt_compile_exp(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_compile_exp()  argument
1067 	dt_cg(yypcb, dnp->dn_expr);  in dt_compile_exp()
1074 dt_compile_agg(dtrace_hdl_t *dtp, dt_node_t *dnp, dtrace_stmtdesc_t *sdp)  in dt_compile_agg()  argument
1086 	if (dnp->dn_aggfun == NULL) {  in dt_compile_agg()
1087 		dnerror(dnp, D_AGG_NULL, "expression has null effect: @%s\n",  in dt_compile_agg()
1088 		    dnp->dn_ident->di_name);  in dt_compile_agg()
1091 	aid = dnp->dn_ident;  in dt_compile_agg()
1092 	fid = dnp->dn_aggfun->dn_ident;  in dt_compile_agg()
1094 	if (dnp->dn_aggfun->dn_args != NULL &&  in dt_compile_agg()
1095 	    dt_node_is_scalar(dnp->dn_aggfun->dn_args) == 0) {  in dt_compile_agg()
1096 		dnerror(dnp->dn_aggfun, D_AGG_SCALAR, "%s( ) argument #1 must "  in dt_compile_agg()
1107 	for (anp = dnp->dn_aggtup; anp != NULL; anp = anp->dn_list) {  in dt_compile_agg()
1169 		dt_node_t *arg1 = dnp->dn_aggfun->dn_args->dn_list;  in dt_compile_agg()
1201 			dnerror(dnp, D_LQUANT_MISMATCH,  in dt_compile_agg()
1222 			dnerror(dnp, D_LQUANT_STEPLARGE,  in dt_compile_agg()
1228 			dnerror(dnp, D_LQUANT_STEPSMALL, "lquantize( ) step "  in dt_compile_agg()
1261 				dnerror(dnp, D_LQUANT_MATCHBASE, "lquantize( ) "  in dt_compile_agg()
1268 				dnerror(dnp, D_LQUANT_MATCHLIM, "lquantize( ) "  in dt_compile_agg()
1276 				dnerror(dnp, D_LQUANT_MATCHSTEP, "lquantize( ) "  in dt_compile_agg()
1295 		incr = dnp->dn_aggfun->dn_args->dn_list;  in dt_compile_agg()
1301 			dnerror(dnp, D_PROTO_ARG, "%s( ) increment value "  in dt_compile_agg()
1336 	if (dnp->dn_aggfun->dn_args != NULL) {  in dt_compile_agg()
1337 		dt_cg(yypcb, dnp->dn_aggfun->dn_args);  in dt_compile_agg()
1347 	dt_node_t *dnp;  in dt_compile_one_clause()  local
1372 	for (dnp = cnp->dn_acts; dnp != NULL; dnp = dnp->dn_list) {  in dt_compile_one_clause()
1376 		switch (dnp->dn_kind) {  in dt_compile_one_clause()
1378 			if (dnp->dn_expr->dn_kind == DT_NODE_AGG)  in dt_compile_one_clause()
1379 				dt_compile_agg(dtp, dnp->dn_expr, sdp);  in dt_compile_one_clause()
1381 				dt_compile_exp(dtp, dnp, sdp);  in dt_compile_one_clause()
1384 			dt_compile_fun(dtp, dnp, sdp);  in dt_compile_one_clause()
1387 			dt_compile_agg(dtp, dnp, sdp);  in dt_compile_one_clause()
1390 			dnerror(dnp, D_UNKNOWN, "internal error -- node kind "  in dt_compile_one_clause()
1391 			    "%u is not a valid statement\n", dnp->dn_kind);  in dt_compile_one_clause()
1395 		dt_stmt_append(sdp, dnp);  in dt_compile_one_clause()
1414 dt_compile_xlator(dt_node_t *dnp)  in dt_compile_xlator()  argument
1416 	dt_xlator_t *dxp = dnp->dn_xlator;  in dt_compile_xlator()
1419 	for (mnp = dnp->dn_members; mnp != NULL; mnp = mnp->dn_list) {  in dt_compile_xlator()
2055 	dt_node_t *dnp;  in dt_compile()  local
2150 		if ((dnp = yypcb->pcb_root->dn_list) == NULL &&  in dt_compile()
2157 		for (; dnp != NULL; dnp = dnp->dn_list) {  in dt_compile()
2158 			switch (dnp->dn_kind) {  in dt_compile()
2160 				dt_compile_clause(dtp, dnp);  in dt_compile()
2164 					dt_compile_xlator(dnp);  in dt_compile()
2167 				(void) dt_node_cook(dnp, DT_IDFLG_REF);  in dt_compile()