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
108
109
110
111
112
113
114
115
116
|
/***************************************************************************
* 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 "xml_to_data/prog_xml_to_data.h"
#include "coff/base/coff_data.h"
#include "devices/base/device_group.h"
#include "devices/pic/base/pic.h"
#include "devices/list/device_list.h"
#include "gpprocessor.h"
//-----------------------------------------------------------------------------
namespace Coff
{
class XmlToData : public ExtXmlToData<Data>
{
public:
XmlToData(const TQString &folder) : ExtXmlToData<Data>(folder, "coff", "Coff") {}
private:
TQMap<uint, bool> _ids;
virtual bool hasFamilies() const { return false; }
virtual void parseData(TQDomElement element, Data &data);
virtual void outputData(const Data &data, TQTextStream &s) const;
virtual void outputFunctions(TQTextStream &s) const;
virtual void parse();
};
void Coff::XmlToData::parseData(TQDomElement element, Data &data)
{
TQStringList list = TQStringList::split(' ', element.attribute("id"));
if ( list.isEmpty() ) tqFatal("Missing id");
if ( list.count()>MAX_NB_IDS ) tqFatal("Please raise MAX_NB_IDS");
for (uint i=0; i<MAX_NB_IDS; i++) {
if ( i<uint(list.count()) ) {
bool ok;
data.ids[i] = fromHexLabel(list[i], 4, &ok);
if ( !ok ) tqFatal("Invalid id");
//if ( _ids.contains(data.ids[i]) ) tqFatal("Duplicated id");
//_ids[data.ids[i]] = true;
} else data.ids[i] = 0;
}
}
void Coff::XmlToData::outputData(const Data &data, TQTextStream &s) const
{
s << "{ ";
for (uint i=0; i<MAX_NB_IDS; i++) {
if ( i!=0 ) s << ", ";
s << toHexLabel(data.ids[i], 4);
}
s << "}";
}
void Coff::XmlToData::outputFunctions(TQTextStream &s) const
{
ExtXmlToData<Data>::outputFunctions(s);
s << "TQString findId(uint id)" << endl;
s << "{" << endl;
s << " for (uint i=0; DATA_LIST[i]; i++) {" << endl;
s << " for (uint k=0; k<MAX_NB_IDS; k++)" << endl;
s << " if ( DATA_LIST[i]->data.ids[k]==id ) return DATA_LIST[i]->name;" << endl;
s << " }" << endl;
s << " return TQString();" << endl;
s << "}" << endl;
}
void Coff::XmlToData::parse()
{
ExtXmlToData<Data>::parse();
// check what devices we are missing
const ::Group::Base *gpic = Device::lister().group("pic");
::Group::Base::ConstIterator it;
for (it=gpic->begin(); it!=gpic->end(); ++it) {
const Pic::Data *data = static_cast<const Pic::Data*>(it.data().data);
switch (data->architecture().type()) {
case Pic::Architecture::P10X:
case Pic::Architecture::P16X:
case Pic::Architecture::P17C:
case Pic::Architecture::P18C:
case Pic::Architecture::P18F:
case Pic::Architecture::P18J: break;
case Pic::Architecture::P24F:
case Pic::Architecture::P24H:
case Pic::Architecture::P30F:
case Pic::Architecture::P33F: continue;
case Pic::Architecture::Nb_Types: Q_ASSERT(false); continue;
}
if ( !hasDevice(data->name()) ) tqWarning("No id for device %s", data->name().latin1());
}
// extract COFF id from gputils
for (uint i=0; pics[i].tag!=no_processor; i++) {
_current = TQString(pics[i].names[2]).upper();
if ( !Device::lister().isSupported(_current) ) continue;
if ( !hasDevice(_current) ) tqDebug(">> add new id %s: %s", _current.latin1(), toHexLabel(pics[i].coff_type, 4).latin1());
else {
bool ok = false;
for (uint k=0; k<MAX_NB_IDS; k++)
if ( _map[_current].data.ids[k]==pics[i].coff_type ) ok = true;
if ( !ok ) tqFatal(TQString("Different ids"));
}
}
}
} // namespace
//-----------------------------------------------------------------------------
XML_MAIN(Coff::XmlToData)
|
