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