src/pld/pld.c

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