eibd/bcu/bcuread.cpp

   1 /*
   2     EIBD eib bus access and management daemon
   3     Copyright (C) 2005-2007 Martin Kögler <mkoegler@auto.tuwien.ac.at>
   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 Free Software
  17     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18 */
  19
  20 #include <stdarg.h>
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include <argp.h>
  24 #include "addrtab.h"
  25 #include "lowlevelconf.h"
  26
  27 /** aborts program with a printf like message */
  28 void
  29 die (const char *msg, ...)
  30 {
  31   va_list ap;
  32   va_start (ap, msg);
  33   vprintf (msg, ap);
  34   printf ("\n");
  35   va_end (ap);
  36
  37   exit (1);
  38 }
  39
  40 /** structure to store low level backends */
  41 struct urldef
  42 {
  43   /** URL-prefix */
  44   const char *prefix;
  45   /** factory function */
  46   LowLevel_Create_Func Create;
  47 };
  48
  49 /** list of URLs */
  50 struct urldef URLs[] = {
  51 #undef L2_NAME
  52 #define L2_NAME(a) { a##_PREFIX, a##_CREATE },
  53 #include "lowlevelcreate.h"
  54   {0, 0}
  55 };
  56
  57 /** determines the right backend for the url and creates it */
  58 LowLevelDriverInterface *
  59 Create (const char *url, Trace * t)
  60 {
  61   unsigned int p = 0;
  62   struct urldef *u = URLs;
  63   while (url[p] && url[p] != ':')
  64     p++;
  65   if (url[p] != ':')
  66     die ("not a valid url");
  67   while (u->prefix)
  68     {
  69       if (strlen (u->prefix) == p && !memcmp (u->prefix, url, p))
  70         {
  71           return u->Create (url + p + 1, t);
  72         }
  73       u++;
  74     }
  75   die ("url not supported");
  76   return 0;
  77 }
  78
  79 /** version */
  80 const char *argp_program_version = "bcuread " VERSION;
  81 /** documentation */
  82 static char doc[] =
  83   "bcuread -- read BCU memory\n"
  84   "(C) 2005-2007 Martin Kögler <mkoegler@auto.tuwien.ac.at>\n"
  85   "supported URLs are:\n"
  86 #undef L2_NAME
  87 #define L2_NAME(a) a##_URL
  88 #include "lowlevelcreate.h"
  89   "\n"
  90 #undef L2_NAME
  91 #define L2_NAME(a) a##_DOC
  92 #include "lowlevelcreate.h"
  93   "\n";
  94
  95 /** structure to store the arguments */
  96 struct arguments
  97 {
  98   /** trace level */
  99   int tracelevel;
 100 };
 101 /** storage for the arguments*/
 102 struct arguments arg;
 103
 104 unsigned
 105 readHex (const char *addr)
 106 {
 107   int i;
 108   sscanf (addr, "%x", &i);
 109   return i;
 110 }
 111
 112 /** documentation for arguments*/
 113 static char args_doc[] = "URL addr len";
 114
 115 /** option list */
 116 static struct argp_option options[] = {
 117
 118   {"trace", 't', "LEVEL", 0, "set trace level"},
 119   {0}
 120 };
 121
 122
 123 /** parses and stores an option */
 124 static error_t
 125 parse_opt (int key, char *arg, struct argp_state *state)
 126 {
 127   struct arguments *arguments = (struct arguments *) state->input;
 128   switch (key)
 129     {
 130     case 't':
 131       arguments->tracelevel = (arg ? atoi (arg) : 0);
 132       break;
 133     default:
 134       return ARGP_ERR_UNKNOWN;
 135     }
 136   return 0;
 137 }
 138
 139 /** information for the argument parser*/
 140 static struct argp argp = { options, parse_opt, args_doc, doc };
 141
 142
 143 int
 144 main (int ac, char *ag[])
 145 {
 146   int addr;
 147   int len;
 148   int index;
 149   CArray result;
 150   LowLevelDriverInterface *iface = 0;
 151   memset (&arg, 0, sizeof (arg));
 152
 153   argp_parse (&argp, ac, ag, 0, &index, &arg);
 154   if (index > ac - 3)
 155     die ("more parameter expected");
 156   if (index < ac - 3)
 157     die ("unexpected parameter");
 158
 159   signal (SIGPIPE, SIG_IGN);
 160   pth_init ();
 161
 162   Trace t;
 163   t.SetTraceLevel (arg.tracelevel);
 164
 165   try
 166   {
 167     iface = Create (ag[index], &t);
 168   }
 169   catch (Exception e)
 170   {
 171     die ("initialisation failed");
 172   }
 173
 174   addr = readHex (ag[index + 1]);
 175   len = atoi (ag[index + 2]);
 176
 177   int res = readEMIMem (iface, addr, len, result);
 178   if (!res)
 179     {
 180       printf ("Read failed");
 181     }
 182   else
 183     {
 184       for (int i = 0; i < result (); i++)
 185         printf ("%02x ", result[i]);
 186       printf ("\n");
 187     }
 188
 189   delete iface;
 190
 191   pth_exit (0);
 192   return 0;
 193 }