1  // -*- C++ -*-
2 
3 // Copyright (C) 2005-2021 Free Software Foundation, Inc.
4 //
5 // This file is part of the GNU ISO C++ Library.  This library is free
6 // software; you can redistribute it and/or modify it under the terms
7 // of the GNU General Public License as published by the Free Software
8 // Foundation; either version 3, or (at your option) any later
9 // version.
10 
11 // This library is distributed in the hope that it will be useful, but
12 // WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14 // General Public License for more details.
15 
16 // Under Section 7 of GPL version 3, you are granted additional
17 // permissions described in the GCC Runtime Library Exception, version
18 // 3.1, as published by the Free Software Foundation.
19 
20 // You should have received a copy of the GNU General Public License and
21 // a copy of the GCC Runtime Library Exception along with this program;
22 // see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
23 // <http://www.gnu.org/licenses/>.
24 
25 // Copyright (C) 2004 Ami Tavory and Vladimir Dreizin, IBM-HRL.
26 
27 // Permission to use, copy, modify, sell, and distribute this software
28 // is hereby granted without fee, provided that the above copyright
29 // notice appears in all copies, and that both that copyright notice
30 // and this permission notice appear in supporting documentation. None
31 // of the above authors, nor IBM Haifa Research Laboratories, make any
32 // representation about the suitability of this software for any
33 // purpose. It is provided "as is" without express or implied
34 // warranty.
35 
36 /**
37  * @file pat_trie_/constructors_destructor_fn_imps.hpp
38  * Contains an implementation class for pat_trie.
39  */
40 
41 #ifdef PB_DS_CLASS_C_DEC
42 
43 PB_DS_CLASS_T_DEC
44 typename PB_DS_CLASS_C_DEC::head_allocator
45 PB_DS_CLASS_C_DEC::s_head_allocator;
46 
47 PB_DS_CLASS_T_DEC
48 typename PB_DS_CLASS_C_DEC::inode_allocator
49 PB_DS_CLASS_C_DEC::s_inode_allocator;
50 
51 PB_DS_CLASS_T_DEC
52 typename PB_DS_CLASS_C_DEC::leaf_allocator
53 PB_DS_CLASS_C_DEC::s_leaf_allocator;
54 
55 PB_DS_CLASS_T_DEC
56 PB_DS_CLASS_C_DEC::
PB_DS_PAT_TRIE_NAME()57 PB_DS_PAT_TRIE_NAME() :
58   m_p_head(s_head_allocator.allocate(1)),
59   m_size(0)
60 {
61   initialize();
62   PB_DS_ASSERT_VALID((*this))
63 }
64 
65 PB_DS_CLASS_T_DEC
66 PB_DS_CLASS_C_DEC::
PB_DS_PAT_TRIE_NAME(const access_traits & r_access_traits)67 PB_DS_PAT_TRIE_NAME(const access_traits& r_access_traits) :
68   synth_access_traits(r_access_traits),
69   m_p_head(s_head_allocator.allocate(1)),
70   m_size(0)
71 {
72   initialize();
73   PB_DS_ASSERT_VALID((*this))
74 }
75 
76 PB_DS_CLASS_T_DEC
77 PB_DS_CLASS_C_DEC::
PB_DS_PAT_TRIE_NAME(const PB_DS_CLASS_C_DEC & other)78 PB_DS_PAT_TRIE_NAME(const PB_DS_CLASS_C_DEC& other) :
79 #ifdef _GLIBCXX_DEBUG
80   debug_base(other),
81 #endif
82   synth_access_traits(other),
83   node_update(other),
84   m_p_head(s_head_allocator.allocate(1)),
85   m_size(0)
86 {
87   initialize();
88   m_size = other.m_size;
89   PB_DS_ASSERT_VALID(other)
90     if (other.m_p_head->m_p_parent == 0)
91       {
92 	PB_DS_ASSERT_VALID((*this))
93 	return;
94       }
95   __try
96     {
97       m_p_head->m_p_parent = recursive_copy_node(other.m_p_head->m_p_parent);
98     }
99   __catch(...)
100     {
101       s_head_allocator.deallocate(m_p_head, 1);
102       __throw_exception_again;
103     }
104 
105   m_p_head->m_p_min = leftmost_descendant(m_p_head->m_p_parent);
106   m_p_head->m_p_max = rightmost_descendant(m_p_head->m_p_parent);
107   m_p_head->m_p_parent->m_p_parent = m_p_head;
108   PB_DS_ASSERT_VALID((*this))
109 }
110 
111 PB_DS_CLASS_T_DEC
112 void
113 PB_DS_CLASS_C_DEC::
swap(PB_DS_CLASS_C_DEC & other)114 swap(PB_DS_CLASS_C_DEC& other)
115 {
116   PB_DS_ASSERT_VALID((*this))
117   PB_DS_ASSERT_VALID(other)
118   value_swap(other);
119   std::swap((access_traits& )(*this), (access_traits& )other);
120   PB_DS_ASSERT_VALID((*this))
121   PB_DS_ASSERT_VALID(other)
122 }
123 
124 PB_DS_CLASS_T_DEC
125 void
126 PB_DS_CLASS_C_DEC::
value_swap(PB_DS_CLASS_C_DEC & other)127 value_swap(PB_DS_CLASS_C_DEC& other)
128 {
129   _GLIBCXX_DEBUG_ONLY(debug_base::swap(other);)
130   std::swap(m_p_head, other.m_p_head);
131   std::swap(m_size, other.m_size);
132 }
133 
134 PB_DS_CLASS_T_DEC
135 PB_DS_CLASS_C_DEC::
~PB_DS_PAT_TRIE_NAME()136 ~PB_DS_PAT_TRIE_NAME()
137 {
138   clear();
139   s_head_allocator.deallocate(m_p_head, 1);
140 }
141 
142 PB_DS_CLASS_T_DEC
143 void
144 PB_DS_CLASS_C_DEC::
initialize()145 initialize()
146 {
147   new (m_p_head) head();
148   m_p_head->m_p_parent = 0;
149   m_p_head->m_p_min = m_p_head;
150   m_p_head->m_p_max = m_p_head;
151   m_size = 0;
152 }
153 
154 PB_DS_CLASS_T_DEC
155 template<typename It>
156 void
157 PB_DS_CLASS_C_DEC::
copy_from_range(It first_it,It last_it)158 copy_from_range(It first_it, It last_it)
159 {
160   while (first_it != last_it)
161     insert(*(first_it++));
162 }
163 
164 PB_DS_CLASS_T_DEC
165 typename PB_DS_CLASS_C_DEC::node_pointer
166 PB_DS_CLASS_C_DEC::
recursive_copy_node(node_const_pointer p_ncp)167 recursive_copy_node(node_const_pointer p_ncp)
168 {
169   _GLIBCXX_DEBUG_ASSERT(p_ncp != 0);
170   if (p_ncp->m_type == leaf_node)
171     {
172       leaf_const_pointer p_other_lf = static_cast<leaf_const_pointer>(p_ncp);
173       leaf_pointer p_new_lf = s_leaf_allocator.allocate(1);
174       cond_dealtor cond(p_new_lf);
175       new (p_new_lf) leaf(p_other_lf->value());
176       apply_update(p_new_lf, (node_update*)this);
177       cond.set_no_action_dtor();
178       return (p_new_lf);
179     }
180 
181   _GLIBCXX_DEBUG_ASSERT(p_ncp->m_type == i_node);
182   node_pointer a_p_children[inode::arr_size];
183   size_type child_i = 0;
184   inode_const_pointer p_icp = static_cast<inode_const_pointer>(p_ncp);
185 
186   typename inode::const_iterator child_it = p_icp->begin();
187 
188   inode_pointer p_ret;
189   __try
190     {
191       while (child_it != p_icp->end())
192 	{
193 	  a_p_children[child_i] = recursive_copy_node(*(child_it));
194 	  child_i++;
195 	  child_it++;
196 	}
197       p_ret = s_inode_allocator.allocate(1);
198     }
199   __catch(...)
200     {
201       while (child_i-- > 0)
202 	clear_imp(a_p_children[child_i]);
203       __throw_exception_again;
204     }
205 
206   new (p_ret) inode(p_icp->get_e_ind(), pref_begin(a_p_children[0]));
207 
208   --child_i;
209   _GLIBCXX_DEBUG_ASSERT(child_i >= 1);
210   do
211     p_ret->add_child(a_p_children[child_i], pref_begin(a_p_children[child_i]),
212 		     pref_end(a_p_children[child_i]), this);
213   while (child_i-- > 0);
214   apply_update(p_ret, (node_update*)this);
215   return p_ret;
216 }
217 #endif
218