112027Sjungma@eit.uni-kl.de/***************************************************************************** 212027Sjungma@eit.uni-kl.de 312027Sjungma@eit.uni-kl.de Licensed to Accellera Systems Initiative Inc. (Accellera) under one or 412027Sjungma@eit.uni-kl.de more contributor license agreements. See the NOTICE file distributed 512027Sjungma@eit.uni-kl.de with this work for additional information regarding copyright ownership. 612027Sjungma@eit.uni-kl.de Accellera licenses this file to you under the Apache License, Version 2.0 712027Sjungma@eit.uni-kl.de (the "License"); you may not use this file except in compliance with the 812027Sjungma@eit.uni-kl.de License. You may obtain a copy of the License at 912027Sjungma@eit.uni-kl.de 1012027Sjungma@eit.uni-kl.de http://www.apache.org/licenses/LICENSE-2.0 1112027Sjungma@eit.uni-kl.de 1212027Sjungma@eit.uni-kl.de Unless required by applicable law or agreed to in writing, software 1312027Sjungma@eit.uni-kl.de distributed under the License is distributed on an "AS IS" BASIS, 1412027Sjungma@eit.uni-kl.de WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or 1512027Sjungma@eit.uni-kl.de implied. See the License for the specific language governing 1612027Sjungma@eit.uni-kl.de permissions and limitations under the License. 1712027Sjungma@eit.uni-kl.de 1812027Sjungma@eit.uni-kl.de *****************************************************************************/ 1912027Sjungma@eit.uni-kl.de 2012027Sjungma@eit.uni-kl.de/***************************************************************************** 2112027Sjungma@eit.uni-kl.de 2212027Sjungma@eit.uni-kl.de sc_list.cpp -- Simple implementation of a doubly linked list. 2312027Sjungma@eit.uni-kl.de 2412027Sjungma@eit.uni-kl.de Original Author: Stan Y. Liao, Synopsys, Inc. 2512027Sjungma@eit.uni-kl.de 2612027Sjungma@eit.uni-kl.de CHANGE LOG AT END OF FILE 2712027Sjungma@eit.uni-kl.de *****************************************************************************/ 2812027Sjungma@eit.uni-kl.de 2912027Sjungma@eit.uni-kl.de 3012027Sjungma@eit.uni-kl.de#include <assert.h> 3112027Sjungma@eit.uni-kl.de#include <cstddef> 3212027Sjungma@eit.uni-kl.de 3312027Sjungma@eit.uni-kl.de#include "sysc/kernel/sc_cmnhdr.h" 3412027Sjungma@eit.uni-kl.de#include "sysc/utils/sc_iostream.h" 3512027Sjungma@eit.uni-kl.de#include "sysc/utils/sc_list.h" 3612027Sjungma@eit.uni-kl.de#include "sysc/utils/sc_mempool.h" 3712027Sjungma@eit.uni-kl.de#include "sysc/utils/sc_report.h" 3812027Sjungma@eit.uni-kl.de#include "sysc/utils/sc_utils_ids.h" 3912027Sjungma@eit.uni-kl.de 4012027Sjungma@eit.uni-kl.denamespace sc_core { 4112027Sjungma@eit.uni-kl.de 4212027Sjungma@eit.uni-kl.declass sc_plist_elem { 4312027Sjungma@eit.uni-kl.de friend class sc_plist_base_iter; 4412027Sjungma@eit.uni-kl.de friend class sc_plist_base; 4512027Sjungma@eit.uni-kl.de 4612027Sjungma@eit.uni-kl.deprivate: 4712027Sjungma@eit.uni-kl.de sc_plist_elem() : data(0), prev(0), next(0) 4812027Sjungma@eit.uni-kl.de {} 4912027Sjungma@eit.uni-kl.de sc_plist_elem( void* d, sc_plist_elem* p, sc_plist_elem* n ) : 5012027Sjungma@eit.uni-kl.de data(d), prev(p), next(n) 5112027Sjungma@eit.uni-kl.de {} 5212027Sjungma@eit.uni-kl.de ~sc_plist_elem() 5312027Sjungma@eit.uni-kl.de {} 5412027Sjungma@eit.uni-kl.de 5512027Sjungma@eit.uni-kl.de static void* operator new(std::size_t sz) { return sc_mempool::allocate(sz); } 5612027Sjungma@eit.uni-kl.de static void operator delete(void* p, std::size_t sz) { sc_mempool::release(p, sz); } 5712027Sjungma@eit.uni-kl.de 5812027Sjungma@eit.uni-kl.de void* data; 5912027Sjungma@eit.uni-kl.de sc_plist_elem* prev; 6012027Sjungma@eit.uni-kl.de sc_plist_elem* next; 6112027Sjungma@eit.uni-kl.de}; 6212027Sjungma@eit.uni-kl.de 6312027Sjungma@eit.uni-kl.desc_plist_base::sc_plist_base() : head(0), tail(0) {} 6412027Sjungma@eit.uni-kl.de 6512027Sjungma@eit.uni-kl.desc_plist_base::~sc_plist_base() 6612027Sjungma@eit.uni-kl.de{ 6712027Sjungma@eit.uni-kl.de handle_t p; 6812027Sjungma@eit.uni-kl.de for( handle_t h = head; h != 0; h = p ) { 6912027Sjungma@eit.uni-kl.de p = h->next; 7012027Sjungma@eit.uni-kl.de delete h; 7112027Sjungma@eit.uni-kl.de } 7212027Sjungma@eit.uni-kl.de} 7312027Sjungma@eit.uni-kl.de 7412027Sjungma@eit.uni-kl.devoid 7512027Sjungma@eit.uni-kl.desc_plist_base::erase_all() 7612027Sjungma@eit.uni-kl.de{ 7712027Sjungma@eit.uni-kl.de handle_t p; 7812027Sjungma@eit.uni-kl.de for( handle_t h = head; h != 0; h = p ) { 7912027Sjungma@eit.uni-kl.de p = h->next; 8012027Sjungma@eit.uni-kl.de delete h; 8112027Sjungma@eit.uni-kl.de } 8212027Sjungma@eit.uni-kl.de head = 0; 8312027Sjungma@eit.uni-kl.de tail = 0; 8412027Sjungma@eit.uni-kl.de} 8512027Sjungma@eit.uni-kl.de 8612027Sjungma@eit.uni-kl.deint 8712027Sjungma@eit.uni-kl.desc_plist_base::size() const 8812027Sjungma@eit.uni-kl.de{ 8912027Sjungma@eit.uni-kl.de int n = 0; 9012027Sjungma@eit.uni-kl.de for( handle_t h = head; h != 0; h = h->next ) { 9112027Sjungma@eit.uni-kl.de n++; 9212027Sjungma@eit.uni-kl.de } 9312027Sjungma@eit.uni-kl.de return n; 9412027Sjungma@eit.uni-kl.de} 9512027Sjungma@eit.uni-kl.de 9612027Sjungma@eit.uni-kl.desc_plist_base::handle_t 9712027Sjungma@eit.uni-kl.desc_plist_base::push_back( void* d ) 9812027Sjungma@eit.uni-kl.de{ 9912027Sjungma@eit.uni-kl.de handle_t q = new sc_plist_elem( d, tail, 0 ); 10012027Sjungma@eit.uni-kl.de if (tail) { 10112027Sjungma@eit.uni-kl.de tail->next = q; 10212027Sjungma@eit.uni-kl.de tail = q; 10312027Sjungma@eit.uni-kl.de } 10412027Sjungma@eit.uni-kl.de else { 10512027Sjungma@eit.uni-kl.de head = tail = q; 10612027Sjungma@eit.uni-kl.de } 10712027Sjungma@eit.uni-kl.de return q; 10812027Sjungma@eit.uni-kl.de} 10912027Sjungma@eit.uni-kl.de 11012027Sjungma@eit.uni-kl.desc_plist_base::handle_t 11112027Sjungma@eit.uni-kl.desc_plist_base::push_front( void* d ) 11212027Sjungma@eit.uni-kl.de{ 11312027Sjungma@eit.uni-kl.de handle_t q = new sc_plist_elem( d, (sc_plist_elem*) 0, head ); 11412027Sjungma@eit.uni-kl.de if (head) { 11512027Sjungma@eit.uni-kl.de head->prev = q; 11612027Sjungma@eit.uni-kl.de head = q; 11712027Sjungma@eit.uni-kl.de } 11812027Sjungma@eit.uni-kl.de else { 11912027Sjungma@eit.uni-kl.de head = tail = q; 12012027Sjungma@eit.uni-kl.de } 12112027Sjungma@eit.uni-kl.de return q; 12212027Sjungma@eit.uni-kl.de} 12312027Sjungma@eit.uni-kl.de 12412027Sjungma@eit.uni-kl.devoid* 12512027Sjungma@eit.uni-kl.desc_plist_base::pop_back() 12612027Sjungma@eit.uni-kl.de{ 12712027Sjungma@eit.uni-kl.de handle_t q = tail; 12812027Sjungma@eit.uni-kl.de void* d = q->data; 12912027Sjungma@eit.uni-kl.de tail = tail->prev; 13012027Sjungma@eit.uni-kl.de delete q; 13112027Sjungma@eit.uni-kl.de if (tail != 0) { 13212027Sjungma@eit.uni-kl.de tail->next = 0; 13312027Sjungma@eit.uni-kl.de } 13412027Sjungma@eit.uni-kl.de else { 13512027Sjungma@eit.uni-kl.de head = 0; 13612027Sjungma@eit.uni-kl.de } 13712027Sjungma@eit.uni-kl.de return d; 13812027Sjungma@eit.uni-kl.de} 13912027Sjungma@eit.uni-kl.de 14012027Sjungma@eit.uni-kl.devoid* 14112027Sjungma@eit.uni-kl.desc_plist_base::pop_front() 14212027Sjungma@eit.uni-kl.de{ 14312027Sjungma@eit.uni-kl.de handle_t q = head; 14412027Sjungma@eit.uni-kl.de void* d = q->data; 14512027Sjungma@eit.uni-kl.de head = head->next; 14612027Sjungma@eit.uni-kl.de delete q; 14712027Sjungma@eit.uni-kl.de if (head != 0) { 14812027Sjungma@eit.uni-kl.de head->prev = 0; 14912027Sjungma@eit.uni-kl.de } 15012027Sjungma@eit.uni-kl.de else { 15112027Sjungma@eit.uni-kl.de tail = 0; 15212027Sjungma@eit.uni-kl.de } 15312027Sjungma@eit.uni-kl.de return d; 15412027Sjungma@eit.uni-kl.de} 15512027Sjungma@eit.uni-kl.de 15612027Sjungma@eit.uni-kl.desc_plist_base::handle_t 15712027Sjungma@eit.uni-kl.desc_plist_base::insert_before( handle_t h, void* d ) 15812027Sjungma@eit.uni-kl.de{ 15912027Sjungma@eit.uni-kl.de if (h == 0) { 16012027Sjungma@eit.uni-kl.de return push_back(d); 16112027Sjungma@eit.uni-kl.de } 16212027Sjungma@eit.uni-kl.de else { 16312027Sjungma@eit.uni-kl.de handle_t q = new sc_plist_elem( d, h->prev, h ); 16412027Sjungma@eit.uni-kl.de h->prev->next = q; 16512027Sjungma@eit.uni-kl.de h->prev = q; 16612027Sjungma@eit.uni-kl.de return q; 16712027Sjungma@eit.uni-kl.de } 16812027Sjungma@eit.uni-kl.de} 16912027Sjungma@eit.uni-kl.de 17012027Sjungma@eit.uni-kl.desc_plist_base::handle_t 17112027Sjungma@eit.uni-kl.desc_plist_base::insert_after( handle_t h, void* d ) 17212027Sjungma@eit.uni-kl.de{ 17312027Sjungma@eit.uni-kl.de if (h == 0) { 17412027Sjungma@eit.uni-kl.de return push_front(d); 17512027Sjungma@eit.uni-kl.de } 17612027Sjungma@eit.uni-kl.de else { 17712027Sjungma@eit.uni-kl.de handle_t q = new sc_plist_elem( d, h, h->next ); 17812027Sjungma@eit.uni-kl.de h->next->prev = q; 17912027Sjungma@eit.uni-kl.de h->next = q; 18012027Sjungma@eit.uni-kl.de return q; 18112027Sjungma@eit.uni-kl.de } 18212027Sjungma@eit.uni-kl.de} 18312027Sjungma@eit.uni-kl.de 18412027Sjungma@eit.uni-kl.devoid* 18512027Sjungma@eit.uni-kl.desc_plist_base::remove( handle_t h ) 18612027Sjungma@eit.uni-kl.de{ 18712027Sjungma@eit.uni-kl.de if (h == head) 18812027Sjungma@eit.uni-kl.de return pop_front(); 18912027Sjungma@eit.uni-kl.de else if (h == tail) 19012027Sjungma@eit.uni-kl.de return pop_back(); 19112027Sjungma@eit.uni-kl.de else { 19212027Sjungma@eit.uni-kl.de void* d = h->data; 19312027Sjungma@eit.uni-kl.de h->prev->next = h->next; 19412027Sjungma@eit.uni-kl.de h->next->prev = h->prev; 19512027Sjungma@eit.uni-kl.de delete h; 19612027Sjungma@eit.uni-kl.de return d; 19712027Sjungma@eit.uni-kl.de } 19812027Sjungma@eit.uni-kl.de} 19912027Sjungma@eit.uni-kl.de 20012027Sjungma@eit.uni-kl.devoid* 20112027Sjungma@eit.uni-kl.desc_plist_base::get( handle_t h ) const 20212027Sjungma@eit.uni-kl.de{ 20312027Sjungma@eit.uni-kl.de return h->data; 20412027Sjungma@eit.uni-kl.de} 20512027Sjungma@eit.uni-kl.de 20612027Sjungma@eit.uni-kl.devoid 20712027Sjungma@eit.uni-kl.desc_plist_base::set( handle_t h, void* d ) 20812027Sjungma@eit.uni-kl.de{ 20912027Sjungma@eit.uni-kl.de h->data = d; 21012027Sjungma@eit.uni-kl.de} 21112027Sjungma@eit.uni-kl.de 21212027Sjungma@eit.uni-kl.devoid 21312027Sjungma@eit.uni-kl.desc_plist_base::mapcar( sc_plist_map_fn f, void* arg ) 21412027Sjungma@eit.uni-kl.de{ 21512027Sjungma@eit.uni-kl.de for (handle_t h = head; h != 0; h = h->next) { 21612027Sjungma@eit.uni-kl.de f( h->data, arg ); 21712027Sjungma@eit.uni-kl.de } 21812027Sjungma@eit.uni-kl.de} 21912027Sjungma@eit.uni-kl.de 22012027Sjungma@eit.uni-kl.devoid* 22112027Sjungma@eit.uni-kl.desc_plist_base::front() const 22212027Sjungma@eit.uni-kl.de{ 22312027Sjungma@eit.uni-kl.de 22412027Sjungma@eit.uni-kl.de if (head) { 22512027Sjungma@eit.uni-kl.de return head->data; 22612027Sjungma@eit.uni-kl.de } 22712027Sjungma@eit.uni-kl.de else { 22812027Sjungma@eit.uni-kl.de SC_REPORT_ERROR( SC_ID_FRONT_ON_EMPTY_LIST_ , 0 ); 22912027Sjungma@eit.uni-kl.de // never reached 23012027Sjungma@eit.uni-kl.de return 0; 23112027Sjungma@eit.uni-kl.de } 23212027Sjungma@eit.uni-kl.de} 23312027Sjungma@eit.uni-kl.de 23412027Sjungma@eit.uni-kl.devoid* 23512027Sjungma@eit.uni-kl.desc_plist_base::back() const 23612027Sjungma@eit.uni-kl.de{ 23712027Sjungma@eit.uni-kl.de if (tail) { 23812027Sjungma@eit.uni-kl.de return tail->data; 23912027Sjungma@eit.uni-kl.de } 24012027Sjungma@eit.uni-kl.de else { 24112027Sjungma@eit.uni-kl.de SC_REPORT_ERROR( SC_ID_BACK_ON_EMPTY_LIST_, 0 ); 24212027Sjungma@eit.uni-kl.de // never reached 24312027Sjungma@eit.uni-kl.de return 0; 24412027Sjungma@eit.uni-kl.de } 24512027Sjungma@eit.uni-kl.de} 24612027Sjungma@eit.uni-kl.de 24712027Sjungma@eit.uni-kl.de 24812027Sjungma@eit.uni-kl.de 24912027Sjungma@eit.uni-kl.desc_plist_base_iter::sc_plist_base_iter( sc_plist_base* l, bool from_tail ) : 25012027Sjungma@eit.uni-kl.de lst(l), ptr( from_tail ? l->tail : l->head ) 25112027Sjungma@eit.uni-kl.de{ 25212027Sjungma@eit.uni-kl.de} 25312027Sjungma@eit.uni-kl.de 25412027Sjungma@eit.uni-kl.devoid 25512027Sjungma@eit.uni-kl.desc_plist_base_iter::reset( sc_plist_base* l, bool from_tail ) 25612027Sjungma@eit.uni-kl.de{ 25712027Sjungma@eit.uni-kl.de lst = l; 25812027Sjungma@eit.uni-kl.de if (from_tail) { 25912027Sjungma@eit.uni-kl.de ptr = l->tail; 26012027Sjungma@eit.uni-kl.de } 26112027Sjungma@eit.uni-kl.de else { 26212027Sjungma@eit.uni-kl.de ptr = l->head; 26312027Sjungma@eit.uni-kl.de } 26412027Sjungma@eit.uni-kl.de} 26512027Sjungma@eit.uni-kl.de 26612027Sjungma@eit.uni-kl.desc_plist_base_iter::~sc_plist_base_iter() 26712027Sjungma@eit.uni-kl.de{ 26812027Sjungma@eit.uni-kl.de 26912027Sjungma@eit.uni-kl.de} 27012027Sjungma@eit.uni-kl.de 27112027Sjungma@eit.uni-kl.debool 27212027Sjungma@eit.uni-kl.desc_plist_base_iter::empty() const 27312027Sjungma@eit.uni-kl.de{ 27412027Sjungma@eit.uni-kl.de return ptr == 0; 27512027Sjungma@eit.uni-kl.de} 27612027Sjungma@eit.uni-kl.de 27712027Sjungma@eit.uni-kl.devoid 27812027Sjungma@eit.uni-kl.desc_plist_base_iter::operator++(int) 27912027Sjungma@eit.uni-kl.de{ 28012027Sjungma@eit.uni-kl.de ptr = ptr->next; 28112027Sjungma@eit.uni-kl.de} 28212027Sjungma@eit.uni-kl.de 28312027Sjungma@eit.uni-kl.devoid 28412027Sjungma@eit.uni-kl.desc_plist_base_iter::operator--(int) 28512027Sjungma@eit.uni-kl.de{ 28612027Sjungma@eit.uni-kl.de ptr = ptr->prev; 28712027Sjungma@eit.uni-kl.de} 28812027Sjungma@eit.uni-kl.de 28912027Sjungma@eit.uni-kl.devoid* 29012027Sjungma@eit.uni-kl.desc_plist_base_iter::get() const 29112027Sjungma@eit.uni-kl.de{ 29212027Sjungma@eit.uni-kl.de return ptr->data; 29312027Sjungma@eit.uni-kl.de} 29412027Sjungma@eit.uni-kl.de 29512027Sjungma@eit.uni-kl.devoid 29612027Sjungma@eit.uni-kl.desc_plist_base_iter::set( void* d ) 29712027Sjungma@eit.uni-kl.de{ 29812027Sjungma@eit.uni-kl.de ptr->data = d; 29912027Sjungma@eit.uni-kl.de} 30012027Sjungma@eit.uni-kl.de 30112027Sjungma@eit.uni-kl.devoid 30212027Sjungma@eit.uni-kl.desc_plist_base_iter::remove() 30312027Sjungma@eit.uni-kl.de{ 30412027Sjungma@eit.uni-kl.de sc_plist_base::handle_t nptr = ptr->next; 30512027Sjungma@eit.uni-kl.de lst->remove(ptr); 30612027Sjungma@eit.uni-kl.de ptr = nptr; 30712027Sjungma@eit.uni-kl.de} 30812027Sjungma@eit.uni-kl.de 30912027Sjungma@eit.uni-kl.devoid 31012027Sjungma@eit.uni-kl.desc_plist_base_iter::remove(int direction) 31112027Sjungma@eit.uni-kl.de{ 31212027Sjungma@eit.uni-kl.de sc_plist_base::handle_t nptr = (direction == 1) ? ptr->next : ptr->prev; 31312027Sjungma@eit.uni-kl.de lst->remove(ptr); 31412027Sjungma@eit.uni-kl.de ptr = nptr; 31512027Sjungma@eit.uni-kl.de} 31612027Sjungma@eit.uni-kl.de 31712027Sjungma@eit.uni-kl.devoid 31812027Sjungma@eit.uni-kl.desc_plist_base_iter::set_handle( sc_plist_elem* h ) 31912027Sjungma@eit.uni-kl.de{ 32012027Sjungma@eit.uni-kl.de ptr = h; 32112027Sjungma@eit.uni-kl.de} 32212027Sjungma@eit.uni-kl.de 32312027Sjungma@eit.uni-kl.de} // namespace sc_core 32412027Sjungma@eit.uni-kl.de 32512027Sjungma@eit.uni-kl.de// $Log: sc_list.cpp,v $ 32612027Sjungma@eit.uni-kl.de// Revision 1.4 2011/08/26 20:46:18 acg 32712027Sjungma@eit.uni-kl.de// Andy Goodrich: moved the modification log to the end of the file to 32812027Sjungma@eit.uni-kl.de// eliminate source line number skew when check-ins are done. 32912027Sjungma@eit.uni-kl.de// 33012027Sjungma@eit.uni-kl.de// Revision 1.3 2011/08/24 22:05:56 acg 33112027Sjungma@eit.uni-kl.de// Torsten Maehne: initialization changes to remove warnings. 33212027Sjungma@eit.uni-kl.de// 33312027Sjungma@eit.uni-kl.de// Revision 1.2 2011/02/18 20:38:43 acg 33412027Sjungma@eit.uni-kl.de// Andy Goodrich: Updated Copyright notice. 33512027Sjungma@eit.uni-kl.de// 33612027Sjungma@eit.uni-kl.de// Revision 1.1.1.1 2006/12/15 20:20:06 acg 33712027Sjungma@eit.uni-kl.de// SystemC 2.3 33812027Sjungma@eit.uni-kl.de// 33912027Sjungma@eit.uni-kl.de// Revision 1.3 2006/01/13 18:53:10 acg 34012027Sjungma@eit.uni-kl.de// Andy Goodrich: Added $Log command so that CVS comments are reproduced in 34112027Sjungma@eit.uni-kl.de// the source. 34212027Sjungma@eit.uni-kl.de 34312027Sjungma@eit.uni-kl.de// taf 344