qmakeevaluator.cpp 64.6 KB
Newer Older
hjk's avatar
hjk committed
1
/****************************************************************************
2
**
3
** Copyright (C) 2013 Digia Plc and/or its subsidiary(-ies).
hjk's avatar
hjk committed
4
** Contact: http://www.qt-project.org/legal
5
**
hjk's avatar
hjk committed
6
** This file is part of Qt Creator.
7
**
hjk's avatar
hjk committed
8
9
10
11
12
13
14
** Commercial License Usage
** Licensees holding valid commercial Qt licenses may use this file in
** accordance with the commercial license agreement provided with the
** Software or, alternatively, in accordance with the terms contained in
** a written agreement between you and Digia.  For licensing terms and
** conditions see http://qt.digia.com/licensing.  For further information
** use the contact form at http://qt.digia.com/contact-us.
15
16
**
** GNU Lesser General Public License Usage
hjk's avatar
hjk committed
17
18
19
20
21
22
** Alternatively, 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.
23
**
hjk's avatar
hjk committed
24
25
** In addition, as a special exception, Digia gives you certain additional
** rights.  These rights are described in the Digia Qt LGPL Exception
26
27
** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.
**
hjk's avatar
hjk committed
28
****************************************************************************/
29
30

#include "qmakeevaluator.h"
31
#include "qmakeevaluator_p.h"
32
33
34
35
36

#include "qmakeglobals.h"
#include "qmakeparser.h"
#include "ioutils.h"

37
38
39
40
41
42
43
44
45
46
47
48
#include <qbytearray.h>
#include <qdatetime.h>
#include <qdebug.h>
#include <qdir.h>
#include <qfile.h>
#include <qfileinfo.h>
#include <qlist.h>
#include <qregexp.h>
#include <qset.h>
#include <qstack.h>
#include <qstring.h>
#include <qstringlist.h>
49
#ifdef PROEVALUATOR_THREAD_SAFE
50
# include <qthreadpool.h>
51
52
53
54
55
56
#endif

#ifdef Q_OS_UNIX
#include <unistd.h>
#include <sys/utsname.h>
#else
Yuchen Deng's avatar
Yuchen Deng committed
57
#include <windows.h>
58
59
60
61
#endif
#include <stdio.h>
#include <stdlib.h>

62
using namespace QMakeInternal;
63
64
65
66
67

QT_BEGIN_NAMESPACE

#define fL1S(s) QString::fromLatin1(s)

68

69
70
71
72
73
74
75
QMakeBaseKey::QMakeBaseKey(const QString &_root, bool _hostBuild)
    : root(_root), hostBuild(_hostBuild)
{
}

uint qHash(const QMakeBaseKey &key)
{
Orgad Shaneh's avatar
Orgad Shaneh committed
76
    return qHash(key.root) ^ (uint)key.hostBuild;
77
78
79
80
81
82
83
}

bool operator==(const QMakeBaseKey &one, const QMakeBaseKey &two)
{
    return one.root == two.root && one.hostBuild == two.hostBuild;
}

84
85
86
87
88
89
90
91
92
93
94
95
96
QMakeBaseEnv::QMakeBaseEnv()
    : evaluator(0)
{
#ifdef PROEVALUATOR_THREAD_SAFE
    inProgress = false;
#endif
}

QMakeBaseEnv::~QMakeBaseEnv()
{
    delete evaluator;
}

97
namespace QMakeInternal {
98
99
100
101
102
103
104
105
106
107
108
QMakeStatics statics;
}

void QMakeEvaluator::initStatics()
{
    if (!statics.field_sep.isNull())
        return;

    statics.field_sep = QLatin1String(" ");
    statics.strtrue = QLatin1String("true");
    statics.strfalse = QLatin1String("false");
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
109
110
    statics.strCONFIG = ProKey("CONFIG");
    statics.strARGS = ProKey("ARGS");
111
112
113
114
    statics.strDot = QLatin1String(".");
    statics.strDotDot = QLatin1String("..");
    statics.strever = QLatin1String("ever");
    statics.strforever = QLatin1String("forever");
115
    statics.strhost_build = QLatin1String("host_build");
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
116
    statics.strTEMPLATE = ProKey("TEMPLATE");
117
    statics.strQMAKE_PLATFORM = ProKey("QMAKE_PLATFORM");
118
#ifdef PROEVALUATOR_FULL
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
119
    statics.strREQUIRES = ProKey("REQUIRES");
120
#endif
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146

    statics.fakeValue = ProStringList(ProString("_FAKE_")); // It has to have a unique begin() value

    initFunctionStatics();

    static const struct {
        const char * const oldname, * const newname;
    } mapInits[] = {
        { "INTERFACES", "FORMS" },
        { "QMAKE_POST_BUILD", "QMAKE_POST_LINK" },
        { "TARGETDEPS", "POST_TARGETDEPS" },
        { "LIBPATH", "QMAKE_LIBDIR" },
        { "QMAKE_EXT_MOC", "QMAKE_EXT_CPP_MOC" },
        { "QMAKE_MOD_MOC", "QMAKE_H_MOD_MOC" },
        { "QMAKE_LFLAGS_SHAPP", "QMAKE_LFLAGS_APP" },
        { "PRECOMPH", "PRECOMPILED_HEADER" },
        { "PRECOMPCPP", "PRECOMPILED_SOURCE" },
        { "INCPATH", "INCLUDEPATH" },
        { "QMAKE_EXTRA_WIN_COMPILERS", "QMAKE_EXTRA_COMPILERS" },
        { "QMAKE_EXTRA_UNIX_COMPILERS", "QMAKE_EXTRA_COMPILERS" },
        { "QMAKE_EXTRA_WIN_TARGETS", "QMAKE_EXTRA_TARGETS" },
        { "QMAKE_EXTRA_UNIX_TARGETS", "QMAKE_EXTRA_TARGETS" },
        { "QMAKE_EXTRA_UNIX_INCLUDES", "QMAKE_EXTRA_INCLUDES" },
        { "QMAKE_EXTRA_UNIX_VARIABLES", "QMAKE_EXTRA_VARIABLES" },
        { "QMAKE_RPATH", "QMAKE_LFLAGS_RPATH" },
        { "QMAKE_FRAMEWORKDIR", "QMAKE_FRAMEWORKPATH" },
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
147
148
        { "QMAKE_FRAMEWORKDIR_FLAGS", "QMAKE_FRAMEWORKPATH_FLAGS" },
        { "IN_PWD", "PWD" }
149
150
    };
    for (unsigned i = 0; i < sizeof(mapInits)/sizeof(mapInits[0]); ++i)
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
151
        statics.varMap.insert(ProKey(mapInits[i].oldname), ProKey(mapInits[i].newname));
152
153
}

Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
154
const ProKey &QMakeEvaluator::map(const ProKey &var)
155
{
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
156
    QHash<ProKey, ProKey>::ConstIterator it = statics.varMap.constFind(var);
157
158
    if (it == statics.varMap.constEnd())
        return var;
Robert Loehning's avatar
Robert Loehning committed
159
    deprecationWarning(fL1S("Variable %1 is deprecated; use %2 instead.")
160
161
                       .arg(var.toQString(), it.value().toQString()));
    return it.value();
162
163
164
165
}


