libdtrace/common/dt_parser.c

128 opstr(int op)
130 	switch (op) {
1843 dt_node_op1(int op, dt_node_t *cp)
1848 		switch (op) {
1877 	if (op == DT_TOK_SIZEOF &&
1899 	assert(op <= USHRT_MAX);
1900 	dnp->dn_op = (ushort_t)op;
1939 dt_node_op2(int op, dt_node_t *lp, dt_node_t *rp)
1949 	    (op == DT_TOK_MOD || op == DT_TOK_DIV ||
1950 	    op == DT_TOK_MOD_EQ || op == DT_TOK_DIV_EQ))
1963 		switch (op) {
2087 	if (op == DT_TOK_LPAR && rp->dn_kind == DT_NODE_INT &&
2102 	assert(op <= USHRT_MAX);
2103 	dnp->dn_op = (ushort_t)op;
3130 		xyerror(D_UNKNOWN, "invalid unary op %s\n", opstr(dnp->dn_op));
3142 	int op = dnp->dn_op;
3149 		    "lvalue as an operand\n", opstr(op));
3155 		    "to a writable variable\n", opstr(op));
3168 	int op = dnp->dn_op;
3186 	if (op == DT_TOK_LBRAC) {
3210 		 * Switch op to '+' for *(E1 + E2) array mode in these cases:
3220 					op = DT_TOK_ADD;
3222 				op = DT_TOK_ADD;
3224 			op = DT_TOK_ADD;
3227 	switch (op) {
3236 			    "integral type\n", opstr(op));
3249 			    "integral type\n", opstr(op));
3262 			    "integral type\n", opstr(op));
3275 			    "arithmetic type\n", opstr(op));
3289 			    "of scalar type\n", opstr(op));
3325 				    opstr(op), rp->dn_string,
3366 			    dt_node_type_name(lp, n1, sizeof (n1)), opstr(op),
3403 		} else if (lp_is_int && rp_is_ptr && op == DT_TOK_ADD) {
3407 		} else if (lp_is_ptr && rp_is_ptr && op == DT_TOK_SUB &&
3415 			    dt_node_type_name(lp, n1, sizeof (n1)), opstr(op),
3446 			    "integral type\n", opstr(op));
3465 			    "arithmetic type\n", opstr(op));
3584 				    opstr(op),
3598 		    dt_node_type_name(lp, n1, sizeof (n1)), opstr(op),
3618 			    dt_node_type_name(lp, n1, sizeof (n1)), opstr(op),
3632 				    "operand of known size\n", opstr(op));
3638 				    opstr(op),
3692 			    "an identifier\n", opstr(op));
3720 		if (op == DT_TOK_PTR) {
3723 				    "applied to a pointer\n", opstr(op));
3747 				    "is available\n", opstr(op), tag);
3752 			if (op == DT_TOK_PTR) {
3760 				    "to a struct or union\n", opstr(op),
3777 		if (op == DT_TOK_PTR && (kind != CTF_K_ARRAY ||
3781 		if (op == DT_TOK_DOT && (lp->dn_flags & DT_NF_LVALUE) &&
3795 		 * If op is DT_TOK_LBRAC, we know from the special-case code at
3966 			    "cannot be of dynamic type\n", opstr(op));
3971 			    "cannot be actions\n", opstr(op));
3979 		xyerror(D_UNKNOWN, "invalid binary op %s\n", opstr(op));
3989 	if (dnp->dn_op == DT_TOK_LBRAC && op == DT_TOK_ADD) {
4917 		return; /* compiler is not currently active: act as a no-op */
4951 		return; /* compiler is not currently active: act as a no-op */