File Manager

003 File Manager

Current Path: /usr/src/cddl/contrib/opensolaris/lib/libdtrace/common

usr / src / cddl / contrib / opensolaris / lib / libdtrace / common /

📁 ..
📄 drti.c(5.62 KB)
📄 dt_aggregate.c(51.43 KB)
📄 dt_as.c(13.49 KB)
📄 dt_as.h(1.89 KB)
📄 dt_buf.c(4.12 KB)
📄 dt_buf.h(2.01 KB)
📄 dt_cc.c(71.28 KB)
📄 dt_cg.c(61.79 KB)
📄 dt_consume.c(74.05 KB)
📄 dt_decl.c(30.71 KB)
📄 dt_decl.h(4.45 KB)
📄 dt_dis.c(14.65 KB)
📄 dt_dof.c(28.19 KB)
📄 dt_dof.h(2.06 KB)
📄 dt_error.c(8.15 KB)
📄 dt_errtags.h(13.26 KB)
📄 dt_grammar.y(23.18 KB)
📄 dt_handle.c(11.62 KB)
📄 dt_ident.c(26.34 KB)
📄 dt_ident.h(7.79 KB)
📄 dt_impl.h(32.49 KB)
📄 dt_inttab.c(2.56 KB)
📄 dt_inttab.h(2.28 KB)
📄 dt_lex.l(23.64 KB)
📄 dt_link.c(49.01 KB)
📄 dt_list.c(2.67 KB)
📄 dt_list.h(1.52 KB)
📄 dt_map.c(10.91 KB)
📄 dt_module.c(45.28 KB)
📄 dt_module.h(2.1 KB)
📄 dt_open.c(61.61 KB)
📄 dt_options.c(25.04 KB)
📄 dt_parser.c(144.81 KB)
📄 dt_parser.h(11.64 KB)
📄 dt_pcb.c(5.56 KB)
📄 dt_pcb.h(4.38 KB)
📄 dt_pid.c(24.9 KB)
📄 dt_pid.h(2.03 KB)
📄 dt_pq.c(2.83 KB)
📄 dt_pq.h(1.26 KB)
📄 dt_pragma.c(15.55 KB)
📄 dt_print.c(18.57 KB)
📄 dt_printf.c(55.53 KB)
📄 dt_printf.h(4.87 KB)
📄 dt_proc.c(36.39 KB)
📄 dt_proc.h(4.54 KB)
📄 dt_program.c(14.32 KB)
📄 dt_program.h(1.86 KB)
📄 dt_provider.c(22.95 KB)
📄 dt_provider.h(4.37 KB)
📄 dt_regset.c(2.88 KB)
📄 dt_regset.h(1.57 KB)
📄 dt_string.c(5.75 KB)
📄 dt_string.h(1.31 KB)
📄 dt_strtab.c(5.74 KB)
📄 dt_strtab.h(2.42 KB)
📄 dt_subr.c(22.59 KB)
📄 dt_sugar.c(13.71 KB)
📄 dt_work.c(8.12 KB)
📄 dt_xlator.c(11.3 KB)
📄 dt_xlator.h(3.09 KB)
📄 dtrace.h(23.64 KB)
📄 mkerrno.sh(1.2 KB)
📄 mkerrtags.sh(1.4 KB)
📄 mknames.sh(1.33 KB)
📄 mksignal.sh(1.22 KB)

Editing: dt_pcb.c

/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright 2005 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#pragma ident	"%Z%%M%	%I%	%E% SMI"

/*
 * DTrace Parsing Control Block
 *
 * A DTrace Parsing Control Block (PCB) contains all of the state that is used
 * by a single pass of the D compiler, other than the global variables used by
 * lex and yacc.  The routines in this file are used to set up and tear down
 * PCBs, which are kept on a stack pointed to by the libdtrace global 'yypcb'.
 * The main engine of the compiler, dt_compile(), is located in dt_cc.c and is
 * responsible for calling these routines to begin and end a compilation pass.
 *
 * Sun's lex/yacc are not MT-safe or re-entrant, but we permit limited nested
 * use of dt_compile() once the entire parse tree has been constructed but has
 * not yet executed the "cooking" pass (see dt_cc.c for more information).  The
 * PCB design also makes it easier to debug (since all global state is kept in
 * one place) and could permit us to make the D compiler MT-safe or re-entrant
 * in the future by adding locks to libdtrace or switching to Flex and Bison.
 */

#include <strings.h>
#include <stdlib.h>
#include <assert.h>

#include <dt_impl.h>
#include <dt_program.h>
#include <dt_provider.h>
#include <dt_pcb.h>

/*
 * Initialize the specified PCB by zeroing it and filling in a few default
 * members, and then pushing it on to the top of the PCB stack and setting
 * yypcb to point to it.  Increment the current handle's generation count.
 */
