[PATCH 3/4] scripts/kernel-doc: Adding infrastructure for markdown support

23 Jul 2015

Markdown support is given by calling an external tool, pandoc, for all
highlighted text on kernel-doc.
Pandoc converts Markdown text to proper Docbook tags, which will be
later translated to pdf, html or other targets.
This adds the capability of adding human-readle text highlight (bold,
underline, etc), bullet and numbered lists, simple tables, fixed-width
text (including asciiart), requiring minimal changes to current documentation.
At this moment, pandoc is totally optional. Docbooks ready for markdown
should be added to the MARKDOWNREADY variable inside the Makefile. In
case the developer doesn't have pandoc installed, Make will throw a
warning and the documentation build will continue, generating
simple Documentation without the features brought by pandoc.
Signed-off-by: Danilo Cesar Lemes de Paula danilo.cesar@collabora.co.uk
Cc: Randy Dunlap rdunlap@infradead.org
Cc: Daniel Vetter daniel.vetter@ffwll.ch
Cc: Laurent Pinchart laurent.pinchart@ideasonboard.com
Cc: Jonathan Corbet corbet@lwn.net
Cc: Herbert Xu herbert@gondor.apana.org.au
Cc: Stephan Mueller smueller@chronox.de
Cc: Michal Marek mmarek@suse.cz
Cc: linux-kernel@vger.kernel.org
Cc: linux-doc@vger.kernel.org
Cc: intel-gfx intel-gfx@lists.freedesktop.org
Cc: dri-devel dri-devel@lists.freedesktop.org
---
 Documentation/DocBook/Makefile | 25 +++++++++++-----
 scripts/docproc.c              | 49 +++++++++++++++++++++----------
 scripts/kernel-doc             | 66 ++++++++++++++++++++++++++++++++++++++++--
 3 files changed, 115 insertions(+), 25 deletions(-)

diff --git a/Documentation/DocBook/Makefile b/Documentation/DocBook/Makefile
index 322255b..7c404b3 100644
--- a/Documentation/DocBook/Makefile
+++ b/Documentation/DocBook/Makefile
@@ -17,6 +17,8 @@ DOCBOOKS := z8530book.xml device-drivers.xml \
        tracepoint.xml drm.xml media_api.xml w1.xml \
        writing_musb_glue_layer.xml crypto-API.xml
+MARKDOWNREADY := 
+
 include Documentation/DocBook/media/Makefile
###
@@ -79,18 +81,23 @@ XMLTOFLAGS += --skip-validation
 # The following rules are used to generate the .xml documentation
 # required to generate the final targets. (ps, pdf, html).
 quiet_cmd_docproc = DOCPROC $@
-      cmd_docproc = SRCTREE=$(srctree)/ $(DOCPROC) doc $< >$@
+      cmd_docproc = SRCTREE=$(srctree)/ $(DOCPROC) doc $< $$USEMARKDOWN >$@
 define rule_docproc