QMakeEvaluator::QMakeEvaluator(QMakeGlobals *option,
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
166
                               QMakeParser *parser, QMakeHandler *handler)
167
168
169
170
171
  :
#ifdef PROEVALUATOR_DEBUG
    m_debugLevel(option->debugLevel),
#endif
    m_option(option), m_parser(parser), m_handler(handler)
172
173
174
175
176
{
    // So that single-threaded apps don't have to call initialize() for now.
    initStatics();

    // Configuration, more or less
177
    m_caller = 0;
178
#ifdef PROEVALUATOR_CUMULATIVE
179
    m_cumulative = false;
180
#endif
181
    m_hostBuild = false;
182
183

    // Evaluator state
184
#ifdef PROEVALUATOR_CUMULATIVE
185
    m_skipLevel = 0;
186
#endif
187
    m_listCount = 0;
188
    m_valuemapStack.push(ProValueMap());
189
    m_valuemapInited = false;
190
191
192
193
194
195
}

QMakeEvaluator::~QMakeEvaluator()
{
}

196
197
198
199
200
void QMakeEvaluator::initFrom(const QMakeEvaluator &other)
{
    Q_ASSERT_X(&other, "QMakeEvaluator::visitProFile", "Project not prepared");
    m_functionDefs = other.m_functionDefs;
    m_valuemapStack = other.m_valuemapStack;
201
    m_valuemapInited = true;
202
203
    m_qmakespec = other.m_qmakespec;
    m_qmakespecName = other.m_qmakespecName;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
204
    m_mkspecPaths = other.m_mkspecPaths;
205
    m_featureRoots = other.m_featureRoots;
206
    m_dirSep = other.m_dirSep;
207
208
}

209
210
211
212
213
214
215
216
217
218
219
220
//////// Evaluator tools /////////

uint QMakeEvaluator::getBlockLen(const ushort *&tokPtr)
{
    uint len = *tokPtr++;
    len |= (uint)*tokPtr++ << 16;
    return len;
}

ProString QMakeEvaluator::getStr(const ushort *&tokPtr)
{
    uint len = *tokPtr++;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
221
    ProString ret(m_current.pro->items(), tokPtr - m_current.pro->tokPtr(), len);
222
223
224
225
226
    ret.setSource(m_current.pro);
    tokPtr += len;
    return ret;
}

Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
227
ProKey QMakeEvaluator::getHashStr(const ushort *&tokPtr)
228
229
230
{
    uint hash = getBlockLen(tokPtr);
    uint len = *tokPtr++;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
231
    ProKey ret(m_current.pro->items(), tokPtr - m_current.pro->tokPtr(), len, hash);
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
    tokPtr += len;
    return ret;
}

void QMakeEvaluator::skipStr(const ushort *&tokPtr)
{
    uint len = *tokPtr++;
    tokPtr += len;
}

void QMakeEvaluator::skipHashStr(const ushort *&tokPtr)
{
    tokPtr += 2;
    uint len = *tokPtr++;
    tokPtr += len;
}

// FIXME: this should not build new strings for direct sections.
// Note that the E_SPRINTF and E_LIST implementations rely on the deep copy.
ProStringList QMakeEvaluator::split_value_list(const QString &vals, const ProFile *source)
{
    QString build;
    ProStringList ret;

    if (!source)
        source = currentProFile();

    const QChar *vals_data = vals.data();
    const int vals_len = vals.length();
261
262
    ushort quote = 0;
    bool hadWord = false;
263
    for (int x = 0; x < vals_len; x++) {
264
265
266
267
        ushort unicode = vals_data[x].unicode();
        if (unicode == quote) {
            quote = 0;
            continue;
268
        }
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
        switch (unicode) {
        case '"':
        case '\'':
            quote = unicode;
            hadWord = true;
            continue;
        case ' ':
        case '\t':
            if (!quote) {
                if (hadWord) {
                    ret << ProString(build).setSource(source);
                    build.clear();
                    hadWord = false;
                }
                continue;
            }
            build += QChar(unicode);
            break;
        case '\\':
            if (x + 1 != vals_len) {
                ushort next = vals_data[++x].unicode();
                if (next == '\'' || next == '"' || next == '\\')
                    unicode = next;
                else
                    --x;
            }
            // fallthrough
        default:
            hadWord = true;
            build += QChar(unicode);
            break;
300
301
        }
    }
302
    if (hadWord)
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
303
        ret << ProString(build).setSource(source);
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
    return ret;
}

static void zipEmpty(ProStringList *value)
{
    for (int i = value->size(); --i >= 0;)
        if (value->at(i).isEmpty())
            value->remove(i);
}

static void insertUnique(ProStringList *varlist, const ProStringList &value)
{
    foreach (const ProString &str, value)
        if (!str.isEmpty() && !varlist->contains(str))
            varlist->append(str);
}

static void removeAll(ProStringList *varlist, const ProString &value)
{
    for (int i = varlist->size(); --i >= 0; )
        if (varlist->at(i) == value)
            varlist->remove(i);
}

Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
328
void QMakeEvaluator::removeEach(ProStringList *varlist, const ProStringList &value)
329
330
331
332
333
334
335
336
337
338
339
340
341
{
    foreach (const ProString &str, value)
        if (!str.isEmpty())
            removeAll(varlist, str);
}

static void replaceInList(ProStringList *varlist,
        const QRegExp &regexp, const QString &replace, bool global, QString &tmp)
{
    for (ProStringList::Iterator varit = varlist->begin(); varit != varlist->end(); ) {
        QString val = varit->toQString(tmp);
        QString copy = val; // Force detach and have a reference value
        val.replace(regexp, replace);
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
342
        if (!val.isSharedWith(copy) && val != copy) {
343
344
345
            if (val.isEmpty()) {
                varit = varlist->erase(varit);
            } else {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
346
                (*varit).setValue(val);
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
                ++varit;
            }
            if (!global)
                break;
        } else {
            ++varit;
        }
    }
}

//////// Evaluator /////////

static ALWAYS_INLINE void addStr(
        const ProString &str, ProStringList *ret, bool &pending, bool joined)
{
    if (joined) {
        ret->last().append(str, &pending);
    } else {
        if (!pending) {
            pending = true;
            *ret << str;
        } else {
            ret->last().append(str);
        }
    }
}

