90067e34a6fc397f9a436a2e5370c5b6350b3ec2
[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 #ifdef HAVE_CONFIG_H
21 #include "config.h"
22 #endif
23
24 #include "pld.h"
25 #include <helper/log.h>
26 #include <helper/time_support.h>
27
28
29 /* pld drivers
30 */
31 extern struct pld_driver virtex2_pld;
32
33 static struct pld_driver *pld_drivers[] =
34 {
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 {
48 if (i++ == num)
49 {
50 return p;
51 }
52 }
53
54 return NULL;
55 }
56
57 /* pld device <driver> [driver_options ...]
58 */
59 COMMAND_HANDLER(handle_pld_device_command)
60 {
61 int i;
62 int found = 0;
63
64 if (CMD_ARGC < 1)
65 {
66 LOG_WARNING("incomplete 'pld device' command");
67 return ERROR_OK;
68 }
69
70 for (i = 0; pld_drivers[i]; i++)
71 {
72 if (strcmp(CMD_ARGV[0], pld_drivers[i]->name) == 0)
73 {
74 struct pld_device *p, *c;
75
76 /* register pld specific commands */
77 int retval;
78 if (pld_drivers[i]->commands) {
79 retval = register_commands(CMD_CTX, NULL,
80 pld_drivers[i]->commands);
81 if (ERROR_OK != retval)
82 {
83 LOG_ERROR("couldn't register '%s' commands", CMD_ARGV[0]);
84 return ERROR_FAIL;
85 }
86 }
87
88 c = malloc(sizeof(struct pld_device));
89 c->driver = pld_drivers[i];
90 c->next = NULL;
91
92 retval = CALL_COMMAND_HANDLER(
93 pld_drivers[i]->pld_device_command, c);
94 if (ERROR_OK != retval)
95 {
96 LOG_ERROR("'%s' driver rejected pld device",
97 CMD_ARGV[0]);
98 free(c);
99 return ERROR_OK;
100 }
101
102 /* put pld device in linked list */
103 if (pld_devices)
104 {
105 /* find last pld device */
106 for (p = pld_devices; p && p->next; p = p->next);
107 if (p)
108 p->next = c;
109 }
110 else
111 {
112 pld_devices = c;
113 }
114
115 found = 1;
116 }
117 }
118
119 /* no matching pld driver found */
120 if (!found)
121 {
122 LOG_ERROR("pld driver '%s' not found", CMD_ARGV[0]);
123 exit(-1);
124 }
125
126 return ERROR_OK;
127 }
128
129 COMMAND_HANDLER(handle_pld_devices_command)
130 {
131 struct pld_device *p;
132 int i = 0;
133
134 if (!pld_devices)
135 {
136 command_print(CMD_CTX, "no pld devices configured");
137 return ERROR_OK;
138 }
139
140 for (p = pld_devices; p; p = p->next)
141 {
142 command_print(CMD_CTX, "#%i: %s", i++, p->driver->name);
143 }
144
145 return ERROR_OK;
146 }
147
148 COMMAND_HANDLER(handle_pld_load_command)
149 {
150 int retval;
151 struct timeval start, end, duration;
152 struct pld_device *p;
153
154 gettimeofday(&start, NULL);
155
156 if (CMD_ARGC < 2)
157 {
158 command_print(CMD_CTX, "usage: pld load <device#> <file>");
159 return ERROR_OK;
160 }
161
162 unsigned dev_id;
163 COMMAND_PARSE_NUMBER(uint, CMD_ARGV[0], dev_id);
164 p = get_pld_device_by_num(dev_id);
165 if (!p)
166 {
167 command_print(CMD_CTX, "pld device '#%s' is out of bounds", CMD_ARGV[0]);
168 return ERROR_OK;
169 }
170
171 if ((retval = p->driver->load(p, CMD_ARGV[1])) != ERROR_OK)
172 {
173 command_print(CMD_CTX, "failed loading file %s to pld device %u",
174 CMD_ARGV[1], dev_id);
175 switch (retval)
176 {
177 }
178 return retval;
179 }
180 else
181 {
182 gettimeofday(&end, NULL);
183 timeval_subtract(&duration, &end, &start);
184
185 command_print(CMD_CTX, "loaded file %s to pld device %u in %jis %jius",
186 CMD_ARGV[1], dev_id,
187 (intmax_t)duration.tv_sec, (intmax_t)duration.tv_usec);
188 }
189
190 return ERROR_OK;
191 }
192
193 static const struct command_registration pld_exec_command_handlers[] = {
194 {
195 .name = "devices",
196 .handler = handle_pld_devices_command,
197 .mode = COMMAND_EXEC,
198 .help = "list configured pld devices",
199 },
200 {
201 .name = "load",
202 .handler = handle_pld_load_command,
203 .mode = COMMAND_EXEC,
204 .help = "load configuration file into PLD",
205 .usage = "pld_num filename",
206 },
207 COMMAND_REGISTRATION_DONE
208 };
209
210 static int pld_init(struct command_context *cmd_ctx)
211 {
212 if (!pld_devices)
213 return ERROR_OK;
214
215 struct command *parent = command_find_in_context(cmd_ctx, "pld");
216 return register_commands(cmd_ctx, parent, pld_exec_command_handlers);
217 }
218
219 COMMAND_HANDLER(handle_pld_init_command)
220 {
221 if (CMD_ARGC != 0)
222 return ERROR_COMMAND_SYNTAX_ERROR;
223
224 static bool pld_initialized = false;
225 if (pld_initialized)
226 {
227 LOG_INFO("'pld init' has already been called");
228 return ERROR_OK;
229 }
230 pld_initialized = true;
231
232 LOG_DEBUG("Initializing PLDs...");
233 return pld_init(CMD_CTX);
234 }
235
236 static const struct command_registration pld_config_command_handlers[] = {
237 {
238 .name = "device",
239 .mode = COMMAND_CONFIG,
240 .handler = handle_pld_device_command,
241 .help = "configure a PLD device",
242 .usage = "driver_name [driver_args ... ]",
243 },
244 {
245 .name = "init",
246 .mode = COMMAND_CONFIG,
247 .handler = handle_pld_init_command,
248 .help = "initialize PLD devices",
249 },
250 COMMAND_REGISTRATION_DONE
251 };
252 static const struct command_registration pld_command_handler[] = {
253 {
254 .name = "pld",
255 .mode = COMMAND_ANY,
256 .help = "programmable logic device commands",
257 .chain = pld_config_command_handlers,
258 },
259 COMMAND_REGISTRATION_DONE
260 };
261 int pld_register_commands(struct command_context *cmd_ctx)
262 {
263 return register_commands(cmd_ctx, NULL, pld_command_handler);
264 }