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