X-Git-Url: http://git.tuebingen.mpg.de/?p=paraslash.git;a=blobdiff_plain;f=attribute.c;h=5f7188ee30b58ee84f5800d7059cbfb014e8c09a;hp=5ee0789d0bca2c8b39852e187ecb54d7fd5f31a2;hb=b46dd218f90646441998f975c9b5515a5521c9d5;hpb=b1bc341190a5d736dadb279bdac83c50be0cbbde;ds=sidebyside

diff --git a/attribute.c b/attribute.c
index 5ee0789d..5f7188ee 100644
--- a/attribute.c
+++ b/attribute.c
@@ -3,14 +3,16 @@
  *
  * Licensed under the GPL v2. For licencing details see COPYING.
  */
+
+/** \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 void *attribute_table;
+static struct osl_table *attribute_table;
 static int greatest_att_bitnum;
 
 /** The columns of the attribute table. */
@@ -69,7 +71,7 @@ static void find_greatest_att_bitnum(void)
 			return;
 		}
 	} while (c--);
-	PARA_INFO_LOG("%s\n", "no attributes");
+	PARA_INFO_LOG("no attributes\n");
 	greatest_att_bitnum = -E_NO_ATTRIBUTES;
 }
 
@@ -97,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];
@@ -163,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;
 }
 
@@ -224,13 +250,13 @@ static int com_setatt_callback(const struct osl_object *query,
 		(long long unsigned)del_mask);
 	for (; p < (char *)query->data + query->size; p += len + 1) { /* TODO: fnmatch */
 		struct afs_info old_afsi, new_afsi;
-		struct osl_row *aft_row;
+		struct afsi_change_event_data aced = {.old_afsi = &old_afsi};
 
 		len = strlen(p);
-		ret = aft_get_row_of_path(p, &aft_row);
+		ret = aft_get_row_of_path(p, &aced.aft_row);
 		if (ret < 0)
 			return ret;
-		ret = get_afsi_object_of_row(aft_row, &obj);
+		ret = get_afsi_object_of_row(aced.aft_row, &obj);
 		if (ret < 0)
 			return ret;
 		ret = load_afsi(&old_afsi, &obj);
@@ -240,60 +266,53 @@ static int com_setatt_callback(const struct osl_object *query,
 		new_afsi.attributes |= add_mask;
 		new_afsi.attributes &= ~del_mask;
 		save_afsi(&new_afsi, &obj); /* in-place update */
-//		ret = mood_update_audio_file(aft_row, &old_afsi);
-//		if (ret < 0)
-//			return ret;
+		afs_event(AFSI_CHANGE, NULL, &aced);
 	}
 	return 1;
 }
 
 int com_setatt(__a_unused int fd, int argc, char * const * const argv)
 {
-	if (argc < 2)
+	if (argc < 3)
 		return -E_ATTR_SYNTAX;
 	return send_standard_callback_request(argc - 1, argv + 1, com_setatt_callback,
 		NULL);
 }
 
-/* TODO: make it faster by only extracting the attribute member from afsi */
-static int logical_and_attribute(struct osl_row *aft_row, void *attribute_ptr)
-{
-	struct afs_info afsi;
-	uint64_t *att = attribute_ptr;
-	struct osl_object obj;
-	int ret = get_afsi_object_of_row(aft_row, &obj);
-	if (ret < 0)
-		return ret;
-	ret = load_afsi(&afsi, &obj);
-	if (ret < 0)
-		return ret;
-	afsi.attributes &= *att;
-	save_afsi(&afsi, &obj);
-	return 1;
-}
+struct addatt_event_data {
+	const char *name;
+	unsigned char bitnum;
+};
+
 
 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);
+		struct addatt_event_data aed;
 
-		objs[ATTCOL_BITNUM].size = 1;
-		objs[ATTCOL_NAME].data = p;
-		objs[ATTCOL_NAME].size = strlen(p) + 1;
-		ret = osl_get_row(attribute_table, ATTCOL_NAME,
-			&objs[ATTCOL_NAME], &row); /* expected to fail */
-		if (ret >= 0)
-			return -E_ATTR_EXISTS;
+		if (!len || p[len - 1] == '-' || p[len - 1] == '+') {
+			para_printf(&pb, "invalid attribute name: %s\n", p);
+			continue;
+		}
+		ret = get_attribute_bitnum_by_name(p, &bitnum);
+		if (ret >= 0) {
+			para_printf(&pb, "attribute \"%s\" already exists\n", p);
+			continue;
+		}
 		if (ret != -E_RB_KEY_NOT_FOUND) /* error */
