New ccanlint test: _info.c must have some package documentation.

diff --git a/tools/ccanlint/Makefile b/tools/ccanlint/Makefile
index f027e20af102f2ee706dba12ab453ffb7c94a34b..d236346f7dd967ce30c4202c19e12fa0ccdf7c9d 100644 (file)
--- a/tools/ccanlint/Makefile
+++ b/tools/ccanlint/Makefile
@@ -3,6 +3,7 @@ OBJS := tools/ccanlint/no_info.o \
        tools/ccanlint/has_tests.o \
        tools/ccanlint/trailing_whitespace.o \
        tools/ccanlint/idempotent.o \
+       tools/ccanlint/has_info_documentation.o \
 
 FUTURE:=tools/ccanlint/if_have_not_ifdef.o \
        tools/ccanlint/needs_depends.o \

diff --git a/tools/ccanlint/has_info_documentation.c b/tools/ccanlint/has_info_documentation.c
new file mode 100644 (file)
index 0000000..2f2c369
--- /dev/null
+++ b/tools/ccanlint/has_info_documentation.c
@@ -0,0 +1,130 @@
+#include "ccanlint.h"
+#include "../doc_extract.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 <ccan/str/str.h>
+#include <ccan/talloc/talloc.h>
+#include <ccan/noerr/noerr.h>
+#include <ccan/grab_file/grab_file.h>
+
+struct info_docs
+{
+       bool summary;
+       bool description;
+       bool example;
+};
+
+static void *check_has_info_documentation(struct manifest *m)
+{
+       struct list_head *infodocs = get_ccan_file_docs(m->info_file);
+       struct doc_section *d;
+       struct info_docs id = { false, false, false };
+
+       list_for_each(infodocs, d, list) {
+               if (!streq(d->function, m->basename))
+                       continue;
+               if (streq(d->type, "summary"))
+                       id.summary = true;
+               if (streq(d->type, "description"))
+                       id.description = true;
+               if (streq(d->type, "example"))
+                       id.example = true;
+       }
+
+       if (id.summary && id.description && id.example)
+               return NULL;
+       return talloc_memdup(m, &id, sizeof(id));
+}
+
+/* This is defined below. */
+extern struct ccanlint has_info_documentation;
+
+static void create_info_template_doc(struct manifest *m, void *check_result)
+{
+       int fd = open("_info.c.new", O_WRONLY|O_CREAT|O_EXCL, 0666);
+       FILE *new;
+       char *oldcontents;
+
+       if (fd < 0 || !(new = fdopen(fd, "w")))
+               err(1, "Creating _info.c.new to insert documentation");
+
+       if (fprintf(new,
+                   "/**"
+                   " * %s - [[ONE LINE DESCRIPTION HERE]]\n"
+                   " *\n"
+                   " * Paragraphs why %s exists and where to use it.\n"
+                   " *\n"
+                   " * Followed by an Example: section with a standalone\n"
+                   " * (trivial and usually useless) program\n"
+                   " */\n", m->basename, m->basename) < 0) {
+               unlink_noerr("_info.c.new");
+               err(1, "Writing to _info.c.new to insert documentation");
+       }
+
+       oldcontents = grab_file(m, "_info.c", NULL);
+       if (!oldcontents) {
+               unlink_noerr("_info.c.new");
+               err(1, "Reading _info.c");
+       }
+       if (fprintf(new, "%s", oldcontents) < 0) {
+               unlink_noerr("_info.c.new");
+               err(1, "Appending _info.c to _info.c.new");
+       }
+       if (fclose(new) != 0) {
+               unlink_noerr("_info.c.new");
+               err(1, "Closing _info.c.new");
+       }
+       if (rename("_info.c.new", "_info.c") != 0) {
+               unlink_noerr("_info.c.new");
+               err(1, "Renaming _info.c.new to _info.c");
+       }
+}
+
+static const char *describe_has_info_documentation(struct manifest *m,
+                                                  void *check_result)
+{
+       struct info_docs *id = check_result;
+       char *reason = talloc_strdup(m, "");
+
+       if (!id->summary) {
+               has_info_documentation.handle = create_info_template_doc;
+               reason = talloc_asprintf_append(reason,
+               "Your _info.c has no module documentation.\n\n"
+               "CCAN modules use /**-style comments for documentation: the\n"
+               "overall documentation belongs in the _info.c metafile.\n");
+       }
+       if (!id->description)
+               reason = talloc_asprintf_append(reason,
+               "Your _info.c has no module description.\n\n"
+               "The lines after the first summary line in the _info.c file\n"
+               "documentation should describe the purpose and use of the\n"
+               "overall package\n");
+       if (!id->example)
+               reason = talloc_asprintf_append(reason,
+               "Your _info.c has no module example.\n\n"
+               "There should be an Example: section of the _info.c documentation\n"
+               "which provides a concise toy program which uses your module\n");
+       return reason;
+}
+
+static unsigned int has_info_documentation_score(struct manifest *m,
+                                                void *check_result)
+{
+       struct info_docs *id = check_result;
+       return id->summary + id->description + id->example;
+}
+
+struct ccanlint has_info_documentation = {
+       .name = "Documentation in _info.c",
+       .total_score = 3,
+       .score = has_info_documentation_score,
+       .check = check_has_info_documentation,
+       .describe = describe_has_info_documentation,
+};