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 scfx_utils.cpp - 2312027Sjungma@eit.uni-kl.de 2412027Sjungma@eit.uni-kl.de Original Author: Martin Janssen, Synopsys, Inc. 2512027Sjungma@eit.uni-kl.de 2612027Sjungma@eit.uni-kl.de *****************************************************************************/ 2712027Sjungma@eit.uni-kl.de 2812027Sjungma@eit.uni-kl.de/***************************************************************************** 2912027Sjungma@eit.uni-kl.de 3012027Sjungma@eit.uni-kl.de MODIFICATION LOG - modifiers, enter your name, affiliation, date and 3112027Sjungma@eit.uni-kl.de changes you are making here. 3212027Sjungma@eit.uni-kl.de 3312027Sjungma@eit.uni-kl.de Name, Affiliation, Date: 3412027Sjungma@eit.uni-kl.de Description of Modification: 3512027Sjungma@eit.uni-kl.de 3612027Sjungma@eit.uni-kl.de *****************************************************************************/ 3712027Sjungma@eit.uni-kl.de 3812027Sjungma@eit.uni-kl.de 3912027Sjungma@eit.uni-kl.de// $Log: scfx_utils.cpp,v $ 4012027Sjungma@eit.uni-kl.de// Revision 1.1.1.1 2006/12/15 20:20:04 acg 4112027Sjungma@eit.uni-kl.de// SystemC 2.3 4212027Sjungma@eit.uni-kl.de// 4312027Sjungma@eit.uni-kl.de// Revision 1.3 2006/01/13 18:53:58 acg 4412027Sjungma@eit.uni-kl.de// Andy Goodrich: added $Log command so that CVS comments are reproduced in 4512027Sjungma@eit.uni-kl.de// the source. 4612027Sjungma@eit.uni-kl.de// 4712027Sjungma@eit.uni-kl.de 4812027Sjungma@eit.uni-kl.de#include "sysc/datatypes/fx/scfx_utils.h" 4912027Sjungma@eit.uni-kl.de 5012027Sjungma@eit.uni-kl.de 5112027Sjungma@eit.uni-kl.denamespace sc_dt 5212027Sjungma@eit.uni-kl.de{ 5312027Sjungma@eit.uni-kl.de 5412027Sjungma@eit.uni-kl.devoid 5512027Sjungma@eit.uni-kl.descfx_tc2csd( scfx_string& s, int w_prefix ) 5612027Sjungma@eit.uni-kl.de{ 5712027Sjungma@eit.uni-kl.de if( w_prefix != 0 ) { 5812027Sjungma@eit.uni-kl.de SC_ASSERT_( s[0] == '0' && s[1] == 'c' && 5912027Sjungma@eit.uni-kl.de s[2] == 's' && s[3] == 'd', "invalid prefix" ); 6012027Sjungma@eit.uni-kl.de } 6112027Sjungma@eit.uni-kl.de 6212027Sjungma@eit.uni-kl.de scfx_string csd; 6312027Sjungma@eit.uni-kl.de 6412027Sjungma@eit.uni-kl.de // copy bits from 's' into 'csd'; skip prefix, point, and exponent 6512027Sjungma@eit.uni-kl.de int i = 0; 6612027Sjungma@eit.uni-kl.de int j = (w_prefix != 0 ? 4 : 0); 6712027Sjungma@eit.uni-kl.de while( s[j] ) 6812027Sjungma@eit.uni-kl.de { 6912027Sjungma@eit.uni-kl.de if( s[j] == '0' || s[j] == '1' ) 7012027Sjungma@eit.uni-kl.de csd[i ++] = s[j]; 7112027Sjungma@eit.uni-kl.de else if( s[j] != '.' ) 7212027Sjungma@eit.uni-kl.de break; 7312027Sjungma@eit.uni-kl.de ++ j; 7412027Sjungma@eit.uni-kl.de } 7512027Sjungma@eit.uni-kl.de csd[i] = '\0'; 7612027Sjungma@eit.uni-kl.de 7712027Sjungma@eit.uni-kl.de // convert 'csd' from two's complement to csd 7812027Sjungma@eit.uni-kl.de -- i; 7912027Sjungma@eit.uni-kl.de while( i >= 0 ) 8012027Sjungma@eit.uni-kl.de { 8112027Sjungma@eit.uni-kl.de if( csd[i] == '0' ) 8212027Sjungma@eit.uni-kl.de -- i; 8312027Sjungma@eit.uni-kl.de else 8412027Sjungma@eit.uni-kl.de { 8512027Sjungma@eit.uni-kl.de if( i > 0 && csd[i - 1] == '0' ) 8612027Sjungma@eit.uni-kl.de -- i; 8712027Sjungma@eit.uni-kl.de else if( i == 0 ) 8812027Sjungma@eit.uni-kl.de csd[i --] = '-'; 8912027Sjungma@eit.uni-kl.de else 9012027Sjungma@eit.uni-kl.de { // i > 0 && csd[i - 1] == '1' 9112027Sjungma@eit.uni-kl.de csd[i --] = '-'; 9212027Sjungma@eit.uni-kl.de while( i >= 0 && csd[i] == '1' ) 9312027Sjungma@eit.uni-kl.de csd[i --] = '0'; 9412027Sjungma@eit.uni-kl.de if( i > 0 ) 9512027Sjungma@eit.uni-kl.de csd[i] = '1'; 9612027Sjungma@eit.uni-kl.de else if( i == 0 ) 9712027Sjungma@eit.uni-kl.de csd[i --] = '1'; 9812027Sjungma@eit.uni-kl.de } 9912027Sjungma@eit.uni-kl.de } 10012027Sjungma@eit.uni-kl.de } 10112027Sjungma@eit.uni-kl.de 10212027Sjungma@eit.uni-kl.de // copy bits from 'csd' back into 's' 10312027Sjungma@eit.uni-kl.de i = 0; 10412027Sjungma@eit.uni-kl.de j = (w_prefix != 0 ? 4 : 0); 10512027Sjungma@eit.uni-kl.de while( csd[i] ) 10612027Sjungma@eit.uni-kl.de { 10712027Sjungma@eit.uni-kl.de if( s[j] == '.' ) 10812027Sjungma@eit.uni-kl.de ++ j; 10912027Sjungma@eit.uni-kl.de s[j ++] = csd[i ++]; 11012027Sjungma@eit.uni-kl.de } 11112027Sjungma@eit.uni-kl.de} 11212027Sjungma@eit.uni-kl.de 11312027Sjungma@eit.uni-kl.de 11412027Sjungma@eit.uni-kl.devoid 11512027Sjungma@eit.uni-kl.descfx_csd2tc( scfx_string& csd ) 11612027Sjungma@eit.uni-kl.de{ 11712027Sjungma@eit.uni-kl.de SC_ASSERT_( csd[0] == '0' && csd[1] == 'c' && 11812027Sjungma@eit.uni-kl.de csd[2] == 's' && csd[3] == 'd', "invalid prefix" ); 11912027Sjungma@eit.uni-kl.de 12012027Sjungma@eit.uni-kl.de scfx_string s; 12112027Sjungma@eit.uni-kl.de 12212027Sjungma@eit.uni-kl.de // copy bits from 'csd' into 's'; skip prefix, point, and exponent 12312027Sjungma@eit.uni-kl.de int i = 0; 12412027Sjungma@eit.uni-kl.de s[i ++] = '0'; 12512027Sjungma@eit.uni-kl.de int j = 4; 12612027Sjungma@eit.uni-kl.de while( csd[j] ) 12712027Sjungma@eit.uni-kl.de { 12812027Sjungma@eit.uni-kl.de if( csd[j] == '-' || csd[j] == '0' || csd[j] == '1' ) 12912027Sjungma@eit.uni-kl.de s[i ++] = csd[j]; 13012027Sjungma@eit.uni-kl.de else if( csd[j] != '.' ) 13112027Sjungma@eit.uni-kl.de break; 13212027Sjungma@eit.uni-kl.de ++ j; 13312027Sjungma@eit.uni-kl.de } 13412027Sjungma@eit.uni-kl.de s[i] = '\0'; 13512027Sjungma@eit.uni-kl.de 13612027Sjungma@eit.uni-kl.de // convert 's' from csd to two's complement 13712027Sjungma@eit.uni-kl.de int len = i; 13812027Sjungma@eit.uni-kl.de i = 1; 13912027Sjungma@eit.uni-kl.de while( i < len ) 14012027Sjungma@eit.uni-kl.de { 14112027Sjungma@eit.uni-kl.de while( i < len && s[i] != '-' ) 14212027Sjungma@eit.uni-kl.de i ++; 14312027Sjungma@eit.uni-kl.de if( i < len ) 14412027Sjungma@eit.uni-kl.de { 14512027Sjungma@eit.uni-kl.de j = i ++; 14612027Sjungma@eit.uni-kl.de s[j --] = '1'; 14712027Sjungma@eit.uni-kl.de while( j >= 0 && s[j] == '0' ) 14812027Sjungma@eit.uni-kl.de s[j --] = '1'; 14912027Sjungma@eit.uni-kl.de if( j >= 0 ) 15012027Sjungma@eit.uni-kl.de s[j] = '0'; 15112027Sjungma@eit.uni-kl.de } 15212027Sjungma@eit.uni-kl.de } 15312027Sjungma@eit.uni-kl.de 15412027Sjungma@eit.uni-kl.de // copy bits from 's' back into 'csd' 15512027Sjungma@eit.uni-kl.de j = csd.length(); 15612027Sjungma@eit.uni-kl.de csd[j + 1] = '\0'; 15712027Sjungma@eit.uni-kl.de while( j > 4 ) 15812027Sjungma@eit.uni-kl.de { 15912027Sjungma@eit.uni-kl.de csd[j] = csd[j - 1]; 16012027Sjungma@eit.uni-kl.de -- j; 16112027Sjungma@eit.uni-kl.de } 16212027Sjungma@eit.uni-kl.de 16312027Sjungma@eit.uni-kl.de i = 0; 16412027Sjungma@eit.uni-kl.de j = 4; 16512027Sjungma@eit.uni-kl.de while( s[i] ) 16612027Sjungma@eit.uni-kl.de { 16712027Sjungma@eit.uni-kl.de if( csd[j] == '.' ) 16812027Sjungma@eit.uni-kl.de ++ j; 16912027Sjungma@eit.uni-kl.de csd[j ++] = s[i ++]; 17012027Sjungma@eit.uni-kl.de } 17112027Sjungma@eit.uni-kl.de} 17212027Sjungma@eit.uni-kl.de 17312027Sjungma@eit.uni-kl.de} // namespace sc_dt 17412027Sjungma@eit.uni-kl.de 17512027Sjungma@eit.uni-kl.de 17612027Sjungma@eit.uni-kl.de// Taf! 177