blob.c

   1 /*
   2  * Copyright (C) 2007 Andre Noll <maan@tuebingen.mpg.de>
   3  *
   4  * Licensed under the GPL v2. For licencing details see COPYING.
   5  */
   6
   7 /** \file blob.c Macros and functions for blob handling. */
   8
   9 #include <regex.h>
  10 #include <fnmatch.h>
  11 #include <osl.h>
  12
  13 #include "para.h"
  14 #include "error.h"
  15 #include "crypt.h"
  16 #include "string.h"
  17 #include "afh.h"
  18 #include "afs.h"
  19 #include "ipc.h"
  20 #include "portable_io.h"
  21 #include "sideband.h"
  22 #include "command.h"
  23
  24 /**
  25  * Compare two osl objects pointing to unsigned integers of 32 bit size.
  26  *
  27  * \param obj1 Pointer to the first integer.
  28  * \param obj2 Pointer to the second integer.
  29  *
  30  * \return The values required for an osl compare function.
  31  *
  32  * \sa osl_compare_func, osl_hash_compare().
  33  */
  34 static int uint32_compare(const struct osl_object *obj1, const struct osl_object *obj2)
  35 {
  36         uint32_t d1 = read_u32((const char *)obj1->data);
  37         uint32_t d2 = read_u32((const char *)obj2->data);
  38
  39         if (d1 < d2)
  40                 return 1;
  41         if (d1 > d2)
  42                 return -1;
  43         return 0;
  44 }
  45
  46 static struct osl_column_description blob_cols[] = {
  47         [BLOBCOL_ID] = {
  48                 .storage_type = OSL_MAPPED_STORAGE,
  49                 .storage_flags = OSL_RBTREE | OSL_UNIQUE | OSL_FIXED_SIZE,
  50                 .name = "id",
  51                 .data_size = 4,
  52                 .compare_function = uint32_compare
  53         },
  54         [BLOBCOL_NAME] = {
  55                 .storage_type = OSL_MAPPED_STORAGE,
  56                 .storage_flags = OSL_RBTREE | OSL_UNIQUE,
  57                 .name = "name",
  58                 .compare_function = string_compare
  59         },
  60         [BLOBCOL_DEF] = {
  61                 .storage_type = OSL_DISK_STORAGE,
  62                 .storage_flags = 0,
  63                 .name = "definition"
  64         }
  65 };
  66
  67 /** Define an osl table description for a blob table. */
  68 #define DEFINE_BLOB_TABLE_DESC(table_name) \
  69         static struct osl_table_description table_name ## _table_desc = { \
  70                 .name = #table_name, \
  71                 .num_columns = NUM_BLOB_COLUMNS, \
  72                 .flags = OSL_LARGE_TABLE, \
  73                 .column_descriptions = blob_cols \
  74         };
  75
  76 /** Define a pointer to an osl blob table with a canonical name. */
  77 #define DEFINE_BLOB_TABLE_PTR(table_name) struct osl_table *table_name ## _table;
  78
  79
  80 /** Define a blob table. */
  81 #define INIT_BLOB_TABLE(table_name) \
  82         DEFINE_BLOB_TABLE_DESC(table_name); \
  83         DEFINE_BLOB_TABLE_PTR(table_name);
  84
  85 /* doxygen isn't smart enough to recognize these */
  86 /** \cond blob_table */
  87 INIT_BLOB_TABLE(lyrics);
  88 INIT_BLOB_TABLE(images);
  89 INIT_BLOB_TABLE(moods);
  90 INIT_BLOB_TABLE(playlists);
  91 /** \endcond blob_table */
  92
  93 /** Flags that may be passed to the \p ls functions of each blob  type. */
  94 enum blob_ls_flags {
  95         /** List both id and name. */
  96         BLOB_LS_FLAG_LONG = 1,
  97         /** Reverse sort order. */
  98         BLOB_LS_FLAG_REVERSE = 2,
  99         /** Sort by id instead of name. */
 100         BLOB_LS_FLAG_SORT_BY_ID = 4,
 101 };
 102
 103 /** Structure passed to the \p print_blob function. */
 104 struct lsblob_action_data {
 105         /** The flags given at the command line. */
 106         uint32_t flags;
 107         /** Message buffer. */
 108         struct para_buffer pb;
 109 };
 110
 111 static int print_blob(struct osl_table *table, struct osl_row *row,
 112                 const char *name, void *data)
 113 {
 114         struct lsblob_action_data *lbad = data;
 115         struct osl_object obj;
 116         uint32_t id;
 117         int ret;
 118
 119         if (!(lbad->flags & BLOB_LS_FLAG_LONG)) {
 120                 para_printf(&lbad->pb, "%s\n", name);
 121                 return 0;
 122         }
 123         ret = osl(osl_get_object(table, row, BLOBCOL_ID, &obj));
 124         if (ret < 0) {
 125                 para_printf(&lbad->pb, "cannot list %s\n", name);
 126                 return ret;
 127         }
 128         id = *(uint32_t *)obj.data;
 129         para_printf(&lbad->pb, "%u\t%s\n", id, name);
 130         return 1;
 131 }
 132
 133 static int com_lsblob_callback(struct osl_table *table,
 134                 int fd, const struct osl_object *query)
 135 {
 136         struct lsblob_action_data lbad = {
 137                 .flags = *(uint32_t *)query->data,
 138                 .pb = {
 139                         .max_size = shm_get_shmmax(),
 140                         .private_data = &(struct afs_max_size_handler_data) {
 141                                 .fd = fd,
 142                                 .band = SBD_OUTPUT
 143                         },
 144                         .max_size_handler = afs_max_size_handler,
 145                 }
 146         };
 147         struct pattern_match_data pmd = {
 148                 .table = table,
 149                 .patterns = {.data = (char *)query->data + sizeof(uint32_t),
 150                         .size = query->size - sizeof(uint32_t)},
 151                 .pm_flags = PM_NO_PATTERN_MATCHES_EVERYTHING | PM_SKIP_EMPTY_NAME,
 152                 .match_col_num = BLOBCOL_NAME,
 153                 .data = &lbad,
 154                 .action = print_blob,
 155         };
 156         int ret;
 157
 158         if (lbad.flags & BLOB_LS_FLAG_REVERSE)
 159                 pmd.pm_flags |= PM_REVERSE_LOOP;
 160         if (!(lbad.flags & BLOB_LS_FLAG_SORT_BY_ID))
 161                 pmd.loop_col_num = BLOBCOL_NAME;
 162         else
 163                 pmd.loop_col_num = BLOBCOL_ID;
 164         ret = for_each_matching_row(&pmd);
 165         if (ret < 0)
 166                 goto out;
 167         if (pmd.num_matches == 0 && pmd.patterns.size > 0)
 168                 ret = -E_NO_MATCH;
 169 out:
 170         flush_and_free_pb(&lbad.pb);
 171         return ret;
 172 }
 173
 174 static int com_lsblob(callback_function *f, struct command_context *cc)
 175 {
 176         uint32_t flags = 0;
 177         struct osl_object options = {.data = &flags, .size = sizeof(flags)};
 178         int i;
 179
 180         for (i = 1; i < cc->argc; i++) {
 181                 const char *arg = cc->argv[i];
 182                 if (arg[0] != '-')
 183                         break;
 184                 if (!strcmp(arg, "--")) {
 185                         i++;
 186                         break;
 187                 }
 188                 if (!strcmp(arg, "-l")) {
 189                         flags |= BLOB_LS_FLAG_LONG;
 190                         continue;
 191                 }
 192                 if (!strcmp(arg, "-i")) {
 193                         flags |= BLOB_LS_FLAG_SORT_BY_ID;
 194                         continue;
 195                 }
 196                 if (!strcmp(arg, "-r")) {
 197                         flags |= BLOB_LS_FLAG_REVERSE;
 198                         continue;
 199                 }
 200                 break;
 201         }
 202 //      if (argc > i)
 203 //              return -E_BLOB_SYNTAX;
 204         return send_option_arg_callback_request(&options, cc->argc - i,
 205                 cc->argv + i, f, afs_cb_result_handler, cc);
 206 }
 207
 208 static int cat_blob(struct osl_table *table, struct osl_row *row,
 209                 __a_unused const char *name, void *data)
 210 {
 211         int ret = 0, ret2, fd = *(int *)data;
 212         struct osl_object obj;
 213
 214         ret = osl(osl_open_disk_object(table, row, BLOBCOL_DEF, &obj));
 215         if (ret < 0)
 216                 return (ret == osl(-E_OSL_EMPTY))? 0 : ret;
 217         assert(obj.size > 0);
 218         ret = pass_buffer_as_shm(fd, SBD_OUTPUT, obj.data, obj.size);
 219         ret2 = osl(osl_close_disk_object(&obj));
 220         return (ret < 0)? ret : ret2;
 221 }
 222
 223 static int com_catblob_callback(struct osl_table *table, int fd,
 224                 const struct osl_object *query)
 225 {
 226         int ret;
 227         struct pattern_match_data pmd = {
 228                 .table = table,
 229                 .patterns = *query,
 230                 .loop_col_num = BLOBCOL_NAME,
 231                 .match_col_num = BLOBCOL_NAME,
 232                 .pm_flags = PM_SKIP_EMPTY_NAME,
 233                 .data = &fd,
 234                 .action = cat_blob
 235         };
 236         ret = for_each_matching_row(&pmd);
 237         if (ret < 0)
 238                 return ret;
 239         if (pmd.num_matches == 0)
 240                 ret = -E_NO_MATCH;
 241         return ret;
 242 }
 243
 244 static int com_catblob(callback_function *f, struct command_context *cc)
 245 {
 246         if (cc->argc < 2)
 247                 return -E_BLOB_SYNTAX;
 248         return send_standard_callback_request(cc->argc - 1, cc->argv + 1, f,
 249                 afs_cb_result_handler, cc);
 250 }
 251
 252 /** Used for removing rows from a blob table. */
 253 struct rmblob_data {
 254         /** Message buffer. */
 255         struct para_buffer pb;
 256 };
 257
 258 static int remove_blob(struct osl_table *table, struct osl_row *row,
 259                 const char *name, void *data)
 260 {
 261         struct rmblob_data *rmbd = data;
 262         int ret = osl(osl_del_row(table, row));
 263         if (ret < 0) {
 264                 para_printf(&rmbd->pb, "%s: %s\n", name, para_strerror(-ret));
 265                 return ret;
 266         }
 267         return 1;
 268 }
 269
 270 static int com_rmblob_callback(struct osl_table *table, int fd,
 271                 const struct osl_object *query)
 272 {
 273         int ret;
 274         struct rmblob_data rmbd = {
 275                 .pb = {
 276                         .max_size = shm_get_shmmax(),
 277                         .private_data = &(struct afs_max_size_handler_data) {
 278                                 .fd = fd,
 279                                 .band = SBD_OUTPUT
 280                         },
 281                         .max_size_handler = afs_max_size_handler,
 282                 }
 283         };
 284         struct pattern_match_data pmd = {
 285                 .table = table,
 286                 .patterns = *query,
 287                 .loop_col_num = BLOBCOL_NAME,
 288                 .match_col_num = BLOBCOL_NAME,
 289                 .pm_flags = PM_SKIP_EMPTY_NAME,
 290                 .data = &rmbd,
 291                 .action = remove_blob
 292         };
 293         ret = for_each_matching_row(&pmd);
 294         if (ret < 0)
 295                 para_printf(&rmbd.pb, "%s\n", para_strerror(-ret));
 296         if (pmd.num_matches == 0)
 297                 para_printf(&rmbd.pb, "no matches, nothing removed\n");
 298         else {
 299                 para_printf(&rmbd.pb, "removed %d blobs\n", pmd.num_matches);
 300                 afs_event(BLOB_RENAME, NULL, table);
 301         }
 302         flush_and_free_pb(&rmbd.pb);
 303         return 0;
 304 }
 305
 306 static int com_rmblob(callback_function *f, struct command_context *cc)
 307 {
 308         if (cc->argc < 2)
 309                 return -E_MOOD_SYNTAX;
 310         return send_option_arg_callback_request(NULL, cc->argc - 1, cc->argv + 1, f,
 311                 afs_cb_result_handler, cc);
 312 }
 313
 314 static int com_addblob_callback(struct osl_table *table, int fd,
 315                 const struct osl_object *query)
 316 {
 317         struct osl_object objs[NUM_BLOB_COLUMNS];
 318         char *name = query->data, *msg;
 319         size_t name_len = strlen(name) + 1, msg_len;
 320         uint32_t id;
 321         unsigned num_rows;
 322         int ret;
 323
 324         ret = osl(osl_get_num_rows(table, &num_rows));
 325         if (ret < 0)
 326                 goto out;
 327         if (!num_rows) { /* this is the first entry ever added */
 328                 /* insert dummy row containing the id */
 329                 id = 2; /* this entry will be entry #1, so 2 is the next */
 330                 objs[BLOBCOL_ID].data = &id;
 331                 objs[BLOBCOL_ID].size = sizeof(id);
 332                 objs[BLOBCOL_NAME].data = "";
 333                 objs[BLOBCOL_NAME].size = 1;
 334                 objs[BLOBCOL_DEF].data = "";
 335                 objs[BLOBCOL_DEF].size = 1;
 336                 ret = osl(osl_add_row(table, objs));
 337                 if (ret < 0)
 338                         goto out;
 339         } else {
 340                 /* check if name already exists */
 341                 struct osl_row *row;
 342                 struct osl_object obj = {.data = name, .size = name_len};
 343                 ret = osl(osl_get_row(table, BLOBCOL_NAME, &obj, &row));
 344                 if (ret < 0 && ret != -OSL_ERRNO_TO_PARA_ERROR(E_OSL_RB_KEY_NOT_FOUND))
 345                         goto out;
 346                 if (ret >= 0) { /* we already have a blob with this name */
 347                         ret = osl(osl_get_object(table, row, BLOBCOL_ID, &obj));
 348                         if (ret < 0)
 349                                 goto out;
 350                         id = *(uint32_t *)obj.data;
 351                         obj.data = name + name_len;
 352                         obj.size = query->size - name_len;
 353                         ret = osl(osl_update_object(table, row, BLOBCOL_DEF, &obj));
 354                         goto out;
 355                 }
 356                 /* new blob, get id of the dummy row and increment it */
 357                 obj.data = "";
 358                 obj.size = 1;
 359                 ret = osl(osl_get_row(table, BLOBCOL_NAME, &obj, &row));
 360                 if (ret < 0)
 361                         goto out;
 362                 ret = osl(osl_get_object(table, row, BLOBCOL_ID, &obj));
 363                 if (ret < 0)
 364                         goto out;
 365                 id = *(uint32_t *)obj.data + 1;
 366                 obj.data = &id;
 367                 ret = osl(osl_update_object(table, row, BLOBCOL_ID, &obj));
 368                 if (ret < 0)
 369                         goto out;
 370         }
 371         id--;
 372         objs[BLOBCOL_ID].data = &id;
 373         objs[BLOBCOL_ID].size = sizeof(id);
 374         objs[BLOBCOL_NAME].data = name;
 375         objs[BLOBCOL_NAME].size = name_len;
 376         objs[BLOBCOL_DEF].data = name + name_len;
 377         objs[BLOBCOL_DEF].size = query->size - name_len;
 378         ret = osl(osl_add_row(table, objs));
 379         if (ret < 0)
 380                 goto out;
 381         afs_event(BLOB_ADD, NULL, table);
 382 out:
 383         if (ret < 0)
 384                 msg_len = xasprintf(&msg, "could not add %s: %s\n", name,
 385                         para_strerror(-ret));
 386         else
 387                 msg_len = xasprintf(&msg, "added %s as id %u\n", name, id);
 388         pass_buffer_as_shm(fd, SBD_OUTPUT, msg, msg_len);
 389         free(msg);
 390         return 0;
 391 }
 392
 393 /* Write input from fd to dynamically allocated buffer, but maximal 10M. */
 394 static int fd2buf(struct stream_cipher_context *scc, struct osl_object *obj)
 395 {
 396         size_t max_size = 10 * 1024 * 1024;
 397         int ret;
 398         struct iovec iov;
 399
 400         obj->data = NULL;
 401         obj->size = 0;
 402 again:
 403         do {
 404                 ret = recv_sb(scc, SBD_BLOB_DATA, max_size, &iov);
 405         } while (ret == 0);
 406
 407         if (ret < 0) {
 408                 free(obj->data);
 409                 obj->data = NULL;
 410                 obj->size = 0;
 411                 return ret;
 412         }
 413         if (iov.iov_len == 0) /* end of blob */
 414                 return 1;
 415         if (!obj->data) {
 416                 obj->data = iov.iov_base;
 417                 obj->size = iov.iov_len;
 418         } else {
 419                 obj->data = para_realloc(obj->data, obj->size + iov.iov_len);
 420                 memcpy(obj->data + obj->size, iov.iov_base, iov.iov_len);
 421                 obj->size += iov.iov_len;
 422                 free(iov.iov_base);
 423                 max_size -= iov.iov_len;
 424         }
 425         goto again;
 426         return 1;
 427 }
 428
 429 /*
 430  * Read blob from a file descriptor and send it to afs.
 431  *
 432  * This function is called from the addblob command handlers to instruct the
 433  * afs process to store the input in a blob table. Input is read and decrypted
 434  * from the file descriptor given by cc and appended to arg_obj, which contains
 435  * the name of the blob to create. The combined buffer is made available to the
 436  * afs process via the callback method.
 437  */
 438 static int stdin_command(struct command_context *cc, struct osl_object *arg_obj,
 439                 callback_function *f)
 440 {
 441         struct osl_object query, stdin_obj;
 442         int ret;
 443
 444         ret = send_sb(&cc->scc, NULL, 0, SBD_AWAITING_DATA, false);
 445         if (ret < 0)
 446                 return ret;
 447         ret = fd2buf(&cc->scc, &stdin_obj);
 448         if (ret < 0)
 449                 return ret;
 450         query.size = arg_obj->size + stdin_obj.size;
 451         query.data = para_malloc(query.size);
 452         memcpy(query.data, arg_obj->data, arg_obj->size);
 453         if (stdin_obj.size > 0)
 454                 memcpy((char *)query.data + arg_obj->size, stdin_obj.data,
 455                         stdin_obj.size);
 456         free(stdin_obj.data);
 457         ret = send_callback_request(f, &query, afs_cb_result_handler, cc);
 458         free(query.data);
 459         return ret;
 460 }
 461
 462 static int com_addblob(callback_function *f, struct command_context *cc)
 463 {
 464         struct osl_object arg_obj;
 465
 466         if (cc->argc != 2)
 467                 return -E_BLOB_SYNTAX;
 468         if (!*cc->argv[1]) /* empty name is reserved for the dummy row */
 469                 return -E_BLOB_SYNTAX;
 470         arg_obj.size = strlen(cc->argv[1]) + 1;
 471         arg_obj.data = (char *)cc->argv[1];
 472         return stdin_command(cc, &arg_obj, f);
 473 }
 474
 475 static int com_mvblob_callback(struct osl_table *table, int fd,
 476                 const struct osl_object *query)
 477 {
 478         char *src = (char *) query->data;
 479         struct osl_object obj = {.data = src, .size = strlen(src) + 1};
 480         char *dest = src + obj.size;
 481         struct osl_row *row;
 482         struct para_buffer pb = {
 483                 .max_size = shm_get_shmmax(),
 484                 .private_data = &fd,
 485                 .max_size_handler = afs_max_size_handler
 486         };
 487         int ret = osl(osl_get_row(table, BLOBCOL_NAME, &obj, &row));
 488
 489         if (ret < 0) {
 490                 para_printf(&pb, "could not locate %s: %s\n", src,
 491                         para_strerror(-ret));
 492                 goto out;
 493         }
 494         obj.data = dest;
 495         obj.size = strlen(dest) + 1;
 496         ret = osl(osl_update_object(table, row, BLOBCOL_NAME, &obj));
 497         if (ret < 0) {
 498                 para_printf(&pb, "failed to update object %s: %s\n", dest,
 499                         para_strerror(-ret));
 500                 goto out;
 501         }
 502         afs_event(BLOB_RENAME, NULL, table);
 503 out:
 504         flush_and_free_pb(&pb);
 505         return 0;
 506 }
 507
 508 static int com_mvblob(callback_function *f, struct command_context *cc)
 509 {
 510         int ret;
 511
 512         if (cc->argc != 3)
 513                 return -E_MOOD_SYNTAX;
 514         ret = send_option_arg_callback_request(NULL, cc->argc - 1,
 515                 cc->argv + 1, f, afs_cb_result_handler, cc);
 516         if (ret < 0)
 517                 send_strerror(cc, -ret);
 518         return ret;
 519 }
 520
 521 #define DEFINE_BLOB_COMMAND(cmd_name, table_name, cmd_prefix) \
 522         static int com_ ## cmd_name ## cmd_prefix ## _callback(int fd, const struct osl_object *query) \
 523         { \
 524                 return com_ ## cmd_name ## blob_callback(table_name ## _table, fd, query); \
 525         } \
 526         int com_ ## cmd_name ## cmd_prefix(struct command_context *cc) \
 527         { \
 528                 return com_ ## cmd_name ## blob(com_ ## cmd_name ## cmd_prefix ## _callback, cc); \
 529         }
 530
 531 static int blob_get_name_by_id(struct osl_table *table, uint32_t id,
 532                 char **name)
 533 {
 534         struct osl_row *row;
 535         struct osl_object obj = {.data = &id, .size = sizeof(id)};
 536         int ret;
 537
 538         *name = NULL;
 539         if (!id)
 540                 return 1;
 541         ret = osl(osl_get_row(table, BLOBCOL_ID, &obj, &row));
 542         if (ret < 0)
 543                 return ret;
 544         ret = osl(osl_get_object(table, row, BLOBCOL_NAME, &obj));
 545         if (ret < 0)
 546                 return ret;
 547         *name = (char *)obj.data;
 548         return 1;
 549 }
 550
 551 /** Define the \p get_name_by_id function for this blob type. */
 552 #define DEFINE_GET_NAME_BY_ID(table_name, cmd_prefix) \
 553         int cmd_prefix ## _get_name_by_id(uint32_t id, char **name) \
 554         { \
 555                 return blob_get_name_by_id(table_name ## _table, id, name); \
 556         }
 557
 558
 559 static int blob_get_def_by_name(struct osl_table *table, char *name,
 560                 struct osl_object *def)
 561 {
 562         struct osl_row *row;
 563         struct osl_object obj = {.data = name, .size = strlen(name) + 1};
 564         int ret;
 565
 566         def->data = NULL;
 567         if (!*name)
 568                 return 1;
 569         ret = osl(osl_get_row(table, BLOBCOL_NAME, &obj, &row));
 570         if (ret < 0)
 571                 return ret;
 572         return osl(osl_open_disk_object(table, row, BLOBCOL_DEF, def));
 573 }
 574
 575 /** Define the \p get_def_by_id function for this blob type. */
 576 #define DEFINE_GET_DEF_BY_NAME(table_name, cmd_prefix) \
 577         int cmd_prefix ## _get_def_by_name(char *name, struct osl_object *def) \
 578         { \
 579                 return blob_get_def_by_name(table_name ## _table, name, def); \
 580         }
 581
 582 static int blob_get_def_by_id(struct osl_table *table, uint32_t id,
 583                 struct osl_object *def)
 584 {
 585         struct osl_row *row;
 586         struct osl_object obj = {.data = &id, .size = sizeof(id)};
 587         int ret;
 588
 589         def->data = NULL;
 590         if (!id)
 591                 return 1;
 592         ret = osl(osl_get_row(table, BLOBCOL_ID, &obj, &row));
 593         if (ret < 0)
 594                 return ret;
 595         return osl(osl_open_disk_object(table, row, BLOBCOL_DEF, def));
 596 }
 597
 598 /** Define the \p get_def_by_id function for this blob type. */
 599 #define DEFINE_GET_DEF_BY_ID(table_name, cmd_prefix) \
 600         int cmd_prefix ## _get_def_by_id(uint32_t id, struct osl_object *def) \
 601         { \
 602                 return blob_get_def_by_id(table_name ## _table, id, def); \
 603         }
 604
 605 static int blob_get_name_and_def_by_row(struct osl_table *table,
 606                 const struct osl_row *row, char **name, struct osl_object *def)
 607 {
 608         struct osl_object obj;
 609         int ret = osl(osl_get_object(table, row, BLOBCOL_NAME, &obj));
 610         if (ret < 0)
 611                 return ret;
 612         *name = obj.data;
 613         return osl(osl_open_disk_object(table, row, BLOBCOL_DEF, def));
 614 }
 615 /** Define the \p get_name_and_def_by_row function for this blob type. */
 616 #define DEFINE_GET_NAME_AND_DEF_BY_ROW(table_name, cmd_prefix) \
 617         int cmd_prefix ## _get_name_and_def_by_row(const struct osl_row *row, \
 618                 char **name, struct osl_object *def) \
 619         { \
 620                 return blob_get_name_and_def_by_row(table_name ## _table, \
 621                         row, name, def); \
 622         }
 623
 624 /** Define the \p close function for this blob type. */
 625 #define DEFINE_BLOB_CLOSE(table_name) \
 626         static void table_name ## _close(void) \
 627         { \
 628                 osl_close_table(table_name ## _table, OSL_MARK_CLEAN); \
 629                 table_name ## _table = NULL; \
 630         }
 631
 632 /** Define the \p create function for this blob type. */
 633 #define DEFINE_BLOB_CREATE(table_name) \
 634         static int table_name ## _create(const char *dir) \
 635         { \
 636                 table_name ## _table_desc.dir = dir; \
 637                 return osl(osl_create_table(&table_name ## _table_desc)); \
 638         }
 639
 640 static int blob_open(struct osl_table **table,
 641                 struct osl_table_description *desc,
 642                 const char *dir)
 643 {
 644         int ret;
 645         desc->dir = dir;
 646         ret = osl(osl_open_table(desc, table));
 647         if (ret >= 0)
 648                 return ret;
 649         *table = NULL;
 650         if (ret >= 0 || ret == -OSL_ERRNO_TO_PARA_ERROR(E_OSL_NOENT))
 651                 return 1;
 652         return ret;
 653 }
 654
 655 #define DEFINE_BLOB_OPEN(table_name) \
 656         static int table_name ## _open(const char *dir) \
 657         { \
 658                 return blob_open(&table_name ## _table, \
 659                         &table_name ## _table_desc, dir); \
 660         }
 661
 662
 663 /** Define the \p init function for this blob type. */
 664 #define DEFINE_BLOB_INIT(table_name) \
 665         void table_name ## _init(struct afs_table *t) \
 666         { \
 667                 t->open = table_name ## _open; \
 668                 t->close = table_name ## _close; \
 669                 t->create = table_name ## _create;\
 670                 t->event_handler = table_name ##_event_handler; \
 671                 table_name ## _table = NULL; \
 672         }
 673
 674
 675 /** Define all functions for this blob type. */
 676 #define DEFINE_BLOB_FUNCTIONS(table_name, cmd_prefix) \
 677         DEFINE_BLOB_OPEN(table_name) \
 678         DEFINE_BLOB_CLOSE(table_name) \
 679         DEFINE_BLOB_CREATE(table_name) \
 680         DEFINE_BLOB_INIT(table_name) \
 681         DEFINE_BLOB_COMMAND(ls, table_name, cmd_prefix) \
 682         DEFINE_BLOB_COMMAND(cat, table_name, cmd_prefix) \
 683         DEFINE_BLOB_COMMAND(add, table_name, cmd_prefix) \
 684         DEFINE_BLOB_COMMAND(rm, table_name, cmd_prefix) \
 685         DEFINE_BLOB_COMMAND(mv, table_name, cmd_prefix) \
 686         DEFINE_GET_NAME_BY_ID(table_name, cmd_prefix); \
 687         DEFINE_GET_DEF_BY_ID(table_name, cmd_prefix); \
 688         DEFINE_GET_DEF_BY_NAME(table_name, cmd_prefix); \
 689         DEFINE_GET_NAME_AND_DEF_BY_ROW(table_name, cmd_prefix); \
 690
 691 /* doxygen isn't smart enough to recognize these */
 692 /** \cond blob_function */
 693 DEFINE_BLOB_FUNCTIONS(lyrics, lyr);
 694 DEFINE_BLOB_FUNCTIONS(images, img);
 695 DEFINE_BLOB_FUNCTIONS(moods, mood);
 696 DEFINE_BLOB_FUNCTIONS(playlists, pl);
 697 /** \endcond blob_function */