xref: /AOO41X/main/rsc/source/parser/rscpar.cxx (revision cdf0e10c4e3984b49a9502b011690b615761d4a3)
1*cdf0e10cSrcweir /*************************************************************************
2*cdf0e10cSrcweir  *
3*cdf0e10cSrcweir  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4*cdf0e10cSrcweir  *
5*cdf0e10cSrcweir  * Copyright 2000, 2010 Oracle and/or its affiliates.
6*cdf0e10cSrcweir  *
7*cdf0e10cSrcweir  * OpenOffice.org - a multi-platform office productivity suite
8*cdf0e10cSrcweir  *
9*cdf0e10cSrcweir  * This file is part of OpenOffice.org.
10*cdf0e10cSrcweir  *
11*cdf0e10cSrcweir  * OpenOffice.org is free software: you can redistribute it and/or modify
12*cdf0e10cSrcweir  * it under the terms of the GNU Lesser General Public License version 3
13*cdf0e10cSrcweir  * only, as published by the Free Software Foundation.
14*cdf0e10cSrcweir  *
15*cdf0e10cSrcweir  * OpenOffice.org is distributed in the hope that it will be useful,
16*cdf0e10cSrcweir  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17*cdf0e10cSrcweir  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18*cdf0e10cSrcweir  * GNU Lesser General Public License version 3 for more details
19*cdf0e10cSrcweir  * (a copy is included in the LICENSE file that accompanied this code).
20*cdf0e10cSrcweir  *
21*cdf0e10cSrcweir  * You should have received a copy of the GNU Lesser General Public License
22*cdf0e10cSrcweir  * version 3 along with OpenOffice.org.  If not, see
23*cdf0e10cSrcweir  * <http://www.openoffice.org/license.html>
24*cdf0e10cSrcweir  * for a copy of the LGPLv3 License.
25*cdf0e10cSrcweir  *
26*cdf0e10cSrcweir  ************************************************************************/
27*cdf0e10cSrcweir 
28*cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove
29*cdf0e10cSrcweir #include "precompiled_rsc.hxx"
30*cdf0e10cSrcweir /****************** I N C L U D E S **************************************/
31*cdf0e10cSrcweir // C and C++ Includes.
32*cdf0e10cSrcweir #include <string.h>
33*cdf0e10cSrcweir #include <rscpar.hxx>
34*cdf0e10cSrcweir #include <rscdb.hxx>
35*cdf0e10cSrcweir 
36*cdf0e10cSrcweir /****************** R s c F i l e I n s t ********************************/
37*cdf0e10cSrcweir /****************** C O D E **********************************************/
38*cdf0e10cSrcweir /*************************************************************************
39*cdf0e10cSrcweir |*
40*cdf0e10cSrcweir |*	  RscFileInst::Init()
41*cdf0e10cSrcweir |*
42*cdf0e10cSrcweir |*	  Beschreibung
43*cdf0e10cSrcweir |*	  Ersterstellung	MM 05.11.91
44*cdf0e10cSrcweir |*	  Letzte Aenderung	MM 17.02.93
45*cdf0e10cSrcweir |*
46*cdf0e10cSrcweir *************************************************************************/
47*cdf0e10cSrcweir void RscFileInst::Init()
48*cdf0e10cSrcweir {
49*cdf0e10cSrcweir 	nLineNo = 0;
50*cdf0e10cSrcweir 	nLineBufLen = 256;
51*cdf0e10cSrcweir 	pLine = (char *)rtl_allocateMemory( nLineBufLen );
52*cdf0e10cSrcweir 	*pLine = '\0';
53*cdf0e10cSrcweir 	nScanPos = 0;
54*cdf0e10cSrcweir 	cLastChar = '\0';
55*cdf0e10cSrcweir 	bEof = sal_False;
56*cdf0e10cSrcweir };
57*cdf0e10cSrcweir 
58*cdf0e10cSrcweir /*************************************************************************
59*cdf0e10cSrcweir |*
60*cdf0e10cSrcweir |*	  RscFileInst::RscFileInst()
61*cdf0e10cSrcweir |*
62*cdf0e10cSrcweir |*	  Beschreibung
63*cdf0e10cSrcweir |*	  Ersterstellung	MM 06.06.91
64*cdf0e10cSrcweir |*	  Letzte Aenderung	MM 06.06.91
65*cdf0e10cSrcweir |*
66*cdf0e10cSrcweir *************************************************************************/
67*cdf0e10cSrcweir RscFileInst::RscFileInst( RscTypCont * pTC, sal_uLong lIndexSrc,
68*cdf0e10cSrcweir 						  sal_uLong lFIndex, FILE * fFile )
69*cdf0e10cSrcweir {
70*cdf0e10cSrcweir 	pTypCont = pTC;
71*cdf0e10cSrcweir 	Init();
72*cdf0e10cSrcweir 
73*cdf0e10cSrcweir 	lFileIndex = lFIndex;
74*cdf0e10cSrcweir 	lSrcIndex = lIndexSrc;
75*cdf0e10cSrcweir 	fInputFile = fFile;
76*cdf0e10cSrcweir 
77*cdf0e10cSrcweir 	//Status: Zeiger am Ende des Lesepuffers
78*cdf0e10cSrcweir 	nInputPos = nInputEndPos = nInputBufLen = READBUFFER_MAX;
79*cdf0e10cSrcweir 	pInput	  = (char *)rtl_allocateMemory( nInputBufLen );
80*cdf0e10cSrcweir }
81*cdf0e10cSrcweir 
82*cdf0e10cSrcweir RscFileInst::RscFileInst( RscTypCont * pTC, sal_uLong lIndexSrc,
83*cdf0e10cSrcweir 						  sal_uLong lFIndex, const ByteString& rBuf )
84*cdf0e10cSrcweir {
85*cdf0e10cSrcweir 	pTypCont	 = pTC;
86*cdf0e10cSrcweir 	Init();
87*cdf0e10cSrcweir 	lFileIndex	 = lFIndex;
88*cdf0e10cSrcweir 	lSrcIndex	 = lIndexSrc;
89*cdf0e10cSrcweir 	fInputFile	 = NULL;
90*cdf0e10cSrcweir 	nInputPos	 = 0;
91*cdf0e10cSrcweir 	nInputEndPos = rBuf.Len();
92*cdf0e10cSrcweir 
93*cdf0e10cSrcweir 	// Muss groesser sein wegen Eingabeende bei nInputBufLen < nInputEndPos
94*cdf0e10cSrcweir 	nInputBufLen = nInputEndPos +1;
95*cdf0e10cSrcweir 	pInput		 = (char *)rtl_allocateMemory( nInputBufLen +100 );
96*cdf0e10cSrcweir 	memcpy( pInput, rBuf.GetBuffer(), nInputEndPos );
97*cdf0e10cSrcweir }
98*cdf0e10cSrcweir 
99*cdf0e10cSrcweir /*************************************************************************
100*cdf0e10cSrcweir |*
101*cdf0e10cSrcweir |*	  RscFileInst::~RscFileInst()
102*cdf0e10cSrcweir |*
103*cdf0e10cSrcweir |*	  Beschreibung
104*cdf0e10cSrcweir |*	  Ersterstellung	MM 06.06.91
105*cdf0e10cSrcweir |*	  Letzte Aenderung	MM 06.06.91
106*cdf0e10cSrcweir |*
107*cdf0e10cSrcweir *************************************************************************/
108*cdf0e10cSrcweir RscFileInst::~RscFileInst(){
109*cdf0e10cSrcweir 	if( pInput )
110*cdf0e10cSrcweir 		rtl_freeMemory( pInput );
111*cdf0e10cSrcweir 	if( pLine )
112*cdf0e10cSrcweir 		rtl_freeMemory( pLine );
113*cdf0e10cSrcweir }
114*cdf0e10cSrcweir 
115*cdf0e10cSrcweir /*************************************************************************
116*cdf0e10cSrcweir |*
117*cdf0e10cSrcweir |*	  RscFileInst::GetChar()
118*cdf0e10cSrcweir |*
119*cdf0e10cSrcweir |*	  Beschreibung
120*cdf0e10cSrcweir |*	  Ersterstellung	MM 01.06.91
121*cdf0e10cSrcweir |*	  Letzte Aenderung	MM 09.08.91
122*cdf0e10cSrcweir |*
123*cdf0e10cSrcweir *************************************************************************/
124*cdf0e10cSrcweir int RscFileInst::GetChar()
125*cdf0e10cSrcweir {
126*cdf0e10cSrcweir 	if( pLine[ nScanPos ] )
127*cdf0e10cSrcweir 		return( pLine[ nScanPos++ ] );
128*cdf0e10cSrcweir 	else if( nInputPos >= nInputEndPos && nInputEndPos != nInputBufLen )
129*cdf0e10cSrcweir 	{
130*cdf0e10cSrcweir 		// Dateiende
131*cdf0e10cSrcweir 		bEof = sal_True;
132*cdf0e10cSrcweir 		return 0;
133*cdf0e10cSrcweir 	}
134*cdf0e10cSrcweir 	else
135*cdf0e10cSrcweir 	{
136*cdf0e10cSrcweir 		GetNewLine();
137*cdf0e10cSrcweir 		return( '\n' );
138*cdf0e10cSrcweir 	}
139*cdf0e10cSrcweir }
140*cdf0e10cSrcweir 
141*cdf0e10cSrcweir /*************************************************************************
142*cdf0e10cSrcweir |*
143*cdf0e10cSrcweir |*	  RscFileInst::GetNewLine()
144*cdf0e10cSrcweir |*
145*cdf0e10cSrcweir |*	  Beschreibung
146*cdf0e10cSrcweir |*	  Ersterstellung	MM 06.06.91
147*cdf0e10cSrcweir |*	  Letzte Aenderung	MM 06.06.91
148*cdf0e10cSrcweir |*
149*cdf0e10cSrcweir *************************************************************************/
150*cdf0e10cSrcweir void RscFileInst::GetNewLine()
151*cdf0e10cSrcweir {
152*cdf0e10cSrcweir 	nLineNo++;
153*cdf0e10cSrcweir 	nScanPos = 0;
154*cdf0e10cSrcweir 
155*cdf0e10cSrcweir 	//laeuft bis Dateiende
156*cdf0e10cSrcweir 	sal_uInt32 nLen = 0;
157*cdf0e10cSrcweir 	while( (nInputPos < nInputEndPos) || (nInputEndPos == nInputBufLen) )
158*cdf0e10cSrcweir 	{
159*cdf0e10cSrcweir 		if( (nInputPos >= nInputEndPos) && fInputFile )
160*cdf0e10cSrcweir 		{
161*cdf0e10cSrcweir 			nInputEndPos = fread( pInput, 1, nInputBufLen, fInputFile );
162*cdf0e10cSrcweir 			nInputPos = 0;
163*cdf0e10cSrcweir 		}
164*cdf0e10cSrcweir 
165*cdf0e10cSrcweir 		while( nInputPos < nInputEndPos )
166*cdf0e10cSrcweir 		{
167*cdf0e10cSrcweir 			//immer eine Zeile lesen
168*cdf0e10cSrcweir 			if( nLen >= nLineBufLen )
169*cdf0e10cSrcweir 			{
170*cdf0e10cSrcweir 				nLineBufLen += 256;
171*cdf0e10cSrcweir 				// einen dazu fuer '\0'
172*cdf0e10cSrcweir 				pLine = (char*)rtl_reallocateMemory( pLine, nLineBufLen +1 );
173*cdf0e10cSrcweir 			}
174*cdf0e10cSrcweir 
175*cdf0e10cSrcweir 			// cr lf, lf cr, lf oder cr wird '\0'
176*cdf0e10cSrcweir 			if( pInput[ nInputPos ] == '\n' ){
177*cdf0e10cSrcweir 				nInputPos++;
178*cdf0e10cSrcweir 				if( cLastChar != '\r' ){
179*cdf0e10cSrcweir 					cLastChar = '\n';
180*cdf0e10cSrcweir 					pLine[ nLen++ ] = '\0';
181*cdf0e10cSrcweir 					goto END;
182*cdf0e10cSrcweir 				}
183*cdf0e10cSrcweir 			}
184*cdf0e10cSrcweir 			else if( pInput[ nInputPos ] == '\r' ){
185*cdf0e10cSrcweir 				nInputPos++;
186*cdf0e10cSrcweir 				if( cLastChar != '\n' ){
187*cdf0e10cSrcweir 					cLastChar = '\r';
188*cdf0e10cSrcweir 					pLine[ nLen++ ] = '\0';
189*cdf0e10cSrcweir 					goto END;
190*cdf0e10cSrcweir 				}
191*cdf0e10cSrcweir 			}
192*cdf0e10cSrcweir 			else
193*cdf0e10cSrcweir             {
194*cdf0e10cSrcweir 				pLine[ nLen++ ] = pInput[ nInputPos++ ];
195*cdf0e10cSrcweir                 if( nLen > 2 )
196*cdf0e10cSrcweir                 {
197*cdf0e10cSrcweir                     if( (unsigned char)pLine[nLen-3] == 0xef &&
198*cdf0e10cSrcweir                         (unsigned char)pLine[nLen-2] == 0xbb &&
199*cdf0e10cSrcweir                         (unsigned char)pLine[nLen-1] == 0xbf )
200*cdf0e10cSrcweir                     {
201*cdf0e10cSrcweir                         nLen -= 3;
202*cdf0e10cSrcweir                     }
203*cdf0e10cSrcweir                 }
204*cdf0e10cSrcweir             }
205*cdf0e10cSrcweir 		};
206*cdf0e10cSrcweir 	};
207*cdf0e10cSrcweir 
208*cdf0e10cSrcweir 	// Abbruch ueber EOF
209*cdf0e10cSrcweir 	pLine[ nLen ] = '\0';
210*cdf0e10cSrcweir 
211*cdf0e10cSrcweir END:
212*cdf0e10cSrcweir 	if( pTypCont->pEH->GetListFile() ){
213*cdf0e10cSrcweir 		char buf[ 10 ];
214*cdf0e10cSrcweir 
215*cdf0e10cSrcweir 		sprintf( buf, "%5d ", (int)GetLineNo() );
216*cdf0e10cSrcweir 		pTypCont->pEH->LstOut( buf );
217*cdf0e10cSrcweir 		pTypCont->pEH->LstOut( GetLine() );
218*cdf0e10cSrcweir 		pTypCont->pEH->LstOut( "\n" );
219*cdf0e10cSrcweir 	}
220*cdf0e10cSrcweir }
221*cdf0e10cSrcweir 
222*cdf0e10cSrcweir /*************************************************************************
223*cdf0e10cSrcweir |*
224*cdf0e10cSrcweir |*	  RscFileInst::SetError()
225*cdf0e10cSrcweir |*
226*cdf0e10cSrcweir |*	  Beschreibung
227*cdf0e10cSrcweir |*	  Ersterstellung	MM 05.11.91
228*cdf0e10cSrcweir |*	  Letzte Aenderung	MM 05.11.91
229*cdf0e10cSrcweir |*
230*cdf0e10cSrcweir *************************************************************************/
231*cdf0e10cSrcweir void RscFileInst::SetError( ERRTYPE aError )
232*cdf0e10cSrcweir {
233*cdf0e10cSrcweir 	if( aError.IsOk() )
234*cdf0e10cSrcweir 	{
235*cdf0e10cSrcweir 		aFirstError = aError;
236*cdf0e10cSrcweir 		nErrorLine	= GetLineNo();
237*cdf0e10cSrcweir 		nErrorPos	= GetScanPos() -1;
238*cdf0e10cSrcweir 	};
239*cdf0e10cSrcweir };
240