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 }