You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
196 lines
6.6 KiB
196 lines
6.6 KiB
/****************************************************************************
|
|
**
|
|
** ???
|
|
**
|
|
** Copyright (C) 2010 Timothy Pearson and (C) 1992-2008 Trolltech ASA.
|
|
**
|
|
** This file is part of qmake.
|
|
**
|
|
** This file may be used under the terms of the GNU General
|
|
** Public License versions 2.0 or 3.0 as published by the Free
|
|
** Software Foundation and appearing in the files LICENSE.GPL2
|
|
** and LICENSE.GPL3 included in the packaging of this file.
|
|
** Alternatively you may (at your option) use any later version
|
|
** of the GNU General Public License if such license has been
|
|
** publicly approved by Trolltech ASA (or its successors, if any)
|
|
** and the KDE Free TQt Foundation.
|
|
**
|
|
** Please review the following information to ensure GNU General
|
|
** Public Licensing requirements will be met:
|
|
** http://trolltech.com/products/qt/licenses/licensing/opensource/.
|
|
** If you are unsure which license is appropriate for your use, please
|
|
** review the following information:
|
|
** http://trolltech.com/products/qt/licenses/licensing/licensingoverview
|
|
** or contact the sales department at sales@trolltech.com.
|
|
**
|
|
** This file may be used under the terms of the Q Public License as
|
|
** defined by Trolltech ASA and appearing in the file LICENSE.TQPL
|
|
** included in the packaging of this file. Licensees holding valid TQt
|
|
** Commercial licenses may use this file in accordance with the TQt
|
|
** Commercial License Agreement provided with the Software.
|
|
**
|
|
** This file is provided "AS IS" with NO WARRANTY OF ANY KIND,
|
|
** INCLUDING THE WARRANTIES OF DESIGN, MERCHANTABILITY AND FITNESS FOR
|
|
** A PARTICULAR PURPOSE. Trolltech reserves all rights not granted
|
|
** herein.
|
|
**
|
|
**********************************************************************/
|
|
|
|
#include "project.h"
|
|
#include "property.h"
|
|
#include "option.h"
|
|
#include "makefile.h"
|
|
#include <tqnamespace.h>
|
|
#include <tqregexp.h>
|
|
#include <tqdir.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <ctype.h>
|
|
#include <fcntl.h>
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
|
|
// for Borland, main is defined to qMain which breaks qmake
|
|
#undef main
|
|
#ifdef TQ_OS_MAC
|
|
// for qurl
|
|
bool qt_resolve_symlinks = FALSE;
|
|
#endif
|
|
|
|
#if defined(TQ_WS_WIN)
|
|
extern TQ_EXPORT int qt_ntfs_permission_lookup;
|
|
#endif
|
|
|
|
int main(int argc, char **argv)
|
|
{
|
|
#if defined(TQ_WS_WIN)
|
|
// Workaround for TQFileInfo::isReadable() failing for certain users. See task: 54320
|
|
qt_ntfs_permission_lookup = 0;
|
|
#endif
|
|
|
|
/* parse command line */
|
|
if(!Option::parseCommandLine(argc, argv))
|
|
return 666;
|
|
|
|
TQDir sunworkshop42workaround = TQDir::current();
|
|
TQString oldpwd = sunworkshop42workaround.currentDirPath();
|
|
#ifdef TQ_WS_WIN
|
|
if(!(oldpwd.length() == 3 && oldpwd[0].isLetter() && oldpwd.endsWith(":/") ) )
|
|
#endif
|
|
{
|
|
if(oldpwd.right(1) != TQString(TQChar(TQDir::separator())))
|
|
oldpwd += TQDir::separator();
|
|
}
|
|
Option::output_dir = oldpwd; //for now this is the output dir
|
|
|
|
if(Option::output.name() != "-") {
|
|
TQFileInfo fi(Option::output);
|
|
TQString dir;
|
|
if(fi.isDir()) {
|
|
dir = fi.filePath();
|
|
} else {
|
|
TQString tmp_dir = fi.dirPath();
|
|
if(!tmp_dir.isEmpty() && TQFile::exists(tmp_dir))
|
|
dir = tmp_dir;
|
|
}
|
|
if(!dir.isNull() && dir != ".")
|
|
Option::output_dir = dir;
|
|
if(TQDir::isRelativePath(Option::output_dir))
|
|
Option::output_dir.prepend(oldpwd);
|
|
}
|
|
|
|
TQMakeProperty prop;
|
|
if(Option::qmake_mode == Option::TQMAKE_TQUERY_PROPERTY || Option::qmake_mode == Option::TQMAKE_SET_PROPERTY)
|
|
return prop.exec() ? 0 : 101;
|
|
|
|
TQMakeProject proj(&prop);
|
|
int exit_val = 0;
|
|
TQStringList files;
|
|
if(Option::qmake_mode == Option::TQMAKE_GENERATE_PROJECT)
|
|
files << "(*hack*)"; //we don't even use files, but we do the for() body once
|
|
else
|
|
files = Option::mkfile::project_files;
|
|
for(TQStringList::Iterator pfile = files.begin(); pfile != files.end(); pfile++) {
|
|
if(Option::qmake_mode == Option::TQMAKE_GENERATE_MAKEFILE ||
|
|
Option::qmake_mode == Option::TQMAKE_GENERATE_PRL) {
|
|
TQString fn = Option::fixPathToLocalOS((*pfile));
|
|
|
|
//setup pwd properly
|
|
debug_msg(1, "Resetting dir to: %s", oldpwd.latin1());
|
|
TQDir::setCurrent(oldpwd); //reset the old pwd
|
|
int di = fn.findRev(Option::dir_sep);
|
|
if(di != -1) {
|
|
debug_msg(1, "Changing dir to: %s", TQT_TQSTRING(fn.left(di)).latin1());
|
|
if(!TQDir::setCurrent(fn.left(di)))
|
|
fprintf(stderr, "Cannot find directory: %s\n", TQT_TQSTRING(fn.left(di)).latin1());
|
|
fn = fn.right(fn.length() - di - 1);
|
|
}
|
|
|
|
/* read project.. */
|
|
if(!proj.read(fn, oldpwd)) {
|
|
fprintf(stderr, "Error processing project file: %s\n",
|
|
fn == "-" ? "(stdin)" : (*pfile).latin1());
|
|
exit_val = 2;
|
|
continue;
|
|
}
|
|
if(Option::mkfile::do_preprocess) //no need to create makefile
|
|
continue;
|
|
|
|
/* let Option post-process */
|
|
if(!Option::postProcessProject(&proj)) {
|
|
fprintf(stderr, "Error post-processing project file: %s",
|
|
fn == "-" ? "(stdin)" : (*pfile).latin1());
|
|
exit_val = 8;
|
|
continue;
|
|
}
|
|
}
|
|
|
|
bool using_stdout = FALSE;
|
|
MakefileGenerator *mkfile = MakefileGenerator::create(&proj); //figure out generator
|
|
if(mkfile && (Option::qmake_mode == Option::TQMAKE_GENERATE_MAKEFILE ||
|
|
Option::qmake_mode == Option::TQMAKE_GENERATE_PROJECT)) {
|
|
//open output
|
|
if(!(Option::output.state() & IO_Open)) {
|
|
if(Option::output.name() == "-") {
|
|
Option::output.setName("");
|
|
Option::output_dir = TQDir::currentDirPath();
|
|
Option::output.open(IO_WriteOnly | IO_Translate, stdout);
|
|
using_stdout = TRUE;
|
|
} else {
|
|
if(Option::output.name().isEmpty() && Option::qmake_mode == Option::TQMAKE_GENERATE_MAKEFILE)
|
|
Option::output.setName(proj.first("TQMAKE_MAKEFILE"));
|
|
Option::output_dir = oldpwd;
|
|
if(!mkfile->openOutput(Option::output)) {
|
|
fprintf(stderr, "Failure to open file: %s\n",
|
|
Option::output.name().isEmpty() ? "(stdout)" : Option::output.name().latin1());
|
|
return 5;
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
using_stdout = TRUE; //kind of..
|
|
}
|
|
if(mkfile && !mkfile->write()) {
|
|
if(Option::qmake_mode == Option::TQMAKE_GENERATE_PROJECT)
|
|
fprintf(stderr, "Unable to generate project file.\n");
|
|
else
|
|
fprintf(stderr, "Unable to generate makefile for: %s\n", (*pfile).latin1());
|
|
if(!using_stdout)
|
|
TQFile::remove(Option::output.name());
|
|
exit_val = 6;
|
|
}
|
|
delete mkfile;
|
|
mkfile = NULL;
|
|
|
|
/* debugging */
|
|
if(Option::debug_level) {
|
|
TQMap<TQString, TQStringList> &vars = proj.variables();
|
|
for(TQMap<TQString, TQStringList>::Iterator it = vars.begin(); it != vars.end(); ++it) {
|
|
if(!it.key().startsWith(".") && !it.data().isEmpty())
|
|
debug_msg(1, "%s === %s", it.key().latin1(), it.data().join(" :: ").latin1());
|
|
}
|
|
}
|
|
}
|
|
return exit_val;
|
|
}
|