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
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
|
/*
* Copyright (c) 2020 Raspberry Pi (Trading) Ltd.
*
* SPDX-License-Identifier: BSD-3-Clause
*/
#include <algorithm>
#include <iostream>
#include "output_format.h"
#include "pio_disassembler.h"
struct c_sdk_output : public output_format {
struct factory {
factory() {
output_format::add(new c_sdk_output());
}
};
c_sdk_output() : output_format("c-sdk") {}
std::string get_description() override {
return "C header suitable for use with the Raspberry Pi Pico SDK";
}
void output_symbols(FILE *out, std::string prefix, const std::vector<compiled_source::symbol> &symbols) {
int count = 0;
for (const auto &s : symbols) {
if (!s.is_label) {
fprintf(out, "#define %s%s %d\n", prefix.c_str(), s.name.c_str(), s.value);
count++;
}
}
if (count) {
fprintf(out, "\n");
count = 0;
}
for (const auto &s : symbols) {
if (s.is_label) {
fprintf(out, "#define %soffset_%s %du\n", prefix.c_str(), s.name.c_str(), s.value);
count++;
}
}
if (count) {
fprintf(out, "\n");
}
}
void header(FILE *out, std::string msg) {
std::string dashes = std::string(msg.length(), '-');
fprintf(out, "// %s //\n", dashes.c_str());
fprintf(out, "// %s //\n", msg.c_str());
fprintf(out, "// %s //\n", dashes.c_str());
fprintf(out, "\n");
}
int output(std::string destination, std::vector<std::string> output_options,
const compiled_source &source) override {
for (const auto &program : source.programs) {
for(const auto &p : program.lang_opts) {
if (p.first.size() >= name.size() && p.first.compare(0, name.size(), name) == 0) {
std::cerr << "warning: " << name << " does not support output options; " << p.first << " lang_opt ignored.\n";
}
}
}
FILE *out = open_single_output(destination);
if (!out) return 1;
header(out, "This file is autogenerated by pioasm; do not edit!");
fprintf(out, "#pragma once\n");
fprintf(out, "\n");
fprintf(out, "#if !PICO_NO_HARDWARE\n");
fprintf(out, "#include \"hardware/pio.h\"\n");
fprintf(out, "#endif\n");
fprintf(out, "\n");
output_symbols(out, "", source.global_symbols);
for (const auto &program : source.programs) {
header(out, program.name);
std::string prefix = program.name + "_";
fprintf(out, "#define %swrap_target %d\n", prefix.c_str(), program.wrap_target);
fprintf(out, "#define %swrap %d\n", prefix.c_str(), program.wrap);
fprintf(out, "#define %spio_version %d\n", prefix.c_str(), program.pio_version);
fprintf(out, "\n");
output_symbols(out, prefix, program.symbols);
fprintf(out, "static const uint16_t %sprogram_instructions[] = {\n", prefix.c_str());
for (int i = 0; i < (int)program.instructions.size(); i++) {
const auto &inst = program.instructions[i];
if (i == program.wrap_target) {
fprintf(out, " // .wrap_target\n");
}
fprintf(out, " 0x%04x, // %2d: %s\n", (uint16_t)inst, i,
disassemble(inst, program.sideset_bits_including_opt.get(), program.sideset_opt).c_str());
if (i == program.wrap) {
fprintf(out, " // .wrap\n");
}
}
fprintf(out, "};\n");
fprintf(out, "\n");
fprintf(out, "#if !PICO_NO_HARDWARE\n");
fprintf(out, "static const struct pio_program %sprogram = {\n", prefix.c_str());
fprintf(out, " .instructions = %sprogram_instructions,\n", prefix.c_str());
fprintf(out, " .length = %d,\n", (int) program.instructions.size());
fprintf(out, " .origin = %d,\n", program.origin.get());
fprintf(out, " .pio_version = %spio_version,\n", prefix.c_str());
fprintf(out, "#if PICO_PIO_VERSION > 0\n");
fprintf(out, " .used_gpio_ranges = 0x%x\n", program.used_gpio_ranges);
fprintf(out, "#endif\n");
fprintf(out, "};\n");
fprintf(out, "\n");
fprintf(out, "static inline pio_sm_config %sprogram_get_default_config(uint offset) {\n", prefix.c_str());
fprintf(out, " pio_sm_config c = pio_get_default_sm_config();\n");
fprintf(out, " sm_config_set_wrap(&c, offset + %swrap_target, offset + %swrap);\n", prefix.c_str(),
prefix.c_str());
if (program.in.pin_count >= 0) {
fprintf(out, " sm_config_set_in_pin_count(&c, %d);\n", program.in.pin_count);
fprintf(out, " sm_config_set_in_shift(&c, %d, %d, %d);\n", program.in.right, program.in.autop, program.in.threshold);
}
if (program.out.pin_count >= 0) {
fprintf(out, " sm_config_set_out_pin_count(&c, %d);\n", program.out.pin_count);
fprintf(out, " sm_config_set_out_shift(&c, %d, %d, %d);\n", program.out.right, program.out.autop, program.out.threshold);
}
if (program.set_count >= 0) {
fprintf(out, " sm_config_set_set_pin_count(&c, %d);\n", program.set_count);
}
if (program.sideset_bits_including_opt.is_specified()) {
fprintf(out, " sm_config_set_sideset(&c, %d, %s, %s);\n", program.sideset_bits_including_opt.get(),
program.sideset_opt ? "true" : "false",
program.sideset_pindirs ? "true" : "false");
}
if (program.mov_status_type != -1) {
const char *types[] = {
"STATUS_TX_LESSTHAN",
"STATUS_RX_LESSTHAN",
"STATUS_IRQ_INDEX",
};
if (program.mov_status_type < 0 || program.mov_status_type >= 3) {
throw std::runtime_error("unknown mov_status type");
}
fprintf(out, " sm_config_set_mov_status(&c, %s, %d);\n", types[program.mov_status_type], program.mov_status_n);
}
if (program.fifo != fifo_config::txrx) {
const char *type;
switch (program.fifo) {
case fifo_config::tx: type = "PIO_FIFO_JOIN_TX"; break;
case fifo_config::rx: type = "PIO_FIFO_JOIN_RX"; break;
case fifo_config::txput: type = "PIO_FIFO_JOIN_TXPUT"; break;
case fifo_config::txget: type = "PIO_FIFO_JOIN_TXGET"; break;
case fifo_config::putget: type = "PIO_FIFO_JOIN_PUTGET"; break;
default: throw std::runtime_error("unknown fifo_config type");
}
fprintf(out, " sm_config_set_fifo_join(&c, %s);\n", type);
}
if (program.clock_div_int != 1 || program.clock_div_frac != 0) {
fprintf(out, " sm_config_set_clkdiv_int_frac(&c, %d, %d);\n", program.clock_div_int, program.clock_div_frac);
}
fprintf(out, " return c;\n");
fprintf(out, "}\n");
// todo maybe have some code blocks inside or outside here?
for(const auto& o : program.code_blocks) {
fprintf(out, "\n");
if (o.first == name) {
for(const auto &contents : o.second) {
fprintf(out, "%s", contents.c_str());
fprintf(out, "\n");
}
}
}
fprintf(out, "#endif\n");
fprintf(out, "\n");
}
if (out != stdout) { fclose(out); }
return 0;
}
};
static c_sdk_output::factory creator;
|
