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