void
dt_pcb_push(dtrace_hdl_t *dtp, dt_pcb_t *pcb)
{
	/*
	 * Since lex/yacc are not re-entrant and we don't implement state save,
	 * assert that if another PCB is active, it is from the same handle and
	 * has completed execution of yyparse().  If the first assertion fires,
	 * the caller is calling libdtrace without proper MT locking.  If the
	 * second assertion fires, dt_compile() is being called recursively
	 * from an illegal location in libdtrace, or a dt_pcb_pop() is missing.
	 */
	if (yypcb != NULL) {
		assert(yypcb->pcb_hdl == dtp);
		assert(yypcb->pcb_yystate == YYS_DONE);
	}

bzero(pcb, sizeof (dt_pcb_t));

dt_scope_create(&pcb->pcb_dstack);
	dt_idstack_push(&pcb->pcb_globals, dtp->dt_globals);
	dt_irlist_create(&pcb->pcb_ir);

pcb->pcb_hdl = dtp;
	pcb->pcb_prev = dtp->dt_pcb;

dtp->dt_pcb = pcb;
	dtp->dt_gen++;

yyinit(pcb);
}

static int
dt_pcb_pop_ident(dt_idhash_t *dhp, dt_ident_t *idp, void *arg)
{
	dtrace_hdl_t *dtp = arg;

if (idp->di_gen == dtp->dt_gen)
		dt_idhash_delete(dhp, idp);

return (0);
}

/*
 * Pop the topmost PCB from the PCB stack and destroy any data structures that
 * are associated with it.  If 'err' is non-zero, destroy any intermediate
 * state that is left behind as part of a compilation that has failed.
 */
void
dt_pcb_pop(dtrace_hdl_t *dtp, int err)
{
	dt_pcb_t *pcb = yypcb;
	uint_t i;

assert(pcb != NULL);
	assert(pcb == dtp->dt_pcb);

while (pcb->pcb_dstack.ds_next != NULL)
		(void) dt_scope_pop();

dt_scope_destroy(&pcb->pcb_dstack);
	dt_irlist_destroy(&pcb->pcb_ir);

dt_node_link_free(&pcb->pcb_list);
	dt_node_link_free(&pcb->pcb_hold);

if (err != 0) {
		dt_xlator_t *dxp, *nxp;
		dt_provider_t *pvp, *nvp;

if (pcb->pcb_prog != NULL)
			dt_program_destroy(dtp, pcb->pcb_prog);
		if (pcb->pcb_stmt != NULL)
			dtrace_stmt_destroy(dtp, pcb->pcb_stmt);
		if (pcb->pcb_ecbdesc != NULL)
			dt_ecbdesc_release(dtp, pcb->pcb_ecbdesc);

for (dxp = dt_list_next(&dtp->dt_xlators); dxp; dxp = nxp) {
			nxp = dt_list_next(dxp);
			if (dxp->dx_gen == dtp->dt_gen)
				dt_xlator_destroy(dtp, dxp);
		}

for (pvp = dt_list_next(&dtp->dt_provlist); pvp; pvp = nvp) {
			nvp = dt_list_next(pvp);
			if (pvp->pv_gen == dtp->dt_gen)
				dt_provider_destroy(dtp, pvp);
		}

(void) dt_idhash_iter(dtp->dt_aggs, dt_pcb_pop_ident, dtp);
		dt_idhash_update(dtp->dt_aggs);

(void) dt_idhash_iter(dtp->dt_globals, dt_pcb_pop_ident, dtp);
		dt_idhash_update(dtp->dt_globals);

(void) dt_idhash_iter(dtp->dt_tls, dt_pcb_pop_ident, dtp);
		dt_idhash_update(dtp->dt_tls);

(void) ctf_discard(dtp->dt_cdefs->dm_ctfp);
		(void) ctf_discard(dtp->dt_ddefs->dm_ctfp);
	}

if (pcb->pcb_pragmas != NULL)
		dt_idhash_destroy(pcb->pcb_pragmas);
	if (pcb->pcb_locals != NULL)
		dt_idhash_destroy(pcb->pcb_locals);
	if (pcb->pcb_idents != NULL)
		dt_idhash_destroy(pcb->pcb_idents);
	if (pcb->pcb_inttab != NULL)
		dt_inttab_destroy(pcb->pcb_inttab);
	if (pcb->pcb_strtab != NULL)
		dt_strtab_destroy(pcb->pcb_strtab);
	if (pcb->pcb_regs != NULL)
		dt_regset_destroy(pcb->pcb_regs);

for (i = 0; i < pcb->pcb_asxreflen; i++)
		dt_free(dtp, pcb->pcb_asxrefs[i]);

dt_free(dtp, pcb->pcb_asxrefs);
	dt_difo_free(dtp, pcb->pcb_difo);

free(pcb->pcb_filetag);
	free(pcb->pcb_sflagv);

dtp->dt_pcb = pcb->pcb_prev;
	bzero(pcb, sizeof (dt_pcb_t));
	yyinit(dtp->dt_pcb);
}

003 File Manager

Editing: dt_pcb.c

Upload File

Create Folder