-			return ret;
-		/* find smallest non-used attribute */
+			goto out;
+		objs[ATTCOL_BITNUM].size = 1;
+		/* find smallest unused attribute */
 		for (bitnum = 0; bitnum < 64; bitnum++) {
 			objs[ATTCOL_BITNUM].data = &bitnum;
 			ret = osl_get_row(attribute_table, ATTCOL_BITNUM,
@@ -301,73 +320,176 @@ 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) {
+			ret = -E_ATT_TABLE_FULL;
+			goto out;
+		}
+		objs[ATTCOL_NAME].data = p;
+		objs[ATTCOL_NAME].size = len + 1;
 		ret = osl_add_row(attribute_table, objs);
 		if (ret < 0)
-			return ret;
+			goto out;
+		aed.name = p;
+		aed.bitnum = bitnum;
+		afs_event(ATTRIBUTE_ADD, &pb, &aed);
 		greatest_att_bitnum = PARA_MAX(greatest_att_bitnum, bitnum);
-		atts_added |= 1 << bitnum;
-		p += strlen(p) + 1;
 	}
-	if (!atts_added)
+out:
+	if (ret < 0)
+		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(int fd, int argc, char * const * const argv)
+{
+	struct osl_object result;
+	int ret;
+
+	if (argc < 2)
+		return -E_ATTR_SYNTAX;
+	ret = send_standard_callback_request(argc - 1, argv + 1, com_addatt_callback,
+		&result);
+	if (!ret)
 		return 1;
-	atts_added = ~atts_added;
-	ret = audio_file_loop(&atts_added, logical_and_attribute);
 	if (ret < 0)
 		return ret;
-	find_greatest_att_bitnum();
-	return mood_reload(); /* FIXME: mood_reload() returns an error */
+	if (!result.data || !result.size)
+		return 1;
+	ret =  send_va_buffer(fd, "%s", (char *) result.data);
+	free(result.data);
+	return ret;
 }
 
-int com_addatt(__a_unused int fd, int argc, char * const * const argv)
+static int com_mvatt_callback(const struct osl_object *query,
+		struct osl_object *result)
 {
-	if (argc < 2)
+	char *old = query->data;
+	size_t size = strlen(old) + 1;
+	char *new = old + size;
+	struct osl_object obj = {.data = old, .size = size};
+	struct osl_row *row;
+	struct para_buffer pb = {.size = 0};
+	int ret;
+
+	ret = osl_get_row(attribute_table, ATTCOL_NAME, &obj, &row);
+	if (ret < 0)
+		goto out;
+	obj.data = new;
+	obj.size = strlen(new) + 1;
+	ret = osl_update_object(attribute_table, row, ATTCOL_NAME, &obj);
+out:
+	if (ret < 0)
+		para_printf(&pb, "%s\n", PARA_STRERROR(-ret));
+	else
+		afs_event(ATTRIBUTE_RENAME, &pb, NULL);
+	if (!pb.buf)
+		return 0;
+	result->data = pb.buf;
+	result->size = pb.size;
+	return 1;
+}
+
+int com_mvatt(int fd, int argc, char * const * const argv)
+{
+	struct osl_object result;
+	int ret;
+
+	if (argc != 3)
 		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_mvatt_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;
 }
 
