c20b936c7ed477a6e97b44977cd4c6714da724e1
[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 "log.h"
26 #include "time_support.h"
27
28
29 /* pld drivers
30  */
31 extern pld_driver_t virtex2_pld;
32
33 static pld_driver_t *pld_drivers[] =
34 {
35         &virtex2_pld,
36         NULL,
37 };
38
39 static pld_device_t *pld_devices;
40 static command_t *pld_cmd;
41
42 pld_device_t *get_pld_device_by_num(int num)
43 {
44         pld_device_t *p;
45         int i = 0;
46
47         for (p = pld_devices; p; p = p->next)
48         {
49                 if (i++ == num)
50                 {
51                         return p;
52                 }
53         }
54
55         return NULL;
56 }
57
58 /* pld device <driver> [driver_options ...]
59  */
60 COMMAND_HANDLER(handle_pld_device_command)
61 {
62         int i;
63         int found = 0;
64
65         if (argc < 1)
66         {
67                 LOG_WARNING("incomplete 'pld device' command");
68                 return ERROR_OK;
69         }
70
71         for (i = 0; pld_drivers[i]; i++)
72         {
73                 if (strcmp(args[0], pld_drivers[i]->name) == 0)
74                 {
75                         pld_device_t *p, *c;
76
77                         /* register pld specific commands */
78                         if (pld_drivers[i]->register_commands(cmd_ctx) != ERROR_OK)
79                         {
80                                 LOG_ERROR("couldn't register '%s' commands", args[0]);
81                                 exit(-1);
82                         }
83
84                         c = malloc(sizeof(pld_device_t));
85                         c->driver = pld_drivers[i];
86                         c->next = NULL;
87
88                         if (pld_drivers[i]->pld_device_command(cmd_ctx, cmd, args, argc, c) != ERROR_OK)
89                         {
90                                 LOG_ERROR("'%s' driver rejected pld device", args[0]);
91                                 free(c);
92                                 return ERROR_OK;
93                         }
94
95                         /* put pld device in linked list */
96                         if (pld_devices)
97                         {
98                                 /* find last pld device */
99                                 for (p = pld_devices; p && p->next; p = p->next);
100                                 if (p)
101                                         p->next = c;
102                         }
103                         else
104                         {
105                                 pld_devices = c;
106                         }
107
108                         found = 1;
109                 }
110         }
111
112         /* no matching pld driver found */
113         if (!found)
114         {
115                 LOG_ERROR("pld driver '%s' not found", args[0]);
116                 exit(-1);
117         }
118
119         return ERROR_OK;
120 }
121
122 COMMAND_HANDLER(handle_pld_devices_command)
123 {
124         pld_device_t *p;
125         int i = 0;
126
127         if (!pld_devices)
128         {
129                 command_print(cmd_ctx, "no pld devices configured");
130                 return ERROR_OK;
131         }
132
133         for (p = pld_devices; p; p = p->next)
134         {
135                 command_print(cmd_ctx, "#%i: %s", i++, p->driver->name);
136         }
137
138         return ERROR_OK;
139 }
140
141 COMMAND_HANDLER(handle_pld_load_command)
142 {
143         int retval;
144         struct timeval start, end, duration;
145         pld_device_t *p;
146
147         gettimeofday(&start, NULL);
148
149         if (argc < 2)
150         {
151                 command_print(cmd_ctx, "usage: pld load <device#> <file>");
152                 return ERROR_OK;
153         }
154
155         unsigned dev_id;
156         COMMAND_PARSE_NUMBER(uint, args[0], dev_id);
157         p = get_pld_device_by_num(dev_id);
158         if (!p)
159         {
160                 command_print(cmd_ctx, "pld device '#%s' is out of bounds", args[0]);
161                 return ERROR_OK;
162         }
163
164         if ((retval = p->driver->load(p, args[1])) != ERROR_OK)
165         {
166                 command_print(cmd_ctx, "failed loading file %s to pld device %u",
167                         args[1], dev_id);
168                 switch (retval)
169                 {
170                 }
171                 return retval;
172         }
173         else
174         {
175                 gettimeofday(&end, NULL);
176                 timeval_subtract(&duration, &end, &start);
177
178                 command_print(cmd_ctx, "loaded file %s to pld device %u in %jis %jius",
179                         args[1], dev_id,
180                         (intmax_t)duration.tv_sec, (intmax_t)duration.tv_usec);
181         }
182
183         return ERROR_OK;
184 }
185
186 int pld_init(struct command_context_s *cmd_ctx)
187 {
188         if (!pld_devices)
189                 return ERROR_OK;
190
191         register_command(cmd_ctx, pld_cmd, "devices",
192                         handle_pld_devices_command, COMMAND_EXEC,
193                         "list configured pld devices");
194         register_command(cmd_ctx, pld_cmd, "load",
195                         handle_pld_load_command, COMMAND_EXEC,
196                         "load configuration <file> into programmable logic device");
197
198         return ERROR_OK;
199 }
200
201 int pld_register_commands(struct command_context_s *cmd_ctx)
202 {
203         pld_cmd = register_command(cmd_ctx, NULL, "pld", NULL, COMMAND_ANY, "programmable logic device commands");
204
205         register_command(cmd_ctx, pld_cmd, "device", handle_pld_device_command, COMMAND_CONFIG, NULL);
206
207         return ERROR_OK;
208 }