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;
3141 		xyerror(D_UNKNOWN, "invalid unary op %s\n", opstr(dnp->dn_op));
3153 	int op = dnp->dn_op;
3160 		    "lvalue as an operand\n", opstr(op));
3166 		    "to a writable variable\n", opstr(op));
3179 	int op = dnp->dn_op;
3197 	if (op == DT_TOK_LBRAC) {
3222 		 * Switch op to '+' for *(E1 + E2) array mode in these cases:
3232 					op = DT_TOK_ADD;
3234 				op = DT_TOK_ADD;
3237 			op = DT_TOK_ADD;
3241 	switch (op) {
3250 			    "integral type\n", opstr(op));
3263 			    "integral type\n", opstr(op));
3276 			    "integral type\n", opstr(op));
3289 			    "arithmetic type\n", opstr(op));
3303 			    "of scalar type\n", opstr(op));
3339 				    opstr(op), rp->dn_string,
3380 			    dt_node_type_name(lp, n1, sizeof (n1)), opstr(op),
3417 		} else if (lp_is_int && rp_is_ptr && op == DT_TOK_ADD) {
3421 		} else if (lp_is_ptr && rp_is_ptr && op == DT_TOK_SUB &&
3429 			    dt_node_type_name(lp, n1, sizeof (n1)), opstr(op),
3460 			    "integral type\n", opstr(op));
3479 			    "arithmetic type\n", opstr(op));
3598 				    opstr(op),
3612 		    dt_node_type_name(lp, n1, sizeof (n1)), opstr(op),
3632 			    dt_node_type_name(lp, n1, sizeof (n1)), opstr(op),
3646 				    "operand of known size\n", opstr(op));
3652 				    opstr(op),
3695 			    "an identifier\n", opstr(op));
3723 		if (op == DT_TOK_PTR) {
3726 				    "applied to a pointer\n", opstr(op));
3750 				    "is available\n", opstr(op), tag);
3755 			if (op == DT_TOK_PTR) {
3763 				    "to a struct or union\n", opstr(op),
3780 		if (op == DT_TOK_PTR && (kind != CTF_K_ARRAY ||
3784 		if (op == DT_TOK_DOT && (lp->dn_flags & DT_NF_LVALUE) &&
3798 		 * If op is DT_TOK_LBRAC, we know from the special-case code at
3969 			    "cannot be of dynamic type\n", opstr(op));
3974 			    "cannot be actions\n", opstr(op));
3982 		xyerror(D_UNKNOWN, "invalid binary op %s\n", opstr(op));
3992 	if (dnp->dn_op == DT_TOK_LBRAC && op == DT_TOK_ADD) {
5124 		return; /* compiler is not currently active: act as a no-op */
5158 		return; /* compiler is not currently active: act as a no-op */