sbsv2/raptor/test/smoke_suite/test_resources/tools2/pdrtran/src/READER.CPP
author yiluzhu
Fri, 22 Jan 2010 16:42:55 +0000
branchwip
changeset 317 adc615fe34e8
permissions -rw-r--r--
Build win32 tools on Linux
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
317
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
     1
/*
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
     2
* Copyright (c) 1997-2009 Nokia Corporation and/or its subsidiary(-ies).
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
     3
* All rights reserved.
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
     4
* This component and the accompanying materials are made available
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
     5
* under the terms of "Eclipse Public License v1.0"
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
     6
* which accompanies this distribution, and is available
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
     7
* at the URL "http://www.eclipse.org/legal/epl-v10.html".
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
     8
*
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
     9
* Initial Contributors:
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    10
* Nokia Corporation - initial contribution.
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    11
*
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    12
* Contributors:
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    13
*
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    14
* Description: 
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    15
* Header READER.CPP
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    16
*
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    17
*/
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    18
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    19
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    20
#include "READER.H"
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    21
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    22
Reader::Reader()
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    23
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    24
	iLexAnal = NULL;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    25
	}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    26
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    27
boolean Reader::Open(const String& aFilename)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    28
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    29
	boolean state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    30
	String string = aFilename;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    31
	if (iLexAnal != NULL)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    32
		delete iLexAnal;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    33
	iLexAnal = new LexAnal(string.Text());
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    34
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    35
	if (iLexAnal)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    36
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    37
		state = etrue;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    38
		iLex =& (iLexAnal->iLex);
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    39
		iLexAnal->Read();	// reads first lexical
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    40
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    41
	else
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    42
		state = efalse;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    43
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    44
	return state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    45
	}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    46
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    47
Reader::~Reader()
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    48
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    49
	if (iLexAnal != NULL)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    50
		delete iLexAnal;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    51
	}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    52
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    53
boolean Reader::_EOF()
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    54
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    55
	return ((iLex->iType) == ELexEOF);
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    56
	}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    57
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    58
boolean Reader::NewLine()
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    59
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    60
	boolean state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    61
	if (iLex->iType == ELexNL)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    62
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    63
		iLexAnal->Read();
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    64
		state = etrue;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    65
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    66
	else
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    67
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    68
		Error(String("Newline expected"));
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    69
		state = efalse;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    70
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    71
	return state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    72
	}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    73
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    74
boolean Reader::Number(int& aNumber)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    75
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    76
	boolean state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    77
	if (iLex->iType == ELexNumber)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    78
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    79
		aNumber = iLex->iNumber;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    80
		iLexAnal->Read();
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    81
		state = etrue;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    82
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    83
	else
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    84
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    85
		Error(String("Number expected"));
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    86
		state = efalse;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    87
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    88
	return state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    89
	}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    90
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    91
boolean Reader::IdentComp(const String& aIdent)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    92
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    93
	boolean state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    94
	if (iLex->iType == ELexIdent)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    95
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    96
		if (aIdent == iLex->iText)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    97
			{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    98
			iLexAnal->Read();
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
    99
			state = etrue;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   100
			}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   101
		else
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   102
			state = efalse;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   103
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   104
	else
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   105
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   106
		state = efalse;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   107
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   108
	return state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   109
	}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   110
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   111
boolean Reader::IdentCopy(String& aIdent)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   112
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   113
	boolean state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   114
	if (iLex->iType == ELexIdent)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   115
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   116
		aIdent = iLex->iText;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   117
		iLexAnal->Read();
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   118
		state = etrue;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   119
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   120
	else
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   121
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   122
		Error(String("Identifier expected"));
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   123
		state = efalse;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   124
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   125
	return state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   126
	}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   127
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   128
boolean Reader::StringCopy(String& aString)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   129
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   130
	boolean state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   131
	if (iLex->iType == ELexString)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   132
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   133
		aString = iLex->iText;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   134
		iLexAnal->Read();
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   135
		state = etrue;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   136
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   137
	else
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   138
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   139
		Error(String("String expected"));
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   140
		state = efalse;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   141
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   142
	return state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   143
	}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   144
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   145
boolean Reader::Operator(char& aCh)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   146
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   147
	boolean state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   148
	if (iLex->iType == ELexOperator)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   149
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   150
		aCh = iLex->iText[0];
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   151
		iLexAnal->Read();
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   152
		state = etrue;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   153
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   154
	else
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   155
		{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   156
		Error(String("Operator expected"));
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   157
		state = efalse;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   158
		}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   159
	return state;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   160
	}
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   161
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   162
EXPORT_C void Reader::Error(const String& aString)
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   163
	{
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   164
	cerr << "Error: " << aString;
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   165
	iLexAnal->Report();
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   166
	while ((iLex->iType != ELexNL) && (iLex->iType != ELexEOF))
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   167
		iLexAnal->Read();
adc615fe34e8 Build win32 tools on Linux
yiluzhu
parents:
diff changeset
   168
	}