src/input/input.c

   1 /*
   2  * This file is part of the libsigrok project.
   3  *
   4  * Copyright (C) 2014 Bert Vermeulen <bert@biot.com>
   5  *
   6  * This program is free software: you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation, either version 3 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include <string.h>
  21 #include <sys/types.h>
  22 #include <sys/stat.h>
  23 #include <unistd.h>
  24 #include <fcntl.h>
  25 #include <errno.h>
  26 #include "libsigrok.h"
  27 #include "libsigrok-internal.h"
  28
  29 #define LOG_PREFIX "input"
  30
  31 /**
  32  * @file
  33  *
  34  * Input module handling.
  35  */
  36
  37 /**
  38  * @defgroup grp_input Input modules
  39  *
  40  * Input file/data module handling.
  41  *
  42  * libsigrok can process acquisition data in several different ways.
  43  * Aside from acquiring data from a hardware device, it can also take it
  44  * from a file in various formats (binary, CSV, VCD, and so on).
  45  *
  46  * Like all libsigrok data handling, processing is done in a streaming
  47  * manner: input should be supplied a chunk at a time. This way anything
  48  * that processes data can do so in real time, without the user having
  49  * to wait for the whole thing to be finished.
  50  *
  51  * Every input module is "pluggable", meaning it's handled as being separate
  52  * from the main libsigrok, but linked in to it statically. To keep things
  53  * modular and separate like this, functions within an input module should be
  54  * declared static, with only the respective 'struct sr_input_module' being
  55  * exported for use into the wider libsigrok namespace.
  56  *
  57  * @{
  58  */
  59
  60 /** @cond PRIVATE */
  61 extern SR_PRIV struct sr_input_module input_chronovu_la8;
  62 extern SR_PRIV struct sr_input_module input_csv;
  63 extern SR_PRIV struct sr_input_module input_binary;
  64 extern SR_PRIV struct sr_input_module input_vcd;
  65 extern SR_PRIV struct sr_input_module input_wav;
  66 /* @endcond */
  67
  68 static const struct sr_input_module *input_module_list[] = {
  69         &input_binary,
  70         &input_chronovu_la8,
  71         &input_csv,
  72         &input_vcd,
  73         &input_wav,
  74         NULL,
  75 };
  76
  77 /**
  78  * Returns a NULL-terminated list of all available input modules.
  79  *
  80  * @since 0.4.0
  81  */
  82 SR_API const struct sr_input_module **sr_input_list(void)
  83 {
  84         return input_module_list;
  85 }
  86
  87 /**
  88  * Returns the specified input module's ID.
  89  *
  90  * @since 0.4.0
  91  */
  92 SR_API const char *sr_input_id_get(const struct sr_input_module *o)
  93 {
  94         if (!o) {
  95                 sr_err("Invalid input module NULL!");
  96                 return NULL;
  97         }
  98
  99         return o->id;
 100 }
 101
 102 /**
 103  * Returns the specified input module's name.
 104  *
 105  * @since 0.4.0
 106  */
 107 SR_API const char *sr_input_name_get(const struct sr_input_module *o)
 108 {
 109         if (!o) {
 110                 sr_err("Invalid input module NULL!");
 111                 return NULL;
 112         }
 113
 114         return o->name;
 115 }
 116
 117 /**
 118  * Returns the specified input module's description.
 119  *
 120  * @since 0.4.0
 121  */
 122 SR_API const char *sr_input_description_get(const struct sr_input_module *o)
 123 {
 124         if (!o) {
 125                 sr_err("Invalid input module NULL!");
 126                 return NULL;
 127         }
 128
 129         return o->desc;
 130 }
 131
 132 /**
 133  * Return the input module with the specified ID, or NULL if no module
 134  * with that id is found.
 135  *
 136  * @since 0.4.0
 137  */
 138 SR_API const struct sr_input_module *sr_input_find(char *id)
 139 {
 140         int i;
 141
 142         for (i = 0; input_module_list[i]; i++) {
 143                 if (!strcmp(input_module_list[i]->id, id))
 144                         return input_module_list[i];
 145         }
 146
 147         return NULL;
 148 }
 149
 150 /**
 151  * Returns a NULL-terminated array of struct sr_option, or NULL if the
 152  * module takes no options.
 153  *
 154  * Each call to this function must be followed by a call to
 155  * sr_input_options_free().
 156  *
 157  * @since 0.4.0
 158  */
 159 SR_API const struct sr_option **sr_input_options_get(const struct sr_input_module *imod)
 160 {
 161         const struct sr_option *mod_opts, **opts;
 162         int size, i;
 163
 164         if (!imod || !imod->options)
 165                 return NULL;
 166
 167         mod_opts = imod->options();
 168
 169         for (size = 0; mod_opts[size].id; size++)
 170                 ;
 171         opts = g_malloc((size + 1) * sizeof(struct sr_option *));
 172
 173         for (i = 0; i < size; i++)
 174                 opts[i] = &mod_opts[i];
 175         opts[i] = NULL;
 176
 177         return opts;
 178 }
 179
 180 /**
 181  * After a call to sr_input_options_get(), this function cleans up all
 182  * resources returned by that call.
 183  *
 184  * @since 0.4.0
 185  */
 186 SR_API void sr_input_options_free(const struct sr_option **options)
 187 {
 188         int i;
 189
 190         if (!options)
 191                 return;
 192
 193         for (i = 0; options[i]; i++) {
 194                 if (options[i]->def) {
 195                         g_variant_unref(options[i]->def);
 196                         ((struct sr_option *)options[i])->def = NULL;
 197                 }
 198
 199                 if (options[i]->values) {
 200                         g_slist_free_full(options[i]->values, (GDestroyNotify)g_variant_unref);
 201                         ((struct sr_option *)options[i])->values = NULL;
 202                 }
 203         }
 204         g_free(options);
 205 }
 206
 207 /**
 208  * Create a new input instance using the specified input module.
 209  *
 210  * This function is used when a client wants to use a specific input
 211  * module to parse a stream. No effort is made to identify the format.
 212  *
 213  * @param options GHashTable consisting of keys corresponding with
 214  * the module options \c id field. The values should be GVariant
 215  * pointers with sunk references, of the same GVariantType as the option's
 216  * default value.
 217  *
 218  * @since 0.4.0
 219  */
 220 SR_API struct sr_input *sr_input_new(const struct sr_input_module *imod,
 221                 GHashTable *options)
 222 {
 223         struct sr_input *in;
 224         struct sr_option *mod_opts;
 225         const GVariantType *gvt;
 226         GHashTable *new_opts;
 227         GHashTableIter iter;
 228         gpointer key, value;
 229         int i;
 230
 231         in = g_malloc0(sizeof(struct sr_input));
 232         in->module = imod;
 233
 234         new_opts = g_hash_table_new_full(g_str_hash, g_str_equal, g_free,
 235                         (GDestroyNotify)g_variant_unref);
 236         if (imod->options) {
 237                 mod_opts = imod->options();
 238                 for (i = 0; mod_opts[i].id; i++) {
 239                         if (options && g_hash_table_lookup_extended(options,
 240                                         mod_opts[i].id, &key, &value)) {
 241                                 /* Option not given: insert the default value. */
 242                                 gvt = g_variant_get_type(mod_opts[i].def);
 243                                 if (!g_variant_is_of_type(value, gvt)) {
 244                                         sr_err("Invalid type for '%s' option.", key);
 245                                         g_free(in);
 246                                         return NULL;
 247                                 }
 248                                 g_hash_table_insert(new_opts, g_strdup(mod_opts[i].id),
 249                                                 g_variant_ref(value));
 250                         } else {
 251                                 /* Pass option along. */
 252                                 g_hash_table_insert(new_opts, g_strdup(mod_opts[i].id),
 253                                                 g_variant_ref(mod_opts[i].def));
 254                         }
 255                 }
 256
 257                 /* Make sure no invalid options were given. */
 258                 if (options) {
 259                         g_hash_table_iter_init(&iter, options);
 260                         while (g_hash_table_iter_next(&iter, &key, &value)) {
 261                                 if (!g_hash_table_lookup(new_opts, key)) {
 262                                         sr_err("Input module '%s' has no option '%s'", imod->id, key);
 263                                         g_hash_table_destroy(new_opts);
 264                                         g_free(in);
 265                                         return NULL;
 266                                 }
 267                         }
 268                 }
 269         }
 270
 271         if (in->module->init && in->module->init(in, new_opts) != SR_OK) {
 272                 g_free(in);
 273                 in = NULL;
 274         }
 275         if (new_opts)
 276                 g_hash_table_destroy(new_opts);
 277         in->buf = g_string_sized_new(128);
 278
 279         return in;
 280 }
 281
 282 /* Returns TRUE is all required meta items are available. */
 283 static gboolean check_required_metadata(const uint8_t *metadata, uint8_t *avail)
 284 {
 285         int m, a;
 286         uint8_t reqd;
 287
 288         for (m = 0; metadata[m]; m++) {
 289                 if (!(metadata[m] & SR_INPUT_META_REQUIRED))
 290                         continue;
 291                 reqd = metadata[m] & ~SR_INPUT_META_REQUIRED;
 292                 for (a = 0; avail[a]; a++) {
 293                         if (avail[a] == reqd)
 294                                 break;
 295                 }
 296                 if (!avail[a])
 297                         /* Found a required meta item that isn't available. */
 298                         return FALSE;
 299         }
 300
 301         return TRUE;
 302 }
 303
 304 /**
 305  * Try to find an input module that can parse the given buffer.
 306  *
 307  * The buffer must contain enough of the beginning of the file for
 308  * the input modules to find a match. This is format-dependent, but
 309  * 128 bytes is normally enough.
 310  *
 311  * If an input module is found, an instance is created and returned.
 312  * Otherwise, NULL is returned.
 313  *
 314  * If an instance is created, it has the given buffer used for scanning
 315  * already submitted to it, to be processed before more data is sent.
 316  * This allows a frontend to submit an initial chunk of a non-seekable
 317  * stream, such as stdin, without having to keep it around and submit
 318  * it again later.
 319  *
 320  */
 321 SR_API const struct sr_input *sr_input_scan_buffer(GString *buf)
 322 {
 323         struct sr_input *in;
 324         const struct sr_input_module *imod;
 325         GHashTable *meta;
 326         unsigned int m, i;
 327         uint8_t mitem, avail_metadata[8];
 328
 329         /* No more metadata to be had from a buffer. */
 330         avail_metadata[0] = SR_INPUT_META_HEADER;
 331         avail_metadata[1] = 0;
 332
 333         in = NULL;
 334         for (i = 0; input_module_list[i]; i++) {
 335                 imod = input_module_list[i];
 336                 if (!imod->metadata[0]) {
 337                         /* Module has no metadata for matching so will take
 338                          * any input. No point in letting it try to match. */
 339                         continue;
 340                 }
 341                 if (!check_required_metadata(imod->metadata, avail_metadata))
 342                         /* Cannot satisfy this module's requirements. */
 343                         continue;
 344
 345                 meta = g_hash_table_new(NULL, NULL);
 346                 for (m = 0; m < sizeof(imod->metadata); m++) {
 347                         mitem = imod->metadata[m] & ~SR_INPUT_META_REQUIRED;
 348                         if (mitem == SR_INPUT_META_HEADER)
 349                                 g_hash_table_insert(meta, GINT_TO_POINTER(mitem), buf);
 350                 }
 351                 if (g_hash_table_size(meta) == 0) {
 352                         /* No metadata for this module, so nothing to match. */
 353                         g_hash_table_destroy(meta);
 354                         continue;
 355                 }
 356                 if (!imod->format_match(meta)) {
 357                         /* Module didn't recognize this buffer. */
 358                         g_hash_table_destroy(meta);
 359                         continue;
 360                 }
 361                 g_hash_table_destroy(meta);
 362
 363                 /* Found a matching module. */
 364                 in = sr_input_new(imod, NULL);
 365                 g_string_insert_len(in->buf, 0, buf->str, buf->len);
 366                 break;
 367         }
 368
 369         return in;
 370 }
 371
 372 /**
 373  * Try to find an input module that can parse the given file.
 374  *
 375  * If an input module is found, an instance is created and returned.
 376  * Otherwise, NULL is returned.
 377  *
 378  */
 379 SR_API const struct sr_input *sr_input_scan_file(const char *filename)
 380 {
 381         struct sr_input *in;
 382         const struct sr_input_module *imod;
 383         GHashTable *meta;
 384         GString *header_buf;
 385         struct stat st;
 386         unsigned int midx, m, i;
 387         int fd;
 388         ssize_t size;
 389         uint8_t mitem, avail_metadata[8];
 390
 391         if (!filename || !filename[0]) {
 392                 sr_err("Invalid filename.");
 393                 return NULL;
 394         }
 395
 396         if (!g_file_test(filename, G_FILE_TEST_EXISTS)) {
 397                 sr_err("No such file.");
 398                 return NULL;
 399         }
 400
 401         if (stat(filename, &st) < 0) {
 402                 sr_err("%s", strerror(errno));
 403                 return NULL;
 404         }
 405
 406         midx = 0;
 407         avail_metadata[midx++] = SR_INPUT_META_FILENAME;
 408         avail_metadata[midx++] = SR_INPUT_META_FILESIZE;
 409         avail_metadata[midx++] = SR_INPUT_META_HEADER;
 410         /* TODO: MIME type */
 411
 412         in = NULL;
 413         header_buf = g_string_sized_new(128);
 414         for (i = 0; input_module_list[i]; i++) {
 415                 g_string_truncate(header_buf, 0);
 416
 417                 imod = input_module_list[i];
 418                 if (!imod->metadata[0]) {
 419                         /* Module has no metadata for matching so will take
 420                          * any input. No point in letting it try to match. */
 421                         continue;
 422                 }
 423                 if (!check_required_metadata(imod->metadata, avail_metadata))
 424                         /* Cannot satisfy this module's requirements. */
 425                         continue;
 426
 427                 meta = g_hash_table_new(NULL, NULL);
 428                 for (m = 0; m < sizeof(imod->metadata); m++) {
 429                         mitem = imod->metadata[m] & ~SR_INPUT_META_REQUIRED;
 430                         if (!mitem)
 431                                 /* Metadata list is 0-terminated. */
 432                                 break;
 433                         if (mitem == SR_INPUT_META_FILENAME)
 434                                 g_hash_table_insert(meta, GINT_TO_POINTER(mitem),
 435                                                 (gpointer)filename);
 436                         else if (mitem == SR_INPUT_META_FILESIZE) {
 437                                 sr_dbg("inserting fs %d", st.st_size);
 438                                 g_hash_table_insert(meta, GINT_TO_POINTER(mitem),
 439                                                 GINT_TO_POINTER(st.st_size));
 440                         } else if (mitem == SR_INPUT_META_HEADER) {
 441                                 if ((fd = open(filename, O_RDONLY)) < 0) {
 442                                         sr_err("%s", strerror(errno));
 443                                         return NULL;
 444                                 }
 445                                 size = read(fd, header_buf->str, 128);
 446                                 header_buf->len = size;
 447                                 close(fd);
 448                                 if (size <= 0) {
 449                                         g_string_free(header_buf, TRUE);
 450                                         sr_err("%s", strerror(errno));
 451                                         return NULL;
 452                                 }
 453                                 g_hash_table_insert(meta, GINT_TO_POINTER(mitem), header_buf);
 454                         }
 455                 }
 456                 if (g_hash_table_size(meta) == 0) {
 457                         /* No metadata for this module, so there's no way it
 458                          * can match. */
 459                         g_hash_table_destroy(meta);
 460                         continue;
 461                 }
 462                 if (!imod->format_match(meta))
 463                         /* Module didn't recognize this buffer. */
 464                         continue;
 465
 466                 /* Found a matching module. */
 467                 in = sr_input_new(imod, NULL);
 468                 break;
 469         }
 470         g_string_free(header_buf, TRUE);
 471
 472         return in;
 473 }
 474
 475 /**
 476  * Return the input instance's (virtual) device instance. This can be
 477  * used to find out the number of channels and other information.
 478  *
 479  * @since 0.4.0
 480  */
 481 SR_API struct sr_dev_inst *sr_input_dev_inst_get(const struct sr_input *in)
 482 {
 483         return in->sdi;
 484 }
 485
 486 /**
 487  * Send data to the specified input instance.
 488  *
 489  * When an input module instance is created with sr_input_new(), this
 490  * function is used to feed data to the instance.
 491  *
 492  * @since 0.4.0
 493  */
 494 SR_API int sr_input_send(const struct sr_input *in, GString *buf)
 495 {
 496         return in->module->receive(in, buf);
 497 }
 498
 499 /**
 500  * Free the specified input instance and all associated resources.
 501  *
 502  * @since 0.4.0
 503  */
 504 SR_API int sr_input_free(const struct sr_input *in)
 505 {
 506         int ret;
 507
 508         if (!in)
 509                 return SR_ERR_ARG;
 510
 511         ret = SR_OK;
 512         if (in->module->cleanup)
 513                 ret = in->module->cleanup((struct sr_input *)in);
 514         if (in->sdi)
 515                 sr_dev_inst_free(in->sdi);
 516         if (in->buf)
 517                 g_string_free(in->buf, TRUE);
 518         g_free((gpointer)in);
 519
 520         return ret;
 521 }
 522
 523
 524 /** @} */