1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
|
/***************************************************************************
* Copyright (C) 2006 Nicolas Hadacek <[email protected]> *
* *
* This program is free software; you can redistribute it and/or modify *
* it under the terms of the GNU General Public License as published by *
* the Free Software Foundation; either version 2 of the License, or *
* (at your option) any later version. *
***************************************************************************/
#include "ccsc_compile.h"
#include "ccsc.h"
#include "common/global/pfile.h"
#include "ccsc_config.h"
#include "devices/list/device_list.h"
#include "devices/pic/base/pic.h"
TQString CCSC::CompileFile::familyName() const
{
const Pic::Data *pdata = static_cast<const Pic::Data *>(Device::lister().data(_data.device));
switch (pdata->architecture().type()) {
case Pic::Architecture::P10X: return "B";
case Pic::Architecture::P16X: return "M";
case Pic::Architecture::P17C: return "7";
case Pic::Architecture::P18C:
case Pic::Architecture::P18F:
case Pic::Architecture::P18J: return "H";
case Pic::Architecture::P24F:
case Pic::Architecture::P24H:
case Pic::Architecture::P30F:
case Pic::Architecture::P33F: break;
case Pic::Architecture::Nb_Types: break;
}
Q_ASSERT(false);
return TQString();
}
TQStringList CCSC::CompileFile::genericArguments(const Compile::Config &config) const
{
bool isVersion3 = ( static_cast<const Group &>(Main::toolGroup()).version().majorNum()==3 );
TQStringList args;
args += "+STDOUT"; // output messages on stdout
if ( !isVersion3 ) args += "+EA"; // show all messages and warnings
args += "-P"; // close compile windows after compilation done
if ( !isVersion3 ) args += "+DF"; // output COFF file
args += "+LSlst"; // normal list file
args += "+O8hex"; // produce 8bit Intel file
if ( !isVersion3 ) args += "+M"; // generate symbol file
args += "-J"; // do not create project file
args += "-A"; // do not create stat file
args += "+F%FAMILY";
if ( isVersion3 ) args += config.includeDirs(Tool::Category::Compiler, "I=\"", "\"");
else args += config.includeDirs(Tool::Category::Compiler, "I+=\"", "\"");
args += config.customOptions(Tool::Category::Compiler);
args += "%I";
return args;
}
void CCSC::CompileFile::logStderrLine(const TQString &line)
{
// ignore output for wine
if ( !Compile::Config::withWine(group()) ) parseLine(line);
}
void CCSC::CompileFile::parseLine(const TQString &line)
{
Log::LineType type;
if ( line.startsWith(">>>") ) type = Log::LineType::Warning;
else if ( line.startsWith("***") ) type = Log::LineType::Error;
else if ( line.startsWith("---") ) type = Log::LineType::Information;
else {
doLog(Log::LineType::Normal, line, TQString(), 0); // unrecognized
return;
}
if ( parseErrorLine(line, Compile::ParseErrorData("[*>-]+\\s\\w+\\s\\d+\\s\"([^\"]*)\"\\sLine\\s(\\d+)\\([^)]*\\):(.*)", 1, 2, 3, type)) ) return;
if ( parseErrorLine(line, Compile::ParseErrorData("[*>-]+\\s\"([^\"]*)\"\\sLine\\s(\\d+):\\s\\w+\\s#\\d+:(.*)", 1, 2, 3, type)) ) return;
doLog(type, line, TQString(), 0);
}
void CCSC::CompileFile::done(int code)
{
// with wine, rely on error file
if ( Compile::Config::withWine(group()) ) {
PURL::Url url = PURL::Url(directory(), inputFilepath(0)).toExtension("err");
Log::StringView sview;
PURL::File file(url, sview);
if ( !file.openForRead() ) doLog(Log::LineType::Error, i18n("Could not find error file (%1).").arg(url.pretty()), TQString(), 0);
else {
TQStringList lines = file.readLines();
for (uint i=0; i<lines.count(); i++) parseLine(lines[i]);
}
}
Compile::Process::done(code);
}
PURL::Url CCSC::CompileFile::url(PURL::FileType type, uint i) const
{
PURL::Url url;
Q_ASSERT( i<_data.items.count() );
url = _data.items[i].url;
if ( type==PURL::Nb_FileTypes ) return url;
return url.toFileType(type);
}
TQString CCSC::CompileFile::outputFiles() const
{
return "PURL::Lst PURL::Hex PURL::Coff PURL::Cod sym err esym occ";
}
|
