qt5base-lts/qmake/project.cpp
Oswald Buddenhagen f06a928978 fix bugs surrounding reading super cache when no local cache is present
we would ignore the early read variables and fail to export the super
cache's path to the project.

Change-Id: I3c467802b4af22f73be05b25dbd8ccb6196d28a8
Reviewed-by: Robin Burchell <robin+qt@viroteck.net>
2012-06-30 08:43:28 +02:00

3780 lines
144 KiB
C++

/****************************************************************************
**
** Copyright (C) 2012 Nokia Corporation and/or its subsidiary(-ies).
** Contact: http://www.qt-project.org/
**
** This file is part of the qmake application of the Qt Toolkit.
**
** $QT_BEGIN_LICENSE:LGPL$
** GNU Lesser General Public License Usage
** This file may be used under the terms of the GNU Lesser General Public
** License version 2.1 as published by the Free Software Foundation and
** appearing in the file LICENSE.LGPL included in the packaging of this
** file. Please review the following information to ensure the GNU Lesser
** General Public License version 2.1 requirements will be met:
** http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
**
** In addition, as a special exception, Nokia gives you certain additional
** rights. These rights are described in the Nokia Qt LGPL Exception
** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.
**
** GNU General Public License Usage
** Alternatively, this file may be used under the terms of the GNU General
** Public License version 3.0 as published by the Free Software Foundation
** and appearing in the file LICENSE.GPL included in the packaging of this
** file. Please review the following information to ensure the GNU General
** Public License version 3.0 requirements will be met:
** http://www.gnu.org/copyleft/gpl.html.
**
** Other Usage
** Alternatively, this file may be used in accordance with the terms and
** conditions contained in a signed written agreement between you and Nokia.
**
**
**
**
**
**
** $QT_END_LICENSE$
**
****************************************************************************/
#include "project.h"
#include "property.h"
#include "option.h"
#include "cachekeys.h"
#include "generators/metamakefile.h"
#include <qdatetime.h>
#include <qfile.h>
#include <qfileinfo.h>
#include <qdir.h>
#include <qregexp.h>
#include <qtextstream.h>
#include <qstack.h>
#include <qdebug.h>
#ifdef Q_OS_UNIX
#include <time.h>
#include <utime.h>
#include <errno.h>
#include <unistd.h>
#include <sys/stat.h>
#include <sys/utsname.h>
#elif defined(Q_OS_WIN32)
#include <windows.h>
#endif
#include <stdio.h>
#include <stdlib.h>
#ifdef Q_OS_WIN32
#define QT_POPEN _popen
#define QT_PCLOSE _pclose
#else
#define QT_POPEN popen
#define QT_PCLOSE pclose
#endif
QT_BEGIN_NAMESPACE
//expand functions
enum ExpandFunc { E_MEMBER=1, E_FIRST, E_LAST, E_CAT, E_FROMFILE, E_EVAL, E_LIST,
E_SPRINTF, E_FORMAT_NUMBER, E_JOIN, E_SPLIT, E_BASENAME, E_DIRNAME, E_SECTION,
E_FIND, E_SYSTEM, E_UNIQUE, E_REVERSE, E_QUOTE, E_ESCAPE_EXPAND,
E_UPPER, E_LOWER, E_FILES, E_PROMPT, E_RE_ESCAPE, E_VAL_ESCAPE, E_REPLACE,
E_SIZE, E_SORT_DEPENDS, E_RESOLVE_DEPENDS, E_ENUMERATE_VARS,
E_SHADOWED, E_ABSOLUTE_PATH, E_RELATIVE_PATH, E_CLEAN_PATH, E_NATIVE_PATH,
E_SHELL_QUOTE };
QHash<QString, ExpandFunc> qmake_expandFunctions()
{
static QHash<QString, ExpandFunc> *qmake_expand_functions = 0;
if(!qmake_expand_functions) {
qmake_expand_functions = new QHash<QString, ExpandFunc>;
qmakeAddCacheClear(qmakeDeleteCacheClear<QHash<QString, ExpandFunc> >, (void**)&qmake_expand_functions);
qmake_expand_functions->insert("member", E_MEMBER);
qmake_expand_functions->insert("first", E_FIRST);
qmake_expand_functions->insert("last", E_LAST);
qmake_expand_functions->insert("cat", E_CAT);
qmake_expand_functions->insert("fromfile", E_FROMFILE);
qmake_expand_functions->insert("eval", E_EVAL);
qmake_expand_functions->insert("list", E_LIST);
qmake_expand_functions->insert("sprintf", E_SPRINTF);
qmake_expand_functions->insert("format_number", E_FORMAT_NUMBER);
qmake_expand_functions->insert("join", E_JOIN);
qmake_expand_functions->insert("split", E_SPLIT);
qmake_expand_functions->insert("basename", E_BASENAME);
qmake_expand_functions->insert("dirname", E_DIRNAME);
qmake_expand_functions->insert("section", E_SECTION);
qmake_expand_functions->insert("find", E_FIND);
qmake_expand_functions->insert("system", E_SYSTEM);
qmake_expand_functions->insert("unique", E_UNIQUE);
qmake_expand_functions->insert("reverse", E_REVERSE);
qmake_expand_functions->insert("quote", E_QUOTE);
qmake_expand_functions->insert("escape_expand", E_ESCAPE_EXPAND);
qmake_expand_functions->insert("upper", E_UPPER);
qmake_expand_functions->insert("lower", E_LOWER);
qmake_expand_functions->insert("re_escape", E_RE_ESCAPE);
qmake_expand_functions->insert("val_escape", E_VAL_ESCAPE);
qmake_expand_functions->insert("files", E_FILES);
qmake_expand_functions->insert("prompt", E_PROMPT);
qmake_expand_functions->insert("replace", E_REPLACE);
qmake_expand_functions->insert("size", E_SIZE);
qmake_expand_functions->insert("sort_depends", E_SORT_DEPENDS);
qmake_expand_functions->insert("resolve_depends", E_RESOLVE_DEPENDS);
qmake_expand_functions->insert("enumerate_vars", E_ENUMERATE_VARS);
qmake_expand_functions->insert("shadowed", E_SHADOWED);
qmake_expand_functions->insert("absolute_path", E_ABSOLUTE_PATH);
qmake_expand_functions->insert("relative_path", E_RELATIVE_PATH);
qmake_expand_functions->insert("clean_path", E_CLEAN_PATH);
qmake_expand_functions->insert("native_path", E_NATIVE_PATH);
qmake_expand_functions->insert("shell_quote", E_SHELL_QUOTE);
}
return *qmake_expand_functions;
}
//replace functions
enum TestFunc { T_REQUIRES=1, T_GREATERTHAN, T_LESSTHAN, T_EQUALS,
T_EXISTS, T_EXPORT, T_CLEAR, T_UNSET, T_EVAL, T_CONFIG, T_SYSTEM,
T_RETURN, T_BREAK, T_NEXT, T_DEFINED, T_CONTAINS, T_INFILE,
T_COUNT, T_ISEMPTY, T_INCLUDE, T_LOAD,
T_DEBUG, T_ERROR, T_MESSAGE, T_WARNING, T_LOG,
T_IF, T_OPTION, T_CACHE, T_MKPATH, T_WRITE_FILE, T_TOUCH };
QHash<QString, TestFunc> qmake_testFunctions()
{
static QHash<QString, TestFunc> *qmake_test_functions = 0;
if(!qmake_test_functions) {
qmake_test_functions = new QHash<QString, TestFunc>;
qmake_test_functions->insert("requires", T_REQUIRES);
qmake_test_functions->insert("greaterThan", T_GREATERTHAN);
qmake_test_functions->insert("lessThan", T_LESSTHAN);
qmake_test_functions->insert("equals", T_EQUALS);
qmake_test_functions->insert("isEqual", T_EQUALS);
qmake_test_functions->insert("exists", T_EXISTS);
qmake_test_functions->insert("export", T_EXPORT);
qmake_test_functions->insert("clear", T_CLEAR);
qmake_test_functions->insert("unset", T_UNSET);
qmake_test_functions->insert("eval", T_EVAL);
qmake_test_functions->insert("CONFIG", T_CONFIG);
qmake_test_functions->insert("if", T_IF);
qmake_test_functions->insert("isActiveConfig", T_CONFIG);
qmake_test_functions->insert("system", T_SYSTEM);
qmake_test_functions->insert("return", T_RETURN);
qmake_test_functions->insert("break", T_BREAK);
qmake_test_functions->insert("next", T_NEXT);
qmake_test_functions->insert("defined", T_DEFINED);
qmake_test_functions->insert("contains", T_CONTAINS);
qmake_test_functions->insert("infile", T_INFILE);
qmake_test_functions->insert("count", T_COUNT);
qmake_test_functions->insert("isEmpty", T_ISEMPTY);
qmake_test_functions->insert("include", T_INCLUDE);
qmake_test_functions->insert("load", T_LOAD);
qmake_test_functions->insert("debug", T_DEBUG);
qmake_test_functions->insert("error", T_ERROR);
qmake_test_functions->insert("message", T_MESSAGE);
qmake_test_functions->insert("warning", T_WARNING);
qmake_test_functions->insert("log", T_LOG);
qmake_test_functions->insert("option", T_OPTION);
qmake_test_functions->insert("cache", T_CACHE);
qmake_test_functions->insert("mkpath", T_MKPATH);
qmake_test_functions->insert("write_file", T_WRITE_FILE);
qmake_test_functions->insert("touch", T_TOUCH);
}
return *qmake_test_functions;
}
struct parser_info {
QString file;
int line_no;
bool from_file;
} parser;
static QString cached_source_root;
static QString cached_build_root;
static QStringList cached_qmakepath;
static QStringList cached_qmakefeatures;
static QStringList *all_feature_roots[2] = { 0, 0 };
static void
invalidateFeatureRoots()
{
for (int i = 0; i < 2; i++)
if (all_feature_roots[i])
all_feature_roots[i]->clear();
}
static QString remove_quotes(const QString &arg)
{
const ushort SINGLEQUOTE = '\'';
const ushort DOUBLEQUOTE = '"';
const QChar *arg_data = arg.data();
const ushort first = arg_data->unicode();
const int arg_len = arg.length();
if(first == SINGLEQUOTE || first == DOUBLEQUOTE) {
const ushort last = (arg_data+arg_len-1)->unicode();
if(last == first)
return arg.mid(1, arg_len-2);
}
return arg;
}
static QString varMap(const QString &x)
{
QString ret(x);
if(ret == "INTERFACES")
ret = "FORMS";
else if(ret == "QMAKE_POST_BUILD")
ret = "QMAKE_POST_LINK";
else if(ret == "TARGETDEPS")
ret = "POST_TARGETDEPS";
else if(ret == "LIBPATH")
ret = "QMAKE_LIBDIR";
else if(ret == "QMAKE_EXT_MOC")
ret = "QMAKE_EXT_CPP_MOC";
else if(ret == "QMAKE_MOD_MOC")
ret = "QMAKE_H_MOD_MOC";
else if(ret == "QMAKE_LFLAGS_SHAPP")
ret = "QMAKE_LFLAGS_APP";
else if(ret == "PRECOMPH")
ret = "PRECOMPILED_HEADER";
else if(ret == "PRECOMPCPP")
ret = "PRECOMPILED_SOURCE";
else if(ret == "INCPATH")
ret = "INCLUDEPATH";
else if(ret == "QMAKE_EXTRA_WIN_COMPILERS" || ret == "QMAKE_EXTRA_UNIX_COMPILERS")
ret = "QMAKE_EXTRA_COMPILERS";
else if(ret == "QMAKE_EXTRA_WIN_TARGETS" || ret == "QMAKE_EXTRA_UNIX_TARGETS")
ret = "QMAKE_EXTRA_TARGETS";
else if(ret == "QMAKE_EXTRA_UNIX_INCLUDES")
ret = "QMAKE_EXTRA_INCLUDES";
else if(ret == "QMAKE_EXTRA_UNIX_VARIABLES")
ret = "QMAKE_EXTRA_VARIABLES";
else if(ret == "QMAKE_RPATH")
ret = "QMAKE_LFLAGS_RPATH";
else if(ret == "QMAKE_FRAMEWORKDIR")
ret = "QMAKE_FRAMEWORKPATH";
else if(ret == "QMAKE_FRAMEWORKDIR_FLAGS")
ret = "QMAKE_FRAMEWORKPATH_FLAGS";
else if(ret == "IN_PWD")
ret = "PWD";
else
return ret;
warn_msg(WarnDeprecated, "%s:%d: Variable %s is deprecated; use %s instead.",
parser.file.toLatin1().constData(), parser.line_no,
x.toLatin1().constData(), ret.toLatin1().constData());
return ret;
}
static QStringList split_arg_list(const QString &params)
{
int quote = 0;
QStringList args;
const ushort LPAREN = '(';
const ushort RPAREN = ')';
const ushort SINGLEQUOTE = '\'';
const ushort DOUBLEQUOTE = '"';
const ushort BACKSLASH = '\\';
const ushort COMMA = ',';
const ushort SPACE = ' ';
//const ushort TAB = '\t';
const QChar *params_data = params.data();
const int params_len = params.length();
for(int last = 0; ;) {
while(last < params_len && (params_data[last].unicode() == SPACE
/*|| params_data[last].unicode() == TAB*/))
++last;
for(int x = last, parens = 0; ; x++) {
if(x == params_len) {
while(x > last && params_data[x-1].unicode() == SPACE)
--x;
args << params.mid(last, x - last);
// Could do a check for unmatched parens here, but split_value_list()
// is called on all our output, so mistakes will be caught anyway.
return args;
}
ushort unicode = params_data[x].unicode();
if(x != (int)params_len-1 && unicode == BACKSLASH &&
(params_data[x+1].unicode() == SINGLEQUOTE || params_data[x+1].unicode() == DOUBLEQUOTE)) {
x++; //get that 'escape'
} else if(quote && unicode == quote) {
quote = 0;
} else if(!quote && (unicode == SINGLEQUOTE || unicode == DOUBLEQUOTE)) {
quote = unicode;
} else if(unicode == RPAREN) {
--parens;
} else if(unicode == LPAREN) {
++parens;
}
if(!parens && !quote && unicode == COMMA) {
int prev = last;
last = x+1;
while(x > prev && params_data[x-1].unicode() == SPACE)
--x;
args << params.mid(prev, x - prev);
break;
}
}
}
}
static QStringList split_value_list(const QString &vals)
{
QString build;
QStringList ret;
ushort quote = 0;
int parens = 0;
const ushort LPAREN = '(';
const ushort RPAREN = ')';
const ushort SINGLEQUOTE = '\'';
const ushort DOUBLEQUOTE = '"';
const ushort BACKSLASH = '\\';
ushort unicode;
const QChar *vals_data = vals.data();
const int vals_len = vals.length();
for(int x = 0; x < vals_len; x++) {
unicode = vals_data[x].unicode();
if(x != (int)vals_len-1 && unicode == BACKSLASH &&
(vals_data[x+1].unicode() == SINGLEQUOTE || vals_data[x+1].unicode() == DOUBLEQUOTE)) {
build += vals_data[x++]; //get that 'escape'
} else if(quote && unicode == quote) {
quote = 0;
} else if(!quote && (unicode == SINGLEQUOTE || unicode == DOUBLEQUOTE)) {
quote = unicode;
} else if(unicode == RPAREN) {
--parens;
} else if(unicode == LPAREN) {
++parens;
}
if(!parens && !quote && (vals_data[x] == Option::field_sep)) {
ret << build;
build.clear();
} else {
build += vals_data[x];
}
}
if(!build.isEmpty())
ret << build;
if (parens)
warn_msg(WarnDeprecated, "%s:%d: Unmatched parentheses are deprecated.",
parser.file.toLatin1().constData(), parser.line_no);
// Could do a check for unmatched quotes here, but doVariableReplaceExpand()
// is called on all our output, so mistakes will be caught anyway.
return ret;
}
//just a parsable entity
struct ParsableBlock
{
ParsableBlock() : ref_cnt(1) { }
virtual ~ParsableBlock() { }
struct Parse {
QString text;
parser_info pi;
Parse(const QString &t) : text(t){ pi = parser; }
};
QList<Parse> parselist;
inline int ref() { return ++ref_cnt; }
inline int deref() { return --ref_cnt; }
protected:
int ref_cnt;
virtual bool continueBlock() = 0;
bool eval(QMakeProject *p, QHash<QString, QStringList> &place);
};
bool ParsableBlock::eval(QMakeProject *p, QHash<QString, QStringList> &place)
{
//save state
parser_info pi = parser;
const int block_count = p->scope_blocks.count();
//execute
bool ret = true;
for(int i = 0; i < parselist.count(); i++) {
parser = parselist.at(i).pi;
if(!(ret = p->parse(parselist.at(i).text, place)) || !continueBlock())
break;
}
//restore state
parser = pi;
while(p->scope_blocks.count() > block_count)
p->scope_blocks.pop();
return ret;
}
//defined functions
struct FunctionBlock : public ParsableBlock
{
FunctionBlock() : calling_place(0), scope_level(1), cause_return(false) { }
QHash<QString, QStringList> vars;
QHash<QString, QStringList> *calling_place;
QStringList return_value;
int scope_level;
bool cause_return;
bool exec(const QList<QStringList> &args,
QMakeProject *p, QHash<QString, QStringList> &place, QStringList &functionReturn);
virtual bool continueBlock() { return !cause_return; }
};
bool FunctionBlock::exec(const QList<QStringList> &args,
QMakeProject *proj, QHash<QString, QStringList> &place,
QStringList &functionReturn)
{
//save state
#if 1
calling_place = &place;
#else
calling_place = &proj->variables();
#endif
return_value.clear();
cause_return = false;
//execute
#if 0
vars = proj->variables(); // should be place so that local variables can be inherited
#else
vars = place;
#endif
vars["ARGS"].clear();
for(int i = 0; i < args.count(); i++) {
vars["ARGS"] += args[i];
vars[QString::number(i+1)] = args[i];
}
bool ret = ParsableBlock::eval(proj, vars);
functionReturn = return_value;
//restore state
calling_place = 0;
return_value.clear();
vars.clear();
return ret;
}
//loops
struct IteratorBlock : public ParsableBlock
{
IteratorBlock() : scope_level(1), loop_forever(false), cause_break(false), cause_next(false) { }
int scope_level;
struct Test {
QString func;
QStringList args;
bool invert;
parser_info pi;
Test(const QString &f, QStringList &a, bool i) : func(f), args(a), invert(i) { pi = parser; }
};
QList<Test> test;
QString variable;
bool loop_forever, cause_break, cause_next;
QStringList list;
bool exec(QMakeProject *p, QHash<QString, QStringList> &place);
virtual bool continueBlock() { return !cause_next && !cause_break; }
};
bool IteratorBlock::exec(QMakeProject *p, QHash<QString, QStringList> &place)
{
bool ret = true;
QStringList::Iterator it;
if(!loop_forever)
it = list.begin();
int iterate_count = 0;
//save state
IteratorBlock *saved_iterator = p->iterator;
p->iterator = this;
//do the loop
while(loop_forever || it != list.end()) {
cause_next = cause_break = false;
if(!loop_forever && (*it).isEmpty()) { //ignore empty items
++it;
continue;
}
//set up the loop variable
QStringList va;
if(!variable.isEmpty()) {
va = place[variable];
if(loop_forever)
place[variable] = QStringList(QString::number(iterate_count));
else
place[variable] = QStringList(*it);
}
//do the iterations
bool succeed = true;
for(QList<Test>::Iterator test_it = test.begin(); test_it != test.end(); ++test_it) {
parser = (*test_it).pi;
succeed = p->doProjectTest((*test_it).func, (*test_it).args, place);
if((*test_it).invert)
succeed = !succeed;
if(!succeed)
break;
}
if(succeed)
ret = ParsableBlock::eval(p, place);
//restore the variable in the map
if(!variable.isEmpty())
place[variable] = va;
//loop counters
if(!loop_forever)
++it;
iterate_count++;
if(!ret || cause_break)
break;
}
//restore state
p->iterator = saved_iterator;
return ret;
}
QMakeProject::ScopeBlock::~ScopeBlock()
{
#if 0
if(iterate)
delete iterate;
#endif
}
static void qmake_error_msg(const QString &msg)
{
fprintf(stderr, "%s:%d: %s\n", parser.file.toLatin1().constData(), parser.line_no,
msg.toLatin1().constData());
}
/*
1) environment variable QMAKEFEATURES (as separated by colons)
2) property variable QMAKEFEATURES (as separated by colons)
3) <project_root> (where .qmake.cache lives) + FEATURES_DIR
4) environment variable QMAKEPATH (as separated by colons) + /mkspecs/FEATURES_DIR
5) your QMAKESPEC/features dir
6) your data_install/mkspecs/FEATURES_DIR
7) your QMAKESPEC/../FEATURES_DIR dir
FEATURES_DIR is defined as:
1) features/(unix|win32|macx)/
2) features/
*/
QStringList QMakeProject::qmakeFeaturePaths()
{
const QString mkspecs_concat = QLatin1String("/mkspecs");
const QString base_concat = QLatin1String("/features");
QStringList concat;
foreach (const QString &sfx, values("QMAKE_PLATFORM"))
concat << base_concat + QLatin1Char('/') + sfx;
concat << base_concat;
QStringList feature_roots = splitPathList(QString::fromLocal8Bit(qgetenv("QMAKEFEATURES")));
feature_roots += cached_qmakefeatures;
if(prop)
feature_roots += splitPathList(prop->value("QMAKEFEATURES"));
QStringList feature_bases;
if (!cached_build_root.isEmpty())
feature_bases << cached_build_root;
if (!cached_source_root.isEmpty())
feature_bases << cached_source_root;
QStringList qmakepath = splitPathList(QString::fromLocal8Bit(qgetenv("QMAKEPATH")));
qmakepath += cached_qmakepath;
foreach (const QString &path, qmakepath)
feature_bases << (path + mkspecs_concat);
if (!real_spec.isEmpty()) {
// The spec is already platform-dependent, so no subdirs here.
feature_roots << real_spec + base_concat;
// Also check directly under the root directory of the mkspecs collection
QFileInfo specfi(real_spec);
QDir specrootdir(specfi.absolutePath());
while (!specrootdir.isRoot()) {
const QString specrootpath = specrootdir.path();
if (specrootpath.endsWith(mkspecs_concat)) {
if (QFile::exists(specrootpath + base_concat))
feature_bases << specrootpath;
break;
}
specrootdir.cdUp();
}
}
feature_bases << (QLibraryInfo::rawLocation(QLibraryInfo::HostDataPath,
QLibraryInfo::EffectivePaths) + mkspecs_concat);
foreach (const QString &fb, feature_bases)
foreach (const QString &cc, concat)
feature_roots << (fb + cc);
feature_roots.removeDuplicates();
QStringList ret;
foreach (const QString &root, feature_roots)
if (QFileInfo(root).exists())
ret << root;
return ret;
}
QStringList qmake_mkspec_paths()
{
QStringList ret;
const QString concat = QLatin1String("/mkspecs");
QStringList qmakepath = splitPathList(QString::fromLocal8Bit(qgetenv("QMAKEPATH")));
qmakepath += cached_qmakepath;
foreach (const QString &path, qmakepath)
ret << (path + concat);
if (!cached_build_root.isEmpty())
ret << cached_build_root + concat;
if (!cached_source_root.isEmpty())
ret << cached_source_root + concat;
ret << QLibraryInfo::rawLocation(QLibraryInfo::HostDataPath, QLibraryInfo::EffectivePaths) + concat;
ret.removeDuplicates();
return ret;
}
static void
setTemplate(QStringList &varlist)
{
if (!Option::user_template.isEmpty()) { // Don't permit override
varlist = QStringList(Option::user_template);
} else {
if (varlist.isEmpty())
varlist << "app";
else
varlist.erase(varlist.begin() + 1, varlist.end());
}
if (!Option::user_template_prefix.isEmpty()
&& !varlist.first().startsWith(Option::user_template_prefix)) {
varlist.first().prepend(Option::user_template_prefix);
}
}
QMakeProject::~QMakeProject()
{
if(own_prop)
delete prop;
cleanup();
}
void
QMakeProject::init(QMakeProperty *p)
{
if(!p) {
prop = new QMakeProperty;
own_prop = true;
} else {
prop = p;
own_prop = false;
}
host_build = false;
reset();
}
void
QMakeProject::cleanup()
{
for (QHash<QString, FunctionBlock*>::iterator it = replaceFunctions.begin(); it != replaceFunctions.end(); ++it)
if (!it.value()->deref())
delete it.value();
replaceFunctions.clear();
for (QHash<QString, FunctionBlock*>::iterator it = testFunctions.begin(); it != testFunctions.end(); ++it)
if (!it.value()->deref())
delete it.value();
testFunctions.clear();
}
// Duplicate project. It is *not* allowed to call the complex read() functions on the copy.
QMakeProject::QMakeProject(QMakeProject *p, const QHash<QString, QStringList> *_vars)
{
init(p->properties());
vars = _vars ? *_vars : p->variables();
host_build = p->host_build;
for(QHash<QString, FunctionBlock*>::iterator it = p->replaceFunctions.begin(); it != p->replaceFunctions.end(); ++it) {
it.value()->ref();
replaceFunctions.insert(it.key(), it.value());
}
for(QHash<QString, FunctionBlock*>::iterator it = p->testFunctions.begin(); it != p->testFunctions.end(); ++it) {
it.value()->ref();
testFunctions.insert(it.key(), it.value());
}
}
void
QMakeProject::reset()
{
// scope_blocks starts with one non-ignoring entity
scope_blocks.clear();
scope_blocks.push(ScopeBlock());
iterator = 0;
function = 0;
backslashWarned = false;
need_restart = false;
}
bool
QMakeProject::parse(const QString &t, QHash<QString, QStringList> &place, int numLines)
{
// To preserve the integrity of any UTF-8 characters in .pro file, temporarily replace the
// non-breaking space (0xA0) characters with another non-space character, so that
// QString::simplified() call will not replace it with space.
// Note: There won't be any two byte characters in .pro files, so 0x10A0 should be a safe
// replacement character.
static QChar nbsp(0xA0);
static QChar nbspFix(0x01A0);
QString s;
if (t.indexOf(nbsp) != -1) {
s = t;
s.replace(nbsp, nbspFix);
s = s.simplified();
s.replace(nbspFix, nbsp);
} else {
s = t.simplified();
}
int hash_mark = s.indexOf("#");
if(hash_mark != -1) //good bye comments
s = s.left(hash_mark);
if(s.isEmpty()) // blank_line
return true;
if(scope_blocks.top().ignore) {
bool continue_parsing = false;
// adjust scope for each block which appears on a single line
for(int i = 0; i < s.length(); i++) {
if(s[i] == '{') {
scope_blocks.push(ScopeBlock(true));
} else if(s[i] == '}') {
if(scope_blocks.count() == 1) {
fprintf(stderr, "Braces mismatch %s:%d\n", parser.file.toLatin1().constData(), parser.line_no);
return false;
}
ScopeBlock sb = scope_blocks.pop();
if(sb.iterate) {
sb.iterate->exec(this, place);
delete sb.iterate;
sb.iterate = 0;
}
if(!scope_blocks.top().ignore) {
debug_msg(1, "Project Parser: %s:%d : Leaving block %d", parser.file.toLatin1().constData(),
parser.line_no, scope_blocks.count()+1);
s = s.mid(i+1).trimmed();
continue_parsing = !s.isEmpty();
break;
}
}
}
if(!continue_parsing) {
debug_msg(1, "Project Parser: %s:%d : Ignored due to block being false.",
parser.file.toLatin1().constData(), parser.line_no);
return true;
}
}
if(function) {
QString append;
int d_off = 0;
const QChar *d = s.unicode();
bool function_finished = false;
while(d_off < s.length()) {
if(*(d+d_off) == QLatin1Char('}')) {
function->scope_level--;
if(!function->scope_level) {
function_finished = true;
break;
}
} else if(*(d+d_off) == QLatin1Char('{')) {
function->scope_level++;
}
append += *(d+d_off);
++d_off;
}
if(!append.isEmpty())
function->parselist.append(IteratorBlock::Parse(append));
if(function_finished) {
function = 0;
s = QString(d+d_off, s.length()-d_off);
} else {
return true;
}
} else if(IteratorBlock *it = scope_blocks.top().iterate) {
QString append;
int d_off = 0;
const QChar *d = s.unicode();
bool iterate_finished = false;
while(d_off < s.length()) {
if(*(d+d_off) == QLatin1Char('}')) {
it->scope_level--;
if(!it->scope_level) {
iterate_finished = true;
break;
}
} else if(*(d+d_off) == QLatin1Char('{')) {
it->scope_level++;
}
append += *(d+d_off);
++d_off;
}
if(!append.isEmpty())
scope_blocks.top().iterate->parselist.append(IteratorBlock::Parse(append));
if(iterate_finished) {
scope_blocks.top().iterate = 0;
bool ret = it->exec(this, place);
delete it;
if(!ret)
return false;
s = s.mid(d_off);
} else {
return true;
}
}
QString scope, var, op;
QStringList val;
#define SKIP_WS(d, o, l) while(o < l && (*(d+o) == QLatin1Char(' ') || *(d+o) == QLatin1Char('\t'))) ++o
const QChar *d = s.unicode();
int d_off = 0;
SKIP_WS(d, d_off, s.length());
IteratorBlock *iterator = 0;
bool scope_failed = false, else_line = false, or_op=false;
QChar quote = 0;
int parens = 0, scope_count=0, start_block = 0;
while(d_off < s.length()) {
if(!parens) {
if(*(d+d_off) == QLatin1Char('='))
break;
if(*(d+d_off) == QLatin1Char('+') || *(d+d_off) == QLatin1Char('-') ||
*(d+d_off) == QLatin1Char('*') || *(d+d_off) == QLatin1Char('~')) {
if(*(d+d_off+1) == QLatin1Char('=')) {
break;
} else if(*(d+d_off+1) == QLatin1Char(' ')) {
const QChar *k = d+d_off+1;
int k_off = 0;
SKIP_WS(k, k_off, s.length()-d_off);
if(*(k+k_off) == QLatin1Char('=')) {
QString msg;
qmake_error_msg(QString(d+d_off, 1) + "must be followed immediately by =");
return false;
}
}
}
}
if(!quote.isNull()) {
if(*(d+d_off) == quote)
quote = QChar();
} else if(*(d+d_off) == '(') {
++parens;
} else if(*(d+d_off) == ')') {
--parens;
} else if(*(d+d_off) == '"' /*|| *(d+d_off) == '\''*/) {
quote = *(d+d_off);
}
if(!parens && quote.isNull() &&
(*(d+d_off) == QLatin1Char(':') || *(d+d_off) == QLatin1Char('{') ||
*(d+d_off) == QLatin1Char(')') || *(d+d_off) == QLatin1Char('|'))) {
scope_count++;
scope = var.trimmed();
if(*(d+d_off) == QLatin1Char(')'))
scope += *(d+d_off); // need this
var = "";
bool test = scope_failed;
if(scope.isEmpty()) {
test = true;
} else if(scope.toLower() == "else") { //else is a builtin scope here as it modifies state
if(scope_count != 1 || scope_blocks.top().else_status == ScopeBlock::TestNone) {
qmake_error_msg(("Unexpected " + scope + " ('" + s + "')").toLatin1());
return false;
}
else_line = true;
test = (scope_blocks.top().else_status == ScopeBlock::TestSeek);
debug_msg(1, "Project Parser: %s:%d : Else%s %s.", parser.file.toLatin1().constData(), parser.line_no,
scope == "else" ? "" : QString(" (" + scope + ")").toLatin1().constData(),
test ? "considered" : "excluded");
} else {
QString comp_scope = scope;
bool invert_test = (comp_scope.at(0) == QLatin1Char('!'));
if(invert_test)
comp_scope = comp_scope.mid(1);
int lparen = comp_scope.indexOf('(');
if(or_op == scope_failed) {
if(lparen != -1) { // if there is an lparen in the scope, it IS a function
int rparen = comp_scope.lastIndexOf(')');
if(rparen == -1) {
qmake_error_msg("Function missing right paren: " + comp_scope);
return false;
}
QString func = comp_scope.left(lparen);
QStringList args = split_arg_list(comp_scope.mid(lparen+1, rparen - lparen - 1));
if(function) {
fprintf(stderr, "%s:%d: No tests can come after a function definition!\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
} else if(func == "for") { //for is a builtin function here, as it modifies state
if(args.count() > 2 || args.count() < 1) {
fprintf(stderr, "%s:%d: for(iterate, list) requires two arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
} else if(iterator) {
fprintf(stderr, "%s:%d unexpected nested for()\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
iterator = new IteratorBlock;
QString it_list;
if(args.count() == 1) {
doVariableReplace(args[0], place);
it_list = args[0];
if(args[0] != "ever") {
delete iterator;
iterator = 0;
fprintf(stderr, "%s:%d: for(iterate, list) requires two arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
it_list = "forever";
} else if(args.count() == 2) {
iterator->variable = args[0];
doVariableReplace(args[1], place);
it_list = args[1];
}
QStringList list = place[it_list];
if(list.isEmpty()) {
if(it_list == "forever") {
iterator->loop_forever = true;
} else {
int dotdot = it_list.indexOf("..");
if(dotdot != -1) {
bool ok;
int start = it_list.left(dotdot).toInt(&ok);
if(ok) {
int end = it_list.mid(dotdot+2).toInt(&ok);
if(ok) {
if(start < end) {
for(int i = start; i <= end; i++)
list << QString::number(i);
} else {
for(int i = start; i >= end; i--)
list << QString::number(i);
}
}
}
}
}
}
iterator->list = list;
test = !invert_test;
} else if(iterator) {
iterator->test.append(IteratorBlock::Test(func, args, invert_test));
test = !invert_test;
} else if(func == "defineTest" || func == "defineReplace") {
if(!function_blocks.isEmpty()) {
fprintf(stderr,
"%s:%d: cannot define a function within another definition.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
if(args.count() != 1) {
fprintf(stderr, "%s:%d: %s(function_name) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no, func.toLatin1().constData());
return false;
}
QHash<QString, FunctionBlock*> *map = 0;
if(func == "defineTest")
map = &testFunctions;
else
map = &replaceFunctions;
#if 0
if(!map || map->contains(args[0])) {
fprintf(stderr, "%s:%d: Function[%s] multiply defined.\n",
parser.file.toLatin1().constData(), parser.line_no, args[0].toLatin1().constData());
return false;
}
#endif
function = new FunctionBlock;
map->insert(args[0], function);
test = true;
} else {
test = doProjectTest(func, args, place);
if(*(d+d_off) == QLatin1Char(')') && d_off == s.length()-1) {
if(invert_test)
test = !test;
scope_blocks.top().else_status =
(test ? ScopeBlock::TestFound : ScopeBlock::TestSeek);
return true; // assume we are done
}
}
} else {
QString cscope = comp_scope.trimmed();
doVariableReplace(cscope, place);
test = isActiveConfig(cscope.trimmed(), true, &place);
}
if(invert_test)
test = !test;
}
}
if(!test && !scope_failed)
debug_msg(1, "Project Parser: %s:%d : Test (%s) failed.", parser.file.toLatin1().constData(),
parser.line_no, scope.toLatin1().constData());
if(test == or_op)
scope_failed = !test;
or_op = (*(d+d_off) == QLatin1Char('|'));
if(*(d+d_off) == QLatin1Char('{')) { // scoping block
start_block++;
if(iterator) {
for(int off = 0, braces = 0; true; ++off) {
if(*(d+d_off+off) == QLatin1Char('{'))
++braces;
else if(*(d+d_off+off) == QLatin1Char('}') && braces)
--braces;
if(!braces || d_off+off == s.length()) {
iterator->parselist.append(s.mid(d_off, off-1));
if(braces > 1)
iterator->scope_level += braces-1;
d_off += off-1;
break;
}
}
}
}
} else if(!parens && *(d+d_off) == QLatin1Char('}')) {
if(start_block) {
--start_block;
} else if(!scope_blocks.count()) {
warn_msg(WarnParser, "Possible braces mismatch %s:%d", parser.file.toLatin1().constData(), parser.line_no);
} else {
if(scope_blocks.count() == 1) {
fprintf(stderr, "Braces mismatch %s:%d\n", parser.file.toLatin1().constData(), parser.line_no);
return false;
}
debug_msg(1, "Project Parser: %s:%d : Leaving block %d", parser.file.toLatin1().constData(),
parser.line_no, scope_blocks.count());
ScopeBlock sb = scope_blocks.pop();
if(sb.iterate)
sb.iterate->exec(this, place);
}
} else {
var += *(d+d_off);
}
++d_off;
}
var = var.trimmed();
if(!else_line || (else_line && !scope_failed))
scope_blocks.top().else_status = (!scope_failed ? ScopeBlock::TestFound : ScopeBlock::TestSeek);
if(start_block) {
ScopeBlock next_block(scope_failed);
next_block.iterate = iterator;
if(iterator)
next_block.else_status = ScopeBlock::TestNone;
else if(scope_failed)
next_block.else_status = ScopeBlock::TestSeek;
else
next_block.else_status = ScopeBlock::TestFound;
scope_blocks.push(next_block);
debug_msg(1, "Project Parser: %s:%d : Entering block %d (%d). [%s]", parser.file.toLatin1().constData(),
parser.line_no, scope_blocks.count(), scope_failed, s.toLatin1().constData());
} else if(iterator) {
iterator->parselist.append(QString(var+s.mid(d_off)));
bool ret = iterator->exec(this, place);
delete iterator;
return ret;
}
if((!scope_count && !var.isEmpty()) || (scope_count == 1 && else_line))
scope_blocks.top().else_status = ScopeBlock::TestNone;
if(d_off == s.length()) {
if(!var.trimmed().isEmpty())
qmake_error_msg(("Parse Error ('" + s + "')").toLatin1());
return var.isEmpty(); // allow just a scope
}
SKIP_WS(d, d_off, s.length());
for(; d_off < s.length() && op.indexOf('=') == -1; op += *(d+(d_off++)))
;
op.replace(QRegExp("\\s"), "");
SKIP_WS(d, d_off, s.length());
QString vals = s.mid(d_off); // vals now contains the space separated list of values
int rbraces = vals.count('}'), lbraces = vals.count('{');
if(scope_blocks.count() > 1 && rbraces - lbraces == 1 && vals.endsWith('}')) {
debug_msg(1, "Project Parser: %s:%d : Leaving block %d", parser.file.toLatin1().constData(),
parser.line_no, scope_blocks.count());
ScopeBlock sb = scope_blocks.pop();
if(sb.iterate)
sb.iterate->exec(this, place);
vals.truncate(vals.length()-1);
} else if(rbraces != lbraces) {
warn_msg(WarnParser, "Possible braces mismatch {%s} %s:%d",
vals.toLatin1().constData(), parser.file.toLatin1().constData(), parser.line_no);
}
if(scope_failed)
return true; // oh well
#undef SKIP_WS
doVariableReplace(var, place);
var = varMap(var); //backwards compatibility
if(vals.contains('=') && numLines > 1)
warn_msg(WarnParser, "Possible accidental line continuation: {%s} at %s:%d",
var.toLatin1().constData(), parser.file.toLatin1().constData(), parser.line_no);
QStringList &varlist = place[var]; // varlist is the list in the symbol table
if(Option::debug_level >= 1) {
QString tmp_vals = vals;
doVariableReplace(tmp_vals, place);
debug_msg(1, "Project Parser: %s:%d :%s: :%s: (%s)", parser.file.toLatin1().constData(), parser.line_no,
var.toLatin1().constData(), op.toLatin1().constData(), tmp_vals.toLatin1().constData());
}
// now do the operation
if(op == "~=") {
doVariableReplace(vals, place);
if(vals.length() < 4 || vals.at(0) != 's') {
qmake_error_msg(("~= operator only can handle s/// function ('" +
s + "')").toLatin1());
return false;
}
QChar sep = vals.at(1);
QStringList func = vals.split(sep);
if(func.count() < 3 || func.count() > 4) {
qmake_error_msg(("~= operator only can handle s/// function ('" +
s + "')").toLatin1());
return false;
}
bool global = false, case_sense = true, quote = false;
if(func.count() == 4) {
global = func[3].indexOf('g') != -1;
case_sense = func[3].indexOf('i') == -1;
quote = func[3].indexOf('q') != -1;
}
QString from = func[1], to = func[2];
if(quote)
from = QRegExp::escape(from);
QRegExp regexp(from, case_sense ? Qt::CaseSensitive : Qt::CaseInsensitive);
for(QStringList::Iterator varit = varlist.begin(); varit != varlist.end();) {
if((*varit).contains(regexp)) {
(*varit) = (*varit).replace(regexp, to);
if ((*varit).isEmpty())
varit = varlist.erase(varit);
else
++varit;
if(!global)
break;
} else
++varit;
}
} else {
QStringList vallist;
{
//doVariableReplace(vals, place);
QStringList tmp = split_value_list(vals);
for(int i = 0; i < tmp.size(); ++i)
vallist += doVariableReplaceExpand(tmp[i], place);
}
if(op == "=") {
if(!varlist.isEmpty()) {
bool send_warning = false;
if(var != "TEMPLATE" && var != "TARGET") {
QSet<QString> incoming_vals = vallist.toSet();
for(int i = 0; i < varlist.size(); ++i) {
const QString var = varlist.at(i).trimmed();
if(!var.isEmpty() && !incoming_vals.contains(var)) {
send_warning = true;
break;
}
}
}
if(send_warning)
warn_msg(WarnParser, "Operator=(%s) clears variables previously set: %s:%d",
var.toLatin1().constData(), parser.file.toLatin1().constData(), parser.line_no);
}
varlist.clear();
}
for(QStringList::ConstIterator valit = vallist.begin();
valit != vallist.end(); ++valit) {
if((*valit).isEmpty())
continue;
if((op == "*=" && !varlist.contains((*valit))) ||
op == "=" || op == "+=")
varlist.append((*valit));
else if(op == "-=")
varlist.removeAll((*valit));
}
if(var == "REQUIRES") // special case to get communicated to backends!
doProjectCheckReqs(vallist, place);
else if (var == QLatin1String("TEMPLATE"))
setTemplate(varlist);
}
return true;
}
bool
QMakeProject::read(QTextStream &file, QHash<QString, QStringList> &place)
{
int numLines = 0;
bool ret = true;
QString s;
while(!file.atEnd()) {
parser.line_no++;
QString line = file.readLine().trimmed();
int prelen = line.length();
int hash_mark = line.indexOf("#");
if(hash_mark != -1) //good bye comments
line = line.left(hash_mark).trimmed();
if(!line.isEmpty() && line.right(1) == "\\") {
if(!line.startsWith("#")) {
line.truncate(line.length() - 1);
s += line + Option::field_sep;
++numLines;
}
} else if(!line.isEmpty() || (line.isEmpty() && !prelen)) {
if(s.isEmpty() && line.isEmpty())
continue;
if(!line.isEmpty()) {
s += line;
++numLines;
}
if(!s.isEmpty()) {
if(!(ret = parse(s, place, numLines))) {
s = "";
numLines = 0;
break;
}
s = "";
numLines = 0;
if (need_restart)
break;
}
}
}
if (!s.isEmpty())
ret = parse(s, place, numLines);
return ret;
}
bool
QMakeProject::read(const QString &file, QHash<QString, QStringList> &place)
{
parser_info pi = parser;
reset();
const QString oldpwd = qmake_getpwd();
QString filename = Option::normalizePath(file, false);
bool ret = false, using_stdin = false;
QFile qfile;
if(filename == QLatin1String("-")) {
qfile.setFileName("");
ret = qfile.open(stdin, QIODevice::ReadOnly);
using_stdin = true;
} else if(QFileInfo(file).isDir()) {
return false;
} else {
qfile.setFileName(filename);
ret = qfile.open(QIODevice::ReadOnly);
qmake_setpwd(QFileInfo(filename).absolutePath());
}
if(ret) {
place["PWD"] = QStringList(qmake_getpwd());
parser_info pi = parser;
parser.from_file = true;
parser.file = filename;
parser.line_no = 0;
if (qfile.peek(3) == QByteArray("\xef\xbb\xbf")) {
//UTF-8 BOM will cause subtle errors
qmake_error_msg("Unexpected UTF-8 BOM found");
ret = false;
} else {
QTextStream t(&qfile);
ret = read(t, place);
}
if(!using_stdin)
qfile.close();
}
if (!need_restart && scope_blocks.count() != 1) {
qmake_error_msg("Unterminated conditional block at end of file");
ret = false;
}
parser = pi;
qmake_setpwd(oldpwd);
return ret;
}
bool
QMakeProject::read(const QString &project, uchar cmd)
{
pfile = QFileInfo(project).absoluteFilePath();
return read(cmd);
}
bool
QMakeProject::read(uchar cmd)
{
again:
if (init_vars.isEmpty()) {
loadDefaults();
init_vars = vars;
} else {
vars = init_vars;
}
if (cmd & ReadSetup) {
if (base_vars.isEmpty()) {
QString superdir;
QString project_root;
QStringList qmakepath;
QStringList qmakefeatures;
project_build_root.clear();
if (Option::mkfile::do_cache) { // parse the cache
QHash<QString, QStringList> cache;
QString rdir = Option::output_dir;
forever {
QFileInfo qfi(rdir, QLatin1String(".qmake.super"));
if (qfi.exists()) {
superfile = qfi.filePath();
if (!read(superfile, cache))
return false;
superdir = rdir;
break;
}
QFileInfo qdfi(rdir);
if (qdfi.isRoot())
break;
rdir = qdfi.path();
}
if (Option::mkfile::cachefile.isEmpty()) { //find it as it has not been specified
QString sdir = qmake_getpwd();
QString dir = Option::output_dir;
forever {
QFileInfo qsfi(sdir, QLatin1String(".qmake.conf"));
if (qsfi.exists()) {
conffile = qsfi.filePath();
if (!read(conffile, cache))
return false;
}
QFileInfo qfi(dir, QLatin1String(".qmake.cache"));
if (qfi.exists()) {
cachefile = qfi.filePath();
if (!read(cachefile, cache))
return false;
}
if (!conffile.isEmpty() || !cachefile.isEmpty()) {
project_root = sdir;
project_build_root = dir;
break;
}
if (dir == superdir)
break;
QFileInfo qsdfi(sdir);
QFileInfo qdfi(dir);
if (qsdfi.isRoot() || qdfi.isRoot())
break;
sdir = qsdfi.path();
dir = qdfi.path();
}
} else {
QFileInfo fi(Option::mkfile::cachefile);
cachefile = QDir::cleanPath(fi.absoluteFilePath());
if (!read(cachefile, cache))
return false;
project_build_root = QDir::cleanPath(fi.absolutePath());
// This intentionally bypasses finding a source root,
// as the result would be more or less arbitrary.
}
if (Option::mkfile::xqmakespec.isEmpty() && !cache["XQMAKESPEC"].isEmpty())
Option::mkfile::xqmakespec = cache["XQMAKESPEC"].first();
if (Option::mkfile::qmakespec.isEmpty() && !cache["QMAKESPEC"].isEmpty()) {
Option::mkfile::qmakespec = cache["QMAKESPEC"].first();
if (Option::mkfile::xqmakespec.isEmpty())
Option::mkfile::xqmakespec = Option::mkfile::qmakespec;
}
qmakepath = cache.value(QLatin1String("QMAKEPATH"));
qmakefeatures = cache.value(QLatin1String("QMAKEFEATURES"));
if (!superfile.isEmpty())
vars["_QMAKE_SUPER_CACHE_"] << superfile;
if (!cachefile.isEmpty())
vars["_QMAKE_CACHE_"] << cachefile;
}
// Look for mkspecs/ in source and build. First to win determines the root.
QString sdir = qmake_getpwd();
QString dir = Option::output_dir;
while (dir != project_build_root) {
if ((dir != sdir && QFileInfo(sdir, QLatin1String("mkspecs")).isDir())
|| QFileInfo(dir, QLatin1String("mkspecs")).isDir()) {
if (dir != sdir)
project_root = sdir;
project_build_root = dir;
break;
}
if (dir == superdir)
break;
QFileInfo qsdfi(sdir);
QFileInfo qdfi(dir);
if (qsdfi.isRoot() || qdfi.isRoot())
break;
sdir = qsdfi.path();
dir = qdfi.path();
}
if (qmakepath != cached_qmakepath || qmakefeatures != cached_qmakefeatures
|| project_build_root != cached_build_root) { // No need to check source dir, as it goes in sync
cached_source_root = project_root;
cached_build_root = project_build_root;
cached_qmakepath = qmakepath;
cached_qmakefeatures = qmakefeatures;
invalidateFeatureRoots();
}
{ // parse mkspec
QString *specp = host_build ? &Option::mkfile::qmakespec : &Option::mkfile::xqmakespec;
QString qmakespec = *specp;
if (qmakespec.isEmpty())
qmakespec = host_build ? "default-host" : "default";
if (QDir::isRelativePath(qmakespec)) {
QStringList mkspec_roots = qmake_mkspec_paths();
debug_msg(2, "Looking for mkspec %s in (%s)", qmakespec.toLatin1().constData(),
mkspec_roots.join("::").toLatin1().constData());
bool found_mkspec = false;
for (QStringList::ConstIterator it = mkspec_roots.begin(); it != mkspec_roots.end(); ++it) {
QString mkspec = (*it) + QLatin1Char('/') + qmakespec;
if (QFile::exists(mkspec)) {
found_mkspec = true;
*specp = qmakespec = mkspec;
break;
}
}
if (!found_mkspec) {
fprintf(stderr, "Could not find mkspecs for your QMAKESPEC(%s) after trying:\n\t%s\n",
qmakespec.toLatin1().constData(), mkspec_roots.join("\n\t").toLatin1().constData());
return false;
}
}
// We do this before reading the spec, so it can use module and feature paths from
// here without resorting to tricks. This is the only planned use case anyway.
if (!superfile.isEmpty()) {
debug_msg(1, "Project super cache file: reading %s", superfile.toLatin1().constData());
read(superfile, vars);
}
// parse qmake configuration
doProjectInclude("spec_pre", IncludeFlagFeature, vars);
while(qmakespec.endsWith(QLatin1Char('/')))
qmakespec.truncate(qmakespec.length()-1);
QString spec = qmakespec + QLatin1String("/qmake.conf");
debug_msg(1, "QMAKESPEC conf: reading %s", spec.toLatin1().constData());
if (!read(spec, vars)) {
fprintf(stderr, "Failure to read QMAKESPEC conf file %s.\n", spec.toLatin1().constData());
return false;
}
#ifdef Q_OS_UNIX
real_spec = QFileInfo(qmakespec).canonicalFilePath();
#else
// We can't resolve symlinks as they do on Unix, so configure.exe puts the source of the
// qmake.conf at the end of the default/qmake.conf in the QMAKESPEC_ORG variable.
QString orig_spec = first(QLatin1String("QMAKESPEC_ORIGINAL"));
real_spec = orig_spec.isEmpty() ? qmakespec : orig_spec;
#endif
short_spec = QFileInfo(real_spec).fileName();
doProjectInclude("spec_post", IncludeFlagFeature, vars);
// The spec extends the feature search path, so invalidate the cache.
invalidateFeatureRoots();
if (!conffile.isEmpty()) {
debug_msg(1, "Project config file: reading %s", conffile.toLatin1().constData());
read(conffile, vars);
}
if (!cachefile.isEmpty()) {
debug_msg(1, "QMAKECACHE file: reading %s", cachefile.toLatin1().constData());
read(cachefile, vars);
}
}
base_vars = vars;
} else {
vars = base_vars; // start with the base
}
setupProject();
}
for (QHash<QString, QStringList>::ConstIterator it = extra_vars.constBegin();
it != extra_vars.constEnd(); ++it)
vars.insert(it.key(), it.value());
if(cmd & ReadFeatures) {
debug_msg(1, "Processing default_pre: %s", vars["CONFIG"].join("::").toLatin1().constData());
doProjectInclude("default_pre", IncludeFlagFeature, vars);
}
//before commandline
if (cmd & ReadSetup) {
parser.file = "(internal)";
parser.from_file = false;
parser.line_no = 1; //really arg count now.. duh
reset();
for(QStringList::ConstIterator it = Option::before_user_vars.begin();
it != Option::before_user_vars.end(); ++it) {
if(!parse((*it), vars)) {
fprintf(stderr, "Argument failed to parse: %s\n", (*it).toLatin1().constData());
return false;
}
parser.line_no++;
}
}
// After user configs, to override them
if (!extra_configs.isEmpty()) {
parser.file = "(extra configs)";
parser.from_file = false;
parser.line_no = 1; //really arg count now.. duh
parse("CONFIG += " + extra_configs.join(" "), vars);
}
if(cmd & ReadProFile) { // parse project file
debug_msg(1, "Project file: reading %s", pfile.toLatin1().constData());
if(pfile != "-" && !QFile::exists(pfile) && !pfile.endsWith(Option::pro_ext))
pfile += Option::pro_ext;
if(!read(pfile, vars))
return false;
if (need_restart) {
base_vars.clear();
cleanup();
goto again;
}
}
if (cmd & ReadSetup) {
parser.file = "(internal)";
parser.from_file = false;
parser.line_no = 1; //really arg count now.. duh
reset();
for(QStringList::ConstIterator it = Option::after_user_vars.begin();
it != Option::after_user_vars.end(); ++it) {
if(!parse((*it), vars)) {
fprintf(stderr, "Argument failed to parse: %s\n", (*it).toLatin1().constData());
return false;
}
parser.line_no++;
}
}
// Again, to ensure the project does not mess with us.
// Specifically, do not allow a project to override debug/release within a
// debug_and_release build pass - it's too late for that at this point anyway.
if (!extra_configs.isEmpty()) {
parser.file = "(extra configs)";
parser.from_file = false;
parser.line_no = 1; //really arg count now.. duh
parse("CONFIG += " + extra_configs.join(" "), vars);
}
if(cmd & ReadFeatures) {
debug_msg(1, "Processing default_post: %s", vars["CONFIG"].join("::").toLatin1().constData());
doProjectInclude("default_post", IncludeFlagFeature, vars);
QHash<QString, bool> processed;
const QStringList &configs = vars["CONFIG"];
debug_msg(1, "Processing CONFIG features: %s", configs.join("::").toLatin1().constData());
while(1) {
bool finished = true;
for(int i = configs.size()-1; i >= 0; --i) {
const QString config = configs[i].toLower();
if(!processed.contains(config)) {
processed.insert(config, true);
if(doProjectInclude(config, IncludeFlagFeature, vars) == IncludeSuccess) {
finished = false;
break;
}
}
}
if(finished)
break;
}
}
return true;
}
void
QMakeProject::setupProject()
{
setTemplate(vars["TEMPLATE"]);
if (pfile != "-")
vars["TARGET"] << QFileInfo(pfile).baseName();
vars["_PRO_FILE_"] << pfile;
vars["_PRO_FILE_PWD_"] << (pfile.isEmpty() ? qmake_getpwd() : QFileInfo(pfile).absolutePath());
vars["OUT_PWD"] << Option::output_dir;
}
void
QMakeProject::loadDefaults()
{
vars["LITERAL_WHITESPACE"] << QLatin1String("\t");
vars["LITERAL_DOLLAR"] << QLatin1String("$");
vars["LITERAL_HASH"] << QLatin1String("#");
vars["DIR_SEPARATOR"] << Option::dir_sep;
vars["DIRLIST_SEPARATOR"] << Option::dirlist_sep;
vars["QMAKE_QMAKE"] << Option::qmake_abslocation;
vars["_DATE_"] << QDateTime::currentDateTime().toString();
#if defined(Q_OS_WIN32)
vars["QMAKE_HOST.os"] << QString::fromLatin1("Windows");
DWORD name_length = 1024;
wchar_t name[1024];
if (GetComputerName(name, &name_length))
vars["QMAKE_HOST.name"] << QString::fromWCharArray(name);
QSysInfo::WinVersion ver = QSysInfo::WindowsVersion;
vars["QMAKE_HOST.version"] << QString::number(ver);
QString verStr;
switch (ver) {
case QSysInfo::WV_Me: verStr = QLatin1String("WinMe"); break;
case QSysInfo::WV_95: verStr = QLatin1String("Win95"); break;
case QSysInfo::WV_98: verStr = QLatin1String("Win98"); break;
case QSysInfo::WV_NT: verStr = QLatin1String("WinNT"); break;
case QSysInfo::WV_2000: verStr = QLatin1String("Win2000"); break;
case QSysInfo::WV_2003: verStr = QLatin1String("Win2003"); break;
case QSysInfo::WV_XP: verStr = QLatin1String("WinXP"); break;
case QSysInfo::WV_VISTA: verStr = QLatin1String("WinVista"); break;
default: verStr = QLatin1String("Unknown"); break;
}
vars["QMAKE_HOST.version_string"] << verStr;
SYSTEM_INFO info;
GetSystemInfo(&info);
QString archStr;
switch (info.wProcessorArchitecture) {
# ifdef PROCESSOR_ARCHITECTURE_AMD64
case PROCESSOR_ARCHITECTURE_AMD64:
archStr = QLatin1String("x86_64");
break;
# endif
case PROCESSOR_ARCHITECTURE_INTEL:
archStr = QLatin1String("x86");
break;
case PROCESSOR_ARCHITECTURE_IA64:
# ifdef PROCESSOR_ARCHITECTURE_IA32_ON_WIN64
case PROCESSOR_ARCHITECTURE_IA32_ON_WIN64:
# endif
archStr = QLatin1String("IA64");
break;
default:
archStr = QLatin1String("Unknown");
break;
}
vars["QMAKE_HOST.arch"] << archStr;
# if defined(Q_CC_MSVC)
QString paths = QString::fromLocal8Bit(qgetenv("PATH"));
QString vcBin64 = QString::fromLocal8Bit(qgetenv("VCINSTALLDIR"));
if (!vcBin64.endsWith('\\'))
vcBin64.append('\\');
vcBin64.append("bin\\amd64");
QString vcBinX86_64 = QString::fromLocal8Bit(qgetenv("VCINSTALLDIR"));
if (!vcBinX86_64.endsWith('\\'))
vcBinX86_64.append('\\');
vcBinX86_64.append("bin\\x86_amd64");
if (paths.contains(vcBin64,Qt::CaseInsensitive) || paths.contains(vcBinX86_64,Qt::CaseInsensitive))
vars["QMAKE_TARGET.arch"] << QString::fromLatin1("x86_64");
else
vars["QMAKE_TARGET.arch"] << QString::fromLatin1("x86");
# endif
#elif defined(Q_OS_UNIX)
struct utsname name;
if (!uname(&name)) {
vars["QMAKE_HOST.os"] << QString::fromLocal8Bit(name.sysname);
vars["QMAKE_HOST.name"] << QString::fromLocal8Bit(name.nodename);
vars["QMAKE_HOST.version"] << QString::fromLocal8Bit(name.release);
vars["QMAKE_HOST.version_string"] << QString::fromLocal8Bit(name.version);
vars["QMAKE_HOST.arch"] << QString::fromLocal8Bit(name.machine);
}
#endif
}
bool
QMakeProject::isActiveConfig(const QString &x, bool regex, QHash<QString, QStringList> *place)
{
if(x.isEmpty())
return true;
//magic types for easy flipping
if(x == "true")
return true;
else if(x == "false")
return false;
if (x == "host_build")
return host_build;
//mkspecs
QRegExp re(x, Qt::CaseSensitive, QRegExp::Wildcard);
if ((regex && re.exactMatch(short_spec)) || (!regex && short_spec == x))
return true;
//simple matching
const QStringList &configs = (place ? (*place)["CONFIG"] : vars["CONFIG"]);
for(QStringList::ConstIterator it = configs.begin(); it != configs.end(); ++it) {
if(((regex && re.exactMatch((*it))) || (!regex && (*it) == x)) && re.exactMatch((*it)))
return true;
}
return false;
}
bool
QMakeProject::doProjectTest(QString str, QHash<QString, QStringList> &place)
{
QString chk = remove_quotes(str);
if(chk.isEmpty())
return true;
bool invert_test = (chk.left(1) == "!");
if(invert_test)
chk = chk.mid(1);
bool test=false;
int lparen = chk.indexOf('(');
if(lparen != -1) { // if there is an lparen in the chk, it IS a function
int rparen = chk.indexOf(')', lparen);
if(rparen == -1) {
qmake_error_msg("Function missing right paren: " + chk);
} else {
QString func = chk.left(lparen);
test = doProjectTest(func, chk.mid(lparen+1, rparen - lparen - 1), place);
}
} else {
test = isActiveConfig(chk, true, &place);
}
if(invert_test)
return !test;
return test;
}
bool
QMakeProject::doProjectTest(QString func, const QString &params,
QHash<QString, QStringList> &place)
{
return doProjectTest(func, split_arg_list(params), place);
}
QMakeProject::IncludeStatus
QMakeProject::doProjectInclude(QString file, uchar flags, QHash<QString, QStringList> &place)
{
if(flags & IncludeFlagFeature) {
if(!file.endsWith(Option::prf_ext))
file += Option::prf_ext;
{
QStringList *&feature_roots = all_feature_roots[host_build];
if(!feature_roots) {
feature_roots = new QStringList;
qmakeAddCacheClear(qmakeDeleteCacheClear<QStringList>, (void**)&feature_roots);
}
if (feature_roots->isEmpty())
*feature_roots = qmakeFeaturePaths();
debug_msg(2, "Looking for feature '%s' in (%s)", file.toLatin1().constData(),
feature_roots->join("::").toLatin1().constData());
int start_root = 0;
if(parser.from_file) {
QFileInfo currFile(parser.file), prfFile(file);
if(currFile.fileName() == prfFile.fileName()) {
currFile = QFileInfo(currFile.canonicalFilePath());
for(int root = 0; root < feature_roots->size(); ++root) {
prfFile = QFileInfo(feature_roots->at(root) +
QLatin1Char('/') + file).canonicalFilePath();
if(prfFile == currFile) {
start_root = root+1;
break;
}
}
}
}
for(int root = start_root; root < feature_roots->size(); ++root) {
QString prf(feature_roots->at(root) + QLatin1Char('/') + file);
if (QFile::exists(prf)) {
file = prf;
goto foundf;
}
}
return IncludeNoExist;
foundf: ;
}
if(place["QMAKE_INTERNAL_INCLUDED_FEATURES"].indexOf(file) != -1)
return IncludeFeatureAlreadyLoaded;
place["QMAKE_INTERNAL_INCLUDED_FEATURES"].append(file);
} else if (QDir::isRelativePath(file)) {
QStringList include_roots;
if(Option::output_dir != qmake_getpwd())
include_roots << qmake_getpwd();
include_roots << Option::output_dir;
for(int root = 0; root < include_roots.size(); ++root) {
QString testName = QDir::fromNativeSeparators(include_roots[root]);
if (!testName.endsWith(QLatin1Char('/')))
testName += QLatin1Char('/');
testName += file;
if(QFile::exists(testName)) {
file = testName;
goto foundi;
}
}
return IncludeNoExist;
foundi: ;
} else if (!QFile::exists(file)) {
return IncludeNoExist;
}
debug_msg(1, "Project Parser: %s'ing file %s.", (flags & IncludeFlagFeature) ? "load" : "include",
file.toLatin1().constData());
QString orig_file = file;
int di = file.lastIndexOf(QLatin1Char('/'));
QString oldpwd = qmake_getpwd();
if(di != -1) {
if(!qmake_setpwd(file.left(file.lastIndexOf(QLatin1Char('/'))))) {
fprintf(stderr, "Cannot find directory: %s\n", file.left(di).toLatin1().constData());
return IncludeFailure;
}
}
bool parsed = false;
parser_info pi = parser;
{
if(flags & (IncludeFlagNewProject|IncludeFlagNewParser)) {
// The "project's variables" are used in other places (eg. export()) so it's not
// possible to use "place" everywhere. Instead just set variables and grab them later
QMakeProject proj(prop);
if(flags & IncludeFlagNewParser) {
parsed = proj.read(file, proj.variables()); // parse just that file (fromfile, infile)
} else {
parsed = proj.read(file); // parse all aux files (load/include into)
}
place = proj.variables();
} else {
QStack<ScopeBlock> sc = scope_blocks;
IteratorBlock *it = iterator;
FunctionBlock *fu = function;
parsed = read(file, place);
iterator = it;
function = fu;
scope_blocks = sc;
}
}
if(parsed) {
if(place["QMAKE_INTERNAL_INCLUDED_FILES"].indexOf(orig_file) == -1)
place["QMAKE_INTERNAL_INCLUDED_FILES"].append(orig_file);
} else {
warn_msg(WarnParser, "%s:%d: Failure to include file %s.",
pi.file.toLatin1().constData(), pi.line_no, orig_file.toLatin1().constData());
}
parser = pi;
qmake_setpwd(oldpwd);
place["PWD"] = QStringList(qmake_getpwd());
if(!parsed)
return IncludeParseFailure;
return IncludeSuccess;
}
static void
subAll(QStringList *val, const QStringList &diffval)
{
foreach (const QString &dv, diffval)
val->removeAll(dv);
}
inline static
bool isSpecialChar(ushort c)
{
// Chars that should be quoted (TM). This includes:
#ifdef Q_OS_WIN
// - control chars & space
// - the shell meta chars "&()<>^|
// - the potential separators ,;=
static const uchar iqm[] = {
0xff, 0xff, 0xff, 0xff, 0x45, 0x13, 0x00, 0x78,
0x00, 0x00, 0x00, 0x40, 0x00, 0x00, 0x00, 0x10
};
#else
static const uchar iqm[] = {
0xff, 0xff, 0xff, 0xff, 0xdf, 0x07, 0x00, 0xd8,
0x00, 0x00, 0x00, 0x38, 0x01, 0x00, 0x00, 0x78
}; // 0-32 \'"$`<>|;&(){}*?#!~[]
#endif
return (c < sizeof(iqm) * 8) && (iqm[c / 8] & (1 << (c & 7)));
}
inline static
bool hasSpecialChars(const QString &arg)
{
for (int x = arg.length() - 1; x >= 0; --x)
if (isSpecialChar(arg.unicode()[x].unicode()))
return true;
return false;
}
static QString
shellQuote(const QString &arg)
{
if (!arg.length())
return QString::fromLatin1("\"\"");
QString ret(arg);
if (hasSpecialChars(ret)) {
#ifdef Q_OS_WIN
// Quotes are escaped and their preceding backslashes are doubled.
// It's impossible to escape anything inside a quoted string on cmd
// level, so the outer quoting must be "suspended".
ret.replace(QRegExp(QLatin1String("(\\\\*)\"")), QLatin1String("\"\\1\\1\\^\"\""));
// The argument must not end with a \ since this would be interpreted
// as escaping the quote -- rather put the \ behind the quote: e.g.
// rather use "foo"\ than "foo\"
int i = ret.length();
while (i > 0 && ret.at(i - 1) == QLatin1Char('\\'))
--i;
ret.insert(i, QLatin1Char('"'));
ret.prepend(QLatin1Char('"'));
#else // Q_OS_WIN
ret.replace(QLatin1Char('\''), QLatin1String("'\\''"));
ret.prepend(QLatin1Char('\''));
ret.append(QLatin1Char('\''));
#endif // Q_OS_WIN
}
return ret;
}
static QString
quoteValue(const QString &val)
{
QString ret;
ret.reserve(val.length());
bool quote = val.isEmpty();
bool escaping = false;
for (int i = 0, l = val.length(); i < l; i++) {
QChar c = val.unicode()[i];
ushort uc = c.unicode();
if (uc < 32) {
if (!escaping) {
escaping = true;
ret += QLatin1String("$$escape_expand(");
}
switch (uc) {
case '\r':
ret += QLatin1String("\\\\r");
break;
case '\n':
ret += QLatin1String("\\\\n");
break;
case '\t':
ret += QLatin1String("\\\\t");
break;
default:
ret += QString::fromLatin1("\\\\x%1").arg(uc, 2, 16, QLatin1Char('0'));
break;
}
} else {
if (escaping) {
escaping = false;
ret += QLatin1Char(')');
}
switch (uc) {
case '\\':
ret += QLatin1String("\\\\");
break;
case '"':
ret += QLatin1String("\\\"");
break;
case '\'':
ret += QLatin1String("\\'");
break;
case '$':
ret += QLatin1String("\\$");
break;
case '#':
ret += QLatin1String("$${LITERAL_HASH}");
break;
case 32:
quote = true;
// fallthrough
default:
ret += c;
break;
}
}
}
if (escaping)
ret += QLatin1Char(')');
if (quote) {
ret.prepend(QLatin1Char('"'));
ret.append(QLatin1Char('"'));
}
return ret;
}
static bool
writeFile(const QString &name, QIODevice::OpenMode mode, const QString &contents, QString *errStr)
{
QByteArray bytes = contents.toLocal8Bit();
QFile cfile(name);
if (!(mode & QIODevice::Append) && cfile.open(QIODevice::ReadOnly | QIODevice::Text)) {
if (cfile.readAll() == bytes)
return true;
cfile.close();
}
if (!cfile.open(mode | QIODevice::WriteOnly | QIODevice::Text)) {
*errStr = cfile.errorString();
return false;
}
cfile.write(bytes);
cfile.close();
if (cfile.error() != QFile::NoError) {
*errStr = cfile.errorString();
return false;
}
return true;
}
static QByteArray
getCommandOutput(const QString &args)
{
QByteArray out;
if (FILE *proc = QT_POPEN(args.toLatin1().constData(), "r")) {
while (!feof(proc)) {
char buff[10 * 1024];
int read_in = int(fread(buff, 1, sizeof(buff), proc));
if (!read_in)
break;
out += QByteArray(buff, read_in);
}
QT_PCLOSE(proc);
}
return out;
}
#ifdef Q_OS_WIN
static QString windowsErrorCode()
{
wchar_t *string = 0;
FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER|FORMAT_MESSAGE_FROM_SYSTEM,
NULL,
GetLastError(),
MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
(LPWSTR)&string,
0,
NULL);
QString ret = QString::fromWCharArray(string);
LocalFree((HLOCAL)string);
return ret;
}
#endif
QStringList
QMakeProject::doProjectExpand(QString func, const QString &params,
QHash<QString, QStringList> &place)
{
return doProjectExpand(func, split_arg_list(params), place);
}
QStringList
QMakeProject::doProjectExpand(QString func, QStringList args,
QHash<QString, QStringList> &place)
{
QList<QStringList> args_list;
for(int i = 0; i < args.size(); ++i) {
QStringList arg = split_value_list(args[i]), tmp;
for(int i = 0; i < arg.size(); ++i)
tmp += doVariableReplaceExpand(arg[i], place);;
args_list += tmp;
}
return doProjectExpand(func, args_list, place);
}
static void
populateDeps(const QStringList &deps, const QString &prefix,
QHash<QString, QSet<QString> > &dependencies, QHash<QString, QStringList> &dependees,
QStringList &rootSet, QHash<QString, QStringList> &place)
{
foreach (const QString &item, deps)
if (!dependencies.contains(item)) {
QSet<QString> &dset = dependencies[item]; // Always create entry
QStringList depends = place.value(prefix + item + ".depends");
if (depends.isEmpty()) {
rootSet << item;
} else {
foreach (const QString &dep, depends) {
dset.insert(dep);
dependees[dep] << item;
}
populateDeps(depends, prefix, dependencies, dependees, rootSet, place);
}
}
}
QStringList
QMakeProject::doProjectExpand(QString func, QList<QStringList> args_list,
QHash<QString, QStringList> &place)
{
func = func.trimmed();
if(replaceFunctions.contains(func)) {
FunctionBlock *defined = replaceFunctions[func];
function_blocks.push(defined);
QStringList ret;
defined->exec(args_list, this, place, ret);
bool correct = function_blocks.pop() == defined;
Q_ASSERT(correct); Q_UNUSED(correct);
return ret;
}
QStringList args; //why don't the builtin functions just use args_list? --Sam
for(int i = 0; i < args_list.size(); ++i)
args += args_list[i].join(QString(Option::field_sep));
ExpandFunc func_t = qmake_expandFunctions().value(func);
if (!func_t && (func_t = qmake_expandFunctions().value(func.toLower())))
warn_msg(WarnDeprecated, "%s:%d: Using uppercased builtin functions is deprecated.",
parser.file.toLatin1().constData(), parser.line_no);
debug_msg(1, "Running project expand: %s(%s) [%d]",
func.toLatin1().constData(), args.join("::").toLatin1().constData(), func_t);
QStringList ret;
switch(func_t) {
case E_MEMBER: {
if(args.count() < 1 || args.count() > 3) {
fprintf(stderr, "%s:%d: member(var, start, end) requires three arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
bool ok = true;
const QStringList &var = values(args.first(), place);
int start = 0, end = 0;
if(args.count() >= 2) {
QString start_str = args[1];
start = start_str.toInt(&ok);
if(!ok) {
if(args.count() == 2) {
int dotdot = start_str.indexOf("..");
if(dotdot != -1) {
start = start_str.left(dotdot).toInt(&ok);
if(ok)
end = start_str.mid(dotdot+2).toInt(&ok);
}
}
if(!ok)
fprintf(stderr, "%s:%d: member() argument 2 (start) '%s' invalid.\n",
parser.file.toLatin1().constData(), parser.line_no,
start_str.toLatin1().constData());
} else {
end = start;
if(args.count() == 3)
end = args[2].toInt(&ok);
if(!ok)
fprintf(stderr, "%s:%d: member() argument 3 (end) '%s' invalid.\n",
parser.file.toLatin1().constData(), parser.line_no,
args[2].toLatin1().constData());
}
}
if(ok) {
if(start < 0)
start += var.count();
if(end < 0)
end += var.count();
if(start < 0 || start >= var.count() || end < 0 || end >= var.count()) {
//nothing
} else if(start < end) {
for(int i = start; i <= end && (int)var.count() >= i; i++)
ret += var[i];
} else {
for(int i = start; i >= end && (int)var.count() >= i && i >= 0; i--)
ret += var[i];
}
}
}
break; }
case E_FIRST:
case E_LAST: {
if(args.count() != 1) {
fprintf(stderr, "%s:%d: %s(var) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no, func.toLatin1().constData());
} else {
const QStringList &var = values(args.first(), place);
if(!var.isEmpty()) {
if(func_t == E_FIRST)
ret = QStringList(var[0]);
else
ret = QStringList(var[var.size()-1]);
}
}
break; }
case E_CAT: {
if(args.count() < 1 || args.count() > 2) {
fprintf(stderr, "%s:%d: cat(file) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
QString file = Option::normalizePath(args[0]);
bool blob = false;
bool lines = false;
bool singleLine = true;
if (args.count() > 1) {
if (!args.at(1).compare(QLatin1String("false"), Qt::CaseInsensitive))
singleLine = false;
else if (!args.at(1).compare(QLatin1String("blob"), Qt::CaseInsensitive))
blob = true;
else if (!args.at(1).compare(QLatin1String("lines"), Qt::CaseInsensitive))
lines = true;
}
QFile qfile(file);
if(qfile.open(QIODevice::ReadOnly)) {
QTextStream stream(&qfile);
if (blob) {
ret += stream.readAll();
} else {
while (!stream.atEnd()) {
if (lines) {
ret += stream.readLine();
} else {
ret += split_value_list(stream.readLine().trimmed());
if (!singleLine)
ret += "\n";
}
}
}
}
}
break; }
case E_FROMFILE: {
if(args.count() != 2) {
fprintf(stderr, "%s:%d: fromfile(file, variable) requires two arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
QString seek_var = args[1], file = Option::normalizePath(args[0]);
QHash<QString, QStringList> tmp;
if(doProjectInclude(file, IncludeFlagNewParser, tmp) == IncludeSuccess) {
if(tmp.contains("QMAKE_INTERNAL_INCLUDED_FILES")) {
QStringList &out = place["QMAKE_INTERNAL_INCLUDED_FILES"];
const QStringList &in = tmp["QMAKE_INTERNAL_INCLUDED_FILES"];
for(int i = 0; i < in.size(); ++i) {
if(out.indexOf(in[i]) == -1)
out += in[i];
}
}
ret = tmp[seek_var];
}
}
break; }
case E_EVAL: {
if(args.count() < 1 || args.count() > 2) {
fprintf(stderr, "%s:%d: eval(variable) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
const QHash<QString, QStringList> *source = &place;
if(args.count() == 2) {
if(args.at(1) == "Global") {
source = &vars;
} else if(args.at(1) == "Local") {
source = &place;
} else {
fprintf(stderr, "%s:%d: unexpected source to eval.\n", parser.file.toLatin1().constData(),
parser.line_no);
}
}
ret += source->value(args.at(0));
}
break; }
case E_LIST: {
static int x = 0;
QString tmp;
tmp.sprintf(".QMAKE_INTERNAL_TMP_VAR_%d", x++);
ret = QStringList(tmp);
QStringList &lst = (*((QHash<QString, QStringList>*)&place))[tmp];
lst.clear();
for(QStringList::ConstIterator arg_it = args.begin();
arg_it != args.end(); ++arg_it)
lst += split_value_list((*arg_it));
break; }
case E_SPRINTF: {
if(args.count() < 1) {
fprintf(stderr, "%s:%d: sprintf(format, ...) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
QString tmp = args.at(0);
for(int i = 1; i < args.count(); ++i)
tmp = tmp.arg(args.at(i));
ret = split_value_list(tmp);
}
break; }
case E_FORMAT_NUMBER:
if (args.count() > 2) {
fprintf(stderr, "%s:%d: format_number(number[, options...]) requires one or two arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
int ibase = 10;
int obase = 10;
int width = 0;
bool zeropad = false;
bool leftalign = false;
enum { DefaultSign, PadSign, AlwaysSign } sign = DefaultSign;
if (args.count() >= 2) {
foreach (const QString &opt, split_value_list(args.at(1))) {
if (opt.startsWith(QLatin1String("ibase="))) {
ibase = opt.mid(6).toInt();
} else if (opt.startsWith(QLatin1String("obase="))) {
obase = opt.mid(6).toInt();
} else if (opt.startsWith(QLatin1String("width="))) {
width = opt.mid(6).toInt();
} else if (opt == QLatin1String("zeropad")) {
zeropad = true;
} else if (opt == QLatin1String("padsign")) {
sign = PadSign;
} else if (opt == QLatin1String("alwayssign")) {
sign = AlwaysSign;
} else if (opt == QLatin1String("leftalign")) {
leftalign = true;
} else {
fprintf(stderr, "%s:%d: format_number(): invalid format option %s.\n",
parser.file.toLatin1().constData(), parser.line_no,
opt.toLatin1().constData());
goto formfail;
}
}
}
if (args.at(0).contains(QLatin1Char('.'))) {
fprintf(stderr, "%s:%d: format_number(): floats are currently not supported.\n",
parser.file.toLatin1().constData(), parser.line_no);
break;
}
bool ok;
qlonglong num = args.at(0).toLongLong(&ok, ibase);
if (!ok) {
fprintf(stderr, "%s:%d: format_number(): malformed number %s for base %d.\n",
parser.file.toLatin1().constData(), parser.line_no,
args.at(0).toLatin1().constData(), ibase);
break;
}
QString outstr;
if (num < 0) {
num = -num;
outstr = QLatin1Char('-');
} else if (sign == AlwaysSign) {
outstr = QLatin1Char('+');
} else if (sign == PadSign) {
outstr = QLatin1Char(' ');
}
QString numstr = QString::number(num, obase);
int space = width - outstr.length() - numstr.length();
if (space <= 0) {
outstr += numstr;
} else if (leftalign) {
outstr += numstr + QString(space, QLatin1Char(' '));
} else if (zeropad) {
outstr += QString(space, QLatin1Char('0')) + numstr;
} else {
outstr.prepend(QString(space, QLatin1Char(' ')));
outstr += numstr;
}
ret += outstr;
}
formfail:
break;
case E_JOIN: {
if(args.count() < 1 || args.count() > 4) {
fprintf(stderr, "%s:%d: join(var, glue, before, after) requires four"
"arguments.\n", parser.file.toLatin1().constData(), parser.line_no);
} else {
QString glue, before, after;
if(args.count() >= 2)
glue = args[1];
if(args.count() >= 3)
before = args[2];
if(args.count() == 4)
after = args[3];
const QStringList &var = values(args.first(), place);
if(!var.isEmpty())
ret = split_value_list(before + var.join(glue) + after);
}
break; }
case E_SPLIT: {
if(args.count() < 1 || args.count() > 2) {
fprintf(stderr, "%s:%d split(var, sep) requires one or two arguments\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
QString sep = QString(Option::field_sep);
if(args.count() >= 2)
sep = args[1];
QStringList var = values(args.first(), place);
for(QStringList::ConstIterator vit = var.begin(); vit != var.end(); ++vit) {
QStringList lst = (*vit).split(sep);
for(QStringList::ConstIterator spltit = lst.begin(); spltit != lst.end(); ++spltit)
ret += (*spltit);
}
}
break; }
case E_BASENAME:
case E_DIRNAME:
case E_SECTION: {
bool regexp = false;
QString sep, var;
int beg=0, end=-1;
if(func_t == E_SECTION) {
if(args.count() != 3 && args.count() != 4) {
fprintf(stderr, "%s:%d section(var, sep, begin, end) requires three argument\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
var = args[0];
sep = args[1];
beg = args[2].toInt();
if(args.count() == 4)
end = args[3].toInt();
}
} else {
if(args.count() != 1) {
fprintf(stderr, "%s:%d %s(var) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no, func.toLatin1().constData());
} else {
var = args[0];
regexp = true;
sep = "[" + QRegExp::escape(Option::dir_sep) + "/]";
if(func_t == E_DIRNAME)
end = -2;
else
beg = -1;
}
}
if(!var.isNull()) {
const QStringList &l = values(var, place);
for(QStringList::ConstIterator it = l.begin(); it != l.end(); ++it) {
QString separator = sep;
if(regexp)
ret += (*it).section(QRegExp(separator), beg, end);
else
ret += (*it).section(separator, beg, end);
}
}
break; }
case E_FIND: {
if(args.count() != 2) {
fprintf(stderr, "%s:%d find(var, str) requires two arguments\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
QRegExp regx(args[1]);
const QStringList &var = values(args.first(), place);
for(QStringList::ConstIterator vit = var.begin();
vit != var.end(); ++vit) {
if(regx.indexIn(*vit) != -1)
ret += (*vit);
}
}
break; }
case E_SYSTEM: {
if(args.count() < 1 || args.count() > 2) {
fprintf(stderr, "%s:%d system(execut) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
bool blob = false;
bool lines = false;
bool singleLine = true;
if (args.count() > 1) {
if (!args.at(1).compare(QLatin1String("false"), Qt::CaseInsensitive))
singleLine = false;
else if (!args.at(1).compare(QLatin1String("blob"), Qt::CaseInsensitive))
blob = true;
else if (!args.at(1).compare(QLatin1String("lines"), Qt::CaseInsensitive))
lines = true;
}
QByteArray bytes = getCommandOutput(args.at(0));
if (lines) {
QTextStream stream(bytes);
while (!stream.atEnd())
ret += stream.readLine();
} else {
QString output = QString::fromLocal8Bit(bytes);
if (blob) {
ret += output;
} else {
output.replace(QLatin1Char('\t'), QLatin1Char(' '));
if (singleLine)
output.replace(QLatin1Char('\n'), QLatin1Char(' '));
ret += split_value_list(output);
}
}
}
break; }
case E_UNIQUE: {
if(args.count() != 1) {
fprintf(stderr, "%s:%d unique(var) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
const QStringList &var = values(args.first(), place);
for(int i = 0; i < var.count(); i++) {
if(!ret.contains(var[i]))
ret.append(var[i]);
}
}
break; }
case E_REVERSE:
if (args.count() != 1) {
fprintf(stderr, "%s:%d reverse(var) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
QStringList var = values(args.first(), place);
for (int i = 0; i < var.size() / 2; i++)
var.swap(i, var.size() - i - 1);
ret += var;
}
break;
case E_QUOTE:
ret = args;
break;
case E_ESCAPE_EXPAND: {
for(int i = 0; i < args.size(); ++i) {
QChar *i_data = args[i].data();
int i_len = args[i].length();
for(int x = 0; x < i_len; ++x) {
if(*(i_data+x) == '\\' && x < i_len-1) {
if(*(i_data+x+1) == '\\') {
++x;
} else {
struct {
char in, out;
} mapped_quotes[] = {
{ 'n', '\n' },
{ 't', '\t' },
{ 'r', '\r' },
{ 0, 0 }
};
for(int i = 0; mapped_quotes[i].in; ++i) {
if(*(i_data+x+1) == mapped_quotes[i].in) {
*(i_data+x) = mapped_quotes[i].out;
if(x < i_len-2)
memmove(i_data+x+1, i_data+x+2, (i_len-x-2)*sizeof(QChar));
--i_len;
break;
}
}
}
}
}
ret.append(QString(i_data, i_len));
}
break; }
case E_RE_ESCAPE: {
for(int i = 0; i < args.size(); ++i)
ret += QRegExp::escape(args[i]);
break; }
case E_VAL_ESCAPE:
if (args.count() != 1) {
fprintf(stderr, "%s:%d val_escape(var) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
QStringList vals = values(args.at(0), place);
ret.reserve(vals.length());
foreach (const QString &str, vals)
ret += quoteValue(str);
}
break;
case E_UPPER:
case E_LOWER: {
for(int i = 0; i < args.size(); ++i) {
if(func_t == E_UPPER)
ret += args[i].toUpper();
else
ret += args[i].toLower();
}
break; }
case E_FILES: {
if(args.count() != 1 && args.count() != 2) {
fprintf(stderr, "%s:%d files(pattern) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
bool recursive = false;
if(args.count() == 2)
recursive = (args[1].toLower() == "true" || args[1].toInt());
QStringList dirs;
QString r = Option::normalizePath(args[0]);
int slash = r.lastIndexOf(QLatin1Char('/'));
if(slash != -1) {
dirs.append(r.left(slash));
r = r.mid(slash+1);
} else {
dirs.append("");
}
QRegExp regex(r, Qt::CaseSensitive, QRegExp::Wildcard);
for(int d = 0; d < dirs.count(); d++) {
QString dir = dirs[d];
if (!dir.isEmpty() && !dir.endsWith(QLatin1Char('/')))
dir += "/";
QDir qdir(dir);
for(int i = 0; i < (int)qdir.count(); ++i) {
if(qdir[i] == "." || qdir[i] == "..")
continue;
QString fname = dir + qdir[i];
if(QFileInfo(fname).isDir()) {
if(recursive)
dirs.append(fname);
}
if(regex.exactMatch(qdir[i]))
ret += fname;
}
}
}
break; }
case E_PROMPT: {
if(args.count() != 1) {
fprintf(stderr, "%s:%d prompt(question) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else if(pfile == "-") {
fprintf(stderr, "%s:%d prompt(question) cannot be used when '-o -' is used.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
QString msg = fixEnvVariables(args.first());
if(!msg.endsWith("?"))
msg += "?";
fprintf(stderr, "Project %s: %s ", func.toUpper().toLatin1().constData(),
msg.toLatin1().constData());
QFile qfile;
if(qfile.open(stdin, QIODevice::ReadOnly)) {
QTextStream t(&qfile);
ret = split_value_list(t.readLine());
}
}
break; }
case E_REPLACE: {
if(args.count() != 3 ) {
fprintf(stderr, "%s:%d replace(var, before, after) requires three arguments\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
const QRegExp before( args[1] );
const QString after( args[2] );
QStringList var = values(args.first(), place);
for(QStringList::Iterator it = var.begin(); it != var.end(); ++it)
ret += it->replace(before, after);
}
break; }
case E_SIZE: {
if(args.count() != 1) {
fprintf(stderr, "%s:%d: size(var) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
int size = values(args[0], place).size();
ret += QString::number(size);
}
break; }
case E_SORT_DEPENDS:
case E_RESOLVE_DEPENDS: {
if(args.count() < 1 || args.count() > 2) {
fprintf(stderr, "%s:%d: %s(var, prefix) requires one or two arguments.\n",
parser.file.toLatin1().constData(), parser.line_no, func.toLatin1().constData());
} else {
QHash<QString, QSet<QString> > dependencies;
QHash<QString, QStringList> dependees;
QStringList rootSet;
QStringList orgList = values(args[0], place);
populateDeps(orgList, (args.count() != 2 ? QString() : args[1]),
dependencies, dependees, rootSet, place);
for (int i = 0; i < rootSet.size(); ++i) {
const QString &item = rootSet.at(i);
if ((func_t == E_RESOLVE_DEPENDS) || orgList.contains(item))
ret.prepend(item);
foreach (const QString &dep, dependees[item]) {
QSet<QString> &dset = dependencies[dep];
dset.remove(rootSet.at(i)); // *Don't* use 'item' - rootSet may have changed!
if (dset.isEmpty())
rootSet << dep;
}
}
}
break; }
case E_ENUMERATE_VARS:
ret += place.keys();
break;
case E_SHADOWED: {
QString val = QDir::cleanPath(QFileInfo(args.at(0)).absoluteFilePath());
if (Option::mkfile::source_root.isEmpty()) {
ret += val;
} else if (val.startsWith(Option::mkfile::source_root)
&& (val.length() == Option::mkfile::source_root.length()
|| val.at(Option::mkfile::source_root.length()) == QLatin1Char('/'))) {
ret += Option::mkfile::build_root + val.mid(Option::mkfile::source_root.length());
}
break; }
case E_ABSOLUTE_PATH:
if (args.count() > 2)
fprintf(stderr, "%s:%d absolute_path(path[, base]) requires one or two arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
else
ret += QDir::cleanPath(QDir(args.count() > 1 ? args.at(1) : QString())
.absoluteFilePath(args.at(0)));
break;
case E_RELATIVE_PATH:
if (args.count() > 2)
fprintf(stderr, "%s:%d relative_path(path[, base]) requires one or two arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
else
ret += QDir::cleanPath(QDir(args.count() > 1 ? args.at(1) : QString())
.relativeFilePath(args.at(0)));
break;
case E_CLEAN_PATH:
if (args.count() != 1)
fprintf(stderr, "%s:%d clean_path(path) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
else
ret += QDir::cleanPath(args.at(0));
break;
case E_NATIVE_PATH:
if (args.count() != 1)
fprintf(stderr, "%s:%d native_path(path) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
else
ret += Option::fixPathToTargetOS(args.at(0), false);
break;
case E_SHELL_QUOTE:
if (args.count() != 1)
fprintf(stderr, "%s:%d shell_quote(args) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
else
ret += shellQuote(args.at(0));
break;
default: {
fprintf(stderr, "%s:%d: Unknown replace function: %s\n",
parser.file.toLatin1().constData(), parser.line_no,
func.toLatin1().constData());
break; }
}
return ret;
}
bool
QMakeProject::doProjectTest(QString func, QStringList args, QHash<QString, QStringList> &place)
{
QList<QStringList> args_list;
for(int i = 0; i < args.size(); ++i) {
QStringList arg = split_value_list(args[i]), tmp;
for(int i = 0; i < arg.size(); ++i)
tmp += doVariableReplaceExpand(arg[i], place);
args_list += tmp;
}
return doProjectTest(func, args_list, place);
}
bool
QMakeProject::doProjectTest(QString func, QList<QStringList> args_list, QHash<QString, QStringList> &place)
{
func = func.trimmed();
if(testFunctions.contains(func)) {
FunctionBlock *defined = testFunctions[func];
QStringList ret;
function_blocks.push(defined);
defined->exec(args_list, this, place, ret);
bool correct = function_blocks.pop() == defined;
Q_ASSERT(correct); Q_UNUSED(correct);
if(ret.isEmpty()) {
return true;
} else {
if(ret.first() == "true") {
return true;
} else if(ret.first() == "false") {
return false;
} else {
bool ok;
int val = ret.first().toInt(&ok);
if(ok)
return val;
fprintf(stderr, "%s:%d Unexpected return value from test %s [%s].\n",
parser.file.toLatin1().constData(),
parser.line_no, func.toLatin1().constData(),
ret.join("::").toLatin1().constData());
}
return false;
}
return false;
}
QStringList args; //why don't the builtin functions just use args_list? --Sam
for(int i = 0; i < args_list.size(); ++i)
args += args_list[i].join(QString(Option::field_sep));
TestFunc func_t = qmake_testFunctions().value(func);
debug_msg(1, "Running project test: %s(%s) [%d]",
func.toLatin1().constData(), args.join("::").toLatin1().constData(), func_t);
switch(func_t) {
case T_REQUIRES:
return doProjectCheckReqs(args, place);
case T_LESSTHAN:
case T_GREATERTHAN: {
if(args.count() != 2) {
fprintf(stderr, "%s:%d: %s(variable, value) requires two arguments.\n", parser.file.toLatin1().constData(),
parser.line_no, func.toLatin1().constData());
return false;
}
QString rhs(args[1]), lhs(values(args[0], place).join(QString(Option::field_sep)));
bool ok;
int rhs_int = rhs.toInt(&ok);
if(ok) { // do integer compare
int lhs_int = lhs.toInt(&ok);
if(ok) {
if(func_t == T_GREATERTHAN)
return lhs_int > rhs_int;
return lhs_int < rhs_int;
}
}
if(func_t == T_GREATERTHAN)
return lhs > rhs;
return lhs < rhs; }
case T_IF: {
if(args.count() != 1) {
fprintf(stderr, "%s:%d: if(condition) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
const QString cond = args.first();
const QChar *d = cond.unicode();
QChar quote = 0;
bool ret = true, or_op = false;
QString test;
for(int d_off = 0, parens = 0, d_len = cond.size(); d_off < d_len; ++d_off) {
if(!quote.isNull()) {
if(*(d+d_off) == quote)
quote = QChar();
} else if(*(d+d_off) == '(') {
++parens;
} else if(*(d+d_off) == ')') {
--parens;
} else if(*(d+d_off) == '"' /*|| *(d+d_off) == '\''*/) {
quote = *(d+d_off);
}
if(!parens && quote.isNull() && (*(d+d_off) == QLatin1Char(':') || *(d+d_off) == QLatin1Char('|') || d_off == d_len-1)) {
if(d_off == d_len-1)
test += *(d+d_off);
if(!test.isEmpty()) {
if (or_op != ret)
ret = doProjectTest(test, place);
test.clear();
}
if(*(d+d_off) == QLatin1Char(':')) {
or_op = false;
} else if(*(d+d_off) == QLatin1Char('|')) {
or_op = true;
}
} else {
test += *(d+d_off);
}
}
return ret; }
case T_EQUALS:
if(args.count() != 2) {
fprintf(stderr, "%s:%d: %s(variable, value) requires two arguments.\n", parser.file.toLatin1().constData(),
parser.line_no, func.toLatin1().constData());
return false;
}
return values(args[0], place).join(QString(Option::field_sep)) == args[1];
case T_EXISTS: {
if(args.count() != 1) {
fprintf(stderr, "%s:%d: exists(file) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
QString file = Option::normalizePath(args.first());
if(QFile::exists(file))
return true;
//regular expression I guess
QString dirstr = qmake_getpwd();
int slsh = file.lastIndexOf(QLatin1Char('/'));
if(slsh != -1) {
dirstr = file.left(slsh+1);
file = file.right(file.length() - slsh - 1);
}
return QDir(dirstr).entryList(QStringList(file)).count(); }
case T_EXPORT:
if(args.count() != 1) {
fprintf(stderr, "%s:%d: export(variable) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
for(int i = 0; i < function_blocks.size(); ++i) {
FunctionBlock *f = function_blocks.at(i);
f->vars[args[0]] = values(args[0], place);
if(!i && f->calling_place)
(*f->calling_place)[args[0]] = values(args[0], place);
}
return true;
case T_CLEAR:
if(args.count() != 1) {
fprintf(stderr, "%s:%d: clear(variable) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
if(!place.contains(args[0]))
return false;
place[args[0]].clear();
return true;
case T_UNSET:
if(args.count() != 1) {
fprintf(stderr, "%s:%d: unset(variable) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
if(!place.contains(args[0]))
return false;
place.remove(args[0]);
return true;
case T_EVAL: {
if(args.count() < 1 && 0) {
fprintf(stderr, "%s:%d: eval(project) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
QString project = args.join(" ");
parser_info pi = parser;
parser.from_file = false;
parser.file = "(eval)";
parser.line_no = 0;
QTextStream t(&project, QIODevice::ReadOnly);
bool ret = read(t, place);
parser = pi;
return ret; }
case T_CONFIG: {
if(args.count() < 1 || args.count() > 2) {
fprintf(stderr, "%s:%d: CONFIG(config) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
if(args.count() == 1)
return isActiveConfig(args[0]);
const QStringList mutuals = args[1].split('|');
const QStringList &configs = values("CONFIG", place);
for(int i = configs.size()-1; i >= 0; i--) {
for(int mut = 0; mut < mutuals.count(); mut++) {
if(configs[i] == mutuals[mut].trimmed())
return (configs[i] == args[0]);
}
}
return false; }
case T_SYSTEM:
if(args.count() < 1 || args.count() > 2) {
fprintf(stderr, "%s:%d: system(exec) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
if(args.count() == 2) {
const QString sarg = args[1];
if (sarg.toLower() == "true" || sarg.toInt())
warn_msg(WarnParser, "%s:%d: system()'s second argument is now hard-wired to false.\n",
parser.file.toLatin1().constData(), parser.line_no);
}
return system(args[0].toLatin1().constData()) == 0;
case T_RETURN:
if(function_blocks.isEmpty()) {
fprintf(stderr, "%s:%d unexpected return()\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
FunctionBlock *f = function_blocks.top();
f->cause_return = true;
if(args_list.count() >= 1)
f->return_value += args_list[0];
}
return true;
case T_BREAK:
if(iterator)
iterator->cause_break = true;
else
fprintf(stderr, "%s:%d unexpected break()\n",
parser.file.toLatin1().constData(), parser.line_no);
return true;
case T_NEXT:
if(iterator)
iterator->cause_next = true;
else
fprintf(stderr, "%s:%d unexpected next()\n",
parser.file.toLatin1().constData(), parser.line_no);
return true;
case T_DEFINED:
if(args.count() < 1 || args.count() > 2) {
fprintf(stderr, "%s:%d: defined(function) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
} else {
if(args.count() > 1) {
if(args[1] == "test")
return testFunctions.contains(args[0]);
else if(args[1] == "replace")
return replaceFunctions.contains(args[0]);
else if(args[1] == "var")
return place.contains(args[0]);
fprintf(stderr, "%s:%d: defined(function, type): unexpected type [%s].\n",
parser.file.toLatin1().constData(), parser.line_no,
args[1].toLatin1().constData());
} else {
if(replaceFunctions.contains(args[0]) || testFunctions.contains(args[0]))
return true;
}
}
return false;
case T_CONTAINS: {
if(args.count() < 2 || args.count() > 3) {
fprintf(stderr, "%s:%d: contains(var, val) requires at lesat 2 arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
QRegExp regx(args[1]);
const QStringList &l = values(args[0], place);
if(args.count() == 2) {
for(int i = 0; i < l.size(); ++i) {
const QString val = l[i];
if(regx.exactMatch(val) || val == args[1])
return true;
}
} else {
const QStringList mutuals = args[2].split('|');
for(int i = l.size()-1; i >= 0; i--) {
const QString val = l[i];
for(int mut = 0; mut < mutuals.count(); mut++) {
if(val == mutuals[mut].trimmed())
return (regx.exactMatch(val) || val == args[1]);
}
}
}
return false; }
case T_INFILE: {
if(args.count() < 2 || args.count() > 3) {
fprintf(stderr, "%s:%d: infile(file, var, val) requires at least 2 arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
bool ret = false;
QHash<QString, QStringList> tmp;
if(doProjectInclude(Option::normalizePath(args[0]), IncludeFlagNewParser, tmp) == IncludeSuccess) {
if(tmp.contains("QMAKE_INTERNAL_INCLUDED_FILES")) {
QStringList &out = place["QMAKE_INTERNAL_INCLUDED_FILES"];
const QStringList &in = tmp["QMAKE_INTERNAL_INCLUDED_FILES"];
for(int i = 0; i < in.size(); ++i) {
if(out.indexOf(in[i]) == -1)
out += in[i];
}
}
if(args.count() == 2) {
ret = tmp.contains(args[1]);
} else {
QRegExp regx(args[2]);
const QStringList &l = tmp[args[1]];
for(QStringList::ConstIterator it = l.begin(); it != l.end(); ++it) {
if(regx.exactMatch((*it)) || (*it) == args[2]) {
ret = true;
break;
}
}
}
}
return ret; }
case T_COUNT:
if(args.count() != 2 && args.count() != 3) {
fprintf(stderr, "%s:%d: count(var, count) requires two arguments.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
if(args.count() == 3) {
QString comp = args[2];
if(comp == ">" || comp == "greaterThan")
return values(args[0], place).count() > args[1].toInt();
if(comp == ">=")
return values(args[0], place).count() >= args[1].toInt();
if(comp == "<" || comp == "lessThan")
return values(args[0], place).count() < args[1].toInt();
if(comp == "<=")
return values(args[0], place).count() <= args[1].toInt();
if(comp == "equals" || comp == "isEqual" || comp == "=" || comp == "==")
return values(args[0], place).count() == args[1].toInt();
fprintf(stderr, "%s:%d: unexpected modifier to count(%s)\n", parser.file.toLatin1().constData(),
parser.line_no, comp.toLatin1().constData());
return false;
}
return values(args[0], place).count() == args[1].toInt();
case T_ISEMPTY:
if(args.count() != 1) {
fprintf(stderr, "%s:%d: isEmpty(var) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
return values(args[0], place).isEmpty();
case T_INCLUDE:
case T_LOAD: {
QString parseInto;
const bool include_statement = (func_t == T_INCLUDE);
bool ignore_error = false;
if(args.count() >= 2) {
if(func_t == T_INCLUDE) {
parseInto = args[1];
if (args.count() == 3){
QString sarg = args[2];
if (sarg.toLower() == "true" || sarg.toInt())
ignore_error = true;
}
} else {
QString sarg = args[1];
ignore_error = (sarg.toLower() == "true" || sarg.toInt());
}
} else if(args.count() != 1) {
QString func_desc = "load(feature)";
if(include_statement)
func_desc = "include(file)";
fprintf(stderr, "%s:%d: %s requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no, func_desc.toLatin1().constData());
return false;
}
QString file = Option::normalizePath(args.first());
uchar flags = IncludeFlagNone;
if(!include_statement)
flags |= IncludeFlagFeature;
IncludeStatus stat = IncludeFailure;
if(!parseInto.isEmpty()) {
QHash<QString, QStringList> symbols;
stat = doProjectInclude(file, flags|IncludeFlagNewProject, symbols);
if(stat == IncludeSuccess) {
QHash<QString, QStringList> out_place;
for(QHash<QString, QStringList>::ConstIterator it = place.begin(); it != place.end(); ++it) {
const QString var = it.key();
if(var != parseInto && !var.startsWith(parseInto + "."))
out_place.insert(var, it.value());
}
for(QHash<QString, QStringList>::ConstIterator it = symbols.begin(); it != symbols.end(); ++it) {
const QString var = it.key();
if(!var.startsWith("."))
out_place.insert(parseInto + "." + it.key(), it.value());
}
place = out_place;
}
} else {
stat = doProjectInclude(file, flags, place);
}
if(stat == IncludeFeatureAlreadyLoaded) {
warn_msg(WarnParser, "%s:%d: Duplicate of loaded feature %s",
parser.file.toLatin1().constData(), parser.line_no, file.toLatin1().constData());
} else if(stat == IncludeNoExist && !ignore_error) {
warn_msg(WarnAll, "%s:%d: Unable to find file for inclusion %s",
parser.file.toLatin1().constData(), parser.line_no, file.toLatin1().constData());
return false;
} else if(stat >= IncludeFailure) {
if(!ignore_error) {
printf("Project LOAD(): Feature %s cannot be found.\n", file.toLatin1().constData());
if (!ignore_error)
#if defined(QT_BUILD_QMAKE_LIBRARY)
return false;
#else
exit(3);
#endif
}
return false;
}
return true; }
case T_DEBUG: {
if(args.count() != 2) {
fprintf(stderr, "%s:%d: debug(level, message) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no);
return false;
}
QString msg = fixEnvVariables(args[1]);
debug_msg(args[0].toInt(), "Project DEBUG: %s", msg.toLatin1().constData());
return true; }
case T_LOG:
case T_ERROR:
case T_MESSAGE:
case T_WARNING: {
if(args.count() != 1) {
fprintf(stderr, "%s:%d: %s(message) requires one argument.\n", parser.file.toLatin1().constData(),
parser.line_no, func.toLatin1().constData());
return false;
}
QString msg = fixEnvVariables(args.first());
if (func_t == T_LOG) {
fputs(msg.toLatin1().constData(), stderr);
} else {
fprintf(stderr, "Project %s: %s\n", func.toUpper().toLatin1().constData(), msg.toLatin1().constData());
if (func == "error")
#if defined(QT_BUILD_QMAKE_LIBRARY)
return false;
#else
exit(2);
#endif
}
return true; }
case T_OPTION:
if (args.count() != 1) {
fprintf(stderr, "%s:%d: option() requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
if (args.first() == "host_build") {
if (!host_build && isActiveConfig("cross_compile")) {
host_build = true;
need_restart = true;
}
} else {
fprintf(stderr, "%s:%d: unrecognized option() argument '%s'.\n",
parser.file.toLatin1().constData(), parser.line_no,
args.first().toLatin1().constData());
return false;
}
return true;
case T_CACHE: {
if (args.count() > 3) {
fprintf(stderr, "%s:%d: cache(var, [set|add|sub] [transient] [super], [srcvar]) requires one to three arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
bool persist = true;
bool super = false;
enum { CacheSet, CacheAdd, CacheSub } mode = CacheSet;
QString srcvar;
if (args.count() >= 2) {
foreach (const QString &opt, split_value_list(args.at(1))) {
if (opt == QLatin1String("transient")) {
persist = false;
} else if (opt == QLatin1String("super")) {
super = true;
} else if (opt == QLatin1String("set")) {
mode = CacheSet;
} else if (opt == QLatin1String("add")) {
mode = CacheAdd;
} else if (opt == QLatin1String("sub")) {
mode = CacheSub;
} else {
fprintf(stderr, "%s:%d: cache(): invalid flag %s.\n",
parser.file.toLatin1().constData(), parser.line_no,
opt.toLatin1().constData());
return false;
}
}
if (args.count() >= 3) {
srcvar = args.at(2);
} else if (mode != CacheSet) {
fprintf(stderr, "%s:%d: cache(): modes other than 'set' require a source variable.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
}
QString varstr;
QString dstvar = args.at(0);
if (!dstvar.isEmpty()) {
if (srcvar.isEmpty())
srcvar = dstvar;
if (!place.contains(srcvar)) {
fprintf(stderr, "%s:%d: variable %s is not defined.\n",
parser.file.toLatin1().constData(), parser.line_no,
srcvar.toLatin1().constData());
return false;
}
// The current ("native") value can differ from the cached value, e.g., the current
// CONFIG will typically have more values than the cached one. Therefore we deal with
// them separately.
const QStringList diffval = values(srcvar, place);
const QStringList oldval = base_vars.value(dstvar);
QStringList newval;
if (mode == CacheSet) {
newval = diffval;
} else {
newval = oldval;
if (mode == CacheAdd)
newval += diffval;
else
subAll(&newval, diffval);
}
// We assume that whatever got the cached value to be what it is now will do so
// the next time as well, so it is OK that the early exit here will skip the
// persisting as well.
if (oldval == newval)
return true;
base_vars[dstvar] = newval;
do {
if (dstvar == "QMAKEPATH")
cached_qmakepath = newval;
else if (dstvar == "QMAKEFEATURES")
cached_qmakefeatures = newval;
else
break;
invalidateFeatureRoots();
} while (false);
if (!persist)
return true;
varstr = dstvar;
if (mode == CacheAdd)
varstr += QLatin1String(" +=");
else if (mode == CacheSub)
varstr += QLatin1String(" -=");
else
varstr += QLatin1String(" =");
if (diffval.count() == 1) {
varstr += QLatin1Char(' ');
varstr += quoteValue(diffval.at(0));
} else if (!diffval.isEmpty()) {
foreach (const QString &vval, diffval) {
varstr += QLatin1String(" \\\n ");
varstr += quoteValue(vval);
}
}
varstr += QLatin1Char('\n');
}
QString fn;
if (super) {
if (superfile.isEmpty()) {
superfile = Option::output_dir + QLatin1String("/.qmake.super");
printf("Info: creating super cache file %s\n", superfile.toLatin1().constData());
vars["_QMAKE_SUPER_CACHE_"] << superfile;
}
fn = superfile;
} else {
if (cachefile.isEmpty()) {
cachefile = Option::output_dir + QLatin1String("/.qmake.cache");
printf("Info: creating cache file %s\n", cachefile.toLatin1().constData());
vars["_QMAKE_CACHE_"] << cachefile;
if (cached_build_root.isEmpty()) {
cached_build_root = Option::output_dir;
cached_source_root = values("_PRO_FILE_PWD_", place).first();
if (cached_source_root == cached_build_root)
cached_source_root.clear();
invalidateFeatureRoots();
}
}
fn = cachefile;
}
QFileInfo qfi(fn);
if (!QDir::current().mkpath(qfi.path())) {
fprintf(stderr, "%s:%d: ERROR creating cache directory %s\n",
parser.file.toLatin1().constData(), parser.line_no,
qfi.path().toLatin1().constData());
return false;
}
QString errStr;
if (!writeFile(fn, QIODevice::Append, varstr, &errStr)) {
fprintf(stderr, "ERROR writing cache file %s: %s\n",
fn.toLatin1().constData(), errStr.toLatin1().constData());
#if defined(QT_BUILD_QMAKE_LIBRARY)
return false;
#else
exit(2);
#endif
}
return true; }
case T_MKPATH:
if (args.count() != 1) {
fprintf(stderr, "%s:%d: mkpath(name) requires one argument.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
if (!QDir::current().mkpath(args.at(0))) {
fprintf(stderr, "%s:%d: ERROR creating directory %s\n",
parser.file.toLatin1().constData(), parser.line_no,
QDir::toNativeSeparators(args.at(0)).toLatin1().constData());
return false;
}
return true;
case T_WRITE_FILE: {
if (args.count() > 3) {
fprintf(stderr, "%s:%d: write_file(name, [content var, [append]]) requires one to three arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
QIODevice::OpenMode mode = QIODevice::Truncate;
QString contents;
if (args.count() >= 2) {
QStringList vals = values(args.at(1), place);
if (!vals.isEmpty())
contents = vals.join(QLatin1String("\n")) + QLatin1Char('\n');
if (args.count() >= 3)
if (!args.at(2).compare(QLatin1String("append"), Qt::CaseInsensitive))
mode = QIODevice::Append;
}
QFileInfo qfi(args.at(0));
if (!QDir::current().mkpath(qfi.path())) {
fprintf(stderr, "%s:%d: ERROR creating directory %s\n",
parser.file.toLatin1().constData(), parser.line_no,
qfi.path().toLatin1().constData());
return false;
}
QString errStr;
if (!writeFile(args.at(0), mode, contents, &errStr)) {
fprintf(stderr, "%s:%d ERROR writing %s: %s\n",
parser.file.toLatin1().constData(), parser.line_no,
args.at(0).toLatin1().constData(), errStr.toLatin1().constData());
return false;
}
return true; }
case T_TOUCH: {
if (args.count() != 2) {
fprintf(stderr, "%s:%d: touch(file, reffile) requires two arguments.\n",
parser.file.toLatin1().constData(), parser.line_no);
return false;
}
#ifdef Q_OS_UNIX
struct stat st;
if (stat(args.at(1).toLocal8Bit().constData(), &st)) {
fprintf(stderr, "%s:%d: ERROR: cannot stat() reference file %s: %s.\n",
parser.file.toLatin1().constData(), parser.line_no,
args.at(1).toLatin1().constData(), strerror(errno));
return false;
}
struct utimbuf utb;
utb.actime = time(0);
utb.modtime = st.st_mtime;
if (utime(args.at(0).toLocal8Bit().constData(), &utb)) {
fprintf(stderr, "%s:%d: ERROR: cannot touch %s: %s.\n",
parser.file.toLatin1().constData(), parser.line_no,
args.at(0).toLatin1().constData(), strerror(errno));
return false;
}
#else
HANDLE rHand = CreateFile((wchar_t*)args.at(1).utf16(),
GENERIC_READ, FILE_SHARE_READ,
NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
if (rHand == INVALID_HANDLE_VALUE) {
fprintf(stderr, "%s:%d: ERROR: cannot open() reference file %s: %s.\n",
parser.file.toLatin1().constData(), parser.line_no,
args.at(1).toLatin1().constData(),
windowsErrorCode().toLatin1().constData());
return false;
}
FILETIME ft;
GetFileTime(rHand, 0, 0, &ft);
CloseHandle(rHand);
HANDLE wHand = CreateFile((wchar_t*)args.at(0).utf16(),
GENERIC_WRITE, FILE_SHARE_READ,
NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
if (wHand == INVALID_HANDLE_VALUE) {
fprintf(stderr, "%s:%d: ERROR: cannot open %s: %s.\n",
parser.file.toLatin1().constData(), parser.line_no,
args.at(0).toLatin1().constData(),
windowsErrorCode().toLatin1().constData());
return false;
}
SetFileTime(wHand, 0, 0, &ft);
CloseHandle(wHand);
#endif
break; }
default:
fprintf(stderr, "%s:%d: Unknown test function: %s\n", parser.file.toLatin1().constData(), parser.line_no,
func.toLatin1().constData());
}
return false;
}
bool
QMakeProject::doProjectCheckReqs(const QStringList &deps, QHash<QString, QStringList> &place)
{
bool ret = false;
for(QStringList::ConstIterator it = deps.begin(); it != deps.end(); ++it) {
bool test = doProjectTest((*it), place);
if(!test) {
debug_msg(1, "Project Parser: %s:%d Failed test: REQUIRES = %s",
parser.file.toLatin1().constData(), parser.line_no,
(*it).toLatin1().constData());
place["QMAKE_FAILED_REQUIREMENTS"].append((*it));
ret = false;
}
}
return ret;
}
bool
QMakeProject::test(const QString &v)
{
QHash<QString, QStringList> tmp = vars;
return doProjectTest(v, tmp);
}
bool
QMakeProject::test(const QString &func, const QList<QStringList> &args)
{
QHash<QString, QStringList> tmp = vars;
return doProjectTest(func, args, tmp);
}
QStringList
QMakeProject::expand(const QString &str)
{
bool ok;
QHash<QString, QStringList> tmp = vars;
const QStringList ret = doVariableReplaceExpand(str, tmp, &ok);
if(ok)
return ret;
return QStringList();
}
QString
QMakeProject::expand(const QString &str, const QString &file, int line)
{
bool ok;
parser_info pi = parser;
parser.file = file;
parser.line_no = line;
parser.from_file = false;
QHash<QString, QStringList> tmp = vars;
const QStringList ret = doVariableReplaceExpand(str, tmp, &ok);
parser = pi;
return ok ? ret.join(QString(Option::field_sep)) : QString();
}
QStringList
QMakeProject::expand(const QString &func, const QList<QStringList> &args)
{
QHash<QString, QStringList> tmp = vars;
return doProjectExpand(func, args, tmp);
}
bool
QMakeProject::doVariableReplace(QString &str, QHash<QString, QStringList> &place)
{
bool ret;
str = doVariableReplaceExpand(str, place, &ret).join(QString(Option::field_sep));
return ret;
}
QStringList
QMakeProject::doVariableReplaceExpand(const QString &str, QHash<QString, QStringList> &place, bool *ok)
{
QStringList ret;
if(ok)
*ok = true;
if(str.isEmpty())
return ret;
const ushort LSQUARE = '[';
const ushort RSQUARE = ']';
const ushort LCURLY = '{';
const ushort RCURLY = '}';
const ushort LPAREN = '(';
const ushort RPAREN = ')';
const ushort DOLLAR = '$';
const ushort SLASH = '\\';
const ushort UNDERSCORE = '_';
const ushort DOT = '.';
const ushort SPACE = ' ';
const ushort TAB = '\t';
const ushort SINGLEQUOTE = '\'';
const ushort DOUBLEQUOTE = '"';
ushort unicode, quote = 0;
const QChar *str_data = str.data();
const int str_len = str.length();
ushort term;
QString var, args;
int replaced = 0;
QString current;
for(int i = 0; i < str_len; ++i) {
unicode = str_data[i].unicode();
const int start_var = i;
if(unicode == DOLLAR && str_len > i+2) {
unicode = str_data[++i].unicode();
if(unicode == DOLLAR) {
term = 0;
var.clear();
args.clear();
enum { VAR, ENVIRON, FUNCTION, PROPERTY } var_type = VAR;
unicode = str_data[++i].unicode();
if(unicode == LSQUARE) {
unicode = str_data[++i].unicode();
term = RSQUARE;
var_type = PROPERTY;
} else if(unicode == LCURLY) {
unicode = str_data[++i].unicode();
var_type = VAR;
term = RCURLY;
} else if(unicode == LPAREN) {
unicode = str_data[++i].unicode();
var_type = ENVIRON;
term = RPAREN;
}
while(1) {
if(!(unicode & (0xFF<<8)) &&
unicode != DOT && unicode != UNDERSCORE &&
//unicode != SINGLEQUOTE && unicode != DOUBLEQUOTE &&
(unicode < 'a' || unicode > 'z') && (unicode < 'A' || unicode > 'Z') &&
(unicode < '0' || unicode > '9') && (!term || unicode != '/'))
break;
var.append(QChar(unicode));
if(++i == str_len)
break;
unicode = str_data[i].unicode();
// at this point, i points to either the 'term' or 'next' character (which is in unicode)
}
if(var_type == VAR && unicode == LPAREN) {
var_type = FUNCTION;
int depth = 0;
while(1) {
if(++i == str_len)
break;
unicode = str_data[i].unicode();
if(unicode == LPAREN) {
depth++;
} else if(unicode == RPAREN) {
if(!depth)
break;
--depth;
}
args.append(QChar(unicode));
}
if(++i < str_len)
unicode = str_data[i].unicode();
else
unicode = 0;
// at this point i is pointing to the 'next' character (which is in unicode)
// this might actually be a term character since you can do $${func()}
}
if(term) {
if(unicode != term) {
qmake_error_msg("Missing " + QString(term) + " terminator [found " + (unicode?QString(unicode):QString("end-of-line")) + "]");
if(ok)
*ok = false;
return QStringList();
}
} else {
// move the 'cursor' back to the last char of the thing we were looking at
--i;
}
// since i never points to the 'next' character, there is no reason for this to be set
unicode = 0;
QStringList replacement;
if(var_type == ENVIRON) {
replacement = split_value_list(QString::fromLocal8Bit(qgetenv(var.toLatin1().constData())));
} else if(var_type == PROPERTY) {
if(prop)
replacement = split_value_list(prop->value(var));
} else if(var_type == FUNCTION) {
replacement = doProjectExpand(var, args, place);
} else if(var_type == VAR) {
replacement = magicValues(var, place);
}
if(!(replaced++) && start_var)
current = str.left(start_var);
if(!replacement.isEmpty()) {
if(quote) {
current += replacement.join(QString(Option::field_sep));
} else {
current += replacement.takeFirst();
if(!replacement.isEmpty()) {
if(!current.isEmpty())
ret.append(current);
current = replacement.takeLast();
if(!replacement.isEmpty())
ret += replacement;
}
}
}
debug_msg(2, "Project Parser [var replace]: %s -> %s",
str.toLatin1().constData(), var.toLatin1().constData(),
replacement.join("::").toLatin1().constData());
} else {
if(replaced)
current.append("$");
}
}
if(quote && unicode == quote) {
unicode = 0;
quote = 0;
} else if(unicode == SLASH) {
bool escape = false;
const char *symbols = "[]{}()$\\'\"";
for(const char *s = symbols; *s; ++s) {
if(str_data[i+1].unicode() == (ushort)*s) {
i++;
escape = true;
if(!(replaced++))
current = str.left(start_var);
current.append(str.at(i));
break;
}
}
if(!escape && !backslashWarned) {
backslashWarned = true;
warn_msg(WarnDeprecated, "%s:%d: Unescaped backslashes are deprecated.",
parser.file.toLatin1().constData(), parser.line_no);
}
if(escape || !replaced)
unicode =0;
} else if(!quote && (unicode == SINGLEQUOTE || unicode == DOUBLEQUOTE)) {
quote = unicode;
unicode = 0;
if(!(replaced++) && i)
current = str.left(i);
} else if(!quote && (unicode == SPACE || unicode == TAB)) {
unicode = 0;
if(!current.isEmpty()) {
ret.append(current);
current.clear();
}
}
if(replaced && unicode)
current.append(QChar(unicode));
}
if(!replaced)
ret = QStringList(str);
else if(!current.isEmpty())
ret.append(current);
//qDebug() << "REPLACE" << str << ret;
if (quote)
warn_msg(WarnDeprecated, "%s:%d: Unmatched quotes are deprecated.",
parser.file.toLatin1().constData(), parser.line_no);
return ret;
}
QStringList QMakeProject::magicValues(const QString &_var, const QHash<QString, QStringList> &place) const
{
QString var = varMap(_var);
if (var == QLatin1String("_LINE_")) { //parser line number
return QStringList(QString::number(parser.line_no));
} else if(var == QLatin1String("_FILE_")) { //parser file
return QStringList(parser.file);
}
return place[var];
}
QStringList &QMakeProject::values(const QString &_var, QHash<QString, QStringList> &place)
{
QString var = varMap(_var);
return place[var];
}
bool QMakeProject::isEmpty(const QString &v) const
{
QHash<QString, QStringList>::ConstIterator it = vars.constFind(v);
return it == vars.constEnd() || it->isEmpty();
}
void
QMakeProject::dump() const
{
QStringList out;
for (QHash<QString, QStringList>::ConstIterator it = vars.begin(); it != vars.end(); ++it) {
if (!it.key().startsWith('.')) {
QString str = it.key() + " =";
foreach (const QString &v, it.value())
str += ' ' + quoteValue(v);
out << str;
}
}
out.sort();
foreach (const QString &v, out)
puts(qPrintable(v));
}
QT_END_NAMESPACE