static ALWAYS_INLINE void addStrList(
        const ProStringList &list, ushort tok, ProStringList *ret, bool &pending, bool joined)
{
    if (!list.isEmpty()) {
        if (joined) {
            ret->last().append(list, &pending, !(tok & TokQuoted));
        } else {
            if (tok & TokQuoted) {
                if (!pending) {
                    pending = true;
                    *ret << ProString();
                }
                ret->last().append(list);
            } else {
                if (!pending) {
                    // Another qmake bizzarity: if nothing is pending and the
                    // first element is empty, it will be eaten
                    if (!list.at(0).isEmpty()) {
                        // The common case
                        pending = true;
                        *ret += list;
                        return;
                    }
                } else {
                    ret->last().append(list.at(0));
                }
                // This is somewhat slow, but a corner case
                for (int j = 1; j < list.size(); ++j) {
                    pending = true;
                    *ret << list.at(j);
                }
            }
        }
    }
}

void QMakeEvaluator::evaluateExpression(
        const ushort *&tokPtr, ProStringList *ret, bool joined)
{
413
    debugMsg(2, joined ? "evaluating joined expression" : "evaluating expression");
414
415
416
417
418
    if (joined)
        *ret << ProString();
    bool pending = false;
    forever {
        ushort tok = *tokPtr++;
419
420
        if (tok & TokNewStr) {
            debugMsg(2, "new string");
421
            pending = false;
422
        }
423
424
425
426
427
        ushort maskedTok = tok & TokMask;
        switch (maskedTok) {
        case TokLine:
            m_current.line = *tokPtr++;
            break;
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
        case TokLiteral: {
            const ProString &val = getStr(tokPtr);
            debugMsg(2, "literal %s", dbgStr(val));
            addStr(val, ret, pending, joined);
            break; }
        case TokHashLiteral: {
            const ProKey &val = getHashStr(tokPtr);
            debugMsg(2, "hashed literal %s", dbgStr(val.toString()));
            addStr(val, ret, pending, joined);
            break; }
        case TokVariable: {
            const ProKey &var = getHashStr(tokPtr);
            const ProStringList &val = values(map(var));
            debugMsg(2, "variable %s => %s", dbgKey(var), dbgStrList(val));
            addStrList(val, tok, ret, pending, joined);
            break; }
        case TokProperty: {
            const ProKey &var = getHashStr(tokPtr);
            const ProString &val = propertyValue(var);
            debugMsg(2, "property %s => %s", dbgKey(var), dbgStr(val));
            addStr(val, ret, pending, joined);
            break; }
        case TokEnvVar: {
            const ProString &var = getStr(tokPtr);
452
453
454
            const ProString &val = ProString(m_option->getEnv(var.toQString(m_tmp1)));
            debugMsg(2, "env var %s => %s", dbgStr(var), dbgStr(val));
            addStr(val, ret, pending, joined);
455
            break; }
456
        case TokFuncName: {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
457
            const ProKey &func = getHashStr(tokPtr);
458
            debugMsg(2, "function %s", dbgKey(func));
459
460
461
            addStrList(evaluateExpandFunction(func, tokPtr), tok, ret, pending, joined);
            break; }
        default:
462
            debugMsg(2, "evaluated expression => %s", dbgStrList(*ret));
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
            tokPtr--;
            return;
        }
    }
}

void QMakeEvaluator::skipExpression(const ushort *&pTokPtr)
{
    const ushort *tokPtr = pTokPtr;
    forever {
        ushort tok = *tokPtr++;
        switch (tok) {
        case TokLine:
            m_current.line = *tokPtr++;
            break;
        case TokValueTerminator:
        case TokFuncTerminator:
            pTokPtr = tokPtr;
            return;
        case TokArgSeparator:
            break;
        default:
            switch (tok & TokMask) {
            case TokLiteral:
            case TokEnvVar:
                skipStr(tokPtr);
                break;
            case TokHashLiteral:
            case TokVariable:
492
            case TokProperty:
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
                skipHashStr(tokPtr);
                break;
            case TokFuncName:
                skipHashStr(tokPtr);
                pTokPtr = tokPtr;
                skipExpression(pTokPtr);
                tokPtr = pTokPtr;
                break;
            default:
                Q_ASSERT_X(false, "skipExpression", "Unrecognized token");
                break;
            }
        }
    }
}

QMakeEvaluator::VisitReturn QMakeEvaluator::visitProBlock(
        ProFile *pro, const ushort *tokPtr)
{
    m_current.pro = pro;
    m_current.line = 0;
    return visitProBlock(tokPtr);
}

