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
|
-- init code for hwstub_tools
--
-- HELP
--
HELP = hwstub.help
function HELP:create_topic(name)
self[name] = { create_topic = HELP.create_topic, add = HELP.add, get_topic = HELP.get_topic }
return self[name]
end
function HELP:get_topic(name)
return self[name]
end
function HELP:add(text)
table.insert(self, text)
end
do
local h = HELP:create_topic("hwstub")
h:add("This tool uses a number of well-defined namespaces (tables) to organise its features.")
h:add("The hwstub table contains a number of information and functions related to the tool itself.")
h:add("Of particular interest are")
h:add("* hwstub.host which holds host specific information.")
h:add("* hwstub.dev which holds device specific information. See DEV")
h:add("* hwstub.help (aka HELP) which holds the help. See HELP.");
h:add("* hwstub.soc which holds soc specific information. See HW");
h = HELP:create_topic("HELP");
h:add("This variable redirects to hwstub.help and provides access to the help system.");
h:add("You can enhance the help using the following methods on any topic (including HELP itself).");
h:add("* t:create_topic(s) to create a new subtopic named s under topic t");
h:add("* t:add(s) to add a help line to topic t");
h:add("* t:get_topic(s) to get the subtopic s under topic t");
h = HELP:create_topic("DEV");
h:add("This variable redirects to hwstub.dev and provides direct access to the device.");
h:add("It contains some information about the device and the following methods.");
h:add("* read8/16/32(a) reads a 8/16/32-bit integer at address a");
h:add("* write8/16/32(a, v) writes the 8/16/32-bit integer v at address a");
h:add("* print_log() prints the device log");
h = HELP:create_topic("HW");
h:add("This variable redirects to the current soc under hwstub.soc and should be changed by calling hwstub:soc:select only.");
h:add("The complete register tree can be found under HW in a well organised fashion.");
h:add("* HW.dev points to device dev");
h:add("* HW.dev[i] points to device devi if there are several copies of the device at different addresses.");
h:add("* HW.dev.reg points to the register reg under dev");
h:add("* HW.dev.reg[i] points to the register regi if there are several copies.");
h:add("* HW.dev.reg.f points to the field f under register reg.");
h:add("* HW.dev.reg.f.v gives the value of named value v of field f.");
h:add("* All registers can be read using HW.dev.reg.read() and written using HW.dev.reg.write(v).");
h:add("* Register with a SCT variant also implement HW.dev.reg.set/clr/tog(v).");
h:add("* All register field can be read using HW.dev.reg.f.read() and written using HW.dev.reg.f.write(v).");
h:add("* Field writes can either give a integer or a named value to write(v).");
h:add("* Register with a SCT variant also implement HW.dev.reg.f.set/clr/tog(v) with the same properties.");
h:add("* All devices, registers and fields also have descriptions available such as addresses.");
end
--
-- INFO
--
if not hwstub.options.quiet then
print("information")
print(" hwstub")
print(" version: " .. string.format("%d.%d", hwstub.host.version.major,
hwstub.host.version.minor))
print(" device")
print(" version: " .. string.format("%d.%d.%d", hwstub.dev.version.major,
hwstub.dev.version.minor, hwstub.dev.version.revision))
print(" target")
local id_str = string.char(bit32.extract(hwstub.dev.target.id, 0, 8),
bit32.extract(hwstub.dev.target.id, 8, 8),
bit32.extract(hwstub.dev.target.id, 16, 8),
bit32.extract(hwstub.dev.target.id, 24, 8))
print(" id: " .. string.format("%#x (%s)", hwstub.dev.target.id, id_str))
print(" name: " .. hwstub.dev.target.name)
print(" layout")
print(" code: " .. string.format("%#x bytes @ %#x",
hwstub.dev.layout.code.size, hwstub.dev.layout.code.start))
print(" stack: " .. string.format("%#x bytes @ %#x",
hwstub.dev.layout.stack.size, hwstub.dev.layout.stack.start))
print(" buffer: " .. string.format("%#x bytes @ %#x",
hwstub.dev.layout.buffer.size, hwstub.dev.layout.buffer.start))
end
--
-- SOC
--
function hwstub.soc:select(soc)
if self[soc] == nil then return false end
print("Selecting soc " .. soc .. ". Redirecting HW to hwstub.soc." .. soc)
HW = self[soc]
return true
end
--
-- DEV
--
DEV = hwstub.dev
--
-- Misc
--
function hwstub.mdelay(msec)
hwstub.udelay(msec * 1000)
end
require "lua/load"
|
