xref: /dragonfly/sys/libprop/prop_object_impl.h (revision 0c36ed34fc07856aa57e5b25167f29a8f98a2e96)
1 /*        $NetBSD: prop_object_impl.h,v 1.30 2009/09/13 18:45:10 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 #ifndef _PROPLIB_PROP_OBJECT_IMPL_H_
33 #define   _PROPLIB_PROP_OBJECT_IMPL_H_
34 
35 #if !defined(_KERNEL) && !defined(_STANDALONE)
36 #include <inttypes.h>
37 #endif
38 
39 #include "prop_stack.h"
40 
41 struct _prop_object_externalize_context {
42           char *              poec_buf;           /* string buffer */
43           size_t              poec_capacity;                /* capacity of buffer */
44           size_t              poec_len;           /* current length of string */
45           unsigned int        poec_depth;                   /* nesting depth */
46 };
47 
48 bool                _prop_object_externalize_start_tag(
49                                         struct _prop_object_externalize_context *,
50                                         const char *);
51 bool                _prop_object_externalize_end_tag(
52                                         struct _prop_object_externalize_context *,
53                                         const char *);
54 bool                _prop_object_externalize_empty_tag(
55                                         struct _prop_object_externalize_context *,
56                                         const char *);
57 bool                _prop_object_externalize_append_cstring(
58                                         struct _prop_object_externalize_context *,
59                                         const char *);
60 bool                _prop_object_externalize_append_encoded_cstring(
61                                         struct _prop_object_externalize_context *,
62                                         const char *);
63 bool                _prop_object_externalize_append_char(
64                                         struct _prop_object_externalize_context *,
65                                         unsigned char);
66 bool                _prop_object_externalize_header(
67                                         struct _prop_object_externalize_context *);
68 bool                _prop_object_externalize_footer(
69                                         struct _prop_object_externalize_context *);
70 
71 struct _prop_object_externalize_context *
72           _prop_object_externalize_context_alloc(void);
73 void      _prop_object_externalize_context_free(
74                                         struct _prop_object_externalize_context *);
75 
76 typedef enum {
77           _PROP_TAG_TYPE_START,                             /* e.g. <dict> */
78           _PROP_TAG_TYPE_END,                     /* e.g. </dict> */
79           _PROP_TAG_TYPE_EITHER
80 } _prop_tag_type_t;
81 
82 struct _prop_object_internalize_context {
83           const char *poic_xml;
84           const char *poic_cp;
85 
86           const char *poic_tag_start;
87 
88           const char *poic_tagname;
89           size_t      poic_tagname_len;
90           const char *poic_tagattr;
91           size_t      poic_tagattr_len;
92           const char *poic_tagattrval;
93           size_t      poic_tagattrval_len;
94 
95           bool   poic_is_empty_element;
96           _prop_tag_type_t poic_tag_type;
97 };
98 
99 typedef enum {
100           _PROP_OBJECT_FREE_DONE,
101           _PROP_OBJECT_FREE_RECURSE,
102           _PROP_OBJECT_FREE_FAILED
103 } _prop_object_free_rv_t;
104 
105 typedef enum {
106           _PROP_OBJECT_EQUALS_FALSE,
107           _PROP_OBJECT_EQUALS_TRUE,
108           _PROP_OBJECT_EQUALS_RECURSE
109 } _prop_object_equals_rv_t;
110 
111 #define   _PROP_EOF(c)                  ((c) == '\0')
112 #define   _PROP_ISSPACE(c)    \
113           ((c) == ' ' || (c) == '\t' || (c) == '\n' || (c) == '\r' || \
114            _PROP_EOF(c))
115 
116 #define   _PROP_TAG_MATCH(ctx, t)                                               \
117           _prop_object_internalize_match((ctx)->poic_tagname,         \
118                                                (ctx)->poic_tagname_len,         \
119                                                (t), strlen(t))
120 
121 #define   _PROP_TAGATTR_MATCH(ctx, a)                                 \
122           _prop_object_internalize_match((ctx)->poic_tagattr,         \
123                                                (ctx)->poic_tagattr_len,         \
124                                                (a), strlen(a))
125 
126 #define   _PROP_TAGATTRVAL_MATCH(ctx, a)                                          \
127           _prop_object_internalize_match((ctx)->poic_tagattrval,        \
128                                                (ctx)->poic_tagattrval_len,\
129                                                (a), strlen(a))
130 
131 bool                _prop_object_internalize_find_tag(
132                                         struct _prop_object_internalize_context *,
133                                         const char *, _prop_tag_type_t);
134 bool                _prop_object_internalize_match(const char *, size_t,
135                                                          const char *, size_t);
136 prop_object_t       _prop_object_internalize_by_tag(
137                                         struct _prop_object_internalize_context *);
138 bool                _prop_object_internalize_decode_string(
139                                         struct _prop_object_internalize_context *,
140                                         char *, size_t, size_t *, const char **);
141 prop_object_t       _prop_generic_internalize(const char *, const char *);
142 
143 struct _prop_object_internalize_context *
144                     _prop_object_internalize_context_alloc(const char *);
145 void                _prop_object_internalize_context_free(
146                                         struct _prop_object_internalize_context *);
147 
148 #if !defined(_KERNEL) && !defined(_STANDALONE)
149 bool                _prop_object_externalize_write_file(const char *,
150                                                                 const char *, size_t);
151 
152 struct _prop_object_internalize_mapped_file {
153           char *    poimf_xml;
154           size_t    poimf_mapsize;
155 };
156 
157 struct _prop_object_internalize_mapped_file *
158                     _prop_object_internalize_map_file(const char *);
159 void                _prop_object_internalize_unmap_file(
160                                         struct _prop_object_internalize_mapped_file *);
161 #endif /* !_KERNEL && !_STANDALONE */
162 
163 typedef bool (*prop_object_internalizer_t)(prop_stack_t, prop_object_t *,
164                                         struct _prop_object_internalize_context *);
165 typedef bool (*prop_object_internalizer_continue_t)(prop_stack_t,
166                                         prop_object_t *,
167                                         struct _prop_object_internalize_context *,
168                                         void *, prop_object_t);
169 
170           /* These are here because they're required by shared code. */
171 bool                _prop_array_internalize(prop_stack_t, prop_object_t *,
172                                         struct _prop_object_internalize_context *);
173 bool                _prop_bool_internalize(prop_stack_t, prop_object_t *,
174                                         struct _prop_object_internalize_context *);
175 bool                _prop_data_internalize(prop_stack_t, prop_object_t *,
176                                         struct _prop_object_internalize_context *);
177 bool                _prop_dictionary_internalize(prop_stack_t, prop_object_t *,
178                                         struct _prop_object_internalize_context *);
179 bool                _prop_number_internalize(prop_stack_t, prop_object_t *,
180                                         struct _prop_object_internalize_context *);
181 bool                _prop_string_internalize(prop_stack_t, prop_object_t *,
182                                         struct _prop_object_internalize_context *);
183 
184 struct _prop_object_type {
185           /* type indicator */
186           uint32_t  pot_type;
187           /* func to free object */
188           _prop_object_free_rv_t
189                               (*pot_free)(prop_stack_t, prop_object_t *);
190           /*
191            * func to free the child returned by pot_free with stack == NULL.
192            *
193            * Must be implemented if pot_free can return anything other than
194            * _PROP_OBJECT_FREE_DONE.
195            */
196           void      (*pot_emergency_free)(prop_object_t);
197           /* func to externalize object */
198           bool      (*pot_extern)(struct _prop_object_externalize_context *,
199                                     void *);
200           /* func to test quality */
201           _prop_object_equals_rv_t
202                     (*pot_equals)(prop_object_t, prop_object_t,
203                                     void **, void **,
204                                     prop_object_t *, prop_object_t *);
205           /*
206            * func to finish equality iteration.
207            *
208            * Must be implemented if pot_equals can return
209            * _PROP_OBJECT_EQUALS_RECURSE
210            */
211           void      (*pot_equals_finish)(prop_object_t, prop_object_t);
212           void    (*pot_lock)(void);
213           void    (*pot_unlock)(void);
214 };
215 
216 struct _prop_object {
217           const struct _prop_object_type *po_type;/* type descriptor */
218           uint32_t  po_refcnt;                    /* reference count */
219 };
220 
221 void                _prop_object_init(struct _prop_object *,
222                                           const struct _prop_object_type *);
223 void                _prop_object_fini(struct _prop_object *);
224 
225 struct _prop_object_iterator {
226           prop_object_t       (*pi_next_object)(void *);
227           void                (*pi_reset)(void *);
228           prop_object_t       pi_obj;
229           uint32_t  pi_version;
230 };
231 
232 #define _PROP_NOTHREAD_ONCE_DECL(x)     static bool x = false;
233 #define _PROP_NOTHREAD_ONCE_RUN(x,f)                                            \
234           do {                                                                            \
235                     if ((x) == false) {                                         \
236                               f();                                                        \
237                               x = true;                                         \
238                     }                                                                     \
239           } while (/*CONSTCOND*/0)
240 
241 #if defined(_KERNEL)
242 
243 /*
244  * proplib in the kernel...
245  */
246 
247 #include <sys/kernel.h>
248 #include <sys/types.h>
249 #include <sys/param.h>
250 #include <machine/inttypes.h>
251 #include <sys/malloc.h>
252 #include <sys/objcache.h>
253 #include <sys/systm.h>
254 #include <sys/globaldata.h>
255 #include <sys/mutex2.h>
256 #include <sys/lock.h>
257 
258 #define   _PROP_ASSERT(x)                         KKASSERT(x)
259 
260 #define   _PROP_MALLOC(s, t)            kmalloc((s), (t), M_WAITOK)
261 #define   _PROP_CALLOC(s, t)            kmalloc((s), (t), M_WAITOK | M_ZERO)
262 #define   _PROP_REALLOC(v, s, t)                  krealloc((v), (s), (t), M_WAITOK)
263 #define   _PROP_FREE(v, t)              kfree((v), (t))
264 
265 #define   _PROP_POOL_GET(p)             objcache_get((p), M_WAITOK)
266 #define   _PROP_POOL_PUT(p, v)                    objcache_put((p), (v))
267 
268 struct prop_pool_init {
269           struct pool *pp;
270           size_t size;
271           const char *wchan;
272 };
273 #define _PROP_POOL_INIT(pp, size, wchan)                                        \
274 MALLOC_DEFINE(M_##pp, wchan, wchan);                                            \
275 struct objcache *pp;                                                                      \
276 static void                                                                               \
277 pp##_init(void)                                                                           \
278 {                                                                                         \
279           pp = objcache_create_simple(M_##pp, size);                            \
280 }                                                                                         \
281 SYSINIT(pp##_init, SI_SUB_PROP, SI_ORDER_ANY, pp##_init, NULL)
282 
283 #define   _PROP_MALLOC_DEFINE(t, s, l)                                          \
284                     MALLOC_DEFINE(t, s, l);
285 
286 /*
287  * NOTE: These locks might be held through a sleep so no spinlocks
288  *         can be used.
289  */
290 #define   _PROP_MUTEX_DECL_STATIC(x)    static struct lock x;
291 #define   _PROP_MUTEX_INIT(x)           lockinit(&(x),"proplib",0,LK_CANRECURSE)
292 #define   _PROP_MUTEX_LOCK(x)           lockmgr(&(x), LK_EXCLUSIVE)
293 #define   _PROP_MUTEX_UNLOCK(x)                   lockmgr(&(x), LK_RELEASE)
294 
295 #define   _PROP_RWLOCK_DECL(x)                    struct mtx x;
296 #define   _PROP_RWLOCK_INIT(x)                    mtx_init(&(x), "prop")
297 #define   _PROP_RWLOCK_RDLOCK(x)                  mtx_lock(&(x))
298 #define   _PROP_RWLOCK_WRLOCK(x)                  mtx_lock(&(x))
299 #define   _PROP_RWLOCK_UNLOCK(x)                  mtx_unlock(&(x))
300 #define   _PROP_RWLOCK_DESTROY(x)                 mtx_uninit(&(x))
301 
302 #define _PROP_ONCE_DECL(x)              static int x = 0;
303 #define _PROP_ONCE_RUN(x,f)             if (atomic_cmpset_int(&(x), 0, 1)) f()
304 
305 #elif defined(_STANDALONE)
306 
307 /*
308  * proplib in a standalone environment...
309  */
310 
311 #include <lib/libsa/stand.h>
312 
313 void *              _prop_standalone_calloc(size_t);
314 void *              _prop_standalone_realloc(void *, size_t);
315 
316 #define   _PROP_ASSERT(x)                         /* nothing */
317 
318 #define   _PROP_MALLOC(s, t)            alloc((s))
319 #define   _PROP_CALLOC(s, t)            _prop_standalone_calloc((s))
320 #define   _PROP_REALLOC(v, s, t)                  _prop_standalone_realloc((v), (s))
321 #define   _PROP_FREE(v, t)              dealloc((v), 0)               /* XXX */
322 
323 #define   _PROP_POOL_GET(p)             alloc((p))
324 #define   _PROP_POOL_PUT(p, v)                    dealloc((v), (p))
325 
326 #define   _PROP_POOL_INIT(p, s, d)      static const size_t p = s;
327 
328 #define   _PROP_MALLOC_DEFINE(t, s, l)  /* nothing */
329 
330 #define   _PROP_MUTEX_DECL_STATIC(x)    /* nothing */
331 #define   _PROP_MUTEX_INIT(x)           /* nothing */
332 #define   _PROP_MUTEX_LOCK(x)           /* nothing */
333 #define   _PROP_MUTEX_UNLOCK(x)                   /* nothing */
334 
335 #define   _PROP_RWLOCK_DECL(x)                    /* nothing */
336 #define   _PROP_RWLOCK_INIT(x)                    /* nothing */
337 #define   _PROP_RWLOCK_RDLOCK(x)                  /* nothing */
338 #define   _PROP_RWLOCK_WRLOCK(x)                  /* nothing */
339 #define   _PROP_RWLOCK_UNLOCK(x)                  /* nothing */
340 #define   _PROP_RWLOCK_DESTROY(x)                 /* nothing */
341 
342 #define _PROP_ONCE_DECL(x)              _PROP_NOTHREAD_ONCE_DECL(x)
343 #define _PROP_ONCE_RUN(x,f)             _PROP_NOTHREAD_ONCE_RUN(x,f)
344 
345 #else
346 
347 /*
348  * proplib in user space...
349  */
350 
351 #include <assert.h>
352 #include <string.h>
353 #include <stdio.h>
354 #include <stdlib.h>
355 #include <stddef.h>
356 
357 #define   _PROP_ASSERT(x)                         /*LINTED*/assert(x)
358 
359 #define   _PROP_MALLOC(s, t)            malloc((s))
360 #define   _PROP_CALLOC(s, t)            calloc(1, (s))
361 #define   _PROP_REALLOC(v, s, t)                  realloc((v), (s))
362 #define   _PROP_FREE(v, t)              free((v))
363 
364 #define   _PROP_POOL_GET(p)             malloc((p))
365 #define   _PROP_POOL_PUT(p, v)                    free((v))
366 
367 #define   _PROP_POOL_INIT(p, s, d)      static const size_t p = s;
368 
369 #define   _PROP_MALLOC_DEFINE(t, s, l)  /* nothing */
370 
371 #if defined(__NetBSD__) && defined(_LIBPROP)
372 /*
373  * Use the same mechanism as libc; we get pthread mutexes for threaded
374  * programs and do-nothing stubs for non-threaded programs.
375  */
376 #include "reentrant.h"
377 #define   _PROP_MUTEX_DECL_STATIC(x)    static mutex_t x;
378 #define   _PROP_MUTEX_INIT(x)           mutex_init(&(x), NULL)
379 #define   _PROP_MUTEX_LOCK(x)           mutex_lock(&(x))
380 #define   _PROP_MUTEX_UNLOCK(x)                   mutex_unlock(&(x))
381 
382 #define   _PROP_RWLOCK_DECL(x)                    rwlock_t x ;
383 #define   _PROP_RWLOCK_INIT(x)                    rwlock_init(&(x), NULL)
384 #define   _PROP_RWLOCK_RDLOCK(x)                  rwlock_rdlock(&(x))
385 #define   _PROP_RWLOCK_WRLOCK(x)                  rwlock_wrlock(&(x))
386 #define   _PROP_RWLOCK_UNLOCK(x)                  rwlock_unlock(&(x))
387 #define   _PROP_RWLOCK_DESTROY(x)                 rwlock_destroy(&(x))
388 
389 #define _PROP_ONCE_DECL(x)                                                      \
390           static pthread_once_t x = PTHREAD_ONCE_INIT;
391 #define _PROP_ONCE_RUN(x,f)             thr_once(&(x), (void(*)(void))f);
392 
393 #elif defined(HAVE_NBTOOL_CONFIG_H)
394 /*
395  * None of NetBSD's build tools are multi-threaded.
396  */
397 #define   _PROP_MUTEX_DECL_STATIC(x)    /* nothing */
398 #define   _PROP_MUTEX_INIT(x)           /* nothing */
399 #define   _PROP_MUTEX_LOCK(x)           /* nothing */
400 #define   _PROP_MUTEX_UNLOCK(x)                   /* nothing */
401 
402 #define   _PROP_RWLOCK_DECL(x)                    /* nothing */
403 #define   _PROP_RWLOCK_INIT(x)                    /* nothing */
404 #define   _PROP_RWLOCK_RDLOCK(x)                  /* nothing */
405 #define   _PROP_RWLOCK_WRLOCK(x)                  /* nothing */
406 #define   _PROP_RWLOCK_UNLOCK(x)                  /* nothing */
407 #define   _PROP_RWLOCK_DESTROY(x)                 /* nothing */
408 
409 #define _PROP_ONCE_DECL(x)              _PROP_NOTHREAD_ONCE_DECL(x)
410 #define _PROP_ONCE_RUN(x,f)             _PROP_NOTHREAD_ONCE_RUN(x,f)
411 #else
412 /*
413  * Use pthread mutexes everywhere else.
414  */
415 #include <pthread.h>
416 #define   _PROP_MUTEX_DECL_STATIC(x)    static pthread_mutex_t x;
417 #define   _PROP_MUTEX_INIT(x)           pthread_mutex_init(&(x), NULL)
418 #define   _PROP_MUTEX_LOCK(x)           pthread_mutex_lock(&(x))
419 #define   _PROP_MUTEX_UNLOCK(x)                   pthread_mutex_unlock(&(x))
420 
421 #define   _PROP_RWLOCK_DECL(x)                    pthread_rwlock_t x ;
422 #define   _PROP_RWLOCK_INIT(x)                    pthread_rwlock_init(&(x), NULL)
423 #define   _PROP_RWLOCK_RDLOCK(x)                  pthread_rwlock_rdlock(&(x))
424 #define   _PROP_RWLOCK_WRLOCK(x)                  pthread_rwlock_wrlock(&(x))
425 #define   _PROP_RWLOCK_UNLOCK(x)                  pthread_rwlock_unlock(&(x))
426 #define   _PROP_RWLOCK_DESTROY(x)                 pthread_rwlock_destroy(&(x))
427 
428 #define _PROP_ONCE_DECL(x)                                                      \
429           static pthread_once_t x = PTHREAD_ONCE_INIT;
430 #define _PROP_ONCE_RUN(x,f)             pthread_once(&(x),(void(*)(void))f)
431 #endif
432 
433 #endif /* _KERNEL */
434 
435 /*
436  * Language features.
437  */
438 #include <sys/cdefs.h>
439 #define   _PROP_ARG_UNUSED              __unused
440 
441 #endif /* _PROPLIB_PROP_OBJECT_IMPL_H_ */
442