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
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
|
/***************************************************************************
* Copyright (C) 2005-2006 Nicolas Hadacek <hadacek@kde.org> *
* Copyright (C) 2003-2004 Alain Gibaud <alain.gibaud@free.fr> *
* *
* 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 "device_editor.h"
#include <tqscrollview.h>
#include <tqregexp.h>
#include "devices/list/device_list.h"
#include "toplevel.h"
#include "gui_debug_manager.h"
#include "project_manager.h"
#include "common/global/pfile.h"
#include "main_global.h"
DeviceEditor::DeviceEditor(const TQString &title, const TQString &tag, TQWidget *parent, const char *name)
: Editor(title, tag, parent, name), _view(0)
{
init();
}
DeviceEditor::DeviceEditor(TQWidget *parent, const char *name)
: Editor(parent, name), _view(0)
{
init();
}
void DeviceEditor::init()
{
TQHBoxLayout *hbox = new TQHBoxLayout(this, 0);
TQScrollView *sview = new TQScrollView(this, "scroll_view");
sview->setResizePolicy(TQScrollView::AutoOneFit);
hbox->addWidget(sview);
_widget = new TQWidget(sview->viewport(), "main_scroll_widget");
sview->addChild(_widget);
_top = new TQVBoxLayout(_widget, 0, 0);
_labelDevice = new TQLabel(_widget);
_labelDevice->setMargin(10);
_labelDevice->setTextFormat(RichText);
_top->addWidget(_labelDevice);
_labelWarning = new TQLabel(_widget);
_labelWarning->setMargin(10);
_labelWarning->setTextFormat(RichText);
_top->addWidget(_labelWarning);
_vbox = new TQVBoxLayout(_top);
connect(&Main::toplevel(), TQT_SIGNAL(stateChanged()), TQT_SLOT(updateDevice()));
}
void DeviceEditor::setDevice(bool force)
{
if ( Main::device()==Device::AUTO_DATA.name ) {
PURL::Url url = Main::projectManager().projectUrl();
TQString name = guessDeviceFromFile(url);
if ( !force && name==_device ) return;
_device = name;
if ( name==Device::AUTO_DATA.name )
_labelDevice->setText(i18n("The target device is not configured and cannot be guessed from source file. "
"The source file either cannot be found or does not contain any processor directive."));
else _labelDevice->setText(i18n("Device guessed from file: %1").tqarg(name));
_labelDevice->show();
} else {
if ( !force && Main::device()==_device ) return;
_device = Main::device();
_labelDevice->hide();
}
if ( _view && isModified() ) {
if ( MessageBox::questionYesNo(i18n("File %1 not saved.").tqarg(filename()), KStdGuiItem::save(), KStdGuiItem::discard()) )
Editor::save();
}
_labelWarning->hide();
const Device::Data *data = Device::lister().data(_device);
delete _view;
_view = createView(data, _widget);
if (_view) {
_view->show();
_vbox->addWidget(_view);
updateGeometry();
}
setModified(false);
emit guiChanged();
}
PURL::Url DeviceEditor::findAsmFile(const PURL::Url &url)
{
if ( url.isEmpty() ) return PURL::Url();
PURL::SourceFamily family = url.fileType().data().sourceFamily;
if ( family.data().toolType==PURL::ToolType::Assembler ) return url;
FOR_EACH(PURL::FileType, i) {
PURL::SourceFamily source = i.data().sourceFamily;
if ( source.data().toolType!=PURL::ToolType::Assembler ) continue;
for (uint k=0; i.data().extensions[k]; k++) {
PURL::Url src = url.toExtension(i.data().extensions[k]);
if ( PURL::findExistingUrl(src) ) return src;
}
}
return PURL::Url();
}
TQString DeviceEditor::guessDeviceFromFile(const PURL::Url &url)
{
PURL::Url src = findAsmFile(url);
if ( src.isEmpty() ) return Device::AUTO_DATA.name;
Log::StringView sview;
PURL::File file(src, sview);
if ( !file.openForRead() ) return Device::AUTO_DATA.name;
TQString device;
// TQRegExp re1("^[ \\t]+(?:PROCESSOR|processor)[ \\t]+((?:p|sx|P|SX)[a-z0-9A-Z]+)" ) ;
TQRegExp re1("^[ \\t]+(?:PROCESSOR|processor)[ \\t]+([a-z0-9A-Z]+)" ) ;
TQRegExp re2("^[ \\t]+(?:LIST|list)[ \\t]+" ) ;
for (;;) {
TQString line = file.readLine();
if ( line.isNull() ) break;
// search PROCESSOR directive
if ( re1.search(line, 0)!=-1 ) {
device = re1.cap(1);
break;
}
// search LIST p=... directive
int k = re2.search(line,0);
if ( k!=-1 ) {
//TQRegExp re3("(?:p|P)[ \\t]*=[ \\t]*((?:p|sx|P|SX)[a-z0-9A-Z]+)") ;
TQRegExp re3("(?:p|P)[ \\t]*=[ \\t]*([a-z0-9A-Z]+)") ;
if ( re3.search(line, k+5)!=-1 ) {
device = re3.cap(1);
break;
}
}
}
device = device.upper();
if( device[0]=='P') return device.mid(1);
if ( Device::lister().data(device)==0 ) return Device::AUTO_DATA.name;
return device;
}
|