QMakeEvaluator::VisitReturn QMakeEvaluator::visitProBlock(
        const ushort *tokPtr)
{
520
    traceMsg("entering block");
521
522
523
524
    ProStringList curr;
    bool okey = true, or_op = false, invert = false;
    uint blockLen;
    while (ushort tok = *tokPtr++) {
525
        VisitReturn ret;
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
        switch (tok) {
        case TokLine:
            m_current.line = *tokPtr++;
            continue;
        case TokAssign:
        case TokAppend:
        case TokAppendUnique:
        case TokRemove:
        case TokReplace:
            visitProVariable(tok, curr, tokPtr);
            curr.clear();
            continue;
        case TokBranch:
            blockLen = getBlockLen(tokPtr);
            if (m_cumulative) {
541
#ifdef PROEVALUATOR_CUMULATIVE
542
543
544
545
546
547
548
549
550
551
552
553
554
                if (!okey)
                    m_skipLevel++;
                ret = blockLen ? visitProBlock(tokPtr) : ReturnTrue;
                tokPtr += blockLen;
                blockLen = getBlockLen(tokPtr);
                if (!okey)
                    m_skipLevel--;
                else
                    m_skipLevel++;
                if ((ret == ReturnTrue || ret == ReturnFalse) && blockLen)
                    ret = visitProBlock(tokPtr);
                if (okey)
                    m_skipLevel--;
555
#endif
556
            } else {
557
558
                if (okey) {
                    traceMsg("taking 'then' branch");
559
                    ret = blockLen ? visitProBlock(tokPtr) : ReturnTrue;
560
561
                    traceMsg("finished 'then' branch");
                }
562
563
                tokPtr += blockLen;
                blockLen = getBlockLen(tokPtr);
564
565
                if (!okey) {
                    traceMsg("taking 'else' branch");
566
                    ret = blockLen ? visitProBlock(tokPtr) : ReturnTrue;
567
568
                    traceMsg("finished 'else' branch");
                }
569
570
571
572
573
574
575
576
577
578
579
580
            }
            tokPtr += blockLen;
            okey = true, or_op = false; // force next evaluation
            break;
        case TokForLoop:
            if (m_cumulative) { // This is a no-win situation, so just pretend it's no loop
                skipHashStr(tokPtr);
                uint exprLen = getBlockLen(tokPtr);
                tokPtr += exprLen;
                blockLen = getBlockLen(tokPtr);
                ret = visitProBlock(tokPtr);
            } else if (okey != or_op) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
581
                const ProKey &variable = getHashStr(tokPtr);
582
583
584
585
586
587
588
589
590
591
                uint exprLen = getBlockLen(tokPtr);
                const ushort *exprPtr = tokPtr;
                tokPtr += exprLen;
                blockLen = getBlockLen(tokPtr);
                ret = visitProLoop(variable, exprPtr, tokPtr);
            } else {
                skipHashStr(tokPtr);
                uint exprLen = getBlockLen(tokPtr);
                tokPtr += exprLen;
                blockLen = getBlockLen(tokPtr);
592
                traceMsg("skipped loop");
593
594
595
596
597
598
599
600
                ret = ReturnTrue;
            }
            tokPtr += blockLen;
            okey = true, or_op = false; // force next evaluation
            break;
        case TokTestDef:
        case TokReplaceDef:
            if (m_cumulative || okey != or_op) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
601
                const ProKey &name = getHashStr(tokPtr);
602
603
                blockLen = getBlockLen(tokPtr);
                visitProFunctionDef(tok, name, tokPtr);
604
605
                traceMsg("defined %s function %s",
                      tok == TokTestDef ? "test" : "replace", dbgKey(name));
606
            } else {
607
                traceMsg("skipped function definition");
608
609
610
611
612
613
614
                skipHashStr(tokPtr);
                blockLen = getBlockLen(tokPtr);
            }
            tokPtr += blockLen;
            okey = true, or_op = false; // force next evaluation
            continue;
        case TokNot:
615
            traceMsg("NOT");
616
617
618
            invert ^= true;
            continue;
        case TokAnd:
619
            traceMsg("AND");
620
621
622
            or_op = false;
            continue;
        case TokOr:
623
            traceMsg("OR");
624
625
626
627
628
629
630
631
632
            or_op = true;
            continue;
        case TokCondition:
            if (!m_skipLevel && okey != or_op) {
                if (curr.size() != 1) {
                    if (!m_cumulative || !curr.isEmpty())
                        evalError(fL1S("Conditional must expand to exactly one word."));
                    okey = false;
                } else {
633
634
635
                    okey = isActiveConfig(curr.at(0).toQString(m_tmp2), true);
                    traceMsg("condition %s is %s", dbgStr(curr.at(0)), dbgBool(okey));
                    okey ^= invert;
636
                }
637
638
            } else {
                traceMsg("skipped condition %s", curr.size() == 1 ? dbgStr(curr.at(0)) : "<invalid>");
639
640
641
642
643
644
645
646
647
648
649
650
651
            }
            or_op = !okey; // tentatively force next evaluation
            invert = false;
            curr.clear();
            continue;
        case TokTestCall:
            if (!m_skipLevel && okey != or_op) {
                if (curr.size() != 1) {
                    if (!m_cumulative || !curr.isEmpty())
                        evalError(fL1S("Test name must expand to exactly one word."));
                    skipExpression(tokPtr);
                    okey = false;
                } else {
652
                    traceMsg("evaluating test function %s", dbgStr(curr.at(0)));
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
653
                    ret = evaluateConditionalFunction(curr.at(0).toKey(), tokPtr);
654
655
656
                    switch (ret) {
                    case ReturnTrue: okey = true; break;
                    case ReturnFalse: okey = false; break;
657
658
659
                    default:
                        traceMsg("aborting block, function status: %s", dbgReturn(ret));
                        return ret;
660
                    }
661
                    traceMsg("test function returned %s", dbgBool(okey));
662
663
664
                    okey ^= invert;
                }
            } else if (m_cumulative) {
665
#ifdef PROEVALUATOR_CUMULATIVE
666
667
668
669
                m_skipLevel++;
                if (curr.size() != 1)
                    skipExpression(tokPtr);
                else
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
670
                    evaluateConditionalFunction(curr.at(0).toKey(), tokPtr);
671
                m_skipLevel--;
672
#endif
673
674
            } else {
                skipExpression(tokPtr);
675
                traceMsg("skipped test function %s", curr.size() == 1 ? dbgStr(curr.at(0)) : "<invalid>");
676
677
678
679
680
            }
            or_op = !okey; // tentatively force next evaluation
            invert = false;
            curr.clear();
            continue;
681
682
683
684
685
686
687
688
689
690
691
        case TokReturn:
            m_returnValue = curr;
            curr.clear();
            ret = ReturnReturn;
            goto ctrlstm;
        case TokBreak:
            ret = ReturnBreak;
            goto ctrlstm;
        case TokNext:
            ret = ReturnNext;
          ctrlstm:
692
693
            if (!m_skipLevel && okey != or_op) {
                traceMsg("flow control statement '%s', aborting block", dbgReturn(ret));
694
                return ret;
695
696
            }
            traceMsg("skipped flow control statement '%s'", dbgReturn(ret));
697
698
            okey = false, or_op = true; // force next evaluation
            continue;
699
700
701
702
703
704
705
        default: {
                const ushort *oTokPtr = --tokPtr;
                evaluateExpression(tokPtr, &curr, false);
                if (tokPtr != oTokPtr)
                    continue;
            }
            Q_ASSERT_X(false, "visitProBlock", "unexpected item type");
706
            continue;
707
        }
708
709
        if (ret != ReturnTrue && ret != ReturnFalse) {
            traceMsg("aborting block, status: %s", dbgReturn(ret));
710
            return ret;
711
        }
712
    }
713
    traceMsg("leaving block, okey=%s", dbgBool(okey));
714
    return returnBool(okey);
715
716
717
718
}


void QMakeEvaluator::visitProFunctionDef(
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
719
        ushort tok, const ProKey &name, const ushort *tokPtr)
720
{
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
721
    QHash<ProKey, ProFunctionDef> *hash =
722
723
724
725
726
727
728
            (tok == TokTestDef
             ? &m_functionDefs.testFunctions
             : &m_functionDefs.replaceFunctions);
    hash->insert(name, ProFunctionDef(m_current.pro, tokPtr - m_current.pro->tokPtr()));
}

QMakeEvaluator::VisitReturn QMakeEvaluator::visitProLoop(
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
729
        const ProKey &_variable, const ushort *exprPtr, const ushort *tokPtr)
