X-Git-Url: http://git.ozlabs.org/?a=blobdiff_plain;f=tools%2Fccanlint%2Ftests%2Fmodule_links.c;fp=tools%2Fccanlint%2Ftests%2Fmodule_links.c;h=0bf9821555d70b53c98f6c767b8b36726b58bc72;hb=441a3cb13e428cfa4973d83acb68e231a7cd4cf4;hp=0000000000000000000000000000000000000000;hpb=c59407178991758de6541740f912578e33c7e50b;p=ccan

diff --git a/tools/ccanlint/tests/module_links.c b/tools/ccanlint/tests/module_links.c
new file mode 100644
index 00000000..0bf98215
--- /dev/null
+++ b/tools/ccanlint/tests/module_links.c
@@ -0,0 +1,96 @@
+#include <tools/ccanlint/ccanlint.h>
+#include <tools/tools.h>
+#include <ccan/talloc/talloc.h>
+#include <ccan/str/str.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <limits.h>
+#include <errno.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <err.h>
+#include <string.h>
+#include <ctype.h>
+
+static const char *can_build(struct manifest *m)
+{
+	if (safe_mode)
+		return "Safe mode enabled";
+	return NULL;
+}
+
+static char *obj_list(const struct manifest *m)
+{
+	char *list = talloc_strdup(m, "");
+	struct manifest *i;
+
+	/* Other CCAN deps. */
+	list_for_each(&m->deps, i, list) {
+		if (i->compiled[COMPILE_NORMAL])
+			list = talloc_asprintf_append(list, "%s ",
+						      i->compiled
+						      [COMPILE_NORMAL]);
+	}
+	return list;
+}
+
+static char *lib_list(const struct manifest *m)
+{
+	unsigned int i, num;
+	char **libs = get_libs(m, ".",
+			       &num, &m->info_file->compiled[COMPILE_NORMAL]);
+	char *ret = talloc_strdup(m, "");
+
+	for (i = 0; i < num; i++)
+		ret = talloc_asprintf_append(ret, "-l%s ", libs[i]);
+	return ret;
+}
+
+static void check_use_build(struct manifest *m,
+			    bool keep,
+			    unsigned int *timeleft, struct score *score)
+{
+	char *contents;
+	char *tmpfile, *cmdout;
+	char *basename = talloc_asprintf(m, "%s/example.c", m->dir);
+	int fd;
+
+	tmpfile = maybe_temp_file(m, ".c", keep, basename);
+
+	fd = open(tmpfile, O_WRONLY | O_CREAT | O_EXCL, 0600);
+	if (fd < 0)
+		err(1, "Creating temporary file %s", tmpfile);
+
+	contents = talloc_asprintf(tmpfile,
+				   "#include <ccan/%s/%s.h>\n"
+				   "int main(void)\n"
+				   "{\n"
+				   "	return 0;\n"
+				   "}\n",
+				   m->basename, m->basename);
+	if (write(fd, contents, strlen(contents)) != strlen(contents))
+		err(1, "Failure writing to temporary file %s", tmpfile);
+	close(fd);
+
+	if (compile_and_link(score, tmpfile, ccan_dir, obj_list(m),
+			     compiler, cflags, lib_list(m),
+			     maybe_temp_file(m, "", keep, tmpfile),
+			     &cmdout)) {
+		score->pass = true;
+		score->score = score->total;
+	} else {
+		score->error = cmdout;
+	}
+}
+
+struct ccanlint module_links = {
+	.key = "module_links",
+	.name = "Module can be linked against trivial program",
+	.check = check_use_build,
+	.can_run = can_build,
+	.needs = "module_builds depends_build"
+};
+
+REGISTER_TEST(module_links);