libstdc++
insert_join_fn_imps.hpp
Go to the documentation of this file.
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_/insert_join_fn_imps.hpp
38 * Contains an implementation class for pat_trie.
39 */
40
41#ifdef PB_DS_CLASS_C_DEC
42
43PB_DS_CLASS_T_DEC
44void
45PB_DS_CLASS_C_DEC::
46join(PB_DS_CLASS_C_DEC& other)
47{
48 PB_DS_ASSERT_VALID((*this))
49 PB_DS_ASSERT_VALID(other)
50 branch_bag bag;
51 if (!join_prep(other, bag))
52 {
53 PB_DS_ASSERT_VALID((*this))
54 PB_DS_ASSERT_VALID(other)
55 return;
56 }
57
58 m_p_head->m_p_parent = rec_join(m_p_head->m_p_parent,
59 other.m_p_head->m_p_parent, 0, bag);
60
61 m_p_head->m_p_parent->m_p_parent = m_p_head;
62 m_size += other.m_size;
63 other.initialize();
64 PB_DS_ASSERT_VALID(other)
65 m_p_head->m_p_min = leftmost_descendant(m_p_head->m_p_parent);
66 m_p_head->m_p_max = rightmost_descendant(m_p_head->m_p_parent);
67 PB_DS_ASSERT_VALID((*this))
68}
69
70PB_DS_CLASS_T_DEC
71bool
72PB_DS_CLASS_C_DEC::
73join_prep(PB_DS_CLASS_C_DEC& other, branch_bag& r_bag)
74{
75 PB_DS_ASSERT_VALID((*this))
76 PB_DS_ASSERT_VALID(other)
77 if (other.m_size == 0)
78 return false;
79
80 if (m_size == 0)
81 {
82 value_swap(other);
83 return false;
84 }
85
86 const bool greater =
87 synth_access_traits::cmp_keys(PB_DS_V2F(static_cast<leaf_const_pointer>(m_p_head->m_p_max)->value()),
88 PB_DS_V2F(static_cast<leaf_const_pointer>(other.m_p_head->m_p_min)->value()));
89
90 const bool lesser =
91 synth_access_traits::cmp_keys(PB_DS_V2F(static_cast<leaf_const_pointer>(other.m_p_head->m_p_max)->value()),
92 PB_DS_V2F(static_cast<leaf_const_pointer>(m_p_head->m_p_min)->value()));
93
94 if (!greater && !lesser)
95 __throw_join_error();
96
97 rec_join_prep(m_p_head->m_p_parent, other.m_p_head->m_p_parent, r_bag);
98 _GLIBCXX_DEBUG_ONLY(debug_base::join(other, false);)
99 return true;
100}
101
102PB_DS_CLASS_T_DEC
103void
104PB_DS_CLASS_C_DEC::
105rec_join_prep(node_const_pointer p_l, node_const_pointer p_r,
106 branch_bag& r_bag)
107{
108 if (p_l->m_type == leaf_node)
109 {
110 if (p_r->m_type == leaf_node)
111 {
112 rec_join_prep(static_cast<leaf_const_pointer>(p_l),
113 static_cast<leaf_const_pointer>(p_r), r_bag);
114 return;
115 }
116
117 _GLIBCXX_DEBUG_ASSERT(p_r->m_type == i_node);
118 rec_join_prep(static_cast<leaf_const_pointer>(p_l),
119 static_cast<inode_const_pointer>(p_r), r_bag);
120 return;
121 }
122
123 _GLIBCXX_DEBUG_ASSERT(p_l->m_type == i_node);
124 if (p_r->m_type == leaf_node)
125 {
126 rec_join_prep(static_cast<inode_const_pointer>(p_l),
127 static_cast<leaf_const_pointer>(p_r), r_bag);
128 return;
129 }
130
131 _GLIBCXX_DEBUG_ASSERT(p_r->m_type == i_node);
132
133 rec_join_prep(static_cast<inode_const_pointer>(p_l),
134 static_cast<inode_const_pointer>(p_r), r_bag);
135}
136
137PB_DS_CLASS_T_DEC
138void
139PB_DS_CLASS_C_DEC::
140rec_join_prep(leaf_const_pointer /*p_l*/, leaf_const_pointer /*p_r*/,
141 branch_bag& r_bag)
142{ r_bag.add_branch(); }
143
144PB_DS_CLASS_T_DEC
145void
146PB_DS_CLASS_C_DEC::
147rec_join_prep(leaf_const_pointer /*p_l*/, inode_const_pointer /*p_r*/,
148 branch_bag& r_bag)
149{ r_bag.add_branch(); }
150
151PB_DS_CLASS_T_DEC
152void
153PB_DS_CLASS_C_DEC::
154rec_join_prep(inode_const_pointer /*p_l*/, leaf_const_pointer /*p_r*/,
155 branch_bag& r_bag)
156{ r_bag.add_branch(); }
157
158PB_DS_CLASS_T_DEC
159void
160PB_DS_CLASS_C_DEC::
161rec_join_prep(inode_const_pointer p_l, inode_const_pointer p_r,
162 branch_bag& r_bag)
163{
164 if (p_l->get_e_ind() == p_r->get_e_ind() &&
165 synth_access_traits::equal_prefixes(p_l->pref_b_it(), p_l->pref_e_it(),
166 p_r->pref_b_it(), p_r->pref_e_it()))
167 {
168 for (typename inode::const_iterator it = p_r->begin();
169 it != p_r->end(); ++ it)
170 {
171 node_const_pointer p_l_join_child = p_l->get_join_child(*it, this);
172 if (p_l_join_child != 0)
173 rec_join_prep(p_l_join_child, * it, r_bag);
174 }
175 return;
176 }
177
178 if (p_r->get_e_ind() < p_l->get_e_ind() &&
179 p_r->should_be_mine(p_l->pref_b_it(), p_l->pref_e_it(), 0, this))
180 {
181 node_const_pointer p_r_join_child = p_r->get_join_child(p_l, this);
182 if (p_r_join_child != 0)
183 rec_join_prep(p_r_join_child, p_l, r_bag);
184 return;
185 }
186
187 if (p_r->get_e_ind() < p_l->get_e_ind() &&
188 p_r->should_be_mine(p_l->pref_b_it(), p_l->pref_e_it(), 0, this))
189 {
190 node_const_pointer p_r_join_child = p_r->get_join_child(p_l, this);
191 if (p_r_join_child != 0)
192 rec_join_prep(p_r_join_child, p_l, r_bag);
193 return;
194 }
195 r_bag.add_branch();
196}
197
198PB_DS_CLASS_T_DEC
199typename PB_DS_CLASS_C_DEC::node_pointer
200PB_DS_CLASS_C_DEC::
201rec_join(node_pointer p_l, node_pointer p_r, size_type checked_ind,
202 branch_bag& r_bag)
203{
204 _GLIBCXX_DEBUG_ASSERT(p_r != 0);
205 if (p_l == 0)
206 {
207 apply_update(p_r, (node_update*)this);
208 return (p_r);
209 }
210
211 if (p_l->m_type == leaf_node)
212 {
213 if (p_r->m_type == leaf_node)
214 {
215 node_pointer p_ret = rec_join(static_cast<leaf_pointer>(p_l),
216 static_cast<leaf_pointer>(p_r), r_bag);
217 apply_update(p_ret, (node_update*)this);
218 return p_ret;
219 }
220
221 _GLIBCXX_DEBUG_ASSERT(p_r->m_type == i_node);
222 node_pointer p_ret = rec_join(static_cast<leaf_pointer>(p_l),
223 static_cast<inode_pointer>(p_r),
224 checked_ind, r_bag);
225 apply_update(p_ret, (node_update*)this);
226 return p_ret;
227 }
228
229 _GLIBCXX_DEBUG_ASSERT(p_l->m_type == i_node);
230 if (p_r->m_type == leaf_node)
231 {
232 node_pointer p_ret = rec_join(static_cast<inode_pointer>(p_l),
233 static_cast<leaf_pointer>(p_r),
234 checked_ind, r_bag);
235 apply_update(p_ret, (node_update*)this);
236 return p_ret;
237 }
238
239 _GLIBCXX_DEBUG_ASSERT(p_r->m_type == i_node);
240 node_pointer p_ret = rec_join(static_cast<inode_pointer>(p_l),
241 static_cast<inode_pointer>(p_r),
242 r_bag);
243
244 apply_update(p_ret, (node_update*)this);
245 return p_ret;
246}
247
248PB_DS_CLASS_T_DEC
249typename PB_DS_CLASS_C_DEC::node_pointer
250PB_DS_CLASS_C_DEC::
251rec_join(leaf_pointer p_l, leaf_pointer p_r, branch_bag& r_bag)
252{
253 _GLIBCXX_DEBUG_ASSERT(p_r != 0);
254 if (p_l == 0)
255 return (p_r);
256 node_pointer p_ret = insert_branch(p_l, p_r, r_bag);
257 _GLIBCXX_DEBUG_ASSERT(PB_DS_RECURSIVE_COUNT_LEAFS(p_ret) == 2);
258 return p_ret;
259}
260
261PB_DS_CLASS_T_DEC
262typename PB_DS_CLASS_C_DEC::node_pointer
263PB_DS_CLASS_C_DEC::
264rec_join(leaf_pointer p_l, inode_pointer p_r, size_type checked_ind,
265 branch_bag& r_bag)
266{
267#ifdef _GLIBCXX_DEBUG
268 const size_type lhs_leafs = PB_DS_RECURSIVE_COUNT_LEAFS(p_l);
269 const size_type rhs_leafs = PB_DS_RECURSIVE_COUNT_LEAFS(p_r);
270#endif
271
272 _GLIBCXX_DEBUG_ASSERT(p_r != 0);
273 node_pointer p_ret = rec_join(p_r, p_l, checked_ind, r_bag);
274 _GLIBCXX_DEBUG_ASSERT(PB_DS_RECURSIVE_COUNT_LEAFS(p_ret) == lhs_leafs + rhs_leafs);
275 return p_ret;
276}
277
278PB_DS_CLASS_T_DEC
279typename PB_DS_CLASS_C_DEC::node_pointer
280PB_DS_CLASS_C_DEC::
281rec_join(inode_pointer p_l, leaf_pointer p_r, size_type checked_ind, branch_bag& r_bag)
282{
283 _GLIBCXX_DEBUG_ASSERT(p_l != 0);
284 _GLIBCXX_DEBUG_ASSERT(p_r != 0);
285
286#ifdef _GLIBCXX_DEBUG
287 const size_type lhs_leafs = PB_DS_RECURSIVE_COUNT_LEAFS(p_l);
288 const size_type rhs_leafs = PB_DS_RECURSIVE_COUNT_LEAFS(p_r);
289#endif
290
291 if (!p_l->should_be_mine(pref_begin(p_r), pref_end(p_r), checked_ind, this))
292 {
293 node_pointer p_ret = insert_branch(p_l, p_r, r_bag);
294 PB_DS_ASSERT_NODE_VALID(p_ret)
295 _GLIBCXX_DEBUG_ASSERT(PB_DS_RECURSIVE_COUNT_LEAFS(p_ret) ==
296 lhs_leafs + rhs_leafs);
297 return p_ret;
298 }
299
300 node_pointer p_pot_child = p_l->add_child(p_r, pref_begin(p_r),
301 pref_end(p_r), this);
302 if (p_pot_child != p_r)
303 {
304 node_pointer p_new_child = rec_join(p_pot_child, p_r, p_l->get_e_ind(),
305 r_bag);
306
307 p_l->replace_child(p_new_child, pref_begin(p_new_child),
308 pref_end(p_new_child), this);
309 }
310
311 PB_DS_ASSERT_NODE_VALID(p_l)
312 _GLIBCXX_DEBUG_ASSERT(PB_DS_RECURSIVE_COUNT_LEAFS(p_l) == lhs_leafs + rhs_leafs);
313 return p_l;
314}
315
316PB_DS_CLASS_T_DEC
317typename PB_DS_CLASS_C_DEC::node_pointer
318PB_DS_CLASS_C_DEC::
319rec_join(inode_pointer p_l, inode_pointer p_r,
320 branch_bag& r_bag)
321{
322 _GLIBCXX_DEBUG_ASSERT(p_l != 0);
323 _GLIBCXX_DEBUG_ASSERT(p_r != 0);
324
325#ifdef _GLIBCXX_DEBUG
326 const size_type lhs_leafs = PB_DS_RECURSIVE_COUNT_LEAFS(p_l);
327 const size_type rhs_leafs = PB_DS_RECURSIVE_COUNT_LEAFS(p_r);
328#endif
329
330 if (p_l->get_e_ind() == p_r->get_e_ind() &&
331 synth_access_traits::equal_prefixes(p_l->pref_b_it(), p_l->pref_e_it(),
332 p_r->pref_b_it(), p_r->pref_e_it()))
333 {
334 for (typename inode::iterator it = p_r->begin();
335 it != p_r->end(); ++ it)
336 {
337 node_pointer p_new_child = rec_join(p_l->get_join_child(*it, this),
338 * it, 0, r_bag);
339 p_l->replace_child(p_new_child, pref_begin(p_new_child),
340 pref_end(p_new_child), this);
341 }
342
343 p_r->~inode();
344 s_inode_allocator.deallocate(p_r, 1);
345 PB_DS_ASSERT_NODE_VALID(p_l)
346 _GLIBCXX_DEBUG_ASSERT(PB_DS_RECURSIVE_COUNT_LEAFS(p_l) == lhs_leafs + rhs_leafs);
347 return p_l;
348 }
349
350 if (p_l->get_e_ind() < p_r->get_e_ind() &&
351 p_l->should_be_mine(p_r->pref_b_it(), p_r->pref_e_it(), 0, this))
352 {
353 node_pointer p_new_child = rec_join(p_l->get_join_child(p_r, this),
354 p_r, 0, r_bag);
355 p_l->replace_child(p_new_child, pref_begin(p_new_child),
356 pref_end(p_new_child), this);
357 PB_DS_ASSERT_NODE_VALID(p_l)
358 return p_l;
359 }
360
361 if (p_r->get_e_ind() < p_l->get_e_ind() &&
362 p_r->should_be_mine(p_l->pref_b_it(), p_l->pref_e_it(), 0, this))
363 {
364 node_pointer p_new_child = rec_join(p_r->get_join_child(p_l, this), p_l,
365 0, r_bag);
366
367 p_r->replace_child(p_new_child, pref_begin(p_new_child),
368 pref_end(p_new_child), this);
369
370 PB_DS_ASSERT_NODE_VALID(p_r)
371 _GLIBCXX_DEBUG_ASSERT(PB_DS_RECURSIVE_COUNT_LEAFS(p_r) == lhs_leafs + rhs_leafs);
372 return p_r;
373 }
374
375 node_pointer p_ret = insert_branch(p_l, p_r, r_bag);
376 PB_DS_ASSERT_NODE_VALID(p_ret)
377 _GLIBCXX_DEBUG_ASSERT(PB_DS_RECURSIVE_COUNT_LEAFS(p_ret) == lhs_leafs + rhs_leafs);
378 return p_ret;
379}
380
381PB_DS_CLASS_T_DEC
383PB_DS_CLASS_C_DEC::
384insert(const_reference r_val)
385{
386 node_pointer p_lf = find_imp(PB_DS_V2F(r_val));
387 if (p_lf != 0 && p_lf->m_type == leaf_node &&
388 synth_access_traits::equal_keys(PB_DS_V2F(static_cast<leaf_pointer>(p_lf)->value()), PB_DS_V2F(r_val)))
389 {
390 PB_DS_CHECK_KEY_EXISTS(PB_DS_V2F(r_val))
391 PB_DS_ASSERT_VALID((*this))
392 return std::make_pair(iterator(p_lf), false);
393 }
394
395 PB_DS_CHECK_KEY_DOES_NOT_EXIST(PB_DS_V2F(r_val))
396
397 leaf_pointer p_new_lf = s_leaf_allocator.allocate(1);
398 cond_dealtor cond(p_new_lf);
399
400 new (p_new_lf) leaf(r_val);
401 apply_update(p_new_lf, (node_update*)this);
402 cond.set_call_destructor();
403 branch_bag bag;
404 bag.add_branch();
405 m_p_head->m_p_parent = rec_join(m_p_head->m_p_parent, p_new_lf, 0, bag);
406 m_p_head->m_p_parent->m_p_parent = m_p_head;
407 cond.set_no_action_dtor();
408 ++m_size;
409 update_min_max_for_inserted_leaf(p_new_lf);
410 _GLIBCXX_DEBUG_ONLY(debug_base::insert_new(PB_DS_V2F(r_val));)
411 PB_DS_ASSERT_VALID((*this))
412 return std::make_pair(point_iterator(p_new_lf), true);
413}
414
415PB_DS_CLASS_T_DEC
416typename PB_DS_CLASS_C_DEC::size_type
417PB_DS_CLASS_C_DEC::
418keys_diff_ind(typename access_traits::const_iterator b_l,
419 typename access_traits::const_iterator e_l,
420 typename access_traits::const_iterator b_r,
421 typename access_traits::const_iterator e_r)
422{
423 size_type diff_pos = 0;
424 while (b_l != e_l)
425 {
426 if (b_r == e_r)
427 return (diff_pos);
428 if (access_traits::e_pos(*b_l) != access_traits::e_pos(*b_r))
429 return (diff_pos);
430 ++b_l;
431 ++b_r;
432 ++diff_pos;
433 }
434 _GLIBCXX_DEBUG_ASSERT(b_r != e_r);
435 return diff_pos;
436}
437
438PB_DS_CLASS_T_DEC
439typename PB_DS_CLASS_C_DEC::inode_pointer
440PB_DS_CLASS_C_DEC::
441insert_branch(node_pointer p_l, node_pointer p_r, branch_bag& r_bag)
442{
443 typename synth_access_traits::const_iterator left_b_it = pref_begin(p_l);
444 typename synth_access_traits::const_iterator left_e_it = pref_end(p_l);
445 typename synth_access_traits::const_iterator right_b_it = pref_begin(p_r);
446 typename synth_access_traits::const_iterator right_e_it = pref_end(p_r);
447
448 const size_type diff_ind = keys_diff_ind(left_b_it, left_e_it,
449 right_b_it, right_e_it);
450
451 inode_pointer p_new_nd = r_bag.get_branch();
452 new (p_new_nd) inode(diff_ind, left_b_it);
453 p_new_nd->add_child(p_l, left_b_it, left_e_it, this);
454 p_new_nd->add_child(p_r, right_b_it, right_e_it, this);
455 p_l->m_p_parent = p_new_nd;
456 p_r->m_p_parent = p_new_nd;
457 PB_DS_ASSERT_NODE_VALID(p_new_nd)
458 return (p_new_nd);
459}
460
461PB_DS_CLASS_T_DEC
462void
463PB_DS_CLASS_C_DEC::
464update_min_max_for_inserted_leaf(leaf_pointer p_new_lf)
465{
466 if (m_p_head->m_p_min == m_p_head ||
467 synth_access_traits::cmp_keys(PB_DS_V2F(p_new_lf->value()),
468 PB_DS_V2F(static_cast<leaf_const_pointer>(m_p_head->m_p_min)->value())))
469 m_p_head->m_p_min = p_new_lf;
470
471 if (m_p_head->m_p_max == m_p_head ||
472 synth_access_traits::cmp_keys(PB_DS_V2F(static_cast<leaf_const_pointer>(m_p_head->m_p_max)->value()), PB_DS_V2F(p_new_lf->value())))
473 m_p_head->m_p_max = p_new_lf;
474}
475#endif
ISO C++ entities toplevel namespace is std.
Struct holding two objects of arbitrary type.
Definition: stl_pair.h:213