#pragma ident "@(#)ctf_labels.c 1.3 05/06/08 SMI"
#include <ctf_impl.h>
static int
extract_label_info(ctf_file_t *fp, const ctf_lblent_t **ctl, uint_t *num_labels)
{
const ctf_header_t *h;
if (fp->ctf_version < CTF_VERSION_2)
return (ctf_set_errno(fp, ECTF_NOTSUP));
h = (const ctf_header_t *)fp->ctf_data.cts_data;
*ctl = (const ctf_lblent_t *)(fp->ctf_buf + h->cth_lbloff);
*num_labels = (h->cth_objtoff - h->cth_lbloff) / sizeof (ctf_lblent_t);
return (0);
}
const char *
ctf_label_topmost(ctf_file_t *fp)
{
const ctf_lblent_t *ctlp;
const char *s;
uint_t num_labels;
if (extract_label_info(fp, &ctlp, &num_labels) == CTF_ERR)
return (NULL);
if (num_labels == 0) {
(void) ctf_set_errno(fp, ECTF_NOLABELDATA);
return (NULL);
}
if ((s = ctf_strraw(fp, (ctlp + num_labels - 1)->ctl_label)) == NULL)
(void) ctf_set_errno(fp, ECTF_CORRUPT);
return (s);
}
int
ctf_label_iter(ctf_file_t *fp, ctf_label_f *func, void *arg)
{
const ctf_lblent_t *ctlp;
uint_t i, num_labels;
ctf_lblinfo_t linfo;
const char *lname;
int rc;
if (extract_label_info(fp, &ctlp, &num_labels) == CTF_ERR)
return (CTF_ERR);
if (num_labels == 0)
return (ctf_set_errno(fp, ECTF_NOLABELDATA));
for (i = 0; i < num_labels; i++, ctlp++) {
if ((lname = ctf_strraw(fp, ctlp->ctl_label)) == NULL) {
ctf_dprintf("failed to decode label %u with "
"typeidx %u\n", ctlp->ctl_label, ctlp->ctl_typeidx);
return (ctf_set_errno(fp, ECTF_CORRUPT));
}
linfo.ctb_typeidx = ctlp->ctl_typeidx;
if ((rc = func(lname, &linfo, arg)) != 0)
return (rc);
}
return (0);
}
typedef struct linfo_cb_arg {
const char *lca_name;
ctf_lblinfo_t *lca_info;
} linfo_cb_arg_t;
static int
label_info_cb(const char *lname, const ctf_lblinfo_t *linfo, void *arg)
{
if (strcmp(lname, ((linfo_cb_arg_t *)arg)->lca_name) == 0) {
if (((linfo_cb_arg_t *)arg)->lca_info != NULL)
bcopy(linfo, ((linfo_cb_arg_t *)arg)->lca_info,
sizeof (ctf_lblinfo_t));
return (1);
}
return (0);
}
int
ctf_label_info(ctf_file_t *fp, const char *lname, ctf_lblinfo_t *linfo)
{
linfo_cb_arg_t cb_arg;
int rc;
cb_arg.lca_name = lname;
cb_arg.lca_info = linfo;
if ((rc = ctf_label_iter(fp, label_info_cb, &cb_arg)) == CTF_ERR)
return (rc);
if (rc != 1)
return (ctf_set_errno(fp, ECTF_NOLABEL));
return (0);
}