730
731
732
733
{
    VisitReturn ret = ReturnTrue;
    bool infinite = false;
    int index = 0;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
734
    ProKey variable;
735
736
737
738
739
740
741
742
743
744
    ProStringList oldVarVal;
    ProString it_list = expandVariableReferences(exprPtr, 0, true).at(0);
    if (_variable.isEmpty()) {
        if (it_list != statics.strever) {
            evalError(fL1S("Invalid loop expression."));
            return ReturnFalse;
        }
        it_list = ProString(statics.strforever);
    } else {
        variable = map(_variable);
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
745
        oldVarVal = values(variable);
746
    }
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
747
    ProStringList list = values(it_list.toKey());
748
749
750
751
752
753
754
755
756
757
758
759
760
761
    if (list.isEmpty()) {
        if (it_list == statics.strforever) {
            infinite = true;
        } else {
            const QString &itl = it_list.toQString(m_tmp1);
            int dotdot = itl.indexOf(statics.strDotDot);
            if (dotdot != -1) {
                bool ok;
                int start = itl.left(dotdot).toInt(&ok);
                if (ok) {
                    int end = itl.mid(dotdot+2).toInt(&ok);
                    if (ok) {
                        if (start < end) {
                            for (int i = start; i <= end; i++)
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
762
                                list << ProString(QString::number(i));
763
764
                        } else {
                            for (int i = start; i >= end; i--)
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
765
                                list << ProString(QString::number(i));
766
767
768
769
770
771
772
                        }
                    }
                }
            }
        }
    }

773
774
775
776
777
    if (infinite)
        traceMsg("entering infinite loop for %s", dbgKey(variable));
    else
        traceMsg("entering loop for %s over %s", dbgKey(variable), dbgStrList(list));

778
779
780
    forever {
        if (infinite) {
            if (!variable.isEmpty())
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
781
                m_valuemapStack.top()[variable] = ProStringList(ProString(QString::number(index++)));
782
            if (index > 1000) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
783
                evalError(fL1S("Ran into infinite loop (> 1000 iterations)."));
784
785
                break;
            }
786
            traceMsg("loop iteration %d", index);
787
788
789
790
791
792
793
        } else {
            ProString val;
            do {
                if (index >= list.count())
                    goto do_break;
                val = list.at(index++);
            } while (val.isEmpty()); // stupid, but qmake is like that
794
            traceMsg("loop iteration %s", dbgStr(val));
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
            m_valuemapStack.top()[variable] = ProStringList(val);
        }

        ret = visitProBlock(tokPtr);
        switch (ret) {
        case ReturnTrue:
        case ReturnFalse:
            break;
        case ReturnNext:
            ret = ReturnTrue;
            break;
        case ReturnBreak:
            ret = ReturnTrue;
            goto do_break;
        default:
            goto do_break;
        }
    }
  do_break:

815
816
    traceMsg("done looping");

817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
    if (!variable.isEmpty())
        m_valuemapStack.top()[variable] = oldVarVal;
    return ret;
}

void QMakeEvaluator::visitProVariable(
        ushort tok, const ProStringList &curr, const ushort *&tokPtr)
{
    int sizeHint = *tokPtr++;

    if (curr.size() != 1) {
        skipExpression(tokPtr);
        if (!m_cumulative || !curr.isEmpty())
            evalError(fL1S("Left hand side of assignment must expand to exactly one word."));
        return;
    }
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
833
    const ProKey &varName = map(curr.first());
834
835
836
837
838
839
840

    if (tok == TokReplace) {      // ~=
        // DEFINES ~= s/a/b/?[gqi]

        const ProStringList &varVal = expandVariableReferences(tokPtr, sizeHint, true);
        const QString &val = varVal.at(0).toQString(m_tmp1);
        if (val.length() < 4 || val.at(0) != QLatin1Char('s')) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
841
            evalError(fL1S("The ~= operator can handle only the s/// function."));
842
843
844
845
846
            return;
        }
        QChar sep = val.at(1);
        QStringList func = val.split(sep);
        if (func.count() < 3 || func.count() > 4) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
847
            evalError(fL1S("The s/// function expects 3 or 4 arguments."));
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
            return;
        }

        bool global = false, quote = false, case_sense = false;
        if (func.count() == 4) {
            global = func[3].indexOf(QLatin1Char('g')) != -1;
            case_sense = func[3].indexOf(QLatin1Char('i')) == -1;
            quote = func[3].indexOf(QLatin1Char('q')) != -1;
        }
        QString pattern = func[1];
        QString replace = func[2];
        if (quote)
            pattern = QRegExp::escape(pattern);

        QRegExp regexp(pattern, case_sense ? Qt::CaseSensitive : Qt::CaseInsensitive);

864
865
866
        // We could make a union of modified and unmodified values,
        // but this will break just as much as it fixes, so leave it as is.
        replaceInList(&valuesRef(varName), regexp, replace, global, m_tmp2);
867
        debugMsg(2, "replaced %s with %s", dbgQStr(pattern), dbgQStr(replace));
868
869
870
871
872
    } else {
        ProStringList varVal = expandVariableReferences(tokPtr, sizeHint);
        switch (tok) {
        default: // whatever - cannot happen
        case TokAssign:          // =
873
            zipEmpty(&varVal);
874
            if (!m_cumulative) {
875
876
877
                // FIXME: add check+warning about accidental value removal.
                // This may be a bit too noisy, though.
                m_valuemapStack.top()[varName] = varVal;
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
            } else {
                if (!varVal.isEmpty()) {
                    // We are greedy for values. But avoid exponential growth.
                    ProStringList &v = valuesRef(varName);
                    if (v.isEmpty()) {
                        v = varVal;
                    } else {
                        ProStringList old = v;
                        v = varVal;
                        QSet<ProString> has;
                        has.reserve(v.size());
                        foreach (const ProString &s, v)
                            has.insert(s);
                        v.reserve(v.size() + old.size());
                        foreach (const ProString &s, old)
                            if (!has.contains(s))
                                v << s;
                    }
                }
            }
898
            debugMsg(2, "assigning");
899
900
            break;
        case TokAppendUnique:    // *=
901
            insertUnique(&valuesRef(varName), varVal);
902
            debugMsg(2, "appending unique");
903
904
            break;
        case TokAppend:          // +=
905
906
            zipEmpty(&varVal);
            valuesRef(varName) += varVal;
907
            debugMsg(2, "appending");
908
909
910
            break;
        case TokRemove:       // -=
            if (!m_cumulative) {
911
                removeEach(&valuesRef(varName), varVal);
912
913
914
            } else {
                // We are stingy with our values, too.
            }
915
            debugMsg(2, "removing");
916
917
918
            break;
        }
    }
919
    traceMsg("%s := %s", dbgKey(varName), dbgStrList(values(varName)));
920
921
922

    if (varName == statics.strTEMPLATE)
        setTemplate();
923
924
    else if (varName == statics.strQMAKE_PLATFORM)
        updateFeaturePaths();
