libdtrace/common/dt_decl.c

111 	dt_scope_t *dsp = &yypcb->pcb_dstack;
112 	dt_decl_t *ddp = dsp->ds_decl;
115 		dsp->ds_decl = ddp->dd_next;
118 		ddp = dsp->ds_decl;
125 	dt_scope_t *dsp = &yypcb->pcb_dstack;
126 	dt_decl_t *top = dsp->ds_decl;
136 	dsp->ds_decl = ddp;
144 	dt_scope_t *dsp = &yypcb->pcb_dstack;
147 	dsp->ds_decl = NULL;
148 	free(dsp->ds_ident);
149 	dsp->ds_ident = NULL;
150 	dsp->ds_ctfp = NULL;
151 	dsp->ds_type = CTF_ERR;
152 	dsp->ds_class = DT_DC_DEFAULT;
153 	dsp->ds_enumval = -1;
161 	dt_scope_t *dsp = &yypcb->pcb_dstack;
163 	if (dsp->ds_class != DT_DC_DEFAULT && dsp->ds_class != DT_DC_REGISTER) {
169 		*idp = dsp->ds_ident;
170 		dsp->ds_ident = NULL;
195 	dt_scope_t *dsp = &yypcb->pcb_dstack;
196 	dt_decl_t *ddp = dsp->ds_decl;
198 	if (dsp->ds_ident != NULL) {
204 	dsp->ds_ident = name;
215 	dt_scope_t *dsp = &yypcb->pcb_dstack;
217 	if (dsp->ds_class != DT_DC_DEFAULT) {
222 	dsp->ds_class = class;
370 	dt_scope_t *dsp = &yypcb->pcb_dstack;
387 		dsp->ds_decl = ddp->dd_next;
505 	dt_scope_t *dsp = yypcb->pcb_dstack.ds_next;
518 	if (dsp == NULL)
601 		dtt.dtt_type = ctf_add_integer(dsp->ds_ctfp,
606 		    ctf_update(dsp->ds_ctfp) == CTF_ERR) {
609 			    ctf_errmsg(ctf_errno(dsp->ds_ctfp)));
612 		dtt.dtt_ctfp = dsp->ds_ctfp;
622 	if (dtt.dtt_ctfp != dsp->ds_ctfp &&
623 	    dtt.dtt_ctfp != ctf_parent_file(dsp->ds_ctfp)) {
625 		dtt.dtt_type = ctf_add_type(dsp->ds_ctfp,
627 		dtt.dtt_ctfp = dsp->ds_ctfp;
636 	if (ctf_add_member(dsp->ds_ctfp, dsp->ds_type,
639 		    idname, ctf_errmsg(ctf_errno(dsp->ds_ctfp)));
694 	dt_scope_t *dsp = yypcb->pcb_dstack.ds_next;
706 	if (dsp == NULL)
709 	assert(dsp->ds_decl->dd_kind == CTF_K_ENUM);
710 	value = dsp->ds_enumval + 1; /* default is previous value plus one */
724 		    dsp->ds_ctfp, dsp->ds_type, dnp->dn_string, &value) != 0) {
744 	if (ctf_add_enumerator(dsp->ds_ctfp, dsp->ds_type,
745 	    name, value) == CTF_ERR || ctf_update(dsp->ds_ctfp) == CTF_ERR) {
747 		    name, ctf_errmsg(ctf_errno(dsp->ds_ctfp)));
750 	dsp->ds_enumval = value; /* save most recent value */
761 		if (dsp->ds_ctfp == dtp->dt_ddefs->dm_ctfp) {
782 	dt_node_type_assign(dnp, dsp->ds_ctfp, dsp->ds_type);
800 	idp->di_ctfp = dsp->ds_ctfp;
801 	idp->di_type = dsp->ds_type;
1050 dt_scope_create(dt_scope_t *dsp)
1052 	dsp->ds_decl = NULL;
1053 	dsp->ds_next = NULL;
1054 	dsp->ds_ident = NULL;
1055 	dsp->ds_ctfp = NULL;
1056 	dsp->ds_type = CTF_ERR;
1057 	dsp->ds_class = DT_DC_DEFAULT;
1058 	dsp->ds_enumval = -1;
1062 dt_scope_destroy(dt_scope_t *dsp)
1066 	for (; dsp != NULL; dsp = nsp) {
1067 		dt_decl_free(dsp->ds_decl);
1068 		free(dsp->ds_ident);
1069 		nsp = dsp->ds_next;
1070 		if (dsp != &yypcb->pcb_dstack)
1071 			free(dsp);
1079 	dt_scope_t *dsp = malloc(sizeof (dt_scope_t));
1081 	if (dsp == NULL)
1084 	dsp->ds_decl = rsp->ds_decl;
1085 	dsp->ds_next = rsp->ds_next;
1086 	dsp->ds_ident = rsp->ds_ident;
1087 	dsp->ds_ctfp = ctfp;
1088 	dsp->ds_type = type;
1089 	dsp->ds_class = rsp->ds_class;
1090 	dsp->ds_enumval = rsp->ds_enumval;
1093 	rsp->ds_next = dsp;
1100 	dt_scope_t *dsp = rsp->ds_next;
1102 	if (dsp == NULL)
1105 	if (dsp->ds_ctfp != NULL && ctf_update(dsp->ds_ctfp) == CTF_ERR) {
1107 		    ctf_errmsg(ctf_errno(dsp->ds_ctfp)));
1113 	rsp->ds_decl = dsp->ds_decl;
1114 	rsp->ds_next = dsp->ds_next;
1115 	rsp->ds_ident = dsp->ds_ident;
1116 	rsp->ds_ctfp = dsp->ds_ctfp;
1117 	rsp->ds_type = dsp->ds_type;
1118 	rsp->ds_class = dsp->ds_class;
1119 	rsp->ds_enumval = dsp->ds_enumval;
1121 	free(dsp);