Replace struct table_info by struct afs_table.
[paraslash.git] / attribute.c
index 560e758272dfa3c4b59c78cabc6a1a8a77dade68..48f108c7fe8be8a96ac6b4d77b7d7737bb46db1c 100644 (file)
@@ -7,9 +7,9 @@
 /** \file attribute.c Attribute handling functions. */
 #include "para.h"
 #include "error.h"
+#include "string.h"
 #include "afh.h"
 #include "afs.h"
-#include "string.h"
 #include "net.h"
 
 static struct osl_table *attribute_table;
@@ -99,63 +99,85 @@ int get_attribute_bitnum_by_name(const char *att_name, unsigned char *bitnum)
        return 1;
 }
 
-/** Whether "-a" was given for the lsatt command. */
-#define LSATT_FLAG_ALPHA 1
-/** Whether "-l" was given for the lsatt command. */
-#define LSATT_FLAG_LONG 2
+/**
+ * Flags used by the lsatt command.
+ *
+ * \param \sa com_lsatt().
+ */
+enum lsatt_flags {
+       /** Whether "-a" was given for the lsatt command. */
+       LSATT_FLAG_SORT_BY_ID = 1,
+       /** Whether "-l" was given for the lsatt command. */
+       LSATT_FLAG_LONG = 2,
+       /** Reverse sort order. */
+       LSATT_FLAG_REVERSE = 4
+};
 
