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 "replacements.h"
  25
  26 #include "pld.h"
  27
  28 #include "jtag.h"
  29 #include "command.h"
  30 #include "log.h"
  31 #include "time_support.h"
  32
  33 #include <stdlib.h>
  34 #include <unistd.h>
  35 #include <sys/types.h>
  36 #include <sys/stat.h>
  37 #include <fcntl.h>
  38 #include <string.h>
  39
  40 #include <sys/time.h>
  41 #include <time.h>
  42
  43 /* pld drivers
  44  */
  45 extern pld_driver_t virtex2_pld;
  46
  47 pld_driver_t *pld_drivers[] =
  48 {
  49         &virtex2_pld,
  50         NULL,
  51 };
  52
  53 pld_device_t *pld_devices;
  54 static command_t *pld_cmd;
  55
  56 int handle_pld_devices_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  57 int handle_pld_device_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  58 int handle_pld_load_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  59
  60 int pld_init(struct command_context_s *cmd_ctx)
  61 {
  62         if (pld_devices)
  63         {
  64                 register_command(cmd_ctx, pld_cmd, "devices", handle_pld_devices_command, COMMAND_EXEC,
  65                                                 "list configured pld devices");
  66                 register_command(cmd_ctx, pld_cmd, "load", handle_pld_load_command, COMMAND_EXEC,
  67                                                 "load configuration <file> into programmable logic device");
  68         }
  69
  70         return ERROR_OK;
  71 }
  72
  73 pld_device_t *get_pld_device_by_num(int num)
  74 {
  75         pld_device_t *p;
  76         int i = 0;
  77
  78         for (p = pld_devices; p; p = p->next)
  79         {
  80                 if (i++ == num)
  81                 {
  82                         return p;
  83                 }
  84         }
  85
  86         return NULL;
  87 }
  88
  89 /* pld device <driver> [driver_options ...]
  90  */
  91 int handle_pld_device_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
  92 {
  93         int i;
  94         int found = 0;
  95
  96         if (argc < 1)
  97         {
  98                 LOG_WARNING("incomplete 'pld bank' configuration");
  99                 return ERROR_OK;
 100         }
 101
 102         for (i = 0; pld_drivers[i]; i++)
 103         {
 104                 if (strcmp(args[0], pld_drivers[i]->name) == 0)
 105                 {
 106                         pld_device_t *p, *c;
 107
 108                         /* register pld specific commands */
 109                         if (pld_drivers[i]->register_commands(cmd_ctx) != ERROR_OK)
 110                         {
 111                                 LOG_ERROR("couldn't register '%s' commands", args[0]);
 112                                 exit(-1);
 113                         }
 114
 115                         c = malloc(sizeof(pld_device_t));
 116                         c->driver = pld_drivers[i];
 117                         c->next = NULL;
 118
 119                         if (pld_drivers[i]->pld_device_command(cmd_ctx, cmd, args, argc, c) != ERROR_OK)
 120                         {
 121                                 LOG_ERROR("'%s' driver rejected pld device", args[0]);
 122                                 free(c);
 123                                 return ERROR_OK;
 124                         }
 125
 126                         /* put pld device in linked list */
 127                         if (pld_devices)
 128                         {
 129                                 /* find last pld device */
 130                                 for (p = pld_devices; p && p->next; p = p->next);
 131                                 if (p)
 132                                         p->next = c;
 133                         }
 134                         else
 135                         {
 136                                 pld_devices = c;
 137                         }
 138
 139                         found = 1;
 140                 }
 141         }
 142
 143         /* no matching pld driver found */
 144         if (!found)
 145         {
 146                 LOG_ERROR("pld driver '%s' not found", args[0]);
 147                 exit(-1);
 148         }
 149
 150         return ERROR_OK;
 151 }
 152
 153 int handle_pld_devices_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
 154 {
 155         pld_device_t *p;
 156         int i = 0;
 157
 158         if (!pld_devices)
 159         {
 160                 command_print(cmd_ctx, "no pld devices configured");
 161                 return ERROR_OK;
 162         }
 163
 164         for (p = pld_devices; p; p = p->next)
 165         {
 166                 command_print(cmd_ctx, "#%i: %s", i++, p->driver->name);
 167         }
 168
 169         return ERROR_OK;
 170 }
 171
 172 int handle_pld_load_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
 173 {
 174         int retval;
 175         struct timeval start, end, duration;
 176         pld_device_t *p;
 177
 178         gettimeofday(&start, NULL);
 179
 180         if (argc < 2)
 181         {
 182                 command_print(cmd_ctx, "usage: pld load <device#> <file>");
 183                 return ERROR_OK;
 184         }
 185
 186         p = get_pld_device_by_num(strtoul(args[0], NULL, 0));
 187         if (!p)
 188         {
 189                 command_print(cmd_ctx, "pld device '#%s' is out of bounds", args[0]);
 190                 return ERROR_OK;
 191         }
 192
 193         if ((retval = p->driver->load(p, args[1])) != ERROR_OK)
 194         {
 195                 command_print(cmd_ctx, "failed loading file %s to pld device %i",
 196                         args[1], strtoul(args[0], NULL, 0));
 197                 switch (retval)
 198                 {
 199                 }
 200         }
 201         else
 202         {
 203                 gettimeofday(&end, NULL);
 204                 timeval_subtract(&duration, &end, &start);
 205
 206                 command_print(cmd_ctx, "loaded file %s to pld device %i in %is %ius",
 207                         args[1], strtoul(args[0], NULL, 0), duration.tv_sec, duration.tv_usec);
 208         }
 209
 210         return ERROR_OK;
 211 }
 212
 213 int pld_register_commands(struct command_context_s *cmd_ctx)
 214 {
 215         pld_cmd = register_command(cmd_ctx, NULL, "pld", NULL, COMMAND_ANY, "programmable logic device commands");
 216
 217         register_command(cmd_ctx, pld_cmd, "device", handle_pld_device_command, COMMAND_CONFIG, NULL);
 218
 219         return ERROR_OK;
 220 }