Home | History | Annotate | Download | only in mdb
      1     0  stevel /*
      2     0  stevel  * CDDL HEADER START
      3     0  stevel  *
      4     0  stevel  * The contents of this file are subject to the terms of the
      5  6473     edp  * Common Development and Distribution License (the "License").
      6  6473     edp  * You may not use this file except in compliance with the License.
      7     0  stevel  *
      8     0  stevel  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
      9     0  stevel  * or http://www.opensolaris.org/os/licensing.
     10     0  stevel  * See the License for the specific language governing permissions
     11     0  stevel  * and limitations under the License.
     12     0  stevel  *
     13     0  stevel  * When distributing Covered Code, include this CDDL HEADER in each
     14     0  stevel  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
     15     0  stevel  * If applicable, add the following below this CDDL HEADER, with the
     16     0  stevel  * fields enclosed by brackets "[]" replaced with your own identifying
     17     0  stevel  * information: Portions Copyright [yyyy] [name of copyright owner]
     18     0  stevel  *
     19     0  stevel  * CDDL HEADER END
     20     0  stevel  */
     21     0  stevel /*
     22  6473     edp  * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
     23     0  stevel  * Use is subject to license terms.
     24     0  stevel  */
     25     0  stevel 
     26     0  stevel #pragma ident	"%Z%%M%	%I%	%E% SMI"
     27     0  stevel 
     28     0  stevel /*
     29     0  stevel  * Immediate Value Target
     30     0  stevel  *
     31     0  stevel  * The immediate value target is used when the '=' verb is used to
     32     0  stevel  * format an immediate value, or with ::print -i.  The target is
     33     0  stevel  * initialized with a specific value, and then simply copies bytes from
     34     0  stevel  * this integer in its read routine.  Two notes:
     35     0  stevel  *
     36     0  stevel  * (1) the address parameter of value_read is treated as an offset into
     37     0  stevel  * the immediate value.
     38     0  stevel  *
     39     0  stevel  * (2) on big-endian systems, we need to be careful about the place we
     40     0  stevel  * copy data from. If the caller specified a typesize in the argv array
     41     0  stevel  * we use that for offsetting, otherwise we use the read size.
     42     0  stevel  * If the user didn't specify the typesize, then 'addr' is ignored,
     43     0  stevel  * and all reads are at an offset of 0 into the immediate value. This
     44     0  stevel  * covers both the usage of ::print -i, and the semantics of adb
     45     0  stevel  * commands like "0x1234=X", which should produce 0x1234 as a result;
     46     0  stevel  * the adb model is for it to act like a cast down to the smaller
     47     0  stevel  * integer type; this is handled as mentioned.
     48     0  stevel  */
     49     0  stevel 
     50     0  stevel #include <mdb/mdb_target_impl.h>
     51     0  stevel #include <mdb/mdb_types.h>
     52     0  stevel #include <mdb/mdb_conf.h>
     53     0  stevel #include <mdb/mdb_err.h>
     54     0  stevel 
     55     0  stevel #include <sys/isa_defs.h>
     56     0  stevel #include <strings.h>
     57     0  stevel 
     58     0  stevel void mdb_value_tgt_destroy(mdb_tgt_t *);
     59     0  stevel 
     60     0  stevel typedef struct mdb_value_data {
     61     0  stevel 	uintmax_t mvd_data;
     62     0  stevel 	size_t mvd_typesize;
     63     0  stevel } mdb_value_data_t;
     64     0  stevel 
     65     0  stevel static ssize_t
     66     0  stevel value_read(mdb_tgt_t *t, void *dst, size_t nbytes, uintptr_t addr)
     67     0  stevel {
     68     0  stevel 	mdb_value_data_t *data = t->t_data;
     69     0  stevel 	size_t size = data->mvd_typesize;
     70     0  stevel 	const char *src = (const char *)&data->mvd_data;
     71     0  stevel 	size_t off;
     72     0  stevel 
     73     0  stevel 	/*
     74     0  stevel 	 * If no output size was specified, use the current read size.
     75     0  stevel 	 * In this case, "addr" is not an offset into the mvd_data,
     76     0  stevel 	 * so we ignore it.
     77     0  stevel 	 */
     78     0  stevel 	if (size == 0) {
     79     0  stevel 		size = nbytes;
     80     0  stevel 		addr = 0;
     81     0  stevel 	} else {
     82     0  stevel 		nbytes = MIN(size, nbytes);
     83     0  stevel 	}
     84     0  stevel 
     85     0  stevel 	off = addr;
     86     0  stevel #ifdef _BIG_ENDIAN
     87     0  stevel 	if (sizeof (uintmax_t) >= size)
     88     0  stevel 		off += sizeof (uintmax_t) - size;
     89     0  stevel #endif
     90     0  stevel 
     91     0  stevel 	if (off > sizeof (uintmax_t))
     92     0  stevel 		return (0);
     93     0  stevel 	if (off + nbytes > sizeof (uintmax_t))
     94     0  stevel 		nbytes = sizeof (uintmax_t) - off;
     95     0  stevel 
     96     0  stevel 	if (nbytes != 0)
     97     0  stevel 		bcopy(src + off, dst, nbytes);
     98     0  stevel 
     99     0  stevel 	return (nbytes);
    100     0  stevel }
    101     0  stevel 
    102     0  stevel /*ARGSUSED*/
    103     0  stevel static ssize_t
    104     0  stevel value_write(mdb_tgt_t *t, const void *buf, size_t nbytes, uintptr_t addr)
    105     0  stevel {
    106     0  stevel 	return (nbytes); /* We allow writes to silently fail */
    107     0  stevel }
    108     0  stevel 
    109     0  stevel static const mdb_tgt_ops_t value_ops = {
    110     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_setflags */
    111     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_setcontext */
    112     0  stevel 	(void (*)()) mdb_tgt_nop,		/* t_activate */
    113     0  stevel 	(void (*)()) mdb_tgt_nop,		/* t_deactivate */
    114     0  stevel 	(void (*)()) mdb_tgt_nop,		/* t_periodic */
    115     0  stevel 	mdb_value_tgt_destroy,			/* t_destroy */
    116     0  stevel 	(const char *(*)()) mdb_tgt_null,	/* t_name */
    117     0  stevel 	(const char *(*)()) mdb_conf_isa,	/* t_isa */
    118     0  stevel 	(const char *(*)()) mdb_conf_platform,	/* t_platform */
    119     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_uname */
    120     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_dmodel */
    121     0  stevel 	(ssize_t (*)()) mdb_tgt_notsup,		/* t_aread */
    122     0  stevel 	(ssize_t (*)()) mdb_tgt_notsup,		/* t_awrite */
    123     0  stevel 	value_read,				/* t_vread */
    124     0  stevel 	value_write,				/* t_vwrite */
    125     0  stevel 	(ssize_t (*)()) mdb_tgt_notsup,		/* t_pread */
    126     0  stevel 	(ssize_t (*)()) mdb_tgt_notsup,		/* t_pwrite */
    127     0  stevel 	value_read,				/* t_fread */
    128     0  stevel 	value_write,				/* t_fwrite */
    129     0  stevel 	value_read,				/* t_ioread */
    130     0  stevel 	value_write,				/* t_iowrite */
    131     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_vtop */
    132     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_lookup_by_name */
    133     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_lookup_by_addr */
    134     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_symbol_iter */
    135     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_mapping_iter */
    136     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_object_iter */
    137     0  stevel 	(const mdb_map_t *(*)()) mdb_tgt_null,	/* t_addr_to_map */
    138     0  stevel 	(const mdb_map_t *(*)()) mdb_tgt_null,	/* t_name_to_map */
    139     0  stevel 	(struct ctf_file *(*)()) mdb_tgt_null,	/* t_addr_to_ctf */
    140     0  stevel 	(struct ctf_file *(*)()) mdb_tgt_null,	/* t_name_to_ctf */
    141     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_status */
    142     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_run */
    143     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_step */
    144     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_step_out */
    145     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_step_branch */
    146     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_next */
    147     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_cont */
    148     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_signal */
    149     0  stevel 	(int (*)()) mdb_tgt_null,		/* t_add_vbrkpt */
    150     0  stevel 	(int (*)()) mdb_tgt_null,		/* t_add_sbrkpt */
    151     0  stevel 	(int (*)()) mdb_tgt_null,		/* t_add_pwapt */
    152     0  stevel 	(int (*)()) mdb_tgt_null,		/* t_add_vwapt */
    153     0  stevel 	(int (*)()) mdb_tgt_null,		/* t_add_iowapt */
    154     0  stevel 	(int (*)()) mdb_tgt_null,		/* t_add_sysenter */
    155     0  stevel 	(int (*)()) mdb_tgt_null,		/* t_add_sysexit */
    156     0  stevel 	(int (*)()) mdb_tgt_null,		/* t_add_signal */
    157     0  stevel 	(int (*)()) mdb_tgt_null,		/* t_add_fault */
    158     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_getareg */
    159     0  stevel 	(int (*)()) mdb_tgt_notsup,		/* t_putareg */
    160  6473     edp 	(int (*)()) mdb_tgt_nop,		/* t_stack_iter */
    161  6473     edp 	(int (*)()) mdb_tgt_notsup		/* t_auxv */
    162     0  stevel };
    163     0  stevel 
    164     0  stevel int
    165     0  stevel mdb_value_tgt_create(mdb_tgt_t *t, int argc, const char *argv[])
    166     0  stevel {
    167     0  stevel 	mdb_value_data_t *data;
    168     0  stevel 
    169     0  stevel 	if (argc < 1 || argv[0] == NULL)
    170     0  stevel 		return (set_errno(EINVAL));
    171     0  stevel 	if (argc == 2 && argv[1] == NULL)
    172     0  stevel 		return (set_errno(EINVAL));
    173     0  stevel 	if (argc > 2)
    174     0  stevel 		return (set_errno(EINVAL));
    175     0  stevel 
    176     0  stevel 	t->t_ops = &value_ops;
    177     0  stevel 	data = mdb_zalloc(sizeof (mdb_value_data_t), UM_SLEEP);
    178     0  stevel 	t->t_data = data;
    179     0  stevel 	data->mvd_data = *((uintmax_t *)(void *)argv[0]);
    180     0  stevel 	if (argc == 2)
    181     0  stevel 		data->mvd_typesize = *((size_t *)(void *)argv[1]);
    182     0  stevel 
    183     0  stevel 	return (0);
    184     0  stevel }
    185     0  stevel 
    186     0  stevel void
    187     0  stevel mdb_value_tgt_destroy(mdb_tgt_t *t)
    188     0  stevel {
    189     0  stevel 	mdb_free(t->t_data, sizeof (mdb_value_data_t));
    190     0  stevel }
    191