-static int com_rmatt_callback(const struct osl_object *query,
-		__a_unused struct osl_object *result)
+/** Data passed to the action handler of com_rmatt(). */
+struct remove_attribute_action_data {
+	/** Message buffer. */
+	struct para_buffer pb;
+	/** Numver of attributes removed. */
+	int num_removed;
+	/** Bitwise "or" of the removed attributes. */
+	uint64_t mask_of_removed_atts;
+};
+
+static int remove_attribute(struct osl_table *table, struct osl_row *row,
+		const char *name, void *data)
 {
-	char *p = query->data;
-	int ret, atts_removed = 0;
-	while (p < (char *)query->data + query->size) {
-		struct osl_object obj = {
-			.data = p,
-			.size = strlen(p) + 1
-		};
-		struct osl_row *row;
-		ret = osl_get_row(attribute_table, ATTCOL_NAME,
-			&obj, &row);
-		if (ret < 0)
-			return ret;
-		ret = osl_del_row(attribute_table, row);
-		if (ret < 0)
-			return ret;
-		atts_removed++;
-		p += strlen(p) + 1;
+	struct remove_attribute_action_data *raad = data;
+	int ret;
+	struct rmatt_event_data red = {.name = name};
+
+	ret = get_attribute_bitnum_by_name(name, &red.bitnum);
+	if (ret < 0) {
+		para_printf(&raad->pb, "%s: %s\n", name, PARA_STRERROR(-ret));
+		return 1;
 	}
-	find_greatest_att_bitnum();
-	if (!atts_removed)
+	ret = osl_del_row(table, row);
+	if (ret < 0) {
+		para_printf(&raad->pb, "%s: %s\n", name, PARA_STRERROR(-ret));
 		return 1;
-	return mood_reload(); /* FIXME: Fix mood_reload() */
+	}
+	para_printf(&raad->pb, "removed attribute %s\n", name);
+	raad->num_removed++;
+	raad->mask_of_removed_atts |= (1 << red.bitnum);
+	afs_event(ATTRIBUTE_REMOVE, &raad->pb, &red);
+	return 1;
 }
 
-int com_rmatt(__a_unused int fd, int argc, char * const * const argv)
+static int com_rmatt_callback(const struct osl_object *query,
+		struct osl_object *result)
 {
+	struct remove_attribute_action_data raad = {.num_removed = 0};
+	int ret;
+	struct pattern_match_data pmd = {
+		.table = attribute_table,
+		.patterns = *query,
+		.loop_col_num = ATTCOL_BITNUM,
+		.match_col_num = ATTCOL_NAME,
+		.data = &raad,
+		.action = remove_attribute
+	};
+	ret = for_each_matching_row(&pmd);
+	if (ret < 0)
+		para_printf(&raad.pb, "%s\n", PARA_STRERROR(-ret));
+	if (!raad.num_removed)
+		para_printf(&raad.pb, "no match -- nothing removed\n");
+	result->data = raad.pb.buf;
+	result->size = raad.pb.size;
+	return 1;
+}
+
+int com_rmatt(int fd, int argc, char * const * const argv)
+{
+	int ret;
+	struct osl_object result;
+
 	if (argc < 2)
 		return -E_ATTR_SYNTAX;
-	return send_standard_callback_request(argc - 1, argv + 1, com_rmatt_callback,
-		NULL);
+	ret = send_standard_callback_request(argc - 1, argv + 1, com_rmatt_callback,
+		&result);
+	if (ret > 0) {
+		send_buffer(fd, (char *)result.data);
+		free(result.data);
+	} else
+		send_va_buffer(fd, "%s\n", PARA_STRERROR(-ret));
+	return ret;
 }
 
 /**
- * Return a binary representation of the geiven attribute value.
+ * Return a binary representation of the given attribute value.
  *
  * \param atts Pointer to the attribute value.
  * \param buf Result.
@@ -407,8 +529,10 @@ int get_attribute_text(uint64_t *atts, const char *delim, char **text)
 	const uint64_t one = 1;
 
 	*text = NULL;
-	if (greatest_att_bitnum < 0) /* no attributes available */
+	if (greatest_att_bitnum < 0) { /* no attributes available */
+		*text = para_strdup("(no attributes available)");
 		return 1;
+	}
 	for (i = 0; i <= greatest_att_bitnum; i++) {
 		unsigned char bn = i;
 		struct osl_object obj = {.data = &bn, .size = 1};
@@ -440,13 +564,11 @@ err:
 /**
  * Close the attribute table.
  *
- * \param flags Ususal flags that are passed to osl_close_table().
- *
  * \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;
 }
 
@@ -460,21 +582,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, &ti->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) {
-		attribute_table = ti->table;
 		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;
+}