-	set -e;								\
-        $(if $($(quiet)cmd_$(1)),echo '  $($(quiet)cmd_$(1))';) 	\
-        $(cmd_$(1)); 							\
-        ( 								\
-          echo 'cmd_$@ := $(cmd_$(1))'; 				\
-          echo $@: `SRCTREE=$(srctree) $(DOCPROC) depend $<`; 		\
+	set -e;									\
+	USEMARKDOWN="";								\
+	FILE=`basename $@`;							\
+	[[ "$(MARKDOWNREADY)" =~ "$${FILE}" ]] && USEMARKDOWN="-use-markdown";	\
+        $(if $($(quiet)cmd_$(1)),echo '  $($(quiet)cmd_$(1))';) 		\
+        $(cmd_$(1)); 								\
+        ( 									\
+          echo 'cmd_$@ := $(cmd_$(1))'; 					\
+          echo $@: `SRCTREE=$(srctree) $(DOCPROC) depend $<`; 			\
         ) > $(dir $@).$(notdir $@).cmd
 endef
%.xml: %.tmpl $(KERNELDOC) $(DOCPROC) $(KERNELDOCXMLREF) FORCE
+	@(which pandoc > /dev/null 2>&1) || \
+	(echo "*** To get propper documentation you need to install pandoc ***";)
    $(call if_changed_rule,docproc)
# Tell kbuild to always build the programs
@@ -101,6 +108,10 @@ notfoundtemplate = echo "*** You have to install docbook-utils or xmlto ***"; \
 db2xtemplate = db2TYPE -o $(dir $@) $<
 xmltotemplate = xmlto TYPE $(XMLTOFLAGS) -o $(dir $@) $<
+ifneq ($(shell which pandoc >/dev/null 2>&1 && echo found),found)
+	MARKDOWNREADY := "";
+endif
+
 # determine which methods are available
 ifeq ($(shell which db2ps >/dev/null 2>&1 && echo found),found)
    use-db2x = db2x
diff --git a/scripts/docproc.c b/scripts/docproc.c
index e267e621..45140b2 100644
--- a/scripts/docproc.c
+++ b/scripts/docproc.c
@@ -73,12 +73,15 @@ FILELINE * docsection;
 #define NOFUNCTION    "-nofunction"
 #define NODOCSECTIONS "-no-doc-sections"
 #define SHOWNOTFOUND  "-show-not-found"
+#define USEMARKDOWN   "-use-markdown"
static char *srctree, *kernsrctree;
static char **all_list = NULL;
 static int all_list_len = 0;
+static int use_markdown = 0;
+
 static void consume_symbol(const char *sym)
 {
    int i;
@@ -95,10 +98,11 @@ static void consume_symbol(const char *sym)
static void usage (void)
 {
-	fprintf(stderr, "Usage: docproc {doc|depend} file\n");
+	fprintf(stderr, "Usage: docproc {doc|depend} [--use-markdown] file\n");
    fprintf(stderr, "Input is read from file.tmpl. Output is sent to stdout\n");
    fprintf(stderr, "doc: frontend when generating kernel documentation\n");
    fprintf(stderr, "depend: generate list of files referenced within file\n");
+	fprintf(stderr, "--use-markdown: pass --use-markdown to kernel-doc call\n");
    fprintf(stderr, "Environment variable SRCTREE: absolute path to sources.\n");
    fprintf(stderr, "                     KBUILD_SRC: absolute path to kernel source tree.\n");
 }
@@ -294,6 +298,9 @@ static void singfunc(char * filename, char * line)
    int i, idx = 0;
    int startofsym = 1;
    vec[idx++] = KERNELDOC;
+	if (use_markdown) {
+		vec[idx++] = USEMARKDOWN;
+	}
    vec[idx++] = DOCBOOK;
    vec[idx++] = SHOWNOTFOUND;
@@ -328,8 +335,9 @@ static void singfunc(char * filename, char * line)
 static void docsect(char *filename, char *line)
 {
    /* kerneldoc -docbook -show-not-found -function "section" file NULL */
-	char *vec[7];
+	char *vec[8];
    char *s;
+	int idx = 0;
for (s = line; *s; s++)
    	if (*s == '\n')
@@ -342,30 +350,37 @@ static void docsect(char *filename, char *line)
    consume_symbol(s);
    free(s);
-	vec[0] = KERNELDOC;
-	vec[1] = DOCBOOK;
-	vec[2] = SHOWNOTFOUND;
-	vec[3] = FUNCTION;
-	vec[4] = line;
-	vec[5] = filename;
-	vec[6] = NULL;
+	vec[idx++] = KERNELDOC;
+	if (use_markdown) {
+		vec[idx++] = USEMARKDOWN;
+	}
+	vec[idx++] = DOCBOOK;
+	vec[idx++] = SHOWNOTFOUND;
+	vec[idx++] = FUNCTION;
+	vec[idx++] = line;
+	vec[idx++] = filename;
+	vec[idx] = NULL;
    exec_kernel_doc(vec);
 }
static void find_all_symbols(char *filename)
 {
-	char *vec[4]; /* kerneldoc -list file NULL */
+	char *vec[5]; /* kerneldoc -list file NULL */
    pid_t pid;
    int ret, i, count, start;
    char real_filename[PATH_MAX + 1];
    int pipefd[2];
    char *data, *str;
    size_t data_len = 0;
+	int idx = 0;
-	vec[0] = KERNELDOC;
-	vec[1] = LIST;
-	vec[2] = filename;
-	vec[3] = NULL;
+	vec[idx++] = KERNELDOC;
+	if (use_markdown) {
+		vec[idx++] = USEMARKDOWN;
+	}
+	vec[idx++] = LIST;
+	vec[idx++] = filename;
+	vec[idx] = NULL;
if (pipe(pipefd)) {
    	perror("pipe");
@@ -509,7 +524,7 @@ int main(int argc, char *argv[])
    kernsrctree = getenv("KBUILD_SRC");
    if (!kernsrctree || !*kernsrctree)
    	kernsrctree = srctree;
-	if (argc != 3) {
+	if (argc < 3 || argc > 4) {
    	usage();
    	exit(1);
    }
@@ -521,6 +536,10 @@ int main(int argc, char *argv[])
    	exit(2);
    }
+	if (argc == 4 && strcmp("-use-markdown", argv[3]) == 0) {
+		use_markdown = 1;
+	}
+
    if (strcmp("doc", argv[1]) == 0) {
    	/* Need to do this in two passes.
    	 * First pass is used to collect all symbols exported
diff --git a/scripts/kernel-doc b/scripts/kernel-doc
index a38a69a..ab2e875 100755
--- a/scripts/kernel-doc
+++ b/scripts/kernel-doc
@@ -1,6 +1,7 @@
 #!/usr/bin/perl -w
use strict;
+use IPC::Open3;
## Copyright (c) 1998 Michael Zucchi, All Rights Reserved        ##
 ## Copyright (C) 2000, 1  Tim Waugh twaugh@redhat.com          ##
@@ -258,6 +259,7 @@ if ($#ARGV == -1) {
my $kernelversion;
 my $dohighlight = "";
+my $use_markdown = 0;
my $verbose = 0;
 my $output_mode = "man";
@@ -378,6 +380,8 @@ while ($ARGV[0] =~ m/^-(.*)/) {
    $function_only = 2;
    $function = shift @ARGV;
    $function_table{$function} = 1;
+    } elsif ($cmd eq "-use-markdown") {
+	$use_markdown = 1;
     } elsif ($cmd eq "-v") {
    $verbose = 1;
     } elsif (($cmd eq "-h") || ($cmd eq "--help")) {
@@ -396,6 +400,7 @@ sub usage {
     print "         [ -no-doc-sections ]\n";
     print "         [ -function funcname [ -function funcname ...] ]\n";
     print "         [ -nofunction funcname [ -nofunction funcname ...] ]\n";
+    print "         [ -use-markdown ]\n";
     print "         [ -v ]\n";
     print "         c source file(s) > outputfile\n";
     print "         -v : verbose output, more warnings & other info listed\n";
@@ -469,6 +474,49 @@ sub dump_doc_section {
     }
 }
+sub markdown_to_docbook {
+	my $orig_content = $_[0];
+
+	my $pid = open3( *CHLD_IN, *CHLD_OUT, *CHLD_ERR, "pandoc  --columns=80 -f markdown -t docbook" );
+
+	print CHLD_IN "$orig_content";
+	close(CHLD_IN);
+
+	waitpid($pid, 0);
+
+	my $content = "";
+	chomp(my @lines = <CHLD_OUT>);
+	foreach my $line (@lines) {
+		$content .= $line . "\n";
+	}
+	close(CHLD_OUT);
+	close(CHLD_ERR);
+
+	# pandoc insists in adding Main <para></para>, we should remove them.
+	$content =~ s:\A\s*<para>\s*\n(.*)\n</para>\Z$:$1:egsm;
+
+	return $content;
+}
+
+# Markdown->Docbook conversion by pandoc requires unescaped text
+# Kernel-doc converts every & to "&amp;", we need to convert it back.
+sub markdown_unescape
+{
+	my $text = shift;
+	my @lines = split /\n/, $text;
+
+	my @result;
+	foreach my $line (@lines) {
+		if ( $line =~ m /^    /s ) {
+			$line =~ s:&amp;:&:gs
+		}
+		push @result, $line;
+	}
+
+	return join "\n",@result;
+
+}
+
 ##
 # output function
 #
@@ -495,11 +543,19 @@ sub output_highlight {
    $contents = local_unescape($contents);
    # convert data read & converted thru xml_escape() into &xyz; format:
    $contents =~ s/\\\/&/g;
+
+	if ($use_markdown) {
+		$contents = markdown_unescape($contents);
+	}
     }
+
 #   print STDERR "contents b4:$contents\n";
     eval $dohighlight;
     die $@ if $@;
 #   print STDERR "contents af:$contents\n";
+    if ($use_markdown) {
+        $contents = markdown_to_docbook($contents);
+    }
#   strip whitespaces when generating html5
     if ($output_mode eq "html5") {
@@ -507,7 +563,8 @@ sub output_highlight {
    $contents =~ s/\s+$//;
     }
     foreach $line (split "\n", $contents) {
-	if (! $output_preformatted) {
+	if (! $output_preformatted &&
+	    !($use_markdown && $line =~ m /^    /s)) {
        $line =~ s/^\s*//;
    }
    if ($line eq ""){
@@ -928,7 +985,9 @@ sub output_section_xml(%) {
    print "<refsect1>\n";
    print "<title>$section</title>\n";
    if ($section =~ m/EXAMPLE/i) {
-	    print "<informalexample><programlisting>\n";
+	    print "<informalexample>\n";
+	    # programlisting is already included by pandoc
+	    print "<programlisting>\n" unless $use_markdown;
        $output_preformatted = 1;
    } else {
        print "<para>\n";
@@ -936,7 +995,8 @@ sub output_section_xml(%) {
    output_highlight($args{'sections'}{$section});
    $output_preformatted = 0;
    if ($section =~ m/EXAMPLE/i) {
-	    print "</programlisting></informalexample>\n";
+	    print "</programlisting>\n" unless $use_markdown;
+	    print "</informalexample>\n";
    } else {
        print "</para>\n";
    }
-- 
2.1.4


    

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

[PATCH 3/4] scripts/kernel-doc: Adding infrastructure for markdown support