90067e34a6fc397f9a436a2e5370c5b6350b3ec2
[fw/openocd] / 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 }