libdtrace/common/dt_decl.c

290 	dt_node_t *dnp;
292 	for (dnp = flist; dnp != fnp && dnp != NULL; dnp = dnp->dn_list) {
293 		if (dnp->dn_string != NULL &&
294 		    strcmp(dnp->dn_string, fnp->dn_string) == 0)
316 	dt_node_t *dnp;
318 	for (dnp = plist; dnp != NULL; dnp = dnp->dn_list, i++) {
320 		if (dnp->dn_type == CTF_ERR && !(flags & DT_DP_VARARGS)) {
321 			dnerror(dnp, D_DECL_PROTO_VARARGS, "%s prototype may "
325 		if (dt_node_is_dynamic(dnp) && !(flags & DT_DP_DYNAMIC)) {
326 			dnerror(dnp, D_DECL_PROTO_TYPE, "%s prototype may not "
328 			    kind, dt_node_type_name(dnp, n, sizeof (n)),
329 			    dnp->dn_string ? dnp->dn_string : "(anonymous)", i);
332 		is_void = dt_node_is_void(dnp);
336 			dnerror(dnp, D_DECL_PROTO_TYPE, "%s prototype may not "
338 			    kind, dt_node_type_name(dnp, n, sizeof (n)),
339 			    dnp->dn_string ? dnp->dn_string : "(anonymous)", i);
342 		if (is_void && dnp->dn_string != NULL) {
343 			dnerror(dnp, D_DECL_PROTO_NAME, "void parameter may "
344 			    "not have a name: %s\n", dnp->dn_string);
347 		if (dnp->dn_string != NULL &&
348 		    dt_decl_protoform(dnp, flist) != form) {
349 			dnerror(dnp, D_DECL_PROTO_FORM, "parameter is "
351 			    form ? "not" : "already", kind, dnp->dn_string, i);
354 		if (dnp->dn_string == NULL &&
356 			dnerror(dnp, D_DECL_PROTO_NAME, "parameter declaration "
368 dt_decl_array(dt_node_t *dnp)
384 		if (dnp != NULL && dnp->dn_kind == DT_NODE_TYPE) {
397 	if (dnp != NULL && dnp->dn_kind != DT_NODE_TYPE) {
398 		dnp = ddp->dd_node = dt_node_cook(dnp, DT_IDFLG_REF);
400 		if (dt_node_is_posconst(dnp) == 0) {
406 		if (dnp->dn_value > UINT_MAX)
409 	} else if (dnp != NULL) {
410 		ddp->dd_node = dnp;
411 		(void) dt_decl_prototype(dnp, dnp, "array", DT_DP_ANON);
429 dt_decl_func(dt_decl_t *pdp, dt_node_t *dnp)
433 	ddp->dd_node = dnp;
435 	(void) dt_decl_prototype(dnp, dnp, "function",
504 dt_decl_member(dt_node_t *dnp)
525 	if (dnp == NULL && ident == NULL)
567 	if (dnp != NULL) {
568 		dnp = dt_node_cook(dnp, DT_IDFLG_REF);
576 		if (ident == NULL && dnp->dn_kind == DT_NODE_INT &&
577 		    dnp->dn_value == 0) {
578 			dt_node_free(dnp);
582 		if (dt_node_is_posconst(dnp) == 0) {
594 		if (dnp->dn_value > cte.cte_bits) {
600 		cte.cte_bits = (uint_t)dnp->dn_value;
614 		dt_node_free(dnp);
693 dt_decl_enumerator(char *s, dt_node_t *dnp)
723 	if (dnp != NULL) {
724 		if (dnp->dn_kind != DT_NODE_IDENT || ctf_enum_value(
725 		    dsp->ds_ctfp, dsp->ds_type, dnp->dn_string, &value) != 0) {
726 			dnp = dt_node_cook(dnp, DT_IDFLG_REF);
728 			if (dnp->dn_kind != DT_NODE_INT) {
734 			if ((intmax_t)dnp->dn_value > INT_MAX ||
735 			    (intmax_t)dnp->dn_value < INT_MIN) {
740 			value = (int)dnp->dn_value;
742 		dt_node_free(dnp);
782 	dnp = dt_node_int(value);
783 	dt_node_type_assign(dnp, dsp->ds_ctfp, dsp->ds_type, B_FALSE);
792 	assert(yypcb->pcb_list == dnp);
793 	yypcb->pcb_list = dnp->dn_link;
794 	dnp->dn_link = NULL;
797 	inp->din_list = dnp;
798 	inp->din_root = dnp;