-/** Data passed via osl_rbtree_loop(). */
-struct private_lsatt_data {
+/** Data passed to the action function of lsatt */
+struct lsatt_action_data {
+       /** The result buffer. */
+       struct para_buffer pb;
        /** The given flags for the lsatt command. */
        unsigned flags;
-       /** The result buffer. */
-       struct para_buffer b;
 };
 
-static int print_attribute(struct osl_row *row, void *private_data)
+static int print_attribute(struct osl_table *table, struct osl_row *row,
+               const char *name, void *data)
 {
-       struct private_lsatt_data *pld = private_data;
+       struct lsatt_action_data *laad = data;
+       struct osl_object bitnum_obj;
        int ret;
-       struct osl_object name_obj, bitnum_obj;
 
-       ret = osl_get_object(attribute_table, row, ATTCOL_NAME, &name_obj);
-       if (ret < 0)
-               return ret;
-       if (!(pld->flags & LSATT_FLAG_LONG)) {
-               para_printf(&pld->b, "%s\n", (char *)name_obj.data);
+       if (!(laad->flags & LSATT_FLAG_LONG)) {
+               para_printf(&laad->pb, "%s\n", name);
                return 1;
        }
-       ret = osl_get_object(attribute_table, row, ATTCOL_BITNUM, &bitnum_obj);
-       if (ret < 0)
+       ret = osl_get_object(table, row, ATTCOL_BITNUM, &bitnum_obj);
+       if (ret < 0) {
+               para_printf(&laad->pb, "%s: %s\n", name, PARA_STRERROR(-ret));
                return ret;
-       para_printf(&pld->b, "%u\t%s\n", *(unsigned char*)bitnum_obj.data,
-               (char *)name_obj.data);
+       }
+       para_printf(&laad->pb, "%u\t%s\n", *(unsigned char*)bitnum_obj.data,
+               name);
        return 1;
 }
 
 static int com_lsatt_callback(const struct osl_object *query,
                struct osl_object *result)
 {
-       struct private_lsatt_data pld = {.flags = *(uint32_t *) query->data};
+       struct lsatt_action_data laad = {.flags = *(unsigned *) query->data};
+       struct pattern_match_data pmd = {
+               .table = attribute_table,
+               .loop_col_num = ATTCOL_BITNUM,
+               .match_col_num = ATTCOL_NAME,
+               .patterns = {.data = (char *)query->data + sizeof(laad.flags),
+                       .size = query->size - sizeof(laad.flags)},
+               .pm_flags = PM_NO_PATTERN_MATCHES_EVERYTHING,
+               .data = &laad,
+               .action = print_attribute
+       };
        int ret;
 
-       if (pld.flags & LSATT_FLAG_ALPHA)
-               ret = osl_rbtree_loop(attribute_table, ATTCOL_NAME,
-                       &pld, print_attribute);
-       else
-               ret = osl_rbtree_loop(attribute_table, ATTCOL_BITNUM,
-                       &pld, print_attribute);
-       result->data = pld.b.buf;
-       result->size = pld.b.size;
-       return ret;
+       if (laad.flags & LSATT_FLAG_SORT_BY_ID)
+               pmd.loop_col_num = ATTCOL_NAME;
+       if (laad.flags & LSATT_FLAG_REVERSE)
+               pmd.pm_flags |= PM_REVERSE_LOOP;
+       ret = for_each_matching_row(&pmd);
+       if (ret < 0)
+               para_printf(&laad.pb, "%s\n", PARA_STRERROR(-ret));
+       if (!laad.pb.buf)
+               return 0;
+       result->data = laad.pb.buf;
+       result->size = laad.pb.size;
+       return 1;
 }
 
-
 int com_lsatt(int fd, int argc, char * const * const argv)
 {
+       unsigned flags = 0;
+       struct osl_object options = {.data = &flags, .size = sizeof(flags)},
+               result;
        int ret, i;
-       uint32_t flags = 0;
-       struct osl_object query, result;
 
        for (i = 1; i < argc; i++) {
                const char *arg = argv[i];
@@ -165,24 +187,26 @@ int com_lsatt(int fd, int argc, char * const * const argv)
                        i++;
                        break;
                }
-               if (!strcmp(arg, "-a")) {
-                       flags |= LSATT_FLAG_ALPHA;
+               if (!strcmp(arg, "-i")) {
+                       flags |= LSATT_FLAG_SORT_BY_ID;
                        continue;
                }
                if (!strcmp(arg, "-l")) {
                        flags |= LSATT_FLAG_LONG;
                        continue;
                }
+               if (!strcmp(arg, "-r")) {
+                       flags |= LSATT_FLAG_REVERSE;
+                       continue;
+               }
        }
-       if (argc > i)
-               return -E_ATTR_SYNTAX;
-       query.data = &flags;
-       query.size = sizeof(flags);
-       ret = send_callback_request(com_lsatt_callback, &query, &result);
+       ret = send_option_arg_callback_request(&options, argc -i, argv + i,
+               com_lsatt_callback, &result);
        if (ret > 0) {
                ret = send_buffer(fd, (char *)result.data);
                free(result.data);
-       }
+       } else
+               send_va_buffer(fd, "%s\n", PARA_STRERROR(-ret));
        return ret;
 }
 
@@ -275,26 +299,34 @@ static int logical_and_attribute(struct osl_row *aft_row, void *attribute_ptr)
 }
 
 static int com_addatt_callback(const struct osl_object *query,
-               __a_unused struct osl_object *result)
+               struct osl_object *result)
 {
        char *p = query->data;
-       uint64_t atts_added = 0;
-       int ret;
+       int ret = 1;
+       struct para_buffer pb = {.size = 0};
+       size_t len;
 
-       while (p < (char *)query->data + query->size) {
+       for (p = query->data; p < (char *)query->data + query->size; p += len + 1) {
                struct osl_object objs[NUM_ATT_COLUMNS];
                struct osl_row *row;
                unsigned char bitnum;
+               len = strlen(p);
 
+               if (!len || p[len - 1] == '-' || p[len - 1] == '+') {
+                       para_printf(&pb, "invalid attribute name: %s\n", p);
+                       continue;
+               }
                objs[ATTCOL_BITNUM].size = 1;
                objs[ATTCOL_NAME].data = p;
-               objs[ATTCOL_NAME].size = strlen(p) + 1;
+               objs[ATTCOL_NAME].size = len + 1;
                ret = osl_get_row(attribute_table, ATTCOL_NAME,
                        &objs[ATTCOL_NAME], &row); /* expected to fail */
-               if (ret >= 0)
-                       return -E_ATTR_EXISTS;
+               if (ret >= 0) {
+                       para_printf(&pb, "attribute %s already exists\n", p);
+                       continue;
+               }
                if (ret != -E_RB_KEY_NOT_FOUND) /* error */
-                       return ret;
+                       goto out;
                /* find smallest non-used attribute */
                for (bitnum = 0; bitnum < 64; bitnum++) {
                        objs[ATTCOL_BITNUM].data = &bitnum;
@@ -303,51 +335,72 @@ static int com_addatt_callback(const struct osl_object *query,
                        if (ret == -E_RB_KEY_NOT_FOUND)
                                break; /* this bitnum is unused, use it */
                        if (ret < 0) /* error */
-                               return ret;
+                               goto out;
                        /* this bit is already in use, try next bit */
                }
-               if (bitnum == 64)
-                       return -E_ATTR_TABLE_FULL;
+               if (bitnum == 64) {
+                       para_printf(&pb, "attribute table full\n");
+                       goto out;
+               }
                ret = osl_add_row(attribute_table, objs);
                if (ret < 0)
-                       return ret;
+                       goto out;
                greatest_att_bitnum = PARA_MAX(greatest_att_bitnum, bitnum);
-               atts_added |= 1 << bitnum;
-               p += strlen(p) + 1;
        }
-       if (!atts_added)
-               return 1;
-       atts_added = ~atts_added;
-       ret = audio_file_loop(&atts_added, logical_and_attribute);
+out:
        if (ret < 0)
-               return ret;
-       find_greatest_att_bitnum();
-       return reload_current_mood(); /* FIXME: mood_reload() returns an error */
+               para_printf(&pb, "%s: %s\n", p, PARA_STRERROR(-ret));
+       result->data = pb.buf;
+       result->size = pb.size;
+       return result->data? 0 : 1;
 }
 
-int com_addatt(__a_unused int fd, int argc, char * const * const argv)
+int com_addatt(int fd, int argc, char * const * const argv)
 {
+       struct osl_object result;
+       int ret;
+
        if (argc < 2)
                return -E_ATTR_SYNTAX;
-       return send_standard_callback_request(argc - 1, argv + 1, com_addatt_callback,
-               NULL);
+       ret = send_standard_callback_request(argc - 1, argv + 1, com_addatt_callback,
+               &result);
+       if (!ret)
+               return 1;
+       if (ret < 0)
+               return ret;
+       if (!result.data || !result.size)
+               return 1;
+       ret =  send_va_buffer(fd, "%s", (char *) result.data);
+       free(result.data);
+       return ret;
 }
+
 struct remove_attribute_action_data {
        struct para_buffer pb;
        int num_removed;
+       uint64_t mask_of_removed_atts;
 };
 
 static int remove_attribute(struct osl_table *table, struct osl_row *row,
                const char *name, void *data)
 {
        struct remove_attribute_action_data *raad = data;
-       int ret = osl_del_row(table, row);
-       if (ret < 0)
+       unsigned char bitnum;
+       int ret;
+
+       ret = get_attribute_bitnum_by_name(name, &bitnum);
+       if (ret < 0) {
                para_printf(&raad->pb, "%s: %s\n", name, PARA_STRERROR(-ret));
-       else {
-               para_printf(&raad->pb, "removed %s\n", name);
-               raad->num_removed++;
+               return 1;
+       }
+       ret = osl_del_row(table, row);
+       if (ret < 0) {
+               para_printf(&raad->pb, "%s: %s\n", name, PARA_STRERROR(-ret));
+               return 1;
        }
+       para_printf(&raad->pb, "removed %s\n", name);
+       raad->num_removed++;
+       raad->mask_of_removed_atts |= (1 << bitnum);
        return 1;
 }
 
@@ -368,6 +421,10 @@ static int com_rmatt_callback(const struct osl_object *query,
        if (ret < 0)
                para_printf(&raad.pb, "%s\n", PARA_STRERROR(-ret));
        if (raad.num_removed) {
+               uint64_t and_mask = ~raad.mask_of_removed_atts;
+               ret = audio_file_loop(&and_mask, logical_and_attribute);
+               if (ret < 0)
+                       para_printf(&raad.pb, "%s\n", PARA_STRERROR(-ret));
                find_greatest_att_bitnum();
                ret = reload_current_mood();
                if (ret < 0)
@@ -475,9 +532,9 @@ err:
  *
  * \sa osl_close_table().
  */
-void attribute_shutdown(enum osl_close_flags flags)
+void attribute_close(void)
 {
-       osl_close_table(attribute_table, flags);
+       osl_close_table(attribute_table, OSL_MARK_CLEAN);
        attribute_table = NULL;
 }
 
@@ -491,20 +548,34 @@ void attribute_shutdown(enum osl_close_flags flags)
  *
  * \sa osl_open_table().
  */
-int attribute_init(struct table_info *ti, const char *db)
+static int attribute_open(const char *dir)
 {
        int ret;
 
-       attribute_table_desc.dir = db;
-       ti->desc = &attribute_table_desc;
-       ret = osl_open_table(ti->desc, &attribute_table);
+       attribute_table_desc.dir = dir;
+       ret = osl_open_table(&attribute_table_desc, &attribute_table);
        greatest_att_bitnum = -1; /* no atts available */
        if (ret >= 0) {
                find_greatest_att_bitnum();
                return ret;
        }
        attribute_table = NULL;
-       if (ret == -E_NOENT)
+       if (ret >= 0 || is_errno(-ret, ENOENT))
                return 1;
        return ret;
 }
+
+static int attribute_create(const char *dir)
+{
+       attribute_table_desc.dir = dir;
+       return osl_create_table(&attribute_table_desc);
+}
+
+
+void attribute_init(struct afs_table *t)
+{
+       t->name = attribute_table_desc.name;
+       t->open = attribute_open;
+       t->close = attribute_close;
+       t->create = attribute_create;
+}