external/bsd/atf/dist/atf-c/object.c

   1 /*
   2  * Automated Testing Framework (atf)
   3  *
   4  * Copyright (c) 2008, 2009 The NetBSD Foundation, Inc.
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND
  17  * CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
  18  * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  19  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20  * IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS BE LIABLE FOR ANY
  21  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
  23  * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  24  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
  25  * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  26  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
  27  * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  28  */
  29
  30 #include <err.h>
  31 #include <stdlib.h>
  32
  33 #include "atf-c/object.h"
  34 #include "atf-c/sanity.h"
  35
  36 static size_t balance = 0;
  37 static bool initialized = false;
  38
  39 /* ---------------------------------------------------------------------
  40  * The "atf_object" type.
  41  * --------------------------------------------------------------------- */
  42
  43 static const uint32_t atf_object_magic_alive = 0xcafebabe;
  44 static const uint32_t atf_object_magic_dead  = 0xdeadbeef;
  45
  46 void
  47 atf_object_init(atf_object_t *o)
  48 {
  49     PRE(initialized);
  50
  51     o->m_magic = atf_object_magic_alive;
  52     o->m_finis = 0;
  53
  54     balance++;
  55 }
  56
  57 void
  58 atf_object_copy(atf_object_t *dest, const atf_object_t *src)
  59 {
  60     atf_object_init(dest);
  61 }
  62
  63 void
  64 atf_object_fini(atf_object_t *o)
  65 {
  66     PRE(initialized);
  67
  68     PRE(o->m_magic == atf_object_magic_alive);
  69     PRE(o->m_finis == 0);
  70     PRE(balance > 0);
  71
  72     o->m_magic = atf_object_magic_dead;
  73     o->m_finis++;
  74
  75     balance--;
  76 }
  77
  78 /* ---------------------------------------------------------------------
  79  * Free functions.
  80  * --------------------------------------------------------------------- */
  81
  82 static
  83 void
  84 check_balance(void)
  85 {
  86     PRE(initialized);
  87
  88     if (balance > 0) {
  89         warnx("FATAL ERROR: Invalid balance: %zd objects were not "
  90               "released", balance);
  91         abort();
  92     }
  93 }
  94
  95 void
  96 atf_init_objects(void)
  97 {
  98     initialized = true;
  99
 100     if (atexit(check_balance) == -1)
 101         err(EXIT_FAILURE, "FATAL ERROR: Cannot initialize object system");
 102 }
 103
 104 void
 105 atf_reset_exit_checks(void)
 106 {
 107     balance = 0;
 108 }