925
926
927
928
#ifdef PROEVALUATOR_FULL
    else if (varName == statics.strREQUIRES)
        checkRequirements(values(varName));
#endif
929
930
931
932
933
}

void QMakeEvaluator::setTemplate()
{
    ProStringList &values = valuesRef(statics.strTEMPLATE);
934
935
    if (!m_option->user_template.isEmpty()) {
        // Don't allow override
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
936
        values = ProStringList(ProString(m_option->user_template));
937
938
    } else {
        if (values.isEmpty())
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
939
            values.append(ProString("app"));
940
941
942
943
944
945
946
        else
            values.erase(values.begin() + 1, values.end());
    }
    if (!m_option->user_template_prefix.isEmpty()) {
        QString val = values.first().toQString(m_tmp1);
        if (!val.startsWith(m_option->user_template_prefix)) {
            val.prepend(m_option->user_template_prefix);
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
947
            values = ProStringList(ProString(val));
948
949
        }
    }
950
951
}

952
953
954
955
void QMakeEvaluator::loadDefaults()
{
    ProValueMap &vars = m_valuemapStack.top();

Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
956
957
958
    vars[ProKey("DIR_SEPARATOR")] << ProString(m_option->dir_sep);
    vars[ProKey("DIRLIST_SEPARATOR")] << ProString(m_option->dirlist_sep);
    vars[ProKey("_DATE_")] << ProString(QDateTime::currentDateTime().toString());
959
    if (!m_option->qmake_abslocation.isEmpty())
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
960
        vars[ProKey("QMAKE_QMAKE")] << ProString(m_option->qmake_abslocation);
961
#if defined(Q_OS_WIN32)
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
962
    vars[ProKey("QMAKE_HOST.os")] << ProString("Windows");
963
964
965
966

    DWORD name_length = 1024;
    wchar_t name[1024];
    if (GetComputerName(name, &name_length))
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
967
        vars[ProKey("QMAKE_HOST.name")] << ProString(QString::fromWCharArray(name));
968
969

    QSysInfo::WinVersion ver = QSysInfo::WindowsVersion;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
970
    vars[ProKey("QMAKE_HOST.version")] << ProString(QString::number(ver));
971
972
    ProString verStr;
    switch (ver) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
973
974
975
976
977
978
979
980
981
    case QSysInfo::WV_Me: verStr = ProString("WinMe"); break;
    case QSysInfo::WV_95: verStr = ProString("Win95"); break;
    case QSysInfo::WV_98: verStr = ProString("Win98"); break;
    case QSysInfo::WV_NT: verStr = ProString("WinNT"); break;
    case QSysInfo::WV_2000: verStr = ProString("Win2000"); break;
    case QSysInfo::WV_2003: verStr = ProString("Win2003"); break;
    case QSysInfo::WV_XP: verStr = ProString("WinXP"); break;
    case QSysInfo::WV_VISTA: verStr = ProString("WinVista"); break;
    default: verStr = ProString("Unknown"); break;
982
    }
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
983
    vars[ProKey("QMAKE_HOST.version_string")] << verStr;
984
985
986
987
988
989
990

    SYSTEM_INFO info;
    GetSystemInfo(&info);
    ProString archStr;
    switch (info.wProcessorArchitecture) {
# ifdef PROCESSOR_ARCHITECTURE_AMD64
    case PROCESSOR_ARCHITECTURE_AMD64:
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
991
        archStr = ProString("x86_64");
992
993
994
        break;
# endif
    case PROCESSOR_ARCHITECTURE_INTEL:
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
995
        archStr = ProString("x86");
996
997
998
999
1000
        break;
    case PROCESSOR_ARCHITECTURE_IA64:
# ifdef PROCESSOR_ARCHITECTURE_IA32_ON_WIN64
    case PROCESSOR_ARCHITECTURE_IA32_ON_WIN64:
# endif
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1001
        archStr = ProString("IA64");
1002
1003
        break;
    default:
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1004
        archStr = ProString("Unknown");
1005
1006
        break;
    }
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1007
    vars[ProKey("QMAKE_HOST.arch")] << archStr;
1008
1009

# if defined(Q_CC_MSVC) // ### bogus condition, but nobody x-builds for msvc with a different qmake
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
    QLatin1Char backslash('\\');
    QString paths = m_option->getEnv(QLatin1String("PATH"));
    QString vcBin64 = m_option->getEnv(QLatin1String("VCINSTALLDIR"));
    if (!vcBin64.endsWith(backslash))
        vcBin64.append(backslash);
    vcBin64.append(QLatin1String("bin\\amd64"));
    QString vcBinX86_64 = m_option->getEnv(QLatin1String("VCINSTALLDIR"));
    if (!vcBinX86_64.endsWith(backslash))
        vcBinX86_64.append(backslash);
    vcBinX86_64.append(QLatin1String("bin\\x86_amd64"));
1020
1021
    if (paths.contains(vcBin64, Qt::CaseInsensitive)
            || paths.contains(vcBinX86_64, Qt::CaseInsensitive))
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1022
        vars[ProKey("QMAKE_TARGET.arch")] << ProString("x86_64");
1023
    else
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1024
        vars[ProKey("QMAKE_TARGET.arch")] << ProString("x86");
1025
# endif
1026
1027
1028
#elif defined(Q_OS_UNIX)
    struct utsname name;
    if (!uname(&name)) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1029
1030
1031
1032
1033
        vars[ProKey("QMAKE_HOST.os")] << ProString(name.sysname);
        vars[ProKey("QMAKE_HOST.name")] << ProString(QString::fromLocal8Bit(name.nodename));
        vars[ProKey("QMAKE_HOST.version")] << ProString(name.release);
        vars[ProKey("QMAKE_HOST.version_string")] << ProString(name.version);
        vars[ProKey("QMAKE_HOST.arch")] << ProString(name.machine);
1034
1035
    }
#endif
1036
1037

    m_valuemapInited = true;
