build: cleanup src/pld directory
[openocd.git] / src / pld / pld.c
1 /***************************************************************************
2 * Copyright (C) 2006 by Dominic Rath *
3 * Dominic.Rath@gmx.de *
4 * *
5 * This program is free software; you can redistribute it and/or modify *
6 * it under the terms of the GNU General Public License as published by *
7 * the Free Software Foundation; either version 2 of the License, or *
8 * (at your option) any later version. *
9 * *
10 * This program is distributed in the hope that it will be useful, *
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
13 * GNU General Public License for more details. *
14 * *
15 * You should have received a copy of the GNU General Public License *
16 * along with this program; if not, write to the *
17 * Free Software Foundation, Inc., *
18 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
19 ***************************************************************************/
20
21 #ifdef HAVE_CONFIG_H
22 #include "config.h"
23 #endif
24
25 #include "pld.h"
26 #include <helper/log.h>
27 #include <helper/time_support.h>
28
29
30 /* pld drivers
31 */
32 extern struct pld_driver virtex2_pld;
33
34 static struct pld_driver *pld_drivers[] = {
35 &virtex2_pld,
36 NULL,
37 };
38
39 static struct pld_device *pld_devices;
40
41 struct pld_device *get_pld_device_by_num(int num)
42 {
43 struct pld_device *p;
44 int i = 0;
45
46 for (p = pld_devices; p; p = p->next) {
47 if (i++ == num)
48 return p;
49 }
50
51 return NULL;
52 }
53
54 /* pld device <driver> [driver_options ...]
55 */
56 COMMAND_HANDLER(handle_pld_device_command)
57 {
58 int i;
59 int found = 0;
60
61 if (CMD_ARGC < 1)
62 return ERROR_COMMAND_SYNTAX_ERROR;
63
64 for (i = 0; pld_drivers[i]; i++) {
65 if (strcmp(CMD_ARGV[0], pld_drivers[i]->name) == 0) {
66 struct pld_device *p, *c;
67
68 /* register pld specific commands */
69 int retval;
70 if (pld_drivers[i]->commands) {
71 retval = register_commands(CMD_CTX, NULL,
72 pld_drivers[i]->commands);
73 if (ERROR_OK != retval) {
74 LOG_ERROR("couldn't register '%s' commands", CMD_ARGV[0]);
75 return ERROR_FAIL;
76 }
77 }
78
79 c = malloc(sizeof(struct pld_device));
80 c->driver = pld_drivers[i];
81 c->next = NULL;
82
83 retval = CALL_COMMAND_HANDLER(
84 pld_drivers[i]->pld_device_command, c);
85 if (ERROR_OK != retval) {
86 LOG_ERROR("'%s' driver rejected pld device",
87 CMD_ARGV[0]);
88 free(c);
89 return ERROR_OK;
90 }
91
92 /* put pld device in linked list */
93 if (pld_devices) {
94 /* find last pld device */
95 for (p = pld_devices; p && p->next; p = p->next)
96 ;
97 if (p)
98 p->next = c;
99 } else
100 pld_devices = c;
101
102 found = 1;
103 }
104 }
105
106 /* no matching pld driver found */
107 if (!found) {
108 LOG_ERROR("pld driver '%s' not found", CMD_ARGV[0]);
109 exit(-1);
110 }
111
112 return ERROR_OK;
113 }
114
115 COMMAND_HANDLER(handle_pld_devices_command)
116 {
117 struct pld_device *p;
118 int i = 0;
119
120 if (!pld_devices) {
121 command_print(CMD_CTX, "no pld devices configured");
122 return ERROR_OK;
123 }
124
125 for (p = pld_devices; p; p = p->next)
126 command_print(CMD_CTX, "#%i: %s", i++, p->driver->name);
127
128 return ERROR_OK;
129 }
130
131 COMMAND_HANDLER(handle_pld_load_command)
132 {
133 int retval;
134 struct timeval start, end, duration;
135 struct pld_device *p;
136
137 gettimeofday(&start, NULL);
138
139 if (CMD_ARGC < 2)
140 return ERROR_COMMAND_SYNTAX_ERROR;
141
142 unsigned dev_id;
143 COMMAND_PARSE_NUMBER(uint, CMD_ARGV[0], dev_id);
144 p = get_pld_device_by_num(dev_id);
145 if (!p) {
146 command_print(CMD_CTX, "pld device '#%s' is out of bounds", CMD_ARGV[0]);
147 return ERROR_OK;
148 }
149
150 retval = p->driver->load(p, CMD_ARGV[1]);
151 if (retval != ERROR_OK) {
152 command_print(CMD_CTX, "failed loading file %s to pld device %u",
153 CMD_ARGV[1], dev_id);
154 switch (retval) {
155 }
156 return retval;
157 } else {
158 gettimeofday(&end, NULL);
159 timeval_subtract(&duration, &end, &start);
160
161 command_print(CMD_CTX, "loaded file %s to pld device %u in %jis %jius",
162 CMD_ARGV[1], dev_id,
163 (intmax_t)duration.tv_sec, (intmax_t)duration.tv_usec);
164 }
165
166 return ERROR_OK;
167 }
168
169 static const struct command_registration pld_exec_command_handlers[] = {
170 {
171 .name = "devices",
172 .handler = handle_pld_devices_command,
173 .mode = COMMAND_EXEC,
174 .help = "list configured pld devices",
175 },
176 {
177 .name = "load",
178 .handler = handle_pld_load_command,
179 .mode = COMMAND_EXEC,
180 .help = "load configuration file into PLD",
181 .usage = "pld_num filename",
182 },
183 COMMAND_REGISTRATION_DONE
184 };
185
186 static int pld_init(struct command_context *cmd_ctx)
187 {
188 if (!pld_devices)
189 return ERROR_OK;
190
191 struct command *parent = command_find_in_context(cmd_ctx, "pld");
192 return register_commands(cmd_ctx, parent, pld_exec_command_handlers);
193 }
194
195 COMMAND_HANDLER(handle_pld_init_command)
196 {
197 if (CMD_ARGC != 0)
198 return ERROR_COMMAND_SYNTAX_ERROR;
199
200 static bool pld_initialized;
201 if (pld_initialized) {
202 LOG_INFO("'pld init' has already been called");
203 return ERROR_OK;
204 }
205 pld_initialized = true;
206
207 LOG_DEBUG("Initializing PLDs...");
208 return pld_init(CMD_CTX);
209 }
210
211 static const struct command_registration pld_config_command_handlers[] = {
212 {
213 .name = "device",
214 .mode = COMMAND_CONFIG,
215 .handler = handle_pld_device_command,
216 .help = "configure a PLD device",
217 .usage = "driver_name [driver_args ... ]",
218 },
219 {
220 .name = "init",
221 .mode = COMMAND_CONFIG,
222 .handler = handle_pld_init_command,
223 .help = "initialize PLD devices",
224 .usage = ""
225 },
226 COMMAND_REGISTRATION_DONE
227 };
228 static const struct command_registration pld_command_handler[] = {
229 {
230 .name = "pld",
231 .mode = COMMAND_ANY,
232 .help = "programmable logic device commands",
233 .usage = "",
234 .chain = pld_config_command_handlers,
235 },
236 COMMAND_REGISTRATION_DONE
237 };
238 int pld_register_commands(struct command_context *cmd_ctx)
239 {
240 return register_commands(cmd_ctx, NULL, pld_command_handler);
241 }