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