1038
1039
}

Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1040
bool QMakeEvaluator::prepareProject(const QString &inDir)
1041
{
1042
    QString superdir;
1043
    if (m_option->do_cache) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1044
        QString conffile;
1045
1046
1047
1048
        QString cachefile = m_option->cachefile;
        if (cachefile.isEmpty())  { //find it as it has not been specified
            if (m_outputDir.isEmpty())
                goto no_cache;
1049
            superdir = m_outputDir;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
            forever {
                QString superfile = superdir + QLatin1String("/.qmake.super");
                if (IoUtils::exists(superfile)) {
                    m_superfile = superfile;
                    break;
                }
                QFileInfo qdfi(superdir);
                if (qdfi.isRoot()) {
                    superdir.clear();
                    break;
                }
                superdir = qdfi.path();
            }
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1063
            QString sdir = inDir;
1064
            QString dir = m_outputDir;
1065
            forever {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1066
1067
1068
                conffile = sdir + QLatin1String("/.qmake.conf");
                if (!IoUtils::exists(conffile))
                    conffile.clear();
1069
                cachefile = dir + QLatin1String("/.qmake.cache");
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1070
1071
1072
                if (!IoUtils::exists(cachefile))
                    cachefile.clear();
                if (!conffile.isEmpty() || !cachefile.isEmpty()) {
1073
1074
                    if (dir != sdir)
                        m_sourceRoot = sdir;
1075
                    m_buildRoot = dir;
1076
1077
                    break;
                }
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1078
1079
                if (dir == superdir)
                    goto no_cache;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1080
                QFileInfo qsdfi(sdir);
1081
                QFileInfo qdfi(dir);
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1082
                if (qsdfi.isRoot() || qdfi.isRoot())
1083
                    goto no_cache;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1084
                sdir = qsdfi.path();
1085
                dir = qdfi.path();
1086
            }
1087
1088
        } else {
            m_buildRoot = QFileInfo(cachefile).path();
1089
        }
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1090
        m_conffile = conffile;
1091
        m_cachefile = cachefile;
1092
    }
1093
  no_cache:
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115

    // Look for mkspecs/ in source and build. First to win determines the root.
    QString sdir = inDir;
    QString dir = m_outputDir;
    while (dir != m_buildRoot) {
        if ((dir != sdir && QFileInfo(sdir, QLatin1String("mkspecs")).isDir())
                || QFileInfo(dir, QLatin1String("mkspecs")).isDir()) {
            if (dir != sdir)
                m_sourceRoot = sdir;
            m_buildRoot = dir;
            break;
        }
        if (dir == superdir)
            break;
        QFileInfo qsdfi(sdir);
        QFileInfo qdfi(dir);
        if (qsdfi.isRoot() || qdfi.isRoot())
            break;
        sdir = qsdfi.path();
        dir = qdfi.path();
    }

1116
    return true;
1117
1118
}

1119
1120
1121
1122
1123
bool QMakeEvaluator::loadSpecInternal()
{
    if (!evaluateFeatureFile(QLatin1String("spec_pre.prf")))
        return false;
    QString spec = m_qmakespec + QLatin1String("/qmake.conf");
1124
    if (!evaluateFile(spec, QMakeHandler::EvalConfigFile, LoadProOnly)) {
1125
1126
1127
        evalError(fL1S("Could not read qmake configuration file %1.").arg(spec));
        return false;
    }
1128
1129
1130
#ifndef QT_BUILD_QMAKE
    // Legacy support for Qt4 default specs
#  ifdef Q_OS_UNIX
1131
1132
1133
1134
1135
1136
    if (m_qmakespec.endsWith(QLatin1String("/default-host"))
        || m_qmakespec.endsWith(QLatin1String("/default"))) {
        QString rspec = QFileInfo(m_qmakespec).readLink();
        if (!rspec.isEmpty())
            m_qmakespec = QDir::cleanPath(QDir(m_qmakespec).absoluteFilePath(rspec));
    }
1137
#  else
1138
1139
1140
1141
    // 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_ORIGINAL variable.
    const ProString &orig_spec = first(ProKey("QMAKESPEC_ORIGINAL"));
1142
1143
    if (!orig_spec.isEmpty())
        m_qmakespec = orig_spec.toQString();
1144
#  endif
1145
#endif
1146
1147
    valuesRef(ProKey("QMAKESPEC")) << ProString(m_qmakespec);
    m_qmakespecName = IoUtils::fileName(m_qmakespec).toString();
1148
1149
1150
1151
1152
1153
1154
    if (!evaluateFeatureFile(QLatin1String("spec_post.prf")))
        return false;
    // The MinGW and x-build specs may change the separator; $$shell_{path,quote}() need it
    m_dirSep = first(ProKey("QMAKE_DIR_SEP"));
    return true;
}

1155
bool QMakeEvaluator::loadSpec()
1156
{
1157
1158
    QString qmakespec = m_option->expandEnvVars(
                m_hostBuild ? m_option->qmakespec : m_option->xqmakespec);
1159
1160
1161

    {
        QMakeEvaluator evaluator(m_option, m_parser, m_handler);
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1162
        if (!m_superfile.isEmpty()) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1163
            valuesRef(ProKey("_QMAKE_SUPER_CACHE_")) << ProString(m_superfile);
1164
            if (!evaluator.evaluateFile(m_superfile, QMakeHandler::EvalConfigFile, LoadProOnly))
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1165
1166
                return false;
        }
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1167
        if (!m_conffile.isEmpty()) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1168
            valuesRef(ProKey("_QMAKE_CONF_")) << ProString(m_conffile);
1169
            if (!evaluator.evaluateFile(m_conffile, QMakeHandler::EvalConfigFile, LoadProOnly))
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1170
1171
                return false;
        }
1172
        if (!m_cachefile.isEmpty()) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1173
            valuesRef(ProKey("_QMAKE_CACHE_")) << ProString(m_cachefile);
1174
            if (!evaluator.evaluateFile(m_cachefile, QMakeHandler::EvalConfigFile, LoadProOnly))
1175
1176
                return false;
        }
1177
1178
        if (qmakespec.isEmpty()) {
            if (!m_hostBuild)
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1179
                qmakespec = evaluator.first(ProKey("XQMAKESPEC")).toQString();
1180
            if (qmakespec.isEmpty())
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1181
                qmakespec = evaluator.first(ProKey("QMAKESPEC")).toQString();
1182
        }
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1183
1184
        m_qmakepath = evaluator.values(ProKey("QMAKEPATH")).toQStringList();
        m_qmakefeatures = evaluator.values(ProKey("QMAKEFEATURES")).toQStringList();
1185
1186
    }

Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1187
    updateMkspecPaths();
1188
1189
1190
1191
    if (qmakespec.isEmpty())
        qmakespec = propertyValue(ProKey(m_hostBuild ? "QMAKE_SPEC" : "QMAKE_XSPEC")).toQString();
#ifndef QT_BUILD_QMAKE
    // Legacy support for Qt4 qmake in Qt Creator, etc.
1192
    if (qmakespec.isEmpty())
1193
        qmakespec = m_hostBuild ? QLatin1String("default-host") : QLatin1String("default");
1194
#endif
1195
    if (IoUtils::isRelativePath(qmakespec)) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1196
        foreach (const QString &root, m_mkspecPaths) {
1197
1198
1199
1200
1201
1202
            QString mkspec = root + QLatin1Char('/') + qmakespec;
            if (IoUtils::exists(mkspec)) {
                qmakespec = mkspec;
                goto cool;
            }
        }
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1203
        evalError(fL1S("Could not find qmake configuration file %1.").arg(qmakespec));
