You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
79 lines
2.5 KiB
79 lines
2.5 KiB
13 years ago
|
/**********************************************************************
|
||
|
|
** Copyright (C) 2000 Trolltech AS. All rights reserved.
|
||
|
|
**
|
||
|
|
** proparser.cpp
|
||
|
|
**
|
||
|
|
** This file is part of Qt Linguist.
|
||
|
|
**
|
||
|
|
** See the file LICENSE included in the distribution for the usage
|
||
|
|
** and distribution terms.
|
||
|
|
**
|
||
|
|
** The file is provided AS IS with NO WARRANTY OF ANY KIND,
|
||
|
|
** INCLUDING THE WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR
|
||
|
|
** A PARTICULAR PURPOSE.
|
||
|
|
**
|
||
|
|
**********************************************************************/
|
||
|
|
|
||
|
|
#include <qregexp.h>
|
||
|
|
#include <qstringlist.h>
|
||
|
|
|
||
|
|
#include "proparser.h"
|
||
|
|
|
||
|
|
QMap<QString, QString> proFileTagMap( const QString& text )
|
||
|
|
{
|
||
|
|
QString t = text;
|
||
|
|
|
||
|
|
/*
|
||
|
|
Strip comments, merge lines ending with backslash, add
|
||
|
|
spaces around '=' and '+=', replace '\n' with ';', and
|
||
|
|
simplify white spaces.
|
||
|
|
*/
|
||
|
|
t.replace( QRegExp(QString("#[^\n]$")), QString(" ") );
|
||
|
|
t.replace( QRegExp(QString("\\\\\\s*\n")), QString(" ") );
|
||
|
|
t.replace( QRegExp(QString("=")), QString(" = ") );
|
||
|
|
t.replace( QRegExp(QString("\\+ =")), QString(" += ") );
|
||
|
|
t.replace( QRegExp(QString("\n")), QString(";") );
|
||
|
|
t = t.simplifyWhiteSpace();
|
||
|
|
|
||
|
|
QMap<QString, QString> tagMap;
|
||
|
|
|
||
|
|
QStringList lines = QStringList::split( QChar(';'), t );
|
||
|
|
QStringList::Iterator line;
|
||
|
|
for ( line = lines.begin(); line != lines.end(); ++line ) {
|
||
|
|
QStringList toks = QStringList::split( QChar(' '), *line );
|
||
|
|
|
||
|
|
if ( toks.count() >= 3 &&
|
||
|
|
(toks[1] == QString("=") || toks[1] == QString("+=")) ) {
|
||
|
|
QString tag = toks.first();
|
||
|
|
int k = tag.findRev( QChar(':') ); // as in 'unix:'
|
||
|
|
if ( k != -1 )
|
||
|
|
tag = tag.mid( k + 1 );
|
||
|
|
toks.remove( toks.begin() );
|
||
|
|
|
||
|
|
QString action = toks.first();
|
||
|
|
toks.remove( toks.begin() );
|
||
|
|
|
||
|
|
if ( tagMap.contains(tag) ) {
|
||
|
|
if ( action == QString("=") )
|
||
|
|
tagMap.replace( tag, toks.join(QChar(' ')) );
|
||
|
|
else
|
||
|
|
tagMap[tag] += QChar( ' ' ) + toks.join( QChar(' ') );
|
||
|
|
} else {
|
||
|
|
tagMap[tag] = toks.join( QChar(' ') );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
QRegExp var( "\\$\\$[a-zA-Z0-9_]+" );
|
||
|
|
QMap<QString, QString>::Iterator it;
|
||
|
|
for ( it = tagMap.begin(); it != tagMap.end(); ++it ) {
|
||
|
|
int i = 0;
|
||
|
|
|
||
|
|
while ( (i = var.search(it.data(), i)) != -1 ) {
|
||
|
|
int len = var.matchedLength();
|
||
|
|
(*it).replace( i, len, tagMap[(*it).mid(i + 2, len - 2)] );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return tagMap;
|
||
|
|
}
|