1 | /* $NetBSD: prop_bool.c,v 1.17 2009/01/03 18:31:33 pooka Exp $ */ |
2 | |
3 | /*- |
4 | * Copyright (c) 2006 The NetBSD Foundation, Inc. |
5 | * All rights reserved. |
6 | * |
7 | * This code is derived from software contributed to The NetBSD Foundation |
8 | * by Jason R. Thorpe. |
9 | * |
10 | * Redistribution and use in source and binary forms, with or without |
11 | * modification, are permitted provided that the following conditions |
12 | * are met: |
13 | * 1. Redistributions of source code must retain the above copyright |
14 | * notice, this list of conditions and the following disclaimer. |
15 | * 2. Redistributions in binary form must reproduce the above copyright |
16 | * notice, this list of conditions and the following disclaimer in the |
17 | * documentation and/or other materials provided with the distribution. |
18 | * |
19 | * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS |
20 | * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED |
21 | * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR |
22 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS |
23 | * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |
24 | * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |
25 | * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
26 | * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |
27 | * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
28 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |
29 | * POSSIBILITY OF SUCH DAMAGE. |
30 | */ |
31 | |
32 | #include <prop/prop_bool.h> |
33 | #include "prop_object_impl.h" |
34 | |
35 | struct _prop_bool { |
36 | struct _prop_object pb_obj; |
37 | bool pb_value; |
38 | }; |
39 | |
40 | static struct _prop_bool _prop_bool_true; |
41 | static struct _prop_bool _prop_bool_false; |
42 | |
43 | static _prop_object_free_rv_t |
44 | _prop_bool_free(prop_stack_t, prop_object_t *); |
45 | static bool _prop_bool_externalize( |
46 | struct _prop_object_externalize_context *, |
47 | void *); |
48 | static _prop_object_equals_rv_t |
49 | _prop_bool_equals(prop_object_t, prop_object_t, |
50 | void **, void **, |
51 | prop_object_t *, prop_object_t *); |
52 | |
53 | static const struct _prop_object_type _prop_object_type_bool = { |
54 | .pot_type = PROP_TYPE_BOOL, |
55 | .pot_free = _prop_bool_free, |
56 | .pot_extern = _prop_bool_externalize, |
57 | .pot_equals = _prop_bool_equals, |
58 | }; |
59 | |
60 | #define prop_object_is_bool(x) \ |
61 | ((x) != NULL && (x)->pb_obj.po_type == &_prop_object_type_bool) |
62 | |
63 | /* ARGSUSED */ |
64 | static _prop_object_free_rv_t |
65 | _prop_bool_free(prop_stack_t stack, prop_object_t *obj) |
66 | { |
67 | /* |
68 | * This should never happen as we "leak" our initial reference |
69 | * count. |
70 | */ |
71 | |
72 | /* XXX forced assertion failure? */ |
73 | return (_PROP_OBJECT_FREE_DONE); |
74 | } |
75 | |
76 | static bool |
77 | _prop_bool_externalize(struct _prop_object_externalize_context *ctx, |
78 | void *v) |
79 | { |
80 | prop_bool_t pb = v; |
81 | |
82 | return (_prop_object_externalize_empty_tag(ctx, |
83 | pb->pb_value ? "true" : "false" )); |
84 | } |
85 | |
86 | /* ARGSUSED */ |
87 | static _prop_object_equals_rv_t |
88 | _prop_bool_equals(prop_object_t v1, prop_object_t v2, |
89 | void **stored_pointer1, void **stored_pointer2, |
90 | prop_object_t *next_obj1, prop_object_t *next_obj2) |
91 | { |
92 | prop_bool_t b1 = v1; |
93 | prop_bool_t b2 = v2; |
94 | |
95 | if (! (prop_object_is_bool(b1) && |
96 | prop_object_is_bool(b2))) |
97 | return (_PROP_OBJECT_EQUALS_FALSE); |
98 | |
99 | /* |
100 | * Since we only ever allocate one true and one false, |
101 | * save ourselves a couple of memory operations. |
102 | */ |
103 | if (b1 == b2) |
104 | return (_PROP_OBJECT_EQUALS_TRUE); |
105 | else |
106 | return (_PROP_OBJECT_EQUALS_FALSE); |
107 | } |
108 | |
109 | _PROP_ONCE_DECL(_prop_bool_init_once) |
110 | |
111 | static int |
112 | _prop_bool_init(void) |
113 | { |
114 | |
115 | _prop_object_init(&_prop_bool_true.pb_obj, |
116 | &_prop_object_type_bool); |
117 | _prop_bool_true.pb_value = true; |
118 | |
119 | _prop_object_init(&_prop_bool_false.pb_obj, |
120 | &_prop_object_type_bool); |
121 | _prop_bool_false.pb_value = false; |
122 | |
123 | return 0; |
124 | } |
125 | |
126 | static prop_bool_t |
127 | _prop_bool_alloc(bool val) |
128 | { |
129 | prop_bool_t pb; |
130 | |
131 | _PROP_ONCE_RUN(_prop_bool_init_once, _prop_bool_init); |
132 | pb = val ? &_prop_bool_true : &_prop_bool_false; |
133 | prop_object_retain(pb); |
134 | |
135 | return (pb); |
136 | } |
137 | |
138 | /* |
139 | * prop_bool_create -- |
140 | * Create a prop_bool_t and initialize it with the |
141 | * provided boolean value. |
142 | */ |
143 | prop_bool_t |
144 | prop_bool_create(bool val) |
145 | { |
146 | |
147 | return (_prop_bool_alloc(val)); |
148 | } |
149 | |
150 | /* |
151 | * prop_bool_copy -- |
152 | * Copy a prop_bool_t. |
153 | */ |
154 | prop_bool_t |
155 | prop_bool_copy(prop_bool_t opb) |
156 | { |
157 | |
158 | if (! prop_object_is_bool(opb)) |
159 | return (NULL); |
160 | |
161 | /* |
162 | * Because we only ever allocate one true and one false, this |
163 | * can be reduced to a simple retain operation. |
164 | */ |
165 | prop_object_retain(opb); |
166 | return (opb); |
167 | } |
168 | |
169 | /* |
170 | * prop_bool_true -- |
171 | * Get the value of a prop_bool_t. |
172 | */ |
173 | bool |
174 | prop_bool_true(prop_bool_t pb) |
175 | { |
176 | |
177 | if (! prop_object_is_bool(pb)) |
178 | return (false); |
179 | |
180 | return (pb->pb_value); |
181 | } |
182 | |
183 | /* |
184 | * prop_bool_equals -- |
185 | * Return true if the boolean values are equivalent. |
186 | */ |
187 | bool |
188 | prop_bool_equals(prop_bool_t b1, prop_bool_t b2) |
189 | { |
190 | if (!prop_object_is_bool(b1) || !prop_object_is_bool(b2)) |
191 | return (false); |
192 | |
193 | return (prop_object_equals(b1, b2)); |
194 | } |
195 | |
196 | /* |
197 | * _prop_bool_internalize -- |
198 | * Parse a <true/> or <false/> and return the object created from |
199 | * the external representation. |
200 | */ |
201 | |
202 | /* ARGSUSED */ |
203 | bool |
204 | _prop_bool_internalize(prop_stack_t stack, prop_object_t *obj, |
205 | struct _prop_object_internalize_context *ctx) |
206 | { |
207 | bool val; |
208 | |
209 | /* No attributes, and it must be an empty element. */ |
210 | if (ctx->poic_tagattr != NULL || |
211 | ctx->poic_is_empty_element == false) |
212 | return (true); |
213 | |
214 | if (_PROP_TAG_MATCH(ctx, "true" )) |
215 | val = true; |
216 | else { |
217 | _PROP_ASSERT(_PROP_TAG_MATCH(ctx, "false" )); |
218 | val = false; |
219 | } |
220 | *obj = prop_bool_create(val); |
221 | return (true); |
222 | } |
223 | |