1204
        return false;
1205
1206
    }
  cool:
1207
    m_qmakespec = QDir::cleanPath(qmakespec);
1208

Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1209
    if (!m_superfile.isEmpty()
1210
        && !evaluateFile(m_superfile, QMakeHandler::EvalConfigFile, LoadProOnly)) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1211
1212
        return false;
    }
1213
    if (!loadSpecInternal())
1214
        return false;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1215
    if (!m_conffile.isEmpty()
1216
        && !evaluateFile(m_conffile, QMakeHandler::EvalConfigFile, LoadProOnly)) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1217
1218
        return false;
    }
1219
    if (!m_cachefile.isEmpty()
1220
        && !evaluateFile(m_cachefile, QMakeHandler::EvalConfigFile, LoadProOnly)) {
1221
1222
1223
        return false;
    }
    return true;
1224
1225
}

1226
1227
1228
void QMakeEvaluator::setupProject()
{
    setTemplate();
1229
    ProValueMap &vars = m_valuemapStack.top();
1230
1231
1232
1233
1234
    ProFile *proFile = currentProFile();
    vars[ProKey("TARGET")] << ProString(QFileInfo(currentFileName()).baseName()).setSource(proFile);
    vars[ProKey("_PRO_FILE_")] << ProString(currentFileName()).setSource(proFile);
    vars[ProKey("_PRO_FILE_PWD_")] << ProString(currentDirectory()).setSource(proFile);
    vars[ProKey("OUT_PWD")] << ProString(m_outputDir).setSource(proFile);
1235
1236
}

1237
void QMakeEvaluator::evaluateCommand(const QString &cmds, const QString &where)
1238
1239
{
    if (!cmds.isEmpty()) {
1240
        if (ProFile *pro = m_parser->parsedProBlock(cmds, where, -1)) {
1241
1242
1243
1244
1245
            if (pro->isOk()) {
                m_locationStack.push(m_current);
                visitProBlock(pro, pro->tokPtr());
                m_current = m_locationStack.pop();
            }
1246
1247
1248
1249
1250
            pro->deref();
        }
    }
}

1251
1252
1253
1254
1255
1256
1257
1258
1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
void QMakeEvaluator::evaluateConfigFeatures()
{
    QSet<QString> processed;
    forever {
        bool finished = true;
        ProStringList configs = values(statics.strCONFIG);
        for (int i = configs.size() - 1; i >= 0; --i) {
            QString config = configs.at(i).toQString(m_tmp1).toLower();
            if (!processed.contains(config)) {
                config.detach();
                processed.insert(config);
                if (evaluateFeatureFile(config, true)) {
                    finished = false;
                    break;
                }
            }
        }
        if (finished)
            break;
    }
}

1273
QMakeEvaluator::VisitReturn QMakeEvaluator::visitProFile(
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1274
        ProFile *pro, QMakeHandler::EvalFileType type, LoadFlags flags)
1275
1276
1277
1278
{
    if (!m_cumulative && !pro->isOk())
        return ReturnFalse;

1279
    if (flags & LoadPreFiles) {
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1280
        if (!prepareProject(pro->directoryName()))
1281
1282
            return ReturnFalse;

1283
1284
        m_hostBuild = pro->isHostBuild();

1285
1286
1287
#ifdef PROEVALUATOR_THREAD_SAFE
        m_option->mutex.lock();
#endif
1288
        QMakeBaseEnv **baseEnvPtr = &m_option->baseEnvs[QMakeBaseKey(m_buildRoot, m_hostBuild)];
1289
1290
1291
1292
        if (!*baseEnvPtr)
            *baseEnvPtr = new QMakeBaseEnv;
        QMakeBaseEnv *baseEnv = *baseEnvPtr;

1293
1294
#ifdef PROEVALUATOR_THREAD_SAFE
        {
1295
1296
1297
            QMutexLocker locker(&baseEnv->mutex);
            m_option->mutex.unlock();
            if (baseEnv->inProgress) {
1298
                QThreadPool::globalInstance()->releaseThread();
1299
                baseEnv->cond.wait(&baseEnv->mutex);
1300
                QThreadPool::globalInstance()->reserveThread();
1301
                if (!baseEnv->isOk)
1302
                    return ReturnFalse;
1303
1304
            } else
#endif
1305
            if (!baseEnv->evaluator) {
1306
#ifdef PROEVALUATOR_THREAD_SAFE
1307
                baseEnv->inProgress = true;
1308
1309
1310
                locker.unlock();
#endif

1311
1312
                QMakeEvaluator *baseEval = new QMakeEvaluator(m_option, m_parser, m_handler);
                baseEnv->evaluator = baseEval;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1313
                baseEval->m_superfile = m_superfile;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1314
                baseEval->m_conffile = m_conffile;
1315
                baseEval->m_cachefile = m_cachefile;
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1316
                baseEval->m_sourceRoot = m_sourceRoot;
1317
                baseEval->m_buildRoot = m_buildRoot;
1318
                baseEval->m_hostBuild = m_hostBuild;
1319
                bool ok = baseEval->loadSpec();
1320
1321
1322

#ifdef PROEVALUATOR_THREAD_SAFE
                locker.relock();
1323
1324
1325
                baseEnv->isOk = ok;
                baseEnv->inProgress = false;
                baseEnv->cond.wakeAll();
1326
#endif
1327
1328
1329

                if (!ok)
                    return ReturnFalse;
1330
1331
1332
1333
1334
            }
#ifdef PROEVALUATOR_THREAD_SAFE
        }
#endif

1335
        initFrom(*baseEnv->evaluator);
1336
    } else {
1337
        if (!m_valuemapInited)
1338
            loadDefaults();
1339
1340
    }

1341
1342
    for (ProValueMap::ConstIterator it = m_extraVars.constBegin();
         it != m_extraVars.constEnd(); ++it)
1343
        m_valuemapStack.first().insert(it.key(), it.value());
1344

1345
1346
    m_handler->aboutToEval(currentProFile(), pro, type);
    m_profileStack.push(pro);
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
1347
    valuesRef(ProKey("PWD")) = ProStringList(ProString(currentDirectory()));
1348
    if (flags & LoadPreFiles) {
1349
1350
        setupProject();

1351
1352
        evaluateFeatureFile(QLatin1String("default_pre.prf"));

1353
        evaluateCommand(m_option->precmds, fL1S("(command line)"));
1354
1355
1356

        // After user configs, to override them
        if (!m_extraConfigs.isEmpty())
1357
            evaluateCommand(fL1S("CONFIG += ") + m_extraConfigs.join(fL1S(" ")), fL1S("(extra configs)"));