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(pld_drivers[i]->pld_device_command, c);
  93                         if (ERROR_OK != retval)
  94                         {
  95                                 LOG_ERROR("'%s' driver rejected pld device", CMD_ARGV[0]);
  96                                 free(c);
  97                                 return ERROR_OK;
  98                         }
  99
 100                         /* put pld device in linked list */
 101                         if (pld_devices)
 102                         {
 103                                 /* find last pld device */
 104                                 for (p = pld_devices; p && p->next; p = p->next);
 105                                 if (p)
 106                                         p->next = c;
 107                         }
 108                         else
 109                         {
 110                                 pld_devices = c;
 111                         }
 112
 113                         found = 1;
 114                 }
 115         }
 116
 117         /* no matching pld driver found */
 118         if (!found)
 119         {
 120                 LOG_ERROR("pld driver '%s' not found", CMD_ARGV[0]);
 121                 exit(-1);
 122         }
 123
 124         return ERROR_OK;
 125 }
 126
 127 COMMAND_HANDLER(handle_pld_devices_command)
 128 {
 129         struct pld_device *p;
 130         int i = 0;
 131
 132         if (!pld_devices)
 133         {
 134                 command_print(CMD_CTX, "no pld devices configured");
 135                 return ERROR_OK;
 136         }
 137
 138         for (p = pld_devices; p; p = p->next)
 139         {
 140                 command_print(CMD_CTX, "#%i: %s", i++, p->driver->name);
 141         }
 142
 143         return ERROR_OK;
 144 }
 145
 146 COMMAND_HANDLER(handle_pld_load_command)
 147 {
 148         int retval;
 149         struct timeval start, end, duration;
 150         struct pld_device *p;
 151
 152         gettimeofday(&start, NULL);
 153
 154         if (CMD_ARGC < 2)
 155         {
 156                 command_print(CMD_CTX, "usage: pld load <device#> <file>");
 157                 return ERROR_OK;
 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 = "<device#> <file>",
 204         },
 205         COMMAND_REGISTRATION_DONE
 206 };
 207 int pld_init(struct command_context *cmd_ctx)
 208 {
 209         if (!pld_devices)
 210                 return ERROR_OK;
 211
 212         struct command *parent = command_find_in_context(cmd_ctx, "pld");
 213         return register_commands(cmd_ctx, parent, pld_exec_command_handlers);
 214 }
 215
 216 COMMAND_HANDLER(handle_pld_init_command)
 217 {
 218         if (CMD_ARGC != 0)
 219                 return ERROR_COMMAND_SYNTAX_ERROR;
 220
 221         static bool pld_initialized = false;
 222         if (pld_initialized)
 223         {
 224                 LOG_INFO("'pld init' has already been called");
 225                 return ERROR_OK;
 226         }
 227         pld_initialized = true;
 228
 229         LOG_DEBUG("Initializing PLDs...");
 230         return pld_init(CMD_CTX);
 231 }
 232
 233 static const struct command_registration pld_config_command_handlers[] = {
 234         {
 235                 .name = "device",
 236                 .mode = COMMAND_CONFIG,
 237                 .handler = &handle_pld_device_command,
 238                 .help = "configure a PLD device",
 239                 .usage = "<driver> ...",
 240         },
 241         {
 242                 .name = "init",
 243                 .mode = COMMAND_CONFIG,
 244                 .handler = &handle_pld_init_command,
 245                 .help = "initialize PLD devices",
 246         },
 247         COMMAND_REGISTRATION_DONE
 248 };
 249 static const struct command_registration pld_command_handler[] = {
 250         {
 251                 .name = "pld",
 252                 .mode = COMMAND_ANY,
 253                 .help = "programmable logic device commands",
 254
 255                 .chain = pld_config_command_handlers,
 256         },
 257         COMMAND_REGISTRATION_DONE
 258 };
 259 int pld_register_commands(struct command_context *cmd_ctx)
 260 {
 261         return register_commands(cmd_ctx, NULL, pld_command_handler);
 262 }