xref: /titanic_50/usr/src/lib/libtnf/util.c (revision 20c794b39650d115e17a15983b6b82e46238cf45)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  */
22 /*
23  *	Copyright (c) 1994, by Sun Microsytems, Inc.
24  */
25 
26 #pragma	ident	"%Z%%M%	%I%	%E% SMI"
27 
28 #include "libtnf.h"
29 
30 /*
31  *
32  */
33 
34 static struct ntop {
35 	char		*name;
36 	tag_props_t	prop;
37 } ntop[] = {
38 { TNF_N_INLINE,		TAG_PROP_INLINE },
39 { TNF_N_TAGGED,		TAG_PROP_TAGGED },
40 { TNF_N_SCALAR,		TAG_PROP_SCALAR },
41 { TNF_N_DERIVED,	TAG_PROP_DERIVED },
42 { TNF_N_ARRAY,		TAG_PROP_ARRAY },
43 { TNF_N_STRING,		TAG_PROP_STRING },
44 { TNF_N_STRUCT,		TAG_PROP_STRUCT },
45 { TNF_N_TYPE,		TAG_PROP_TYPE },
46 { NULL,			0}
47 };
48 
49 static struct ntok {
50 	char		*name;
51 	tnf_kind_t	kind;
52 } scalar_ntok[] = {
53 { TNF_N_CHAR, 		TNF_K_CHAR },
54 { TNF_N_INT8,		TNF_K_INT8 },
55 { TNF_N_INT16,		TNF_K_INT16 },
56 { TNF_N_INT32,		TNF_K_INT32 },
57 { TNF_N_UINT8,		TNF_K_UINT8 },
58 { TNF_N_UINT16,		TNF_K_UINT16 },
59 { TNF_N_UINT32,		TNF_K_UINT32 },
60 { TNF_N_INT64,		TNF_K_INT64 },
61 { TNF_N_UINT64,		TNF_K_UINT64 },
62 { TNF_N_FLOAT32,	TNF_K_FLOAT32 },
63 { TNF_N_FLOAT64,	TNF_K_FLOAT64 },
64 { NULL,			0 }
65 };
66 
67 /*
68  * Compute tag props
69  */
70 
71 tag_props_t
72 _tnf_get_props(TNF *tnf, tnf_ref32_t *tag)
73 {
74 	tag_props_t	props;
75 	struct ntop  	*p;
76 
77 	props = 0;
78 
79 	p = ntop;
80 	/* No need to get base tag for inherited properties */
81 	while (p->name) {
82 		if (HAS_PROPERTY(tnf, tag, p->name))
83 			props |= p->prop;
84 		p++;
85 	}
86 
87 	return (props);
88 }
89 
90 /*
91  * Data kind depends on implementation properties of base tag
92  */
93 
94 tnf_kind_t
95 _tnf_get_kind(TNF *tnf, tnf_ref32_t *tag)
96 {
97 	tnf_ref32_t	*base_tag;
98 	char		*base_name;
99 
100 	base_tag 	= _tnf_get_base_tag(tnf, tag);
101 	base_name 	= _tnf_get_name(tnf, base_tag);
102 
103 	if (HAS_PROPERTY(tnf, base_tag, TNF_N_SCALAR)) {
104 		struct ntok 	*p;
105 
106 		p = scalar_ntok;
107 		while (p->name) {
108 			if (strcmp(p->name, base_name) == 0)
109 				return (p->kind);
110 			p++;
111 		}
112 		return (TNF_K_SCALAR);
113 
114 	} else if (HAS_PROPERTY(tnf, base_tag, TNF_N_ARRAY)) {
115 		if (strcmp(base_name, TNF_N_STRING) == 0)
116 			return (TNF_K_STRING);
117 		else
118 			return (TNF_K_ARRAY);
119 
120 	} else if (HAS_PROPERTY(tnf, base_tag, TNF_N_TYPE)) {
121 		return (TNF_K_TYPE);
122 
123 	} else if (HAS_PROPERTY(tnf, base_tag, TNF_N_STRUCT)) {
124 		return (TNF_K_STRUCT);
125 
126 	} else {		/* abstract */
127 		return (TNF_K_UNKNOWN);
128 	}
129 }
130