[PATCH 00/10] kernel-doc: add supported to document nested structs/unions

[PATCH 00/10] kernel-doc: add supported to document nested structs/unions

[Mauro Carvalho Chehab]

Right now, it is not possible to document nested struct and nested unions.
kernel-doc simply ignore them.

Add support to document them.

This series starts with a patch getting rid of the now unused output formats
for kernel-doc: since we got rid of all DocBook stuff, we should not need
them anymore. The reason for dropping it (despite cleaning up), is that
it doesn't make sense to invest time on adding new features for formats
that aren't used anymore.

The next 8 patches on this series improve kernel-doc documentation and
finally get rid of its old documentation (kernel-doc-nano-HOWTO.txt).

Patch 9/10 is the most interesting one in this series: it adds support for
nested structures and unions.

Patch 10/10 is just an example from a random header with kernel-doc
markups. There's no special reason for selecting this file, and the
comments there are likely wrong. So, please use it only as a way to test
the new parser logic from patch 9/10.

Mauro Carvalho Chehab (10):
  scripts: kernel-doc: get rid of unused output formats
  docs: kernel-doc.rst: better describe kernel-doc arguments
  docs: kernel-doc.rst: improve private members description
  docs: kernel-doc.rst: improve function documentation section
  docs: kernel-doc.rst: improve structs chapter
  docs: kernel-doc: improve typedef documentation
  docs: kernel-doc.rst: add documentation about man pages
  docs: get rid of kernel-doc-nano-HOWTO.txt
  scripts: kernel-doc: parse next structs/unions
  [RFC] w1_netlink.h: add support for nested structs

---

Before this series, I send a few PoC patches. They were all
replaced by patch 9/10.

 Documentation/00-INDEX                  |    2 -
 Documentation/doc-guide/kernel-doc.rst  |  387 ++++++---
 Documentation/kernel-doc-nano-HOWTO.txt |  322 --------
 drivers/w1/w1_netlink.h                 |    4 +
 scripts/kernel-doc                      | 1304 ++-----------------------------
 5 files changed, 346 insertions(+), 1673 deletions(-)
 delete mode 100644 Documentation/kernel-doc-nano-HOWTO.txt

-- 
2.13.5

[PATCH 01/10] scripts: kernel-doc: get rid of unused output formats

[Mauro Carvalho Chehab]

Since there isn't any docbook code anymore upstream,
we can get rid of several output formats:

- docbook/xml, html, html5 and list formats were used by
  the old build system;
- As ReST is text, there's not much sense on outputting
  on a different text format.

After this patch, only man and rst output formats are
supported.

Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
---
 scripts/kernel-doc | 1182 +---------------------------------------------------
 1 file changed, 4 insertions(+), 1178 deletions(-)

diff --git a/scripts/kernel-doc b/scripts/kernel-doc
index 9d3eafea58f0..69757ee9db4c 100755
--- a/scripts/kernel-doc
+++ b/scripts/kernel-doc
@@ -51,13 +51,8 @@ The documentation comments are identified by "/**" opening comment mark. See
 Documentation/kernel-doc-nano-HOWTO.txt for the documentation comment syntax.
 
 Output format selection (mutually exclusive):
-  -docbook		Output DocBook format.
-  -html			Output HTML format.
-  -html5		Output HTML5 format.
-  -list			Output symbol list format. This is for use by docproc.
   -man			Output troff manual page format. This is the default.
   -rst			Output reStructuredText format.
-  -text			Output plain text format.
 
 Output selection (mutually exclusive):
   -export		Only output documentation for symbols that have been
@@ -224,84 +219,11 @@ my $type_typedef = '\&(typedef\s*([_\w]+))';
 my $type_union = '\&(union\s*([_\w]+))';
 my $type_member = '\&([_\w]+)(\.|->)([_\w]+)';
 my $type_fallback = '\&([_\w]+)';
-my $type_enum_xml = '\&amp;(enum\s*([_\w]+))';
-my $type_struct_xml = '\&amp;(struct\s*([_\w]+))';
-my $type_typedef_xml = '\&amp;(typedef\s*([_\w]+))';
-my $type_union_xml = '\&amp;(union\s*([_\w]+))';
-my $type_member_xml = '\&amp;([_\w]+)(\.|-\&gt;)([_\w]+)';
-my $type_fallback_xml = '\&amp([_\w]+)';
 my $type_member_func = $type_member . '\(\)';
 
 # Output conversion substitutions.
 #  One for each output format
 
-# these work fairly well
-my @highlights_html = (
-                       [$type_constant, "<i>\$1</i>"],
-                       [$type_constant2, "<i>\$1</i>"],
-                       [$type_func, "<b>\$1</b>"],
-                       [$type_enum_xml, "<i>\$1</i>"],
-                       [$type_struct_xml, "<i>\$1</i>"],
-                       [$type_typedef_xml, "<i>\$1</i>"],
-                       [$type_union_xml, "<i>\$1</i>"],
-                       [$type_env, "<b><i>\$1</i></b>"],
-                       [$type_param, "<tt><b>\$1</b></tt>"],
-                       [$type_member_xml, "<tt><i>\$1</i>\$2\$3</tt>"],
-                       [$type_fallback_xml, "<i>\$1</i>"]
-                      );
-my $local_lt = "\\\\\\\\lt:";
-my $local_gt = "\\\\\\\\gt:";
-my $blankline_html = $local_lt . "p" . $local_gt;	# was "<p>"
-
-# html version 5
-my @highlights_html5 = (
-                        [$type_constant, "<span class=\"const\">\$1</span>"],
-                        [$type_constant2, "<span class=\"const\">\$1</span>"],
-                        [$type_func, "<span class=\"func\">\$1</span>"],
-                        [$type_enum_xml, "<span class=\"enum\">\$1</span>"],
-                        [$type_struct_xml, "<span class=\"struct\">\$1</span>"],
-                        [$type_typedef_xml, "<span class=\"typedef\">\$1</span>"],
-                        [$type_union_xml, "<span class=\"union\">\$1</span>"],
-                        [$type_env, "<span class=\"env\">\$1</span>"],
-                        [$type_param, "<span class=\"param\">\$1</span>]"],
-                        [$type_member_xml, "<span class=\"literal\"><span class=\"struct\">\$1</span>\$2<span class=\"member\">\$3</span></span>"],
-                        [$type_fallback_xml, "<span class=\"struct\">\$1</span>"]
-		       );
-my $blankline_html5 = $local_lt . "br /" . $local_gt;
-
-# XML, docbook format
-my @highlights_xml = (
-                      ["([^=])\\\"([^\\\"<]+)\\\"", "\$1<quote>\$2</quote>"],
-                      [$type_constant, "<constant>\$1</constant>"],
-                      [$type_constant2, "<constant>\$1</constant>"],
-                      [$type_enum_xml, "<type>\$1</type>"],
-                      [$type_struct_xml, "<structname>\$1</structname>"],
-                      [$type_typedef_xml, "<type>\$1</type>"],
-                      [$type_union_xml, "<structname>\$1</structname>"],
-                      [$type_param, "<parameter>\$1</parameter>"],
-                      [$type_func, "<function>\$1</function>"],
-                      [$type_env, "<envar>\$1</envar>"],
-                      [$type_member_xml, "<literal><structname>\$1</structname>\$2<structfield>\$3</structfield></literal>"],
-                      [$type_fallback_xml, "<structname>\$1</structname>"]
-		     );
-my $blankline_xml = $local_lt . "/para" . $local_gt . $local_lt . "para" . $local_gt . "\n";
-
-# gnome, docbook format
-my @highlights_gnome = (
-                        [$type_constant, "<replaceable class=\"option\">\$1</replaceable>"],
-                        [$type_constant2, "<replaceable class=\"option\">\$1</replaceable>"],
-                        [$type_func, "<function>\$1</function>"],
-                        [$type_enum, "<type>\$1</type>"],
-                        [$type_struct, "<structname>\$1</structname>"],
-                        [$type_typedef, "<type>\$1</type>"],
-                        [$type_union, "<structname>\$1</structname>"],
-                        [$type_env, "<envar>\$1</envar>"],
-                        [$type_param, "<parameter>\$1</parameter>" ],
-                        [$type_member, "<literal><structname>\$1</structname>\$2<structfield>\$3</structfield></literal>"],
-                        [$type_fallback, "<structname>\$1</structname>"]
-		       );
-my $blankline_gnome = "</para><para>\n";
-
 # these are pretty rough
 my @highlights_man = (
                       [$type_constant, "\$1"],
@@ -317,21 +239,6 @@ my @highlights_man = (
 		     );
 my $blankline_man = "";
 
-# text-mode
-my @highlights_text = (
-                       [$type_constant, "\$1"],
-                       [$type_constant2, "\$1"],
-                       [$type_func, "\$1"],
-                       [$type_enum, "\$1"],
-                       [$type_struct, "\$1"],
-                       [$type_typedef, "\$1"],
-                       [$type_union, "\$1"],
-                       [$type_param, "\$1"],
-                       [$type_member, "\$1\$2\$3"],
-                       [$type_fallback, "\$1"]
-		      );
-my $blankline_text = "";
-
 # rst-mode
 my @highlights_rst = (
                        [$type_constant, "``\$1``"],
@@ -351,21 +258,6 @@ my @highlights_rst = (
 		      );
 my $blankline_rst = "\n";
 
-# list mode
-my @highlights_list = (
-                       [$type_constant, "\$1"],
-                       [$type_constant2, "\$1"],
-                       [$type_func, "\$1"],
-                       [$type_enum, "\$1"],
-                       [$type_struct, "\$1"],
-                       [$type_typedef, "\$1"],
-                       [$type_union, "\$1"],
-                       [$type_param, "\$1"],
-                       [$type_member, "\$1"],
-                       [$type_fallback, "\$1"]
-		      );
-my $blankline_list = "";
-
 # read arguments
 if ($#ARGV == -1) {
     usage();
@@ -500,38 +392,14 @@ reset_state();
 
 while ($ARGV[0] =~ m/^-(.*)/) {
     my $cmd = shift @ARGV;
-    if ($cmd eq "-html") {
-	$output_mode = "html";
-	@highlights = @highlights_html;
-	$blankline = $blankline_html;
-    } elsif ($cmd eq "-html5") {
-	$output_mode = "html5";
-	@highlights = @highlights_html5;
-	$blankline = $blankline_html5;
-    } elsif ($cmd eq "-man") {
+    if ($cmd eq "-man") {
 	$output_mode = "man";
 	@highlights = @highlights_man;
 	$blankline = $blankline_man;
-    } elsif ($cmd eq "-text") {
-	$output_mode = "text";
-	@highlights = @highlights_text;
-	$blankline = $blankline_text;
     } elsif ($cmd eq "-rst") {
 	$output_mode = "rst";
 	@highlights = @highlights_rst;
 	$blankline = $blankline_rst;
-    } elsif ($cmd eq "-docbook") {
-	$output_mode = "xml";
-	@highlights = @highlights_xml;
-	$blankline = $blankline_xml;
-    } elsif ($cmd eq "-list") {
-	$output_mode = "list";
-	@highlights = @highlights_list;
-	$blankline = $blankline_list;
-    } elsif ($cmd eq "-gnome") {
-	$output_mode = "gnome";
-	@highlights = @highlights_gnome;
-	$blankline = $blankline_gnome;
     } elsif ($cmd eq "-module") { # not needed for XML, inherits from calling document
 	$modulename = shift @ARGV;
     } elsif ($cmd eq "-function") { # to only output specific functions
@@ -667,22 +535,11 @@ sub output_highlight {
 #	confess "output_highlight got called with no args?\n";
 #   }
 
-    if ($output_mode eq "html" || $output_mode eq "html5" ||
-	$output_mode eq "xml") {
-	$contents = local_unescape($contents);
-	# convert data read & converted thru xml_escape() into &xyz; format:
-	$contents =~ s/\\\\\\/\&/g;
-    }
 #   print STDERR "contents b4:$contents\n";
     eval $dohighlight;
     die $@ if $@;
 #   print STDERR "contents af:$contents\n";
 
-#   strip whitespaces when generating html5
-    if ($output_mode eq "html5") {
-	$contents =~ s/^\s+//;
-	$contents =~ s/\s+$//;
-    }
     foreach $line (split "\n", $contents) {
 	if (! $output_preformatted) {
 	    $line =~ s/^\s*//;
@@ -703,817 +560,6 @@ sub output_highlight {
     }
 }
 
-# output sections in html
-sub output_section_html(%) {
-    my %args = %{$_[0]};
-    my $section;
-
-    foreach $section (@{$args{'sectionlist'}}) {
-	print "<h3>$section</h3>\n";
-	print "<blockquote>\n";
-	output_highlight($args{'sections'}{$section});
-	print "</blockquote>\n";
-    }
-}
-
-# output enum in html
-sub output_enum_html(%) {
-    my %args = %{$_[0]};
-    my ($parameter);
-    my $count;
-    print "<h2>enum " . $args{'enum'} . "</h2>\n";
-
-    print "<b>enum " . $args{'enum'} . "</b> {<br>\n";
-    $count = 0;
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	print " <b>" . $parameter . "</b>";
-	if ($count != $#{$args{'parameterlist'}}) {
-	    $count++;
-	    print ",\n";
-	}
-	print "<br>";
-    }
-    print "};<br>\n";
-
-    print "<h3>Constants</h3>\n";
-    print "<dl>\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	print "<dt><b>" . $parameter . "</b>\n";
-	print "<dd>";
-	output_highlight($args{'parameterdescs'}{$parameter});
-    }
-    print "</dl>\n";
-    output_section_html(@_);
-    print "<hr>\n";
-}
-
-# output typedef in html
-sub output_typedef_html(%) {
-    my %args = %{$_[0]};
-    my ($parameter);
-    my $count;
-    print "<h2>typedef " . $args{'typedef'} . "</h2>\n";
-
-    print "<b>typedef " . $args{'typedef'} . "</b>\n";
-    output_section_html(@_);
-    print "<hr>\n";
-}
-
-# output struct in html
-sub output_struct_html(%) {
-    my %args = %{$_[0]};
-    my ($parameter);
-
-    print "<h2>" . $args{'type'} . " " . $args{'struct'} . " - " . $args{'purpose'} . "</h2>\n";
-    print "<b>" . $args{'type'} . " " . $args{'struct'} . "</b> {<br>\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	if ($parameter =~ /^#/) {
-		print "$parameter<br>\n";
-		next;
-	}
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	$type = $args{'parametertypes'}{$parameter};
-	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-	    # pointer-to-function
-	    print "&nbsp; &nbsp; <i>$1</i><b>$parameter</b>) <i>($2)</i>;<br>\n";
-	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
-	    # bitfield
-	    print "&nbsp; &nbsp; <i>$1</i> <b>$parameter</b>$2;<br>\n";
-	} else {
-	    print "&nbsp; &nbsp; <i>$type</i> <b>$parameter</b>;<br>\n";
-	}
-    }
-    print "};<br>\n";
-
-    print "<h3>Members</h3>\n";
-    print "<dl>\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	($parameter =~ /^#/) && next;
-
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	print "<dt><b>" . $parameter . "</b>\n";
-	print "<dd>";
-	output_highlight($args{'parameterdescs'}{$parameter_name});
-    }
-    print "</dl>\n";
-    output_section_html(@_);
-    print "<hr>\n";
-}
-
-# output function in html
-sub output_function_html(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $count;
-
-    print "<h2>" . $args{'function'} . " - " . $args{'purpose'} . "</h2>\n";
-    print "<i>" . $args{'functiontype'} . "</i>\n";
-    print "<b>" . $args{'function'} . "</b>\n";
-    print "(";
-    $count = 0;
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	$type = $args{'parametertypes'}{$parameter};
-	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-	    # pointer-to-function
-	    print "<i>$1</i><b>$parameter</b>) <i>($2)</i>";
-	} else {
-	    print "<i>" . $type . "</i> <b>" . $parameter . "</b>";
-	}
-	if ($count != $#{$args{'parameterlist'}}) {
-	    $count++;
-	    print ",\n";
-	}
-    }
-    print ")\n";
-
-    print "<h3>Arguments</h3>\n";
-    print "<dl>\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	print "<dt><b>" . $parameter . "</b>\n";
-	print "<dd>";
-	output_highlight($args{'parameterdescs'}{$parameter_name});
-    }
-    print "</dl>\n";
-    output_section_html(@_);
-    print "<hr>\n";
-}
-
-# output DOC: block header in html
-sub output_blockhead_html(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $count;
-
-    foreach $section (@{$args{'sectionlist'}}) {
-	print "<h3>$section</h3>\n";
-	print "<ul>\n";
-	output_highlight($args{'sections'}{$section});
-	print "</ul>\n";
-    }
-    print "<hr>\n";
-}
-
-# output sections in html5
-sub output_section_html5(%) {
-    my %args = %{$_[0]};
-    my $section;
-
-    foreach $section (@{$args{'sectionlist'}}) {
-	print "<section>\n";
-	print "<h1>$section</h1>\n";
-	print "<p>\n";
-	output_highlight($args{'sections'}{$section});
-	print "</p>\n";
-	print "</section>\n";
-    }
-}
-
-# output enum in html5
-sub output_enum_html5(%) {
-    my %args = %{$_[0]};
-    my ($parameter);
-    my $count;
-    my $html5id;
-
-    $html5id = $args{'enum'};
-    $html5id =~ s/[^a-zA-Z0-9\-]+/_/g;
-    print "<article class=\"enum\" id=\"enum:". $html5id . "\">";
-    print "<h1>enum " . $args{'enum'} . "</h1>\n";
-    print "<ol class=\"code\">\n";
-    print "<li>";
-    print "<span class=\"keyword\">enum</span> ";
-    print "<span class=\"identifier\">" . $args{'enum'} . "</span> {";
-    print "</li>\n";
-    $count = 0;
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	print "<li class=\"indent\">";
-	print "<span class=\"param\">" . $parameter . "</span>";
-	if ($count != $#{$args{'parameterlist'}}) {
-	    $count++;
-	    print ",";
-	}
-	print "</li>\n";
-    }
-    print "<li>};</li>\n";
-    print "</ol>\n";
-
-    print "<section>\n";
-    print "<h1>Constants</h1>\n";
-    print "<dl>\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	print "<dt>" . $parameter . "</dt>\n";
-	print "<dd>";
-	output_highlight($args{'parameterdescs'}{$parameter});
-	print "</dd>\n";
-    }
-    print "</dl>\n";
-    print "</section>\n";
-    output_section_html5(@_);
-    print "</article>\n";
-}
-
-# output typedef in html5
-sub output_typedef_html5(%) {
-    my %args = %{$_[0]};
-    my ($parameter);
-    my $count;
-    my $html5id;
-
-    $html5id = $args{'typedef'};
-    $html5id =~ s/[^a-zA-Z0-9\-]+/_/g;
-    print "<article class=\"typedef\" id=\"typedef:" . $html5id . "\">\n";
-    print "<h1>typedef " . $args{'typedef'} . "</h1>\n";
-
-    print "<ol class=\"code\">\n";
-    print "<li>";
-    print "<span class=\"keyword\">typedef</span> ";
-    print "<span class=\"identifier\">" . $args{'typedef'} . "</span>";
-    print "</li>\n";
-    print "</ol>\n";
-    output_section_html5(@_);
-    print "</article>\n";
-}
-
-# output struct in html5
-sub output_struct_html5(%) {
-    my %args = %{$_[0]};
-    my ($parameter);
-    my $html5id;
-
-    $html5id = $args{'struct'};
-    $html5id =~ s/[^a-zA-Z0-9\-]+/_/g;
-    print "<article class=\"struct\" id=\"struct:" . $html5id . "\">\n";
-    print "<hgroup>\n";
-    print "<h1>" . $args{'type'} . " " . $args{'struct'} . "</h1>";
-    print "<h2>". $args{'purpose'} . "</h2>\n";
-    print "</hgroup>\n";
-    print "<ol class=\"code\">\n";
-    print "<li>";
-    print "<span class=\"type\">" . $args{'type'} . "</span> ";
-    print "<span class=\"identifier\">" . $args{'struct'} . "</span> {";
-    print "</li>\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	print "<li class=\"indent\">";
-	if ($parameter =~ /^#/) {
-		print "<span class=\"param\">" . $parameter ."</span>\n";
-		print "</li>\n";
-		next;
-	}
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	$type = $args{'parametertypes'}{$parameter};
-	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-	    # pointer-to-function
-	    print "<span class=\"type\">$1</span> ";
-	    print "<span class=\"param\">$parameter</span>";
-	    print "<span class=\"type\">)</span> ";
-	    print "(<span class=\"args\">$2</span>);";
-	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
-	    # bitfield
-	    print "<span class=\"type\">$1</span> ";
-	    print "<span class=\"param\">$parameter</span>";
-	    print "<span class=\"bits\">$2</span>;";
-	} else {
-	    print "<span class=\"type\">$type</span> ";
-	    print "<span class=\"param\">$parameter</span>;";
-	}
-	print "</li>\n";
-    }
-    print "<li>};</li>\n";
-    print "</ol>\n";
-
-    print "<section>\n";
-    print "<h1>Members</h1>\n";
-    print "<dl>\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	($parameter =~ /^#/) && next;
-
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	print "<dt>" . $parameter . "</dt>\n";
-	print "<dd>";
-	output_highlight($args{'parameterdescs'}{$parameter_name});
-	print "</dd>\n";
-    }
-    print "</dl>\n";
-    print "</section>\n";
-    output_section_html5(@_);
-    print "</article>\n";
-}
-
-# output function in html5
-sub output_function_html5(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $count;
-    my $html5id;
-
-    $html5id = $args{'function'};
-    $html5id =~ s/[^a-zA-Z0-9\-]+/_/g;
-    print "<article class=\"function\" id=\"func:". $html5id . "\">\n";
-    print "<hgroup>\n";
-    print "<h1>" . $args{'function'} . "</h1>";
-    print "<h2>" . $args{'purpose'} . "</h2>\n";
-    print "</hgroup>\n";
-    print "<ol class=\"code\">\n";
-    print "<li>";
-    print "<span class=\"type\">" . $args{'functiontype'} . "</span> ";
-    print "<span class=\"identifier\">" . $args{'function'} . "</span> (";
-    print "</li>";
-    $count = 0;
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	print "<li class=\"indent\">";
-	$type = $args{'parametertypes'}{$parameter};
-	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-	    # pointer-to-function
-	    print "<span class=\"type\">$1</span> ";
-	    print "<span class=\"param\">$parameter</span>";
-	    print "<span class=\"type\">)</span> ";
-	    print "(<span class=\"args\">$2</span>)";
-	} else {
-	    print "<span class=\"type\">$type</span> ";
-	    print "<span class=\"param\">$parameter</span>";
-	}
-	if ($count != $#{$args{'parameterlist'}}) {
-	    $count++;
-	    print ",";
-	}
-	print "</li>\n";
-    }
-    print "<li>)</li>\n";
-    print "</ol>\n";
-
-    print "<section>\n";
-    print "<h1>Arguments</h1>\n";
-    print "<p>\n";
-    print "<dl>\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	print "<dt>" . $parameter . "</dt>\n";
-	print "<dd>";
-	output_highlight($args{'parameterdescs'}{$parameter_name});
-	print "</dd>\n";
-    }
-    print "</dl>\n";
-    print "</section>\n";
-    output_section_html5(@_);
-    print "</article>\n";
-}
-
-# output DOC: block header in html5
-sub output_blockhead_html5(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $count;
-    my $html5id;
-
-    foreach $section (@{$args{'sectionlist'}}) {
-	$html5id = $section;
-	$html5id =~ s/[^a-zA-Z0-9\-]+/_/g;
-	print "<article class=\"doc\" id=\"doc:". $html5id . "\">\n";
-	print "<h1>$section</h1>\n";
-	print "<p>\n";
-	output_highlight($args{'sections'}{$section});
-	print "</p>\n";
-    }
-    print "</article>\n";
-}
-
-sub output_section_xml(%) {
-    my %args = %{$_[0]};
-    my $section;
-    # print out each section
-    $lineprefix="   ";
-    foreach $section (@{$args{'sectionlist'}}) {
-	print "<refsect1>\n";
-	print "<title>$section</title>\n";
-	if ($section =~ m/EXAMPLE/i) {
-	    print "<informalexample><programlisting>\n";
-	    $output_preformatted = 1;
-	} else {
-	    print "<para>\n";
-	}
-	output_highlight($args{'sections'}{$section});
-	$output_preformatted = 0;
-	if ($section =~ m/EXAMPLE/i) {
-	    print "</programlisting></informalexample>\n";
-	} else {
-	    print "</para>\n";
-	}
-	print "</refsect1>\n";
-    }
-}
-
-# output function in XML DocBook
-sub output_function_xml(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $count;
-    my $id;
-
-    $id = "API-" . $args{'function'};
-    $id =~ s/[^A-Za-z0-9]/-/g;
-
-    print "<refentry id=\"$id\">\n";
-    print "<refentryinfo>\n";
-    print " <title>LINUX</title>\n";
-    print " <productname>Kernel Hackers Manual</productname>\n";
-    print " <date>$man_date</date>\n";
-    print "</refentryinfo>\n";
-    print "<refmeta>\n";
-    print " <refentrytitle><phrase>" . $args{'function'} . "</phrase></refentrytitle>\n";
-    print " <manvolnum>9</manvolnum>\n";
-    print " <refmiscinfo class=\"version\">" . $kernelversion . "</refmiscinfo>\n";
-    print "</refmeta>\n";
-    print "<refnamediv>\n";
-    print " <refname>" . $args{'function'} . "</refname>\n";
-    print " <refpurpose>\n";
-    print "  ";
-    output_highlight ($args{'purpose'});
-    print " </refpurpose>\n";
-    print "</refnamediv>\n";
-
-    print "<refsynopsisdiv>\n";
-    print " <title>Synopsis</title>\n";
-    print "  <funcsynopsis><funcprototype>\n";
-    print "   <funcdef>" . $args{'functiontype'} . " ";
-    print "<function>" . $args{'function'} . " </function></funcdef>\n";
-
-    $count = 0;
-    if ($#{$args{'parameterlist'}} >= 0) {
-	foreach $parameter (@{$args{'parameterlist'}}) {
-	    $type = $args{'parametertypes'}{$parameter};
-	    if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-		# pointer-to-function
-		print "   <paramdef>$1<parameter>$parameter</parameter>)\n";
-		print "     <funcparams>$2</funcparams></paramdef>\n";
-	    } else {
-		print "   <paramdef>" . $type;
-		print " <parameter>$parameter</parameter></paramdef>\n";
-	    }
-	}
-    } else {
-	print "  <void/>\n";
-    }
-    print "  </funcprototype></funcsynopsis>\n";
-    print "</refsynopsisdiv>\n";
-
-    # print parameters
-    print "<refsect1>\n <title>Arguments</title>\n";
-    if ($#{$args{'parameterlist'}} >= 0) {
-	print " <variablelist>\n";
-	foreach $parameter (@{$args{'parameterlist'}}) {
-	    my $parameter_name = $parameter;
-	    $parameter_name =~ s/\[.*//;
-	    $type = $args{'parametertypes'}{$parameter};
-
-	    print "  <varlistentry>\n   <term><parameter>$type $parameter</parameter></term>\n";
-	    print "   <listitem>\n    <para>\n";
-	    $lineprefix="     ";
-	    output_highlight($args{'parameterdescs'}{$parameter_name});
-	    print "    </para>\n   </listitem>\n  </varlistentry>\n";
-	}
-	print " </variablelist>\n";
-    } else {
-	print " <para>\n  None\n </para>\n";
-    }
-    print "</refsect1>\n";
-
-    output_section_xml(@_);
-    print "</refentry>\n\n";
-}
-
-# output struct in XML DocBook
-sub output_struct_xml(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $id;
-
-    $id = "API-struct-" . $args{'struct'};
-    $id =~ s/[^A-Za-z0-9]/-/g;
-
-    print "<refentry id=\"$id\">\n";
-    print "<refentryinfo>\n";
-    print " <title>LINUX</title>\n";
-    print " <productname>Kernel Hackers Manual</productname>\n";
-    print " <date>$man_date</date>\n";
-    print "</refentryinfo>\n";
-    print "<refmeta>\n";
-    print " <refentrytitle><phrase>" . $args{'type'} . " " . $args{'struct'} . "</phrase></refentrytitle>\n";
-    print " <manvolnum>9</manvolnum>\n";
-    print " <refmiscinfo class=\"version\">" . $kernelversion . "</refmiscinfo>\n";
-    print "</refmeta>\n";
-    print "<refnamediv>\n";
-    print " <refname>" . $args{'type'} . " " . $args{'struct'} . "</refname>\n";
-    print " <refpurpose>\n";
-    print "  ";
-    output_highlight ($args{'purpose'});
-    print " </refpurpose>\n";
-    print "</refnamediv>\n";
-
-    print "<refsynopsisdiv>\n";
-    print " <title>Synopsis</title>\n";
-    print "  <programlisting>\n";
-    print $args{'type'} . " " . $args{'struct'} . " {\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	if ($parameter =~ /^#/) {
-	    my $prm = $parameter;
-	    # convert data read & converted thru xml_escape() into &xyz; format:
-	    # This allows us to have #define macros interspersed in a struct.
-	    $prm =~ s/\\\\\\/\&/g;
-	    print "$prm\n";
-	    next;
-	}
-
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	defined($args{'parameterdescs'}{$parameter_name}) || next;
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	$type = $args{'parametertypes'}{$parameter};
-	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-	    # pointer-to-function
-	    print "  $1 $parameter) ($2);\n";
-	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
-	    # bitfield
-	    print "  $1 $parameter$2;\n";
-	} else {
-	    print "  " . $type . " " . $parameter . ";\n";
-	}
-    }
-    print "};";
-    print "  </programlisting>\n";
-    print "</refsynopsisdiv>\n";
-
-    print " <refsect1>\n";
-    print "  <title>Members</title>\n";
-
-    if ($#{$args{'parameterlist'}} >= 0) {
-    print "  <variablelist>\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-      ($parameter =~ /^#/) && next;
-
-      my $parameter_name = $parameter;
-      $parameter_name =~ s/\[.*//;
-
-      defined($args{'parameterdescs'}{$parameter_name}) || next;
-      ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-      $type = $args{'parametertypes'}{$parameter};
-      print "    <varlistentry>";
-      print "      <term><literal>$type $parameter</literal></term>\n";
-      print "      <listitem><para>\n";
-      output_highlight($args{'parameterdescs'}{$parameter_name});
-      print "      </para></listitem>\n";
-      print "    </varlistentry>\n";
-    }
-    print "  </variablelist>\n";
-    } else {
-	print " <para>\n  None\n </para>\n";
-    }
-    print " </refsect1>\n";
-
-    output_section_xml(@_);
-
-    print "</refentry>\n\n";
-}
-
-# output enum in XML DocBook
-sub output_enum_xml(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $count;
-    my $id;
-
-    $id = "API-enum-" . $args{'enum'};
-    $id =~ s/[^A-Za-z0-9]/-/g;
-
-    print "<refentry id=\"$id\">\n";
-    print "<refentryinfo>\n";
-    print " <title>LINUX</title>\n";
-    print " <productname>Kernel Hackers Manual</productname>\n";
-    print " <date>$man_date</date>\n";
-    print "</refentryinfo>\n";
-    print "<refmeta>\n";
-    print " <refentrytitle><phrase>enum " . $args{'enum'} . "</phrase></refentrytitle>\n";
-    print " <manvolnum>9</manvolnum>\n";
-    print " <refmiscinfo class=\"version\">" . $kernelversion . "</refmiscinfo>\n";
-    print "</refmeta>\n";
-    print "<refnamediv>\n";
-    print " <refname>enum " . $args{'enum'} . "</refname>\n";
-    print " <refpurpose>\n";
-    print "  ";
-    output_highlight ($args{'purpose'});
-    print " </refpurpose>\n";
-    print "</refnamediv>\n";
-
-    print "<refsynopsisdiv>\n";
-    print " <title>Synopsis</title>\n";
-    print "  <programlisting>\n";
-    print "enum " . $args{'enum'} . " {\n";
-    $count = 0;
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	print "  $parameter";
-	if ($count != $#{$args{'parameterlist'}}) {
-	    $count++;
-	    print ",";
-	}
-	print "\n";
-    }
-    print "};";
-    print "  </programlisting>\n";
-    print "</refsynopsisdiv>\n";
-
-    print "<refsect1>\n";
-    print " <title>Constants</title>\n";
-    print "  <variablelist>\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-      my $parameter_name = $parameter;
-      $parameter_name =~ s/\[.*//;
-
-      print "    <varlistentry>";
-      print "      <term>$parameter</term>\n";
-      print "      <listitem><para>\n";
-      output_highlight($args{'parameterdescs'}{$parameter_name});
-      print "      </para></listitem>\n";
-      print "    </varlistentry>\n";
-    }
-    print "  </variablelist>\n";
-    print "</refsect1>\n";
-
-    output_section_xml(@_);
-
-    print "</refentry>\n\n";
-}
-
-# output typedef in XML DocBook
-sub output_typedef_xml(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $id;
-
-    $id = "API-typedef-" . $args{'typedef'};
-    $id =~ s/[^A-Za-z0-9]/-/g;
-
-    print "<refentry id=\"$id\">\n";
-    print "<refentryinfo>\n";
-    print " <title>LINUX</title>\n";
-    print " <productname>Kernel Hackers Manual</productname>\n";
-    print " <date>$man_date</date>\n";
-    print "</refentryinfo>\n";
-    print "<refmeta>\n";
-    print " <refentrytitle><phrase>typedef " . $args{'typedef'} . "</phrase></refentrytitle>\n";
-    print " <manvolnum>9</manvolnum>\n";
-    print "</refmeta>\n";
-    print "<refnamediv>\n";
-    print " <refname>typedef " . $args{'typedef'} . "</refname>\n";
-    print " <refpurpose>\n";
-    print "  ";
-    output_highlight ($args{'purpose'});
-    print " </refpurpose>\n";
-    print "</refnamediv>\n";
-
-    print "<refsynopsisdiv>\n";
-    print " <title>Synopsis</title>\n";
-    print "  <synopsis>typedef " . $args{'typedef'} . ";</synopsis>\n";
-    print "</refsynopsisdiv>\n";
-
-    output_section_xml(@_);
-
-    print "</refentry>\n\n";
-}
-
-# output in XML DocBook
-sub output_blockhead_xml(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $count;
-
-    my $id = $args{'module'};
-    $id =~ s/[^A-Za-z0-9]/-/g;
-
-    # print out each section
-    $lineprefix="   ";
-    foreach $section (@{$args{'sectionlist'}}) {
-	if (!$args{'content-only'}) {
-		print "<refsect1>\n <title>$section</title>\n";
-	}
-	if ($section =~ m/EXAMPLE/i) {
-	    print "<example><para>\n";
-	    $output_preformatted = 1;
-	} else {
-	    print "<para>\n";
-	}
-	output_highlight($args{'sections'}{$section});
-	$output_preformatted = 0;
-	if ($section =~ m/EXAMPLE/i) {
-	    print "</para></example>\n";
-	} else {
-	    print "</para>";
-	}
-	if (!$args{'content-only'}) {
-		print "\n</refsect1>\n";
-	}
-    }
-
-    print "\n\n";
-}
-
-# output in XML DocBook
-sub output_function_gnome {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $count;
-    my $id;
-
-    $id = $args{'module'} . "-" . $args{'function'};
-    $id =~ s/[^A-Za-z0-9]/-/g;
-
-    print "<sect2>\n";
-    print " <title id=\"$id\">" . $args{'function'} . "</title>\n";
-
-    print "  <funcsynopsis>\n";
-    print "   <funcdef>" . $args{'functiontype'} . " ";
-    print "<function>" . $args{'function'} . " ";
-    print "</function></funcdef>\n";
-
-    $count = 0;
-    if ($#{$args{'parameterlist'}} >= 0) {
-	foreach $parameter (@{$args{'parameterlist'}}) {
-	    $type = $args{'parametertypes'}{$parameter};
-	    if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-		# pointer-to-function
-		print "   <paramdef>$1 <parameter>$parameter</parameter>)\n";
-		print "     <funcparams>$2</funcparams></paramdef>\n";
-	    } else {
-		print "   <paramdef>" . $type;
-		print " <parameter>$parameter</parameter></paramdef>\n";
-	    }
-	}
-    } else {
-	print "  <void>\n";
-    }
-    print "  </funcsynopsis>\n";
-    if ($#{$args{'parameterlist'}} >= 0) {
-	print " <informaltable pgwide=\"1\" frame=\"none\" role=\"params\">\n";
-	print "<tgroup cols=\"2\">\n";
-	print "<colspec colwidth=\"2*\">\n";
-	print "<colspec colwidth=\"8*\">\n";
-	print "<tbody>\n";
-	foreach $parameter (@{$args{'parameterlist'}}) {
-	    my $parameter_name = $parameter;
-	    $parameter_name =~ s/\[.*//;
-
-	    print "  <row><entry align=\"right\"><parameter>$parameter</parameter></entry>\n";
-	    print "   <entry>\n";
-	    $lineprefix="     ";
-	    output_highlight($args{'parameterdescs'}{$parameter_name});
-	    print "    </entry></row>\n";
-	}
-	print " </tbody></tgroup></informaltable>\n";
-    } else {
-	print " <para>\n  None\n </para>\n";
-    }
-
-    # print out each section
-    $lineprefix="   ";
-    foreach $section (@{$args{'sectionlist'}}) {
-	print "<simplesect>\n <title>$section</title>\n";
-	if ($section =~ m/EXAMPLE/i) {
-	    print "<example><programlisting>\n";
-	    $output_preformatted = 1;
-	} else {
-	}
-	print "<para>\n";
-	output_highlight($args{'sections'}{$section});
-	$output_preformatted = 0;
-	print "</para>\n";
-	if ($section =~ m/EXAMPLE/i) {
-	    print "</programlisting></example>\n";
-	} else {
-	}
-	print " </simplesect>\n";
-    }
-
-    print "</sect2>\n\n";
-}
-
 ##
 # output function in man
 sub output_function_man(%) {
@@ -1692,161 +738,6 @@ sub output_blockhead_man(%) {
 }
 
 ##
-# output in text
-sub output_function_text(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-    my $start;
-
-    print "Name:\n\n";
-    print $args{'function'} . " - " . $args{'purpose'} . "\n";
-
-    print "\nSynopsis:\n\n";
-    if ($args{'functiontype'} ne "") {
-	$start = $args{'functiontype'} . " " . $args{'function'} . " (";
-    } else {
-	$start = $args{'function'} . " (";
-    }
-    print $start;
-
-    my $count = 0;
-    foreach my $parameter (@{$args{'parameterlist'}}) {
-	$type = $args{'parametertypes'}{$parameter};
-	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-	    # pointer-to-function
-	    print $1 . $parameter . ") (" . $2;
-	} else {
-	    print $type . " " . $parameter;
-	}
-	if ($count != $#{$args{'parameterlist'}}) {
-	    $count++;
-	    print ",\n";
-	    print " " x length($start);
-	} else {
-	    print ");\n\n";
-	}
-    }
-
-    print "Arguments:\n\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	print $parameter . "\n\t" . $args{'parameterdescs'}{$parameter_name} . "\n";
-    }
-    output_section_text(@_);
-}
-
-#output sections in text
-sub output_section_text(%) {
-    my %args = %{$_[0]};
-    my $section;
-
-    print "\n";
-    foreach $section (@{$args{'sectionlist'}}) {
-	print "$section:\n\n";
-	output_highlight($args{'sections'}{$section});
-    }
-    print "\n\n";
-}
-
-# output enum in text
-sub output_enum_text(%) {
-    my %args = %{$_[0]};
-    my ($parameter);
-    my $count;
-    print "Enum:\n\n";
-
-    print "enum " . $args{'enum'} . " - " . $args{'purpose'} . "\n\n";
-    print "enum " . $args{'enum'} . " {\n";
-    $count = 0;
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	print "\t$parameter";
-	if ($count != $#{$args{'parameterlist'}}) {
-	    $count++;
-	    print ",";
-	}
-	print "\n";
-    }
-    print "};\n\n";
-
-    print "Constants:\n\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	print "$parameter\n\t";
-	print $args{'parameterdescs'}{$parameter} . "\n";
-    }
-
-    output_section_text(@_);
-}
-
-# output typedef in text
-sub output_typedef_text(%) {
-    my %args = %{$_[0]};
-    my ($parameter);
-    my $count;
-    print "Typedef:\n\n";
-
-    print "typedef " . $args{'typedef'} . " - " . $args{'purpose'} . "\n";
-    output_section_text(@_);
-}
-
-# output struct as text
-sub output_struct_text(%) {
-    my %args = %{$_[0]};
-    my ($parameter);
-
-    print $args{'type'} . " " . $args{'struct'} . " - " . $args{'purpose'} . "\n\n";
-    print $args{'type'} . " " . $args{'struct'} . " {\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	if ($parameter =~ /^#/) {
-	    print "$parameter\n";
-	    next;
-	}
-
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	$type = $args{'parametertypes'}{$parameter};
-	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-	    # pointer-to-function
-	    print "\t$1 $parameter) ($2);\n";
-	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
-	    # bitfield
-	    print "\t$1 $parameter$2;\n";
-	} else {
-	    print "\t" . $type . " " . $parameter . ";\n";
-	}
-    }
-    print "};\n\n";
-
-    print "Members:\n\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	($parameter =~ /^#/) && next;
-
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	print "$parameter\n\t";
-	print $args{'parameterdescs'}{$parameter_name} . "\n";
-    }
-    print "\n";
-    output_section_text(@_);
-}
-
-sub output_blockhead_text(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-
-    foreach $section (@{$args{'sectionlist'}}) {
-	print " $section:\n";
-	print "    -> ";
-	output_highlight($args{'sections'}{$section});
-    }
-}
-
-##
 # output in restructured text
 #
 
@@ -2080,43 +971,6 @@ sub output_struct_rst(%) {
     output_section_rst(@_);
 }
 
-
-## list mode output functions
-
-sub output_function_list(%) {
-    my %args = %{$_[0]};
-
-    print $args{'function'} . "\n";
-}
-
-# output enum in list
-sub output_enum_list(%) {
-    my %args = %{$_[0]};
-    print $args{'enum'} . "\n";
-}
-
-# output typedef in list
-sub output_typedef_list(%) {
-    my %args = %{$_[0]};
-    print $args{'typedef'} . "\n";
-}
-
-# output struct as list
-sub output_struct_list(%) {
-    my %args = %{$_[0]};
-
-    print $args{'struct'} . "\n";
-}
-
-sub output_blockhead_list(%) {
-    my %args = %{$_[0]};
-    my ($parameter, $section);
-
-    foreach $section (@{$args{'sectionlist'}}) {
-	print "DOC: $section\n";
-    }
-}
-
 ##
 # generic output function for all types (function, struct/union, typedef, enum);
 # calls the generated, variable output_ function name based on
@@ -2795,7 +1649,7 @@ sub process_proto_type($$) {
 # just before actual output; (this is done by local_unescape())
 sub xml_escape($) {
 	my $text = shift;
-	if (($output_mode eq "text") || ($output_mode eq "man")) {
+	if ($output_mode eq "man") {
 		return $text;
 	}
 	$text =~ s/\&/\\\\\\amp;/g;
@@ -2807,7 +1661,7 @@ sub xml_escape($) {
 # xml_unescape: reverse the effects of xml_escape
 sub xml_unescape($) {
 	my $text = shift;
-	if (($output_mode eq "text") || ($output_mode eq "man")) {
+	if ($output_mode eq "man") {
 		return $text;
 	}
 	$text =~ s/\\\\\\amp;/\&/g;
@@ -2820,7 +1674,7 @@ sub xml_unescape($) {
 # local escape strings look like:  '\\\\menmonic:' (that's 4 backslashes)
 sub local_unescape($) {
 	my $text = shift;
-	if (($output_mode eq "text") || ($output_mode eq "man")) {
+	if ($output_mode eq "man") {
 		return $text;
 	}
 	$text =~ s/\\\\\\\\lt:/</g;
@@ -3140,34 +1994,6 @@ sub process_file($) {
 	if (($output_selection == OUTPUT_INCLUDE) && ($show_not_found == 1)) {
 	    print STDERR "    Was looking for '$_'.\n" for keys %function_table;
 	}
-	if ($output_mode eq "xml") {
-	    # The template wants at least one RefEntry here; make one.
-	    print "<refentry>\n";
-	    print " <refnamediv>\n";
-	    print "  <refname>\n";
-	    print "   ${orig_file}\n";
-	    print "  </refname>\n";
-	    print "  <refpurpose>\n";
-	    print "   Document generation inconsistency\n";
-	    print "  </refpurpose>\n";
-	    print " </refnamediv>\n";
-	    print " <refsect1>\n";
-	    print "  <title>\n";
-	    print "   Oops\n";
-	    print "  </title>\n";
-	    print "  <warning>\n";
-	    print "   <para>\n";
-	    print "    The template for this document tried to insert\n";
-	    print "    the structured comment from the file\n";
-	    print "    <filename>${orig_file}</filename> at this point,\n";
-	    print "    but none was found.\n";
-	    print "    This dummy section is inserted to allow\n";
-	    print "    generation to continue.\n";
-	    print "   </para>\n";
-	    print "  </warning>\n";
-	    print " </refsect1>\n";
-	    print "</refentry>\n";
-	}
     }
 }
 
-- 
2.13.5

Re: [PATCH 01/10] scripts: kernel-doc: get rid of unused output formats

[Jani Nikula]

On Tue, 26 Sep 2017, Mauro Carvalho Chehab <mchehab@s-opensource.com> wrote:
> Since there isn't any docbook code anymore upstream,
> we can get rid of several output formats:
>
> - docbook/xml, html, html5 and list formats were used by
>   the old build system;
> - As ReST is text, there's not much sense on outputting
>   on a different text format.
>
> After this patch, only man and rst output formats are
> supported.

FWIW,

Acked-by: Jani Nikula <jani.nikula@intel.com>

Please do keep at least two output formats going forward. Otherwise the
mechanisms of having more than one output format will bitrot and get
conflated into the one output format.


>
> Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
> ---
>  scripts/kernel-doc | 1182 +---------------------------------------------------
>  1 file changed, 4 insertions(+), 1178 deletions(-)
>
> diff --git a/scripts/kernel-doc b/scripts/kernel-doc
> index 9d3eafea58f0..69757ee9db4c 100755
> --- a/scripts/kernel-doc
> +++ b/scripts/kernel-doc
> @@ -51,13 +51,8 @@ The documentation comments are identified by "/**" opening comment mark. See
>  Documentation/kernel-doc-nano-HOWTO.txt for the documentation comment syntax.
>  
>  Output format selection (mutually exclusive):
> -  -docbook		Output DocBook format.
> -  -html			Output HTML format.
> -  -html5		Output HTML5 format.
> -  -list			Output symbol list format. This is for use by docproc.
>    -man			Output troff manual page format. This is the default.
>    -rst			Output reStructuredText format.
> -  -text			Output plain text format.
>  
>  Output selection (mutually exclusive):
>    -export		Only output documentation for symbols that have been
> @@ -224,84 +219,11 @@ my $type_typedef = '\&(typedef\s*([_\w]+))';
>  my $type_union = '\&(union\s*([_\w]+))';
>  my $type_member = '\&([_\w]+)(\.|->)([_\w]+)';
>  my $type_fallback = '\&([_\w]+)';
> -my $type_enum_xml = '\&amp;(enum\s*([_\w]+))';
> -my $type_struct_xml = '\&amp;(struct\s*([_\w]+))';
> -my $type_typedef_xml = '\&amp;(typedef\s*([_\w]+))';
> -my $type_union_xml = '\&amp;(union\s*([_\w]+))';
> -my $type_member_xml = '\&amp;([_\w]+)(\.|-\&gt;)([_\w]+)';
> -my $type_fallback_xml = '\&amp([_\w]+)';
>  my $type_member_func = $type_member . '\(\)';
>  
>  # Output conversion substitutions.
>  #  One for each output format
>  
> -# these work fairly well
> -my @highlights_html = (
> -                       [$type_constant, "<i>\$1</i>"],
> -                       [$type_constant2, "<i>\$1</i>"],
> -                       [$type_func, "<b>\$1</b>"],
> -                       [$type_enum_xml, "<i>\$1</i>"],
> -                       [$type_struct_xml, "<i>\$1</i>"],
> -                       [$type_typedef_xml, "<i>\$1</i>"],
> -                       [$type_union_xml, "<i>\$1</i>"],
> -                       [$type_env, "<b><i>\$1</i></b>"],
> -                       [$type_param, "<tt><b>\$1</b></tt>"],
> -                       [$type_member_xml, "<tt><i>\$1</i>\$2\$3</tt>"],
> -                       [$type_fallback_xml, "<i>\$1</i>"]
> -                      );
> -my $local_lt = "\\\\\\\\lt:";
> -my $local_gt = "\\\\\\\\gt:";
> -my $blankline_html = $local_lt . "p" . $local_gt;	# was "<p>"
> -
> -# html version 5
> -my @highlights_html5 = (
> -                        [$type_constant, "<span class=\"const\">\$1</span>"],
> -                        [$type_constant2, "<span class=\"const\">\$1</span>"],
> -                        [$type_func, "<span class=\"func\">\$1</span>"],
> -                        [$type_enum_xml, "<span class=\"enum\">\$1</span>"],
> -                        [$type_struct_xml, "<span class=\"struct\">\$1</span>"],
> -                        [$type_typedef_xml, "<span class=\"typedef\">\$1</span>"],
> -                        [$type_union_xml, "<span class=\"union\">\$1</span>"],
> -                        [$type_env, "<span class=\"env\">\$1</span>"],
> -                        [$type_param, "<span class=\"param\">\$1</span>]"],
> -                        [$type_member_xml, "<span class=\"literal\"><span class=\"struct\">\$1</span>\$2<span class=\"member\">\$3</span></span>"],
> -                        [$type_fallback_xml, "<span class=\"struct\">\$1</span>"]
> -		       );
> -my $blankline_html5 = $local_lt . "br /" . $local_gt;
> -
> -# XML, docbook format
> -my @highlights_xml = (
> -                      ["([^=])\\\"([^\\\"<]+)\\\"", "\$1<quote>\$2</quote>"],
> -                      [$type_constant, "<constant>\$1</constant>"],
> -                      [$type_constant2, "<constant>\$1</constant>"],
> -                      [$type_enum_xml, "<type>\$1</type>"],
> -                      [$type_struct_xml, "<structname>\$1</structname>"],
> -                      [$type_typedef_xml, "<type>\$1</type>"],
> -                      [$type_union_xml, "<structname>\$1</structname>"],
> -                      [$type_param, "<parameter>\$1</parameter>"],
> -                      [$type_func, "<function>\$1</function>"],
> -                      [$type_env, "<envar>\$1</envar>"],
> -                      [$type_member_xml, "<literal><structname>\$1</structname>\$2<structfield>\$3</structfield></literal>"],
> -                      [$type_fallback_xml, "<structname>\$1</structname>"]
> -		     );
> -my $blankline_xml = $local_lt . "/para" . $local_gt . $local_lt . "para" . $local_gt . "\n";
> -
> -# gnome, docbook format
> -my @highlights_gnome = (
> -                        [$type_constant, "<replaceable class=\"option\">\$1</replaceable>"],
> -                        [$type_constant2, "<replaceable class=\"option\">\$1</replaceable>"],
> -                        [$type_func, "<function>\$1</function>"],
> -                        [$type_enum, "<type>\$1</type>"],
> -                        [$type_struct, "<structname>\$1</structname>"],
> -                        [$type_typedef, "<type>\$1</type>"],
> -                        [$type_union, "<structname>\$1</structname>"],
> -                        [$type_env, "<envar>\$1</envar>"],
> -                        [$type_param, "<parameter>\$1</parameter>" ],
> -                        [$type_member, "<literal><structname>\$1</structname>\$2<structfield>\$3</structfield></literal>"],
> -                        [$type_fallback, "<structname>\$1</structname>"]
> -		       );
> -my $blankline_gnome = "</para><para>\n";
> -
>  # these are pretty rough
>  my @highlights_man = (
>                        [$type_constant, "\$1"],
> @@ -317,21 +239,6 @@ my @highlights_man = (
>  		     );
>  my $blankline_man = "";
>  
> -# text-mode
> -my @highlights_text = (
> -                       [$type_constant, "\$1"],
> -                       [$type_constant2, "\$1"],
> -                       [$type_func, "\$1"],
> -                       [$type_enum, "\$1"],
> -                       [$type_struct, "\$1"],
> -                       [$type_typedef, "\$1"],
> -                       [$type_union, "\$1"],
> -                       [$type_param, "\$1"],
> -                       [$type_member, "\$1\$2\$3"],
> -                       [$type_fallback, "\$1"]
> -		      );
> -my $blankline_text = "";
> -
>  # rst-mode
>  my @highlights_rst = (
>                         [$type_constant, "``\$1``"],
> @@ -351,21 +258,6 @@ my @highlights_rst = (
>  		      );
>  my $blankline_rst = "\n";
>  
> -# list mode
> -my @highlights_list = (
> -                       [$type_constant, "\$1"],
> -                       [$type_constant2, "\$1"],
> -                       [$type_func, "\$1"],
> -                       [$type_enum, "\$1"],
> -                       [$type_struct, "\$1"],
> -                       [$type_typedef, "\$1"],
> -                       [$type_union, "\$1"],
> -                       [$type_param, "\$1"],
> -                       [$type_member, "\$1"],
> -                       [$type_fallback, "\$1"]
> -		      );
> -my $blankline_list = "";
> -
>  # read arguments
>  if ($#ARGV == -1) {
>      usage();
> @@ -500,38 +392,14 @@ reset_state();
>  
>  while ($ARGV[0] =~ m/^-(.*)/) {
>      my $cmd = shift @ARGV;
> -    if ($cmd eq "-html") {
> -	$output_mode = "html";
> -	@highlights = @highlights_html;
> -	$blankline = $blankline_html;
> -    } elsif ($cmd eq "-html5") {
> -	$output_mode = "html5";
> -	@highlights = @highlights_html5;
> -	$blankline = $blankline_html5;
> -    } elsif ($cmd eq "-man") {
> +    if ($cmd eq "-man") {
>  	$output_mode = "man";
>  	@highlights = @highlights_man;
>  	$blankline = $blankline_man;
> -    } elsif ($cmd eq "-text") {
> -	$output_mode = "text";
> -	@highlights = @highlights_text;
> -	$blankline = $blankline_text;
>      } elsif ($cmd eq "-rst") {
>  	$output_mode = "rst";
>  	@highlights = @highlights_rst;
>  	$blankline = $blankline_rst;
> -    } elsif ($cmd eq "-docbook") {
> -	$output_mode = "xml";
> -	@highlights = @highlights_xml;
> -	$blankline = $blankline_xml;
> -    } elsif ($cmd eq "-list") {
> -	$output_mode = "list";
> -	@highlights = @highlights_list;
> -	$blankline = $blankline_list;
> -    } elsif ($cmd eq "-gnome") {
> -	$output_mode = "gnome";
> -	@highlights = @highlights_gnome;
> -	$blankline = $blankline_gnome;
>      } elsif ($cmd eq "-module") { # not needed for XML, inherits from calling document
>  	$modulename = shift @ARGV;
>      } elsif ($cmd eq "-function") { # to only output specific functions
> @@ -667,22 +535,11 @@ sub output_highlight {
>  #	confess "output_highlight got called with no args?\n";
>  #   }
>  
> -    if ($output_mode eq "html" || $output_mode eq "html5" ||
> -	$output_mode eq "xml") {
> -	$contents = local_unescape($contents);
> -	# convert data read & converted thru xml_escape() into &xyz; format:
> -	$contents =~ s/\\\\\\/\&/g;
> -    }
>  #   print STDERR "contents b4:$contents\n";
>      eval $dohighlight;
>      die $@ if $@;
>  #   print STDERR "contents af:$contents\n";
>  
> -#   strip whitespaces when generating html5
> -    if ($output_mode eq "html5") {
> -	$contents =~ s/^\s+//;
> -	$contents =~ s/\s+$//;
> -    }
>      foreach $line (split "\n", $contents) {
>  	if (! $output_preformatted) {
>  	    $line =~ s/^\s*//;
> @@ -703,817 +560,6 @@ sub output_highlight {
>      }
>  }
>  
> -# output sections in html
> -sub output_section_html(%) {
> -    my %args = %{$_[0]};
> -    my $section;
> -
> -    foreach $section (@{$args{'sectionlist'}}) {
> -	print "<h3>$section</h3>\n";
> -	print "<blockquote>\n";
> -	output_highlight($args{'sections'}{$section});
> -	print "</blockquote>\n";
> -    }
> -}
> -
> -# output enum in html
> -sub output_enum_html(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter);
> -    my $count;
> -    print "<h2>enum " . $args{'enum'} . "</h2>\n";
> -
> -    print "<b>enum " . $args{'enum'} . "</b> {<br>\n";
> -    $count = 0;
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	print " <b>" . $parameter . "</b>";
> -	if ($count != $#{$args{'parameterlist'}}) {
> -	    $count++;
> -	    print ",\n";
> -	}
> -	print "<br>";
> -    }
> -    print "};<br>\n";
> -
> -    print "<h3>Constants</h3>\n";
> -    print "<dl>\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	print "<dt><b>" . $parameter . "</b>\n";
> -	print "<dd>";
> -	output_highlight($args{'parameterdescs'}{$parameter});
> -    }
> -    print "</dl>\n";
> -    output_section_html(@_);
> -    print "<hr>\n";
> -}
> -
> -# output typedef in html
> -sub output_typedef_html(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter);
> -    my $count;
> -    print "<h2>typedef " . $args{'typedef'} . "</h2>\n";
> -
> -    print "<b>typedef " . $args{'typedef'} . "</b>\n";
> -    output_section_html(@_);
> -    print "<hr>\n";
> -}
> -
> -# output struct in html
> -sub output_struct_html(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter);
> -
> -    print "<h2>" . $args{'type'} . " " . $args{'struct'} . " - " . $args{'purpose'} . "</h2>\n";
> -    print "<b>" . $args{'type'} . " " . $args{'struct'} . "</b> {<br>\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	if ($parameter =~ /^#/) {
> -		print "$parameter<br>\n";
> -		next;
> -	}
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	$type = $args{'parametertypes'}{$parameter};
> -	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -	    # pointer-to-function
> -	    print "&nbsp; &nbsp; <i>$1</i><b>$parameter</b>) <i>($2)</i>;<br>\n";
> -	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
> -	    # bitfield
> -	    print "&nbsp; &nbsp; <i>$1</i> <b>$parameter</b>$2;<br>\n";
> -	} else {
> -	    print "&nbsp; &nbsp; <i>$type</i> <b>$parameter</b>;<br>\n";
> -	}
> -    }
> -    print "};<br>\n";
> -
> -    print "<h3>Members</h3>\n";
> -    print "<dl>\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	($parameter =~ /^#/) && next;
> -
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	print "<dt><b>" . $parameter . "</b>\n";
> -	print "<dd>";
> -	output_highlight($args{'parameterdescs'}{$parameter_name});
> -    }
> -    print "</dl>\n";
> -    output_section_html(@_);
> -    print "<hr>\n";
> -}
> -
> -# output function in html
> -sub output_function_html(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $count;
> -
> -    print "<h2>" . $args{'function'} . " - " . $args{'purpose'} . "</h2>\n";
> -    print "<i>" . $args{'functiontype'} . "</i>\n";
> -    print "<b>" . $args{'function'} . "</b>\n";
> -    print "(";
> -    $count = 0;
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	$type = $args{'parametertypes'}{$parameter};
> -	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -	    # pointer-to-function
> -	    print "<i>$1</i><b>$parameter</b>) <i>($2)</i>";
> -	} else {
> -	    print "<i>" . $type . "</i> <b>" . $parameter . "</b>";
> -	}
> -	if ($count != $#{$args{'parameterlist'}}) {
> -	    $count++;
> -	    print ",\n";
> -	}
> -    }
> -    print ")\n";
> -
> -    print "<h3>Arguments</h3>\n";
> -    print "<dl>\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	print "<dt><b>" . $parameter . "</b>\n";
> -	print "<dd>";
> -	output_highlight($args{'parameterdescs'}{$parameter_name});
> -    }
> -    print "</dl>\n";
> -    output_section_html(@_);
> -    print "<hr>\n";
> -}
> -
> -# output DOC: block header in html
> -sub output_blockhead_html(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $count;
> -
> -    foreach $section (@{$args{'sectionlist'}}) {
> -	print "<h3>$section</h3>\n";
> -	print "<ul>\n";
> -	output_highlight($args{'sections'}{$section});
> -	print "</ul>\n";
> -    }
> -    print "<hr>\n";
> -}
> -
> -# output sections in html5
> -sub output_section_html5(%) {
> -    my %args = %{$_[0]};
> -    my $section;
> -
> -    foreach $section (@{$args{'sectionlist'}}) {
> -	print "<section>\n";
> -	print "<h1>$section</h1>\n";
> -	print "<p>\n";
> -	output_highlight($args{'sections'}{$section});
> -	print "</p>\n";
> -	print "</section>\n";
> -    }
> -}
> -
> -# output enum in html5
> -sub output_enum_html5(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter);
> -    my $count;
> -    my $html5id;
> -
> -    $html5id = $args{'enum'};
> -    $html5id =~ s/[^a-zA-Z0-9\-]+/_/g;
> -    print "<article class=\"enum\" id=\"enum:". $html5id . "\">";
> -    print "<h1>enum " . $args{'enum'} . "</h1>\n";
> -    print "<ol class=\"code\">\n";
> -    print "<li>";
> -    print "<span class=\"keyword\">enum</span> ";
> -    print "<span class=\"identifier\">" . $args{'enum'} . "</span> {";
> -    print "</li>\n";
> -    $count = 0;
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	print "<li class=\"indent\">";
> -	print "<span class=\"param\">" . $parameter . "</span>";
> -	if ($count != $#{$args{'parameterlist'}}) {
> -	    $count++;
> -	    print ",";
> -	}
> -	print "</li>\n";
> -    }
> -    print "<li>};</li>\n";
> -    print "</ol>\n";
> -
> -    print "<section>\n";
> -    print "<h1>Constants</h1>\n";
> -    print "<dl>\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	print "<dt>" . $parameter . "</dt>\n";
> -	print "<dd>";
> -	output_highlight($args{'parameterdescs'}{$parameter});
> -	print "</dd>\n";
> -    }
> -    print "</dl>\n";
> -    print "</section>\n";
> -    output_section_html5(@_);
> -    print "</article>\n";
> -}
> -
> -# output typedef in html5
> -sub output_typedef_html5(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter);
> -    my $count;
> -    my $html5id;
> -
> -    $html5id = $args{'typedef'};
> -    $html5id =~ s/[^a-zA-Z0-9\-]+/_/g;
> -    print "<article class=\"typedef\" id=\"typedef:" . $html5id . "\">\n";
> -    print "<h1>typedef " . $args{'typedef'} . "</h1>\n";
> -
> -    print "<ol class=\"code\">\n";
> -    print "<li>";
> -    print "<span class=\"keyword\">typedef</span> ";
> -    print "<span class=\"identifier\">" . $args{'typedef'} . "</span>";
> -    print "</li>\n";
> -    print "</ol>\n";
> -    output_section_html5(@_);
> -    print "</article>\n";
> -}
> -
> -# output struct in html5
> -sub output_struct_html5(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter);
> -    my $html5id;
> -
> -    $html5id = $args{'struct'};
> -    $html5id =~ s/[^a-zA-Z0-9\-]+/_/g;
> -    print "<article class=\"struct\" id=\"struct:" . $html5id . "\">\n";
> -    print "<hgroup>\n";
> -    print "<h1>" . $args{'type'} . " " . $args{'struct'} . "</h1>";
> -    print "<h2>". $args{'purpose'} . "</h2>\n";
> -    print "</hgroup>\n";
> -    print "<ol class=\"code\">\n";
> -    print "<li>";
> -    print "<span class=\"type\">" . $args{'type'} . "</span> ";
> -    print "<span class=\"identifier\">" . $args{'struct'} . "</span> {";
> -    print "</li>\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	print "<li class=\"indent\">";
> -	if ($parameter =~ /^#/) {
> -		print "<span class=\"param\">" . $parameter ."</span>\n";
> -		print "</li>\n";
> -		next;
> -	}
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	$type = $args{'parametertypes'}{$parameter};
> -	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -	    # pointer-to-function
> -	    print "<span class=\"type\">$1</span> ";
> -	    print "<span class=\"param\">$parameter</span>";
> -	    print "<span class=\"type\">)</span> ";
> -	    print "(<span class=\"args\">$2</span>);";
> -	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
> -	    # bitfield
> -	    print "<span class=\"type\">$1</span> ";
> -	    print "<span class=\"param\">$parameter</span>";
> -	    print "<span class=\"bits\">$2</span>;";
> -	} else {
> -	    print "<span class=\"type\">$type</span> ";
> -	    print "<span class=\"param\">$parameter</span>;";
> -	}
> -	print "</li>\n";
> -    }
> -    print "<li>};</li>\n";
> -    print "</ol>\n";
> -
> -    print "<section>\n";
> -    print "<h1>Members</h1>\n";
> -    print "<dl>\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	($parameter =~ /^#/) && next;
> -
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	print "<dt>" . $parameter . "</dt>\n";
> -	print "<dd>";
> -	output_highlight($args{'parameterdescs'}{$parameter_name});
> -	print "</dd>\n";
> -    }
> -    print "</dl>\n";
> -    print "</section>\n";
> -    output_section_html5(@_);
> -    print "</article>\n";
> -}
> -
> -# output function in html5
> -sub output_function_html5(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $count;
> -    my $html5id;
> -
> -    $html5id = $args{'function'};
> -    $html5id =~ s/[^a-zA-Z0-9\-]+/_/g;
> -    print "<article class=\"function\" id=\"func:". $html5id . "\">\n";
> -    print "<hgroup>\n";
> -    print "<h1>" . $args{'function'} . "</h1>";
> -    print "<h2>" . $args{'purpose'} . "</h2>\n";
> -    print "</hgroup>\n";
> -    print "<ol class=\"code\">\n";
> -    print "<li>";
> -    print "<span class=\"type\">" . $args{'functiontype'} . "</span> ";
> -    print "<span class=\"identifier\">" . $args{'function'} . "</span> (";
> -    print "</li>";
> -    $count = 0;
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	print "<li class=\"indent\">";
> -	$type = $args{'parametertypes'}{$parameter};
> -	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -	    # pointer-to-function
> -	    print "<span class=\"type\">$1</span> ";
> -	    print "<span class=\"param\">$parameter</span>";
> -	    print "<span class=\"type\">)</span> ";
> -	    print "(<span class=\"args\">$2</span>)";
> -	} else {
> -	    print "<span class=\"type\">$type</span> ";
> -	    print "<span class=\"param\">$parameter</span>";
> -	}
> -	if ($count != $#{$args{'parameterlist'}}) {
> -	    $count++;
> -	    print ",";
> -	}
> -	print "</li>\n";
> -    }
> -    print "<li>)</li>\n";
> -    print "</ol>\n";
> -
> -    print "<section>\n";
> -    print "<h1>Arguments</h1>\n";
> -    print "<p>\n";
> -    print "<dl>\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	print "<dt>" . $parameter . "</dt>\n";
> -	print "<dd>";
> -	output_highlight($args{'parameterdescs'}{$parameter_name});
> -	print "</dd>\n";
> -    }
> -    print "</dl>\n";
> -    print "</section>\n";
> -    output_section_html5(@_);
> -    print "</article>\n";
> -}
> -
> -# output DOC: block header in html5
> -sub output_blockhead_html5(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $count;
> -    my $html5id;
> -
> -    foreach $section (@{$args{'sectionlist'}}) {
> -	$html5id = $section;
> -	$html5id =~ s/[^a-zA-Z0-9\-]+/_/g;
> -	print "<article class=\"doc\" id=\"doc:". $html5id . "\">\n";
> -	print "<h1>$section</h1>\n";
> -	print "<p>\n";
> -	output_highlight($args{'sections'}{$section});
> -	print "</p>\n";
> -    }
> -    print "</article>\n";
> -}
> -
> -sub output_section_xml(%) {
> -    my %args = %{$_[0]};
> -    my $section;
> -    # print out each section
> -    $lineprefix="   ";
> -    foreach $section (@{$args{'sectionlist'}}) {
> -	print "<refsect1>\n";
> -	print "<title>$section</title>\n";
> -	if ($section =~ m/EXAMPLE/i) {
> -	    print "<informalexample><programlisting>\n";
> -	    $output_preformatted = 1;
> -	} else {
> -	    print "<para>\n";
> -	}
> -	output_highlight($args{'sections'}{$section});
> -	$output_preformatted = 0;
> -	if ($section =~ m/EXAMPLE/i) {
> -	    print "</programlisting></informalexample>\n";
> -	} else {
> -	    print "</para>\n";
> -	}
> -	print "</refsect1>\n";
> -    }
> -}
> -
> -# output function in XML DocBook
> -sub output_function_xml(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $count;
> -    my $id;
> -
> -    $id = "API-" . $args{'function'};
> -    $id =~ s/[^A-Za-z0-9]/-/g;
> -
> -    print "<refentry id=\"$id\">\n";
> -    print "<refentryinfo>\n";
> -    print " <title>LINUX</title>\n";
> -    print " <productname>Kernel Hackers Manual</productname>\n";
> -    print " <date>$man_date</date>\n";
> -    print "</refentryinfo>\n";
> -    print "<refmeta>\n";
> -    print " <refentrytitle><phrase>" . $args{'function'} . "</phrase></refentrytitle>\n";
> -    print " <manvolnum>9</manvolnum>\n";
> -    print " <refmiscinfo class=\"version\">" . $kernelversion . "</refmiscinfo>\n";
> -    print "</refmeta>\n";
> -    print "<refnamediv>\n";
> -    print " <refname>" . $args{'function'} . "</refname>\n";
> -    print " <refpurpose>\n";
> -    print "  ";
> -    output_highlight ($args{'purpose'});
> -    print " </refpurpose>\n";
> -    print "</refnamediv>\n";
> -
> -    print "<refsynopsisdiv>\n";
> -    print " <title>Synopsis</title>\n";
> -    print "  <funcsynopsis><funcprototype>\n";
> -    print "   <funcdef>" . $args{'functiontype'} . " ";
> -    print "<function>" . $args{'function'} . " </function></funcdef>\n";
> -
> -    $count = 0;
> -    if ($#{$args{'parameterlist'}} >= 0) {
> -	foreach $parameter (@{$args{'parameterlist'}}) {
> -	    $type = $args{'parametertypes'}{$parameter};
> -	    if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -		# pointer-to-function
> -		print "   <paramdef>$1<parameter>$parameter</parameter>)\n";
> -		print "     <funcparams>$2</funcparams></paramdef>\n";
> -	    } else {
> -		print "   <paramdef>" . $type;
> -		print " <parameter>$parameter</parameter></paramdef>\n";
> -	    }
> -	}
> -    } else {
> -	print "  <void/>\n";
> -    }
> -    print "  </funcprototype></funcsynopsis>\n";
> -    print "</refsynopsisdiv>\n";
> -
> -    # print parameters
> -    print "<refsect1>\n <title>Arguments</title>\n";
> -    if ($#{$args{'parameterlist'}} >= 0) {
> -	print " <variablelist>\n";
> -	foreach $parameter (@{$args{'parameterlist'}}) {
> -	    my $parameter_name = $parameter;
> -	    $parameter_name =~ s/\[.*//;
> -	    $type = $args{'parametertypes'}{$parameter};
> -
> -	    print "  <varlistentry>\n   <term><parameter>$type $parameter</parameter></term>\n";
> -	    print "   <listitem>\n    <para>\n";
> -	    $lineprefix="     ";
> -	    output_highlight($args{'parameterdescs'}{$parameter_name});
> -	    print "    </para>\n   </listitem>\n  </varlistentry>\n";
> -	}
> -	print " </variablelist>\n";
> -    } else {
> -	print " <para>\n  None\n </para>\n";
> -    }
> -    print "</refsect1>\n";
> -
> -    output_section_xml(@_);
> -    print "</refentry>\n\n";
> -}
> -
> -# output struct in XML DocBook
> -sub output_struct_xml(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $id;
> -
> -    $id = "API-struct-" . $args{'struct'};
> -    $id =~ s/[^A-Za-z0-9]/-/g;
> -
> -    print "<refentry id=\"$id\">\n";
> -    print "<refentryinfo>\n";
> -    print " <title>LINUX</title>\n";
> -    print " <productname>Kernel Hackers Manual</productname>\n";
> -    print " <date>$man_date</date>\n";
> -    print "</refentryinfo>\n";
> -    print "<refmeta>\n";
> -    print " <refentrytitle><phrase>" . $args{'type'} . " " . $args{'struct'} . "</phrase></refentrytitle>\n";
> -    print " <manvolnum>9</manvolnum>\n";
> -    print " <refmiscinfo class=\"version\">" . $kernelversion . "</refmiscinfo>\n";
> -    print "</refmeta>\n";
> -    print "<refnamediv>\n";
> -    print " <refname>" . $args{'type'} . " " . $args{'struct'} . "</refname>\n";
> -    print " <refpurpose>\n";
> -    print "  ";
> -    output_highlight ($args{'purpose'});
> -    print " </refpurpose>\n";
> -    print "</refnamediv>\n";
> -
> -    print "<refsynopsisdiv>\n";
> -    print " <title>Synopsis</title>\n";
> -    print "  <programlisting>\n";
> -    print $args{'type'} . " " . $args{'struct'} . " {\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	if ($parameter =~ /^#/) {
> -	    my $prm = $parameter;
> -	    # convert data read & converted thru xml_escape() into &xyz; format:
> -	    # This allows us to have #define macros interspersed in a struct.
> -	    $prm =~ s/\\\\\\/\&/g;
> -	    print "$prm\n";
> -	    next;
> -	}
> -
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	defined($args{'parameterdescs'}{$parameter_name}) || next;
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	$type = $args{'parametertypes'}{$parameter};
> -	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -	    # pointer-to-function
> -	    print "  $1 $parameter) ($2);\n";
> -	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
> -	    # bitfield
> -	    print "  $1 $parameter$2;\n";
> -	} else {
> -	    print "  " . $type . " " . $parameter . ";\n";
> -	}
> -    }
> -    print "};";
> -    print "  </programlisting>\n";
> -    print "</refsynopsisdiv>\n";
> -
> -    print " <refsect1>\n";
> -    print "  <title>Members</title>\n";
> -
> -    if ($#{$args{'parameterlist'}} >= 0) {
> -    print "  <variablelist>\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -      ($parameter =~ /^#/) && next;
> -
> -      my $parameter_name = $parameter;
> -      $parameter_name =~ s/\[.*//;
> -
> -      defined($args{'parameterdescs'}{$parameter_name}) || next;
> -      ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -      $type = $args{'parametertypes'}{$parameter};
> -      print "    <varlistentry>";
> -      print "      <term><literal>$type $parameter</literal></term>\n";
> -      print "      <listitem><para>\n";
> -      output_highlight($args{'parameterdescs'}{$parameter_name});
> -      print "      </para></listitem>\n";
> -      print "    </varlistentry>\n";
> -    }
> -    print "  </variablelist>\n";
> -    } else {
> -	print " <para>\n  None\n </para>\n";
> -    }
> -    print " </refsect1>\n";
> -
> -    output_section_xml(@_);
> -
> -    print "</refentry>\n\n";
> -}
> -
> -# output enum in XML DocBook
> -sub output_enum_xml(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $count;
> -    my $id;
> -
> -    $id = "API-enum-" . $args{'enum'};
> -    $id =~ s/[^A-Za-z0-9]/-/g;
> -
> -    print "<refentry id=\"$id\">\n";
> -    print "<refentryinfo>\n";
> -    print " <title>LINUX</title>\n";
> -    print " <productname>Kernel Hackers Manual</productname>\n";
> -    print " <date>$man_date</date>\n";
> -    print "</refentryinfo>\n";
> -    print "<refmeta>\n";
> -    print " <refentrytitle><phrase>enum " . $args{'enum'} . "</phrase></refentrytitle>\n";
> -    print " <manvolnum>9</manvolnum>\n";
> -    print " <refmiscinfo class=\"version\">" . $kernelversion . "</refmiscinfo>\n";
> -    print "</refmeta>\n";
> -    print "<refnamediv>\n";
> -    print " <refname>enum " . $args{'enum'} . "</refname>\n";
> -    print " <refpurpose>\n";
> -    print "  ";
> -    output_highlight ($args{'purpose'});
> -    print " </refpurpose>\n";
> -    print "</refnamediv>\n";
> -
> -    print "<refsynopsisdiv>\n";
> -    print " <title>Synopsis</title>\n";
> -    print "  <programlisting>\n";
> -    print "enum " . $args{'enum'} . " {\n";
> -    $count = 0;
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	print "  $parameter";
> -	if ($count != $#{$args{'parameterlist'}}) {
> -	    $count++;
> -	    print ",";
> -	}
> -	print "\n";
> -    }
> -    print "};";
> -    print "  </programlisting>\n";
> -    print "</refsynopsisdiv>\n";
> -
> -    print "<refsect1>\n";
> -    print " <title>Constants</title>\n";
> -    print "  <variablelist>\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -      my $parameter_name = $parameter;
> -      $parameter_name =~ s/\[.*//;
> -
> -      print "    <varlistentry>";
> -      print "      <term>$parameter</term>\n";
> -      print "      <listitem><para>\n";
> -      output_highlight($args{'parameterdescs'}{$parameter_name});
> -      print "      </para></listitem>\n";
> -      print "    </varlistentry>\n";
> -    }
> -    print "  </variablelist>\n";
> -    print "</refsect1>\n";
> -
> -    output_section_xml(@_);
> -
> -    print "</refentry>\n\n";
> -}
> -
> -# output typedef in XML DocBook
> -sub output_typedef_xml(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $id;
> -
> -    $id = "API-typedef-" . $args{'typedef'};
> -    $id =~ s/[^A-Za-z0-9]/-/g;
> -
> -    print "<refentry id=\"$id\">\n";
> -    print "<refentryinfo>\n";
> -    print " <title>LINUX</title>\n";
> -    print " <productname>Kernel Hackers Manual</productname>\n";
> -    print " <date>$man_date</date>\n";
> -    print "</refentryinfo>\n";
> -    print "<refmeta>\n";
> -    print " <refentrytitle><phrase>typedef " . $args{'typedef'} . "</phrase></refentrytitle>\n";
> -    print " <manvolnum>9</manvolnum>\n";
> -    print "</refmeta>\n";
> -    print "<refnamediv>\n";
> -    print " <refname>typedef " . $args{'typedef'} . "</refname>\n";
> -    print " <refpurpose>\n";
> -    print "  ";
> -    output_highlight ($args{'purpose'});
> -    print " </refpurpose>\n";
> -    print "</refnamediv>\n";
> -
> -    print "<refsynopsisdiv>\n";
> -    print " <title>Synopsis</title>\n";
> -    print "  <synopsis>typedef " . $args{'typedef'} . ";</synopsis>\n";
> -    print "</refsynopsisdiv>\n";
> -
> -    output_section_xml(@_);
> -
> -    print "</refentry>\n\n";
> -}
> -
> -# output in XML DocBook
> -sub output_blockhead_xml(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $count;
> -
> -    my $id = $args{'module'};
> -    $id =~ s/[^A-Za-z0-9]/-/g;
> -
> -    # print out each section
> -    $lineprefix="   ";
> -    foreach $section (@{$args{'sectionlist'}}) {
> -	if (!$args{'content-only'}) {
> -		print "<refsect1>\n <title>$section</title>\n";
> -	}
> -	if ($section =~ m/EXAMPLE/i) {
> -	    print "<example><para>\n";
> -	    $output_preformatted = 1;
> -	} else {
> -	    print "<para>\n";
> -	}
> -	output_highlight($args{'sections'}{$section});
> -	$output_preformatted = 0;
> -	if ($section =~ m/EXAMPLE/i) {
> -	    print "</para></example>\n";
> -	} else {
> -	    print "</para>";
> -	}
> -	if (!$args{'content-only'}) {
> -		print "\n</refsect1>\n";
> -	}
> -    }
> -
> -    print "\n\n";
> -}
> -
> -# output in XML DocBook
> -sub output_function_gnome {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $count;
> -    my $id;
> -
> -    $id = $args{'module'} . "-" . $args{'function'};
> -    $id =~ s/[^A-Za-z0-9]/-/g;
> -
> -    print "<sect2>\n";
> -    print " <title id=\"$id\">" . $args{'function'} . "</title>\n";
> -
> -    print "  <funcsynopsis>\n";
> -    print "   <funcdef>" . $args{'functiontype'} . " ";
> -    print "<function>" . $args{'function'} . " ";
> -    print "</function></funcdef>\n";
> -
> -    $count = 0;
> -    if ($#{$args{'parameterlist'}} >= 0) {
> -	foreach $parameter (@{$args{'parameterlist'}}) {
> -	    $type = $args{'parametertypes'}{$parameter};
> -	    if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -		# pointer-to-function
> -		print "   <paramdef>$1 <parameter>$parameter</parameter>)\n";
> -		print "     <funcparams>$2</funcparams></paramdef>\n";
> -	    } else {
> -		print "   <paramdef>" . $type;
> -		print " <parameter>$parameter</parameter></paramdef>\n";
> -	    }
> -	}
> -    } else {
> -	print "  <void>\n";
> -    }
> -    print "  </funcsynopsis>\n";
> -    if ($#{$args{'parameterlist'}} >= 0) {
> -	print " <informaltable pgwide=\"1\" frame=\"none\" role=\"params\">\n";
> -	print "<tgroup cols=\"2\">\n";
> -	print "<colspec colwidth=\"2*\">\n";
> -	print "<colspec colwidth=\"8*\">\n";
> -	print "<tbody>\n";
> -	foreach $parameter (@{$args{'parameterlist'}}) {
> -	    my $parameter_name = $parameter;
> -	    $parameter_name =~ s/\[.*//;
> -
> -	    print "  <row><entry align=\"right\"><parameter>$parameter</parameter></entry>\n";
> -	    print "   <entry>\n";
> -	    $lineprefix="     ";
> -	    output_highlight($args{'parameterdescs'}{$parameter_name});
> -	    print "    </entry></row>\n";
> -	}
> -	print " </tbody></tgroup></informaltable>\n";
> -    } else {
> -	print " <para>\n  None\n </para>\n";
> -    }
> -
> -    # print out each section
> -    $lineprefix="   ";
> -    foreach $section (@{$args{'sectionlist'}}) {
> -	print "<simplesect>\n <title>$section</title>\n";
> -	if ($section =~ m/EXAMPLE/i) {
> -	    print "<example><programlisting>\n";
> -	    $output_preformatted = 1;
> -	} else {
> -	}
> -	print "<para>\n";
> -	output_highlight($args{'sections'}{$section});
> -	$output_preformatted = 0;
> -	print "</para>\n";
> -	if ($section =~ m/EXAMPLE/i) {
> -	    print "</programlisting></example>\n";
> -	} else {
> -	}
> -	print " </simplesect>\n";
> -    }
> -
> -    print "</sect2>\n\n";
> -}
> -
>  ##
>  # output function in man
>  sub output_function_man(%) {
> @@ -1692,161 +738,6 @@ sub output_blockhead_man(%) {
>  }
>  
>  ##
> -# output in text
> -sub output_function_text(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -    my $start;
> -
> -    print "Name:\n\n";
> -    print $args{'function'} . " - " . $args{'purpose'} . "\n";
> -
> -    print "\nSynopsis:\n\n";
> -    if ($args{'functiontype'} ne "") {
> -	$start = $args{'functiontype'} . " " . $args{'function'} . " (";
> -    } else {
> -	$start = $args{'function'} . " (";
> -    }
> -    print $start;
> -
> -    my $count = 0;
> -    foreach my $parameter (@{$args{'parameterlist'}}) {
> -	$type = $args{'parametertypes'}{$parameter};
> -	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -	    # pointer-to-function
> -	    print $1 . $parameter . ") (" . $2;
> -	} else {
> -	    print $type . " " . $parameter;
> -	}
> -	if ($count != $#{$args{'parameterlist'}}) {
> -	    $count++;
> -	    print ",\n";
> -	    print " " x length($start);
> -	} else {
> -	    print ");\n\n";
> -	}
> -    }
> -
> -    print "Arguments:\n\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	print $parameter . "\n\t" . $args{'parameterdescs'}{$parameter_name} . "\n";
> -    }
> -    output_section_text(@_);
> -}
> -
> -#output sections in text
> -sub output_section_text(%) {
> -    my %args = %{$_[0]};
> -    my $section;
> -
> -    print "\n";
> -    foreach $section (@{$args{'sectionlist'}}) {
> -	print "$section:\n\n";
> -	output_highlight($args{'sections'}{$section});
> -    }
> -    print "\n\n";
> -}
> -
> -# output enum in text
> -sub output_enum_text(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter);
> -    my $count;
> -    print "Enum:\n\n";
> -
> -    print "enum " . $args{'enum'} . " - " . $args{'purpose'} . "\n\n";
> -    print "enum " . $args{'enum'} . " {\n";
> -    $count = 0;
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	print "\t$parameter";
> -	if ($count != $#{$args{'parameterlist'}}) {
> -	    $count++;
> -	    print ",";
> -	}
> -	print "\n";
> -    }
> -    print "};\n\n";
> -
> -    print "Constants:\n\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	print "$parameter\n\t";
> -	print $args{'parameterdescs'}{$parameter} . "\n";
> -    }
> -
> -    output_section_text(@_);
> -}
> -
> -# output typedef in text
> -sub output_typedef_text(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter);
> -    my $count;
> -    print "Typedef:\n\n";
> -
> -    print "typedef " . $args{'typedef'} . " - " . $args{'purpose'} . "\n";
> -    output_section_text(@_);
> -}
> -
> -# output struct as text
> -sub output_struct_text(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter);
> -
> -    print $args{'type'} . " " . $args{'struct'} . " - " . $args{'purpose'} . "\n\n";
> -    print $args{'type'} . " " . $args{'struct'} . " {\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	if ($parameter =~ /^#/) {
> -	    print "$parameter\n";
> -	    next;
> -	}
> -
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	$type = $args{'parametertypes'}{$parameter};
> -	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -	    # pointer-to-function
> -	    print "\t$1 $parameter) ($2);\n";
> -	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
> -	    # bitfield
> -	    print "\t$1 $parameter$2;\n";
> -	} else {
> -	    print "\t" . $type . " " . $parameter . ";\n";
> -	}
> -    }
> -    print "};\n\n";
> -
> -    print "Members:\n\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	($parameter =~ /^#/) && next;
> -
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	print "$parameter\n\t";
> -	print $args{'parameterdescs'}{$parameter_name} . "\n";
> -    }
> -    print "\n";
> -    output_section_text(@_);
> -}
> -
> -sub output_blockhead_text(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -
> -    foreach $section (@{$args{'sectionlist'}}) {
> -	print " $section:\n";
> -	print "    -> ";
> -	output_highlight($args{'sections'}{$section});
> -    }
> -}
> -
> -##
>  # output in restructured text
>  #
>  
> @@ -2080,43 +971,6 @@ sub output_struct_rst(%) {
>      output_section_rst(@_);
>  }
>  
> -
> -## list mode output functions
> -
> -sub output_function_list(%) {
> -    my %args = %{$_[0]};
> -
> -    print $args{'function'} . "\n";
> -}
> -
> -# output enum in list
> -sub output_enum_list(%) {
> -    my %args = %{$_[0]};
> -    print $args{'enum'} . "\n";
> -}
> -
> -# output typedef in list
> -sub output_typedef_list(%) {
> -    my %args = %{$_[0]};
> -    print $args{'typedef'} . "\n";
> -}
> -
> -# output struct as list
> -sub output_struct_list(%) {
> -    my %args = %{$_[0]};
> -
> -    print $args{'struct'} . "\n";
> -}
> -
> -sub output_blockhead_list(%) {
> -    my %args = %{$_[0]};
> -    my ($parameter, $section);
> -
> -    foreach $section (@{$args{'sectionlist'}}) {
> -	print "DOC: $section\n";
> -    }
> -}
> -
>  ##
>  # generic output function for all types (function, struct/union, typedef, enum);
>  # calls the generated, variable output_ function name based on
> @@ -2795,7 +1649,7 @@ sub process_proto_type($$) {
>  # just before actual output; (this is done by local_unescape())
>  sub xml_escape($) {
>  	my $text = shift;
> -	if (($output_mode eq "text") || ($output_mode eq "man")) {
> +	if ($output_mode eq "man") {
>  		return $text;
>  	}
>  	$text =~ s/\&/\\\\\\amp;/g;
> @@ -2807,7 +1661,7 @@ sub xml_escape($) {
>  # xml_unescape: reverse the effects of xml_escape
>  sub xml_unescape($) {
>  	my $text = shift;
> -	if (($output_mode eq "text") || ($output_mode eq "man")) {
> +	if ($output_mode eq "man") {
>  		return $text;
>  	}
>  	$text =~ s/\\\\\\amp;/\&/g;
> @@ -2820,7 +1674,7 @@ sub xml_unescape($) {
>  # local escape strings look like:  '\\\\menmonic:' (that's 4 backslashes)
>  sub local_unescape($) {
>  	my $text = shift;
> -	if (($output_mode eq "text") || ($output_mode eq "man")) {
> +	if ($output_mode eq "man") {
>  		return $text;
>  	}
>  	$text =~ s/\\\\\\\\lt:/</g;
> @@ -3140,34 +1994,6 @@ sub process_file($) {
>  	if (($output_selection == OUTPUT_INCLUDE) && ($show_not_found == 1)) {
>  	    print STDERR "    Was looking for '$_'.\n" for keys %function_table;
>  	}
> -	if ($output_mode eq "xml") {
> -	    # The template wants at least one RefEntry here; make one.
> -	    print "<refentry>\n";
> -	    print " <refnamediv>\n";
> -	    print "  <refname>\n";
> -	    print "   ${orig_file}\n";
> -	    print "  </refname>\n";
> -	    print "  <refpurpose>\n";
> -	    print "   Document generation inconsistency\n";
> -	    print "  </refpurpose>\n";
> -	    print " </refnamediv>\n";
> -	    print " <refsect1>\n";
> -	    print "  <title>\n";
> -	    print "   Oops\n";
> -	    print "  </title>\n";
> -	    print "  <warning>\n";
> -	    print "   <para>\n";
> -	    print "    The template for this document tried to insert\n";
> -	    print "    the structured comment from the file\n";
> -	    print "    <filename>${orig_file}</filename> at this point,\n";
> -	    print "    but none was found.\n";
> -	    print "    This dummy section is inserted to allow\n";
> -	    print "    generation to continue.\n";
> -	    print "   </para>\n";
> -	    print "  </warning>\n";
> -	    print " </refsect1>\n";
> -	    print "</refentry>\n";
> -	}
>      }
>  }

-- 
Jani Nikula, Intel Open Source Technology Center

Re: [PATCH 01/10] scripts: kernel-doc: get rid of unused output formats

[Mauro Carvalho Chehab]

Em Wed, 27 Sep 2017 17:36:59 +0300
Jani Nikula <jani.nikula@linux.intel.com> escreveu:

> On Tue, 26 Sep 2017, Mauro Carvalho Chehab <mchehab@s-opensource.com> wrote:
> > Since there isn't any docbook code anymore upstream,
> > we can get rid of several output formats:
> >
> > - docbook/xml, html, html5 and list formats were used by
> >   the old build system;
> > - As ReST is text, there's not much sense on outputting
> >   on a different text format.
> >
> > After this patch, only man and rst output formats are
> > supported.  
> 
> FWIW,
> 
> Acked-by: Jani Nikula <jani.nikula@intel.com>

Thanks!

> Please do keep at least two output formats going forward. Otherwise the
> mechanisms of having more than one output format will bitrot and get
> conflated into the one output format.

Yeah, if we leave just one output format, some extra cleanup would be
needed.

Anyway, as we currently doesn't have other ways to generate manpages,
we should be keeping both ReST and man for now.

Thanks,
Mauro

[PATCH 02/10] docs: kernel-doc.rst: better describe kernel-doc arguments

[Mauro Carvalho Chehab]

Add a new section to describe kernel-doc arguments,
adding examples about how identation should happen, as failing
to do that causes Sphinx to do the wrong thing.

Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
---
 Documentation/doc-guide/kernel-doc.rst | 44 +++++++++++++++++++++++++++++++---
 1 file changed, 41 insertions(+), 3 deletions(-)

diff --git a/Documentation/doc-guide/kernel-doc.rst b/Documentation/doc-guide/kernel-doc.rst
index b24854b5d6be..7a3f5c710c0b 100644
--- a/Documentation/doc-guide/kernel-doc.rst
+++ b/Documentation/doc-guide/kernel-doc.rst
@@ -112,16 +112,17 @@ Example kernel-doc function comment::
 
   /**
    * foobar() - Brief description of foobar.
-   * @arg: Description of argument of foobar.
+   * @argument1: Description of parameter argument1 of foobar.
+   * @argument1: Description of parameter argument2 of foobar.
    *
    * Longer description of foobar.
    *
    * Return: Description of return value of foobar.
    */
-  int foobar(int arg)
+  int foobar(int argument1, char *argument2)
 
 The format is similar for documentation for structures, enums, paragraphs,
-etc. See the sections below for details.
+etc. See the sections below for specific details of each type.
 
 The kernel-doc structure is extracted from the comments, and proper `Sphinx C
 Domain`_ function and type descriptions with anchors are generated for them. The
@@ -130,6 +131,43 @@ cross-references. See below for details.
 
 .. _Sphinx C Domain: http://www.sphinx-doc.org/en/stable/domains.html
 
+
+Parameters and member arguments
+-------------------------------
+
+The kernel-doc function comments describe each parameter to the function and
+function typedefs or each member of struct/union, in order, with the
+``@argument:`` descriptions. For each non-private member argument, one
+``@argument`` definition is needed.
+
+The ``@argument:`` descriptions begin on the very next line following
+the opening brief function description line, with no intervening blank
+comment lines.
+
+The ``@argument:`` descriptions may span multiple lines.
+
+.. note::
+
+   If the ``@argument`` description has multiple lines, the continuation
+   of the description should be starting exactly at the same column as
+   the previous line, e. g.::
+
+      * @argument: some long description
+      *       that continues on next lines
+
+   or::
+
+      * @argument:
+      *		some long description
+      *		that continues on next lines
+
+If a function or typedef parameter argument is ``...`` (e. g. a variable
+number of arguments), its description should be listed in kernel-doc
+notation as::
+
+      * @...: description
+
+
 Highlights and cross-references
 -------------------------------
 
-- 
2.13.5

Re: [PATCH 02/10] docs: kernel-doc.rst: better describe kernel-doc arguments

[Randy Dunlap]

On 09/26/17 10:59, Mauro Carvalho Chehab wrote:
> Add a new section to describe kernel-doc arguments,
> adding examples about how identation should happen, as failing
> to do that causes Sphinx to do the wrong thing.
> 
> Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
> ---
>  Documentation/doc-guide/kernel-doc.rst | 44 +++++++++++++++++++++++++++++++---
>  1 file changed, 41 insertions(+), 3 deletions(-)
> 
> diff --git a/Documentation/doc-guide/kernel-doc.rst b/Documentation/doc-guide/kernel-doc.rst
> index b24854b5d6be..7a3f5c710c0b 100644
> --- a/Documentation/doc-guide/kernel-doc.rst
> +++ b/Documentation/doc-guide/kernel-doc.rst
> @@ -112,16 +112,17 @@ Example kernel-doc function comment::
>  
>    /**
>     * foobar() - Brief description of foobar.
> -   * @arg: Description of argument of foobar.
> +   * @argument1: Description of parameter argument1 of foobar.
> +   * @argument1: Description of parameter argument2 of foobar.

        @argument2:

>     *
>     * Longer description of foobar.
>     *
>     * Return: Description of return value of foobar.
>     */
> -  int foobar(int arg)
> +  int foobar(int argument1, char *argument2)


-- 
~Randy

[PATCH 03/10] docs: kernel-doc.rst: improve private members description

[Mauro Carvalho Chehab]

The private members section can now be moved to be together
with the arguments section. Move it there and add an example
about the usage of public:

Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
---
 Documentation/doc-guide/kernel-doc.rst | 56 ++++++++++++++++++----------------
 1 file changed, 30 insertions(+), 26 deletions(-)

diff --git a/Documentation/doc-guide/kernel-doc.rst b/Documentation/doc-guide/kernel-doc.rst
index 7a3f5c710c0b..f1eb00899084 100644
--- a/Documentation/doc-guide/kernel-doc.rst
+++ b/Documentation/doc-guide/kernel-doc.rst
@@ -167,6 +167,36 @@ notation as::
 
       * @...: description
 
+Private members
+~~~~~~~~~~~~~~~
+
+Inside a struct or union description, you can use the ``private:`` and
+``public:`` comment tags. Structure fields that are inside a ``private:``
+area are not listed in the generated output documentation.
+
+The ``private:`` and ``public:`` tags must begin immediately following a
+``/*`` comment marker.  They may optionally include comments between the
+``:`` and the ending ``*/`` marker.
+
+Example::
+
+  /**
+   * struct my_struct - short description
+   * @a: first member
+   * @b: second member
+   * @d: fourth member
+   *
+   * Longer description
+   */
+  struct my_struct {
+      int a;
+      int b;
+  /* private: internal use only */
+      int c;
+  /* public: the next one is public */
+      int d;
+  };
+
 
 Highlights and cross-references
 -------------------------------
@@ -332,32 +362,6 @@ on a line of their own, like all other kernel-doc comments::
         int foobar;
   }
 
-Private members
-~~~~~~~~~~~~~~~
-
-Inside a struct description, you can use the "private:" and "public:" comment
-tags. Structure fields that are inside a "private:" area are not listed in the
-generated output documentation.  The "private:" and "public:" tags must begin
-immediately following a ``/*`` comment marker.  They may optionally include
-comments between the ``:`` and the ending ``*/`` marker.
-
-Example::
-
-  /**
-   * struct my_struct - short description
-   * @a: first member
-   * @b: second member
-   *
-   * Longer description
-   */
-  struct my_struct {
-      int a;
-      int b;
-  /* private: internal use only */
-      int c;
-  };
-
-
 Typedef documentation
 ---------------------
 
-- 
2.13.5

[PATCH 04/10] docs: kernel-doc.rst: improve function documentation section

[Mauro Carvalho Chehab]

Move its contents to happen earlier and improve the description
of return values, adding a subsection to it. Most of the contents
there came from kernel-doc-nano-HOWTO.txt.

Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
---
 Documentation/doc-guide/kernel-doc.rst | 100 ++++++++++++++++++++-------------
 1 file changed, 61 insertions(+), 39 deletions(-)

diff --git a/Documentation/doc-guide/kernel-doc.rst b/Documentation/doc-guide/kernel-doc.rst
index f1eb00899084..9b69dfe928d8 100644
--- a/Documentation/doc-guide/kernel-doc.rst
+++ b/Documentation/doc-guide/kernel-doc.rst
@@ -197,6 +197,67 @@ Example::
       int d;
   };
 
+Function documentation
+----------------------
+
+The general format of a function and function-like macro kernel-doc comment is::
+
+  /**
+   * function_name() - Brief description of function.
+   * @arg1: Describe the first argument.
+   * @arg2: Describe the second argument.
+   *        One can provide multiple line descriptions
+   *        for arguments.
+   *
+   * A longer description, with more discussion of the function function_name()
+   * that might be useful to those using or modifying it. Begins with an
+   * empty comment line, and may include additional embedded empty
+   * comment lines.
+   *
+   * The longer description may have multiple paragraphs.
+   *
+   * Return: Describe the return value of foobar.
+   *
+   * The return value description can also have multiple paragraphs, and should
+   * be placed at the end of the comment block.
+   */
+
+The brief description following the function name may span multiple lines, and
+ends with an argument description, a blank comment line, or the end of the
+comment block.
+
+Return values
+~~~~~~~~~~~~~
+
+The return value, if any, should be described in a dedicated section
+named ``Return``.
+
+.. note::
+
+  #) The multi-line descriptive text you provide does *not* recognize
+     line breaks, so if you try to format some text nicely, as in::
+
+	* Return:
+	* 0 - OK
+	* -EINVAL - invalid argument
+	* -ENOMEM - out of memory
+
+     this will all run together and produce::
+
+	Return: 0 - OK -EINVAL - invalid argument -ENOMEM - out of memory
+
+     So, in order to produce the desired line breaks, you need to use a
+     ReST list, e. g.::
+
+      * Return:
+      * * 0		- OK to runtime suspend the device
+      * * -EBUSY	- Device should not be runtime suspended
+
+  #) If the descriptive text you provide has lines that begin with
+     some phrase followed by a colon, each of those phrases will be taken
+     as a new section heading, with probably won't produce the desired
+     effect.
+
 
 Highlights and cross-references
 -------------------------------
@@ -269,45 +330,6 @@ cross-references.
 
 For further details, please refer to the `Sphinx C Domain`_ documentation.
 
-Function documentation
-----------------------
-
-The general format of a function and function-like macro kernel-doc comment is::
-
-  /**
-   * function_name() - Brief description of function.
-   * @arg1: Describe the first argument.
-   * @arg2: Describe the second argument.
-   *        One can provide multiple line descriptions
-   *        for arguments.
-   *
-   * A longer description, with more discussion of the function function_name()
-   * that might be useful to those using or modifying it. Begins with an
-   * empty comment line, and may include additional embedded empty
-   * comment lines.
-   *
-   * The longer description may have multiple paragraphs.
-   *
-   * Return: Describe the return value of foobar.
-   *
-   * The return value description can also have multiple paragraphs, and should
-   * be placed at the end of the comment block.
-   */
-
-The brief description following the function name may span multiple lines, and
-ends with an ``@argument:`` description, a blank comment line, or the end of the
-comment block.
-
-The kernel-doc function comments describe each parameter to the function, in
-order, with the ``@argument:`` descriptions. The ``@argument:`` descriptions
-must begin on the very next line following the opening brief function
-description line, with no intervening blank comment lines. The ``@argument:``
-descriptions may span multiple lines. The continuation lines may contain
-indentation. If a function parameter is ``...`` (varargs), it should be listed
-in kernel-doc notation as: ``@...:``.
-
-The return value, if any, should be described in a dedicated section at the end
-of the comment starting with "Return:".
 
 Structure, union, and enumeration documentation
 -----------------------------------------------
-- 
2.13.5

[PATCH 05/10] docs: kernel-doc.rst: improve structs chapter

[Mauro Carvalho Chehab]

There is a mess on this chapter: it suggests that even
enums and unions should be documented with "struct". That's
not the way it should be ;-)

Fix it and move it to happen earlier.


    Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>

Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
---
 Documentation/doc-guide/kernel-doc.rst | 48 +++++++++++++++++-----------------
 1 file changed, 24 insertions(+), 24 deletions(-)

diff --git a/Documentation/doc-guide/kernel-doc.rst b/Documentation/doc-guide/kernel-doc.rst
index 9b69dfe928d8..68cb1b496c73 100644
--- a/Documentation/doc-guide/kernel-doc.rst
+++ b/Documentation/doc-guide/kernel-doc.rst
@@ -258,6 +258,30 @@ named ``Return``.
      as a new section heading, with probably won't produce the desired
      effect.
 
+Structure, union, and enumeration documentation
+-----------------------------------------------
+
+The general format of a struct, union, and enum kernel-doc comment is::
+
+  /**
+   * struct struct_name - Brief description.
+   * @argument: Description of member member_name.
+   *
+   * Description of the structure.
+   */
+
+On the above, ``struct`` is used to mean structs. You can also use ``union``
+and ``enum``  to describe unions and enums. ``argument`` is used
+to mean struct and union member names as well as enumerations in an enum.
+
+The brief description following the structure name may span multiple lines, and
+ends with a member description, a blank comment line, or the end of the
+comment block.
+
+The kernel-doc data structure comments describe each member of the structure,
+in order, with the member descriptions.
+
+
 
 Highlights and cross-references
 -------------------------------
@@ -331,30 +355,6 @@ cross-references.
 For further details, please refer to the `Sphinx C Domain`_ documentation.
 
 
-Structure, union, and enumeration documentation
------------------------------------------------
-
-The general format of a struct, union, and enum kernel-doc comment is::
-
-  /**
-   * struct struct_name - Brief description.
-   * @member_name: Description of member member_name.
-   *
-   * Description of the structure.
-   */
-
-Below, "struct" is used to mean structs, unions and enums, and "member" is used
-to mean struct and union members as well as enumerations in an enum.
-
-The brief description following the structure name may span multiple lines, and
-ends with a ``@member:`` description, a blank comment line, or the end of the
-comment block.
-
-The kernel-doc data structure comments describe each member of the structure, in
-order, with the ``@member:`` descriptions. The ``@member:`` descriptions must
-begin on the very next line following the opening brief function description
-line, with no intervening blank comment lines. The ``@member:`` descriptions may
-span multiple lines. The continuation lines may contain indentation.
 
 In-line member documentation comments
 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-- 
2.13.5

[PATCH 06/10] docs: kernel-doc: improve typedef documentation

[Mauro Carvalho Chehab]

Add documentation about typedefs for function prototypes and
move it to happen earlier.

Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
---
 Documentation/doc-guide/kernel-doc.rst | 32 ++++++++++++++++++++++----------
 1 file changed, 22 insertions(+), 10 deletions(-)

diff --git a/Documentation/doc-guide/kernel-doc.rst b/Documentation/doc-guide/kernel-doc.rst
index 68cb1b496c73..9777aa53e3dd 100644
--- a/Documentation/doc-guide/kernel-doc.rst
+++ b/Documentation/doc-guide/kernel-doc.rst
@@ -282,6 +282,28 @@ The kernel-doc data structure comments describe each member of the structure,
 in order, with the member descriptions.
 
 
+Typedef documentation
+---------------------
+
+The general format of a typedef kernel-doc comment is::
+
+  /**
+   * typedef type_name - Brief description.
+   *
+   * Description of the type.
+   */
+
+Typedefs with function prototypes can also be documented::
+
+  /**
+   * typedef type_name - Brief description.
+   * @arg1: description of arg1
+   * @arg2: description of arg2
+   *
+   * Description of the type.
+   */
+   typedef void (*type_name)(struct v4l2_ctrl *arg1, void *arg2);
+
 
 Highlights and cross-references
 -------------------------------
@@ -384,16 +406,6 @@ on a line of their own, like all other kernel-doc comments::
         int foobar;
   }
 
-Typedef documentation
----------------------
-
-The general format of a typedef kernel-doc comment is::
-
-  /**
-   * typedef type_name - Brief description.
-   *
-   * Description of the type.
-   */
 
 Overview documentation comments
 -------------------------------
-- 
2.13.5

[PATCH 07/10] docs: kernel-doc.rst: add documentation about man pages

[Mauro Carvalho Chehab]

kernel-doc-nano-HOWTO.txt has a chapter about man pages
production. While we don't have a working  "make manpages"
target, add it.

Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
---
 Documentation/doc-guide/kernel-doc.rst | 61 ++++++++++++++++++++++++++--------
 1 file changed, 47 insertions(+), 14 deletions(-)

diff --git a/Documentation/doc-guide/kernel-doc.rst b/Documentation/doc-guide/kernel-doc.rst
index 9777aa53e3dd..50473f0db345 100644
--- a/Documentation/doc-guide/kernel-doc.rst
+++ b/Documentation/doc-guide/kernel-doc.rst
@@ -377,7 +377,6 @@ cross-references.
 For further details, please refer to the `Sphinx C Domain`_ documentation.
 
 
-
 In-line member documentation comments
 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 
@@ -391,19 +390,19 @@ on a line of their own, like all other kernel-doc comments::
    * @foo: The Foo member.
    */
   struct foo {
-        int foo;
-        /**
-         * @bar: The Bar member.
-         */
-        int bar;
-        /**
-         * @baz: The Baz member.
-         *
-         * Here, the member description may contain several paragraphs.
-         */
-        int baz;
-        /** @foobar: Single line description. */
-        int foobar;
+	int foo;
+	/**
+	 * @bar: The Bar member.
+	 */
+	int bar;
+	/**
+	 * @baz: The Baz member.
+	 *
+	 * Here, the member description may contain several paragraphs.
+	 */
+	int baz;
+	/** @foobar: Single line description. */
+	int foobar;
   }
 
 
@@ -452,3 +451,37 @@ file.
 
 Data structures visible in kernel include files should also be documented using
 kernel-doc formatted comments.
+
+How to use kernel-doc to generate man pages
+-------------------------------------------
+
+If you just want to use kernel-doc to generate man pages you can do this
+from the Kernel git tree::
+
+  $ scripts/kernel-doc -man $(git grep -l '/\*\*' |grep -v Documentation/) | ./split-man.pl /tmp/man
+
+Using the small ``split-man.pl`` script below::
+
+
+  #!/usr/bin/perl
+
+  if ($#ARGV < 0) {
+     die "where do I put the results?\n";
+  }
+
+  mkdir $ARGV[0],0777;
+  $state = 0;
+  while (<STDIN>) {
+      if (/^\.TH \"[^\"]*\" 9 \"([^\"]*)\"/) {
+	if ($state == 1) { close OUT }
+	$state = 1;
+	$fn = "$ARGV[0]/$1.9";
+	print STDERR "Creating $fn\n";
+	open OUT, ">$fn" or die "can't open $fn: $!\n";
+	print OUT $_;
+      } elsif ($state != 0) {
+	print OUT $_;
+      }
+  }
+
+  close OUT;
-- 
2.13.5

Re: [PATCH 07/10] docs: kernel-doc.rst: add documentation about man pages

[Randy Dunlap]

On 09/26/17 10:59, Mauro Carvalho Chehab wrote:
> kernel-doc-nano-HOWTO.txt has a chapter about man pages
> production. While we don't have a working  "make manpages"
> target, add it.
> 
> Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
> ---
>  Documentation/doc-guide/kernel-doc.rst | 61 ++++++++++++++++++++++++++--------
>  1 file changed, 47 insertions(+), 14 deletions(-)
> 
> diff --git a/Documentation/doc-guide/kernel-doc.rst b/Documentation/doc-guide/kernel-doc.rst
> index 9777aa53e3dd..50473f0db345 100644
> --- a/Documentation/doc-guide/kernel-doc.rst
> +++ b/Documentation/doc-guide/kernel-doc.rst
> @@ -377,7 +377,6 @@ cross-references.
>  For further details, please refer to the `Sphinx C Domain`_ documentation.
>  
>  
> -
>  In-line member documentation comments
>  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>  
> @@ -391,19 +390,19 @@ on a line of their own, like all other kernel-doc comments::
>     * @foo: The Foo member.
>     */
>    struct foo {
> -        int foo;
> -        /**
> -         * @bar: The Bar member.
> -         */
> -        int bar;
> -        /**
> -         * @baz: The Baz member.
> -         *
> -         * Here, the member description may contain several paragraphs.
> -         */
> -        int baz;
> -        /** @foobar: Single line description. */
> -        int foobar;
> +	int foo;
> +	/**
> +	 * @bar: The Bar member.
> +	 */
> +	int bar;
> +	/**
> +	 * @baz: The Baz member.
> +	 *
> +	 * Here, the member description may contain several paragraphs.
> +	 */
> +	int baz;
> +	/** @foobar: Single line description. */
> +	int foobar;
>    }

The above doesn't belong in this patch. (??)

>  
> @@ -452,3 +451,37 @@ file.
>  
>  Data structures visible in kernel include files should also be documented using
>  kernel-doc formatted comments.
> +
> +How to use kernel-doc to generate man pages
> +-------------------------------------------
> +
> +If you just want to use kernel-doc to generate man pages you can do this
> +from the Kernel git tree::
> +
> +  $ scripts/kernel-doc -man $(git grep -l '/\*\*' |grep -v Documentation/) | ./split-man.pl /tmp/man
> +
> +Using the small ``split-man.pl`` script below::
> +
> +
> +  #!/usr/bin/perl
> +
> +  if ($#ARGV < 0) {
> +     die "where do I put the results?\n";
> +  }
> +
> +  mkdir $ARGV[0],0777;
> +  $state = 0;
> +  while (<STDIN>) {
> +      if (/^\.TH \"[^\"]*\" 9 \"([^\"]*)\"/) {
> +	if ($state == 1) { close OUT }
> +	$state = 1;
> +	$fn = "$ARGV[0]/$1.9";
> +	print STDERR "Creating $fn\n";
> +	open OUT, ">$fn" or die "can't open $fn: $!\n";
> +	print OUT $_;
> +      } elsif ($state != 0) {
> +	print OUT $_;
> +      }
> +  }
> +
> +  close OUT;
> 


-- 
~Randy

[PATCH 08/10] docs: get rid of kernel-doc-nano-HOWTO.txt

[Mauro Carvalho Chehab]

Everything there is already described at
Documentation/doc-guide/kernel-doc.rst. So, there's no reason why
to keep it anymore.

Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
---
 Documentation/00-INDEX                  |   2 -
 Documentation/kernel-doc-nano-HOWTO.txt | 322 --------------------------------
 scripts/kernel-doc                      |   2 +-
 3 files changed, 1 insertion(+), 325 deletions(-)
 delete mode 100644 Documentation/kernel-doc-nano-HOWTO.txt

diff --git a/Documentation/00-INDEX b/Documentation/00-INDEX
index 3bec49c33bbb..aca4f00ec69b 100644
--- a/Documentation/00-INDEX
+++ b/Documentation/00-INDEX
@@ -228,8 +228,6 @@ isdn/
 	- directory with info on the Linux ISDN support, and supported cards.
 kbuild/
 	- directory with info about the kernel build process.
-kernel-doc-nano-HOWTO.txt
-	- outdated info about kernel-doc documentation.
 kdump/
 	- directory with mini HowTo on getting the crash dump code to work.
 doc-guide/
diff --git a/Documentation/kernel-doc-nano-HOWTO.txt b/Documentation/kernel-doc-nano-HOWTO.txt
deleted file mode 100644
index c23e2c5ab80d..000000000000
--- a/Documentation/kernel-doc-nano-HOWTO.txt
+++ /dev/null
@@ -1,322 +0,0 @@
-NOTE: this document is outdated and will eventually be removed.  See
-Documentation/doc-guide/ for current information.
-
-kernel-doc nano-HOWTO
-=====================
-
-How to format kernel-doc comments
----------------------------------
-
-In order to provide embedded, 'C' friendly, easy to maintain,
-but consistent and extractable documentation of the functions and
-data structures in the Linux kernel, the Linux kernel has adopted
-a consistent style for documenting functions and their parameters,
-and structures and their members.
-
-The format for this documentation is called the kernel-doc format.
-It is documented in this Documentation/kernel-doc-nano-HOWTO.txt file.
-
-This style embeds the documentation within the source files, using
-a few simple conventions.  The scripts/kernel-doc perl script, the
-Documentation/sphinx/kerneldoc.py Sphinx extension and other tools understand
-these conventions, and are used to extract this embedded documentation
-into various documents.
-
-In order to provide good documentation of kernel functions and data
-structures, please use the following conventions to format your
-kernel-doc comments in Linux kernel source.
-
-We definitely need kernel-doc formatted documentation for functions
-that are exported to loadable modules using EXPORT_SYMBOL.
-
-We also look to provide kernel-doc formatted documentation for
-functions externally visible to other kernel files (not marked
-"static").
-
-We also recommend providing kernel-doc formatted documentation
-for private (file "static") routines, for consistency of kernel
-source code layout.  But this is lower priority and at the
-discretion of the MAINTAINER of that kernel source file.
-
-Data structures visible in kernel include files should also be
-documented using kernel-doc formatted comments.
-
-The opening comment mark "/**" is reserved for kernel-doc comments.
-Only comments so marked will be considered by the kernel-doc scripts,
-and any comment so marked must be in kernel-doc format.  Do not use
-"/**" to be begin a comment block unless the comment block contains
-kernel-doc formatted comments.  The closing comment marker for
-kernel-doc comments can be either "*/" or "**/", but "*/" is
-preferred in the Linux kernel tree.
-
-Kernel-doc comments should be placed just before the function
-or data structure being described.
-
-Example kernel-doc function comment:
-
-/**
- * foobar() - short function description of foobar
- * @arg1:	Describe the first argument to foobar.
- * @arg2:	Describe the second argument to foobar.
- *		One can provide multiple line descriptions
- *		for arguments.
- *
- * A longer description, with more discussion of the function foobar()
- * that might be useful to those using or modifying it.  Begins with
- * empty comment line, and may include additional embedded empty
- * comment lines.
- *
- * The longer description can have multiple paragraphs.
- *
- * Return: Describe the return value of foobar.
- */
-
-The short description following the subject can span multiple lines
-and ends with an @argument description, an empty line or the end of
-the comment block.
-
-The @argument descriptions must begin on the very next line following
-this opening short function description line, with no intervening
-empty comment lines.
-
-If a function parameter is "..." (varargs), it should be listed in
-kernel-doc notation as:
- * @...: description
-
-The return value, if any, should be described in a dedicated section
-named "Return".
-
-Example kernel-doc data structure comment.
-
-/**
- * struct blah - the basic blah structure
- * @mem1:	describe the first member of struct blah
- * @mem2:	describe the second member of struct blah,
- *		perhaps with more lines and words.
- *
- * Longer description of this structure.
- */
-
-The kernel-doc function comments describe each parameter to the
-function, in order, with the @name lines.
-
-The kernel-doc data structure comments describe each structure member
-in the data structure, with the @name lines.
-
-The longer description formatting is "reflowed", losing your line
-breaks.  So presenting carefully formatted lists within these
-descriptions won't work so well; derived documentation will lose
-the formatting.
-
-See the section below "How to add extractable documentation to your
-source files" for more details and notes on how to format kernel-doc
-comments.
-
-Components of the kernel-doc system
------------------------------------
-
-Many places in the source tree have extractable documentation in the
-form of block comments above functions.  The components of this system
-are:
-
-- scripts/kernel-doc
-
-  This is a perl script that hunts for the block comments and can mark
-  them up directly into DocBook, ReST, man, text, and HTML. (No, not
-  texinfo.)
-
-- scripts/docproc.c
-
-  This is a program for converting SGML template files into SGML
-  files. When a file is referenced it is searched for symbols
-  exported (EXPORT_SYMBOL), to be able to distinguish between internal
-  and external functions.
-  It invokes kernel-doc, giving it the list of functions that
-  are to be documented.
-  Additionally it is used to scan the SGML template files to locate
-  all the files referenced herein. This is used to generate dependency
-  information as used by make.
-
-- Makefile
-
-  The targets 'xmldocs', 'latexdocs', 'pdfdocs', 'epubdocs'and 'htmldocs'
-  are used to build XML DocBook files, LaTeX files, PDF files,
-  ePub files and html files in Documentation/.
-
-How to extract the documentation
---------------------------------
-
-If you just want to read the ready-made books on the various
-subsystems, just type 'make epubdocs', or 'make pdfdocs', or 'make htmldocs',
-depending on your preference.  If you would rather read a different format,
-you can type 'make xmldocs' and then use DocBook tools to convert
-Documentation/output/*.xml to a format of your choice (for example,
-'db2html ...' if 'make htmldocs' was not defined).
-
-If you want to see man pages instead, you can do this:
-
-$ cd linux
-$ scripts/kernel-doc -man $(find -name '*.c') | split-man.pl /tmp/man
-$ scripts/kernel-doc -man $(find -name '*.h') | split-man.pl /tmp/man
-
-Here is split-man.pl:
-
--->
-#!/usr/bin/perl
-
-if ($#ARGV < 0) {
-   die "where do I put the results?\n";
-}
-
-mkdir $ARGV[0],0777;
-$state = 0;
-while (<STDIN>) {
-    if (/^\.TH \"[^\"]*\" 9 \"([^\"]*)\"/) {
-	if ($state == 1) { close OUT }
-	$state = 1;
-	$fn = "$ARGV[0]/$1.9";
-	print STDERR "Creating $fn\n";
-	open OUT, ">$fn" or die "can't open $fn: $!\n";
-	print OUT $_;
-    } elsif ($state != 0) {
-	print OUT $_;
-    }
-}
-
-close OUT;
-<--
-
-If you just want to view the documentation for one function in one
-file, you can do this:
-
-$ scripts/kernel-doc -man -function fn file | nroff -man | less
-
-or this:
-
-$ scripts/kernel-doc -text -function fn file
-
-
-How to add extractable documentation to your source files
----------------------------------------------------------
-
-The format of the block comment is like this:
-
-/**
- * function_name(:)? (- short description)?
-(* @parameterx(space)*: (description of parameter x)?)*
-(* a blank line)?
- * (Description:)? (Description of function)?
- * (section header: (section description)? )*
-(*)?*/
-
-All "description" text can span multiple lines, although the
-function_name & its short description are traditionally on a single line.
-Description text may also contain blank lines (i.e., lines that contain
-only a "*").
-
-"section header:" names must be unique per function (or struct,
-union, typedef, enum).
-
-Use the section header "Return" for sections describing the return value
-of a function.
-
-Avoid putting a spurious blank line after the function name, or else the
-description will be repeated!
-
-All descriptive text is further processed, scanning for the following special
-patterns, which are highlighted appropriately.
-
-'funcname()' - function
-'$ENVVAR' - environment variable
-'&struct_name' - name of a structure (up to two words including 'struct')
-'@parameter' - name of a parameter
-'%CONST' - name of a constant.
-
-NOTE 1:  The multi-line descriptive text you provide does *not* recognize
-line breaks, so if you try to format some text nicely, as in:
-
-  Return:
-    0 - cool
-    1 - invalid arg
-    2 - out of memory
-
-this will all run together and produce:
-
-  Return: 0 - cool 1 - invalid arg 2 - out of memory
-
-NOTE 2:  If the descriptive text you provide has lines that begin with
-some phrase followed by a colon, each of those phrases will be taken as
-a new section heading, which means you should similarly try to avoid text
-like:
-
-  Return:
-    0: cool
-    1: invalid arg
-    2: out of memory
-
-every line of which would start a new section.  Again, probably not
-what you were after.
-
-Take a look around the source tree for examples.
-
-
-kernel-doc for structs, unions, enums, and typedefs
----------------------------------------------------
-
-Beside functions you can also write documentation for structs, unions,
-enums and typedefs. Instead of the function name you must write the name
-of the declaration;  the struct/union/enum/typedef must always precede
-the name. Nesting of declarations is not supported.
-Use the argument mechanism to document members or constants.
-
-Inside a struct description, you can use the "private:" and "public:"
-comment tags.  Structure fields that are inside a "private:" area
-are not listed in the generated output documentation.  The "private:"
-and "public:" tags must begin immediately following a "/*" comment
-marker.  They may optionally include comments between the ":" and the
-ending "*/" marker.
-
-Example:
-
-/**
- * struct my_struct - short description
- * @a: first member
- * @b: second member
- *
- * Longer description
- */
-struct my_struct {
-    int a;
-    int b;
-/* private: internal use only */
-    int c;
-};
-
-
-Including documentation blocks in source files
-----------------------------------------------
-
-To facilitate having source code and comments close together, you can
-include kernel-doc documentation blocks that are free-form comments
-instead of being kernel-doc for functions, structures, unions,
-enums, or typedefs.  This could be used for something like a
-theory of operation for a driver or library code, for example.
-
-This is done by using a DOC: section keyword with a section title.  E.g.:
-
-/**
- * DOC: Theory of Operation
- *
- * The whizbang foobar is a dilly of a gizmo.  It can do whatever you
- * want it to do, at any time.  It reads your mind.  Here's how it works.
- *
- * foo bar splat
- *
- * The only drawback to this gizmo is that is can sometimes damage
- * hardware, software, or its subject(s).
- */
-
-DOC: sections are used in ReST files.
-
-Tim.
-*/ <twaugh@redhat.com>
diff --git a/scripts/kernel-doc b/scripts/kernel-doc
index 69757ee9db4c..b6f3f6962897 100755
--- a/scripts/kernel-doc
+++ b/scripts/kernel-doc
@@ -48,7 +48,7 @@ Read C language source or header FILEs, extract embedded documentation comments,
 and print formatted documentation to standard output.
 
 The documentation comments are identified by "/**" opening comment mark. See
-Documentation/kernel-doc-nano-HOWTO.txt for the documentation comment syntax.
+Documentation/doc-guide/kernel-doc.rst for the documentation comment syntax.
 
 Output format selection (mutually exclusive):
   -man			Output troff manual page format. This is the default.
-- 
2.13.5

[PATCH 09/10] scripts: kernel-doc: parse next structs/unions

[Mauro Carvalho Chehab]

There are several places within the Kernel tree with nested
structs/unions, like this one:

  struct ingenic_cgu_clk_info {
    const char *name;
    enum {
      CGU_CLK_NONE = 0,
      CGU_CLK_EXT = BIT(0),
      CGU_CLK_PLL = BIT(1),
      CGU_CLK_GATE = BIT(2),
      CGU_CLK_MUX = BIT(3),
      CGU_CLK_MUX_GLITCHFREE = BIT(4),
      CGU_CLK_DIV = BIT(5),
      CGU_CLK_FIXDIV = BIT(6),
      CGU_CLK_CUSTOM = BIT(7),
    } type;
    int parents[4];
    union {
      struct ingenic_cgu_pll_info pll;
      struct {
        struct ingenic_cgu_gate_info gate;
        struct ingenic_cgu_mux_info mux;
        struct ingenic_cgu_div_info div;
        struct ingenic_cgu_fixdiv_info fixdiv;
      };
      struct ingenic_cgu_custom_info custom;
    };
  };

Currently, such struct is documented as:

	**Definition**

	::
	struct ingenic_cgu_clk_info {
	    const char * name;
	};

	**Members**

	``name``
	  name of the clock

With is obvioulsy wrong. It also generates an error:
	drivers/clk/ingenic/cgu.h:169: warning: No description found for parameter 'enum'

However, there's nothing wrong with this kernel-doc markup: everything
is documented there.

It makes sense to document all fields there. So, add a
way for the core to parse those structs.

With this patch, all documented fields will properly generate
documentation.

Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
---
 Documentation/doc-guide/kernel-doc.rst |  46 +++++++++++++
 scripts/kernel-doc                     | 120 ++++++++++++++++++---------------
 2 files changed, 112 insertions(+), 54 deletions(-)

diff --git a/Documentation/doc-guide/kernel-doc.rst b/Documentation/doc-guide/kernel-doc.rst
index 50473f0db345..3916a28b82b7 100644
--- a/Documentation/doc-guide/kernel-doc.rst
+++ b/Documentation/doc-guide/kernel-doc.rst
@@ -281,6 +281,52 @@ comment block.
 The kernel-doc data structure comments describe each member of the structure,
 in order, with the member descriptions.
 
+Nested structs/unions
+~~~~~~~~~~~~~~~~~~~~~
+
+It is possible to document nested structs unions, like::
+
+      /**
+       * struct nested_foobar - a struct with nested unions and structs
+       * @arg1: - first argument of anonymous union/anonymous struct
+       * @arg2: - second argument of anonymous union/anonymous struct
+       * @arg3: - third argument of anonymous union/anonymous struct
+       * @arg4: - fourth argument of anonymous union/anonymous struct
+       * @bar.st1.arg1 - first argument of struct st1 on union bar
+       * @bar.st1.arg2 - second argument of struct st1 on union bar
+       * @bar.st2.arg1 - first argument of struct st2 on union bar
+       * @bar.st2.arg2 - second argument of struct st2 on union bar
+      struct nested_foobar {
+        /* Anonymous union/struct*/
+        union {
+          struct {
+            int arg1;
+            int arg2;
+	  }
+          struct {
+            void *arg3;
+            int arg4;
+	  }
+	}
+	union {
+          struct {
+            int arg1;
+            int arg2;
+	  } st1;
+          struct {
+            void *arg1;
+            int arg2;
+	  } st2;
+	} bar;
+      };
+
+.. note::
+
+   #) When documenting nested structs or unions, if the struct/union ``foo``
+      is named, the argument ``bar`` inside it should be documented as
+      ``@foo.bar:``
+   #) When the nested struct/union is anonymous, the argument ``bar`` on it
+      should be documented as ``@bar:``
 
 Typedef documentation
 ---------------------
diff --git a/scripts/kernel-doc b/scripts/kernel-doc
index b6f3f6962897..880a196c7dc7 100755
--- a/scripts/kernel-doc
+++ b/scripts/kernel-doc
@@ -210,7 +210,7 @@ my $anon_struct_union = 0;
 my $type_constant = '\b``([^\`]+)``\b';
 my $type_constant2 = '\%([-_\w]+)';
 my $type_func = '(\w+)\(\)';
-my $type_param = '\@(\w+(\.\.\.)?)';
+my $type_param = '\@(\w[\.\w]*(\.\.\.)?)';
 my $type_fp_param = '\@(\w+)\(\)';  # Special RST handling for func ptr params
 my $type_env = '(\$\w+)';
 my $type_enum = '\&(enum\s*([_\w]+))';
@@ -663,32 +663,12 @@ sub output_struct_man(%) {
     print ".SH NAME\n";
     print $args{'type'} . " " . $args{'struct'} . " \\- " . $args{'purpose'} . "\n";
 
+    my $declaration = $args{'definition'};
+    $declaration =~ s/\t/  /g;
+    $declaration =~ s/\n/"\n.br\n.BI \"/g;
     print ".SH SYNOPSIS\n";
     print $args{'type'} . " " . $args{'struct'} . " {\n.br\n";
-
-    foreach my $parameter (@{$args{'parameterlist'}}) {
-	if ($parameter =~ /^#/) {
-	    print ".BI \"$parameter\"\n.br\n";
-	    next;
-	}
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	$type = $args{'parametertypes'}{$parameter};
-	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-	    # pointer-to-function
-	    print ".BI \"    " . $1 . "\" " . $parameter . " \") (" . $2 . ")" . "\"\n;\n";
-	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
-	    # bitfield
-	    print ".BI \"    " . $1 . "\ \" " . $parameter . $2 . " \"" . "\"\n;\n";
-	} else {
-	    $type =~ s/([^\*])$/$1 /;
-	    print ".BI \"    " . $type . "\" " . $parameter . " \"" . "\"\n;\n";
-	}
-	print "\n.br\n";
-    }
-    print "};\n.br\n";
+    print ".BI \"$declaration\n};\n.br\n\n";
 
     print ".SH Members\n";
     foreach $parameter (@{$args{'parameterlist'}}) {
@@ -926,29 +906,9 @@ sub output_struct_rst(%) {
 
     print "**Definition**\n\n";
     print "::\n\n";
-    print "  " . $args{'type'} . " " . $args{'struct'} . " {\n";
-    foreach $parameter (@{$args{'parameterlist'}}) {
-	if ($parameter =~ /^#/) {
-	    print "  " . "$parameter\n";
-	    next;
-	}
-
-	my $parameter_name = $parameter;
-	$parameter_name =~ s/\[.*//;
-
-	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
-	$type = $args{'parametertypes'}{$parameter};
-	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
-	    # pointer-to-function
-	    print "    $1 $parameter) ($2);\n";
-	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
-	    # bitfield
-	    print "    $1 $parameter$2;\n";
-	} else {
-	    print "    " . $type . " " . $parameter . ";\n";
-	}
-    }
-    print "  };\n\n";
+    my $declaration = $args{'definition'};
+    $declaration =~ s/\t/  /g;
+    print "  " . $args{'type'} . " " . $args{'struct'} . " {\n$declaration  };\n\n";
 
     print "**Members**\n\n";
     $lineprefix = "  ";
@@ -1022,20 +982,15 @@ sub dump_struct($$) {
     my $nested;
 
     if ($x =~ /(struct|union)\s+(\w+)\s*{(.*)}/) {
-	#my $decl_type = $1;
+	my $decl_type = $1;
 	$declaration_name = $2;
 	my $members = $3;
 
-	# ignore embedded structs or unions
-	$members =~ s/({.*})//g;
-	$nested = $1;
-
 	# ignore members marked private:
 	$members =~ s/\/\*\s*private:.*?\/\*\s*public:.*?\*\///gosi;
 	$members =~ s/\/\*\s*private:.*//gosi;
 	# strip comments:
 	$members =~ s/\/\*.*?\*\///gos;
-	$nested =~ s/\/\*.*?\*\///gos;
 	# strip kmemcheck_bitfield_{begin,end}.*;
 	$members =~ s/kmemcheck_bitfield_.*?;//gos;
 	# strip attributes
@@ -1047,13 +1002,70 @@ sub dump_struct($$) {
 	# replace DECLARE_HASHTABLE
 	$members =~ s/DECLARE_HASHTABLE\s*\(([^,)]+), ([^,)]+)\)/unsigned long $1\[1 << (($2) - 1)\]/gos;
 
+	my $declaration = $members;
+
+	# Split nested struct/union elements as newer ones
+	my $cont = 1;
+	while ($cont) {
+		$cont = 0;
+		while ($members =~ m/(struct|union)([^{};]+){([^{}]*)}([^{}\;]*)\;/) {
+			my $newmember = "$1 $4;";
+			my $id = $4;
+			my $content = $3;
+			$id =~ s/[:\[].*//;
+			foreach my $arg (split /;/, $content) {
+				next if ($arg =~ m/^\s*$/);
+				my $type = $arg;
+				my $name = $arg;
+				$type =~ s/\s\S+$//;
+				$name =~ s/.*\s//;
+				next if (($name =~ m/^\s*$/));
+				if ($id =~ m/^\s*$/) {
+					# anonymous struct/union
+					$newmember .= "$type $name;";
+				} else {
+					$newmember .= "$type $id.$name;";
+				}
+			}
+			$members =~ s/(struct|union)([^{};]+){([^{}]*)}([^{}\;]*)\;/$newmember/;
+			$cont = 1;
+		};
+	};
+
+	# Ignore other nested elements, like enums
+	$members =~ s/({[^\{\}]*})//g;
+	$nested = $decl_type;
+	$nested =~ s/\/\*.*?\*\///gos;
+
 	create_parameterlist($members, ';', $file);
 	check_sections($file, $declaration_name, "struct", $sectcheck, $struct_actual, $nested);
 
+	# Adjust declaration for better display
+	$declaration =~ s/([{;])/$1\n/g;
+	$declaration =~ s/}\s+;/};/g;
+	# Better handle inlined enums
+	do {} while ($declaration =~ s/(enum\s+{[^}]+),([^\n])/$1,\n$2/);
+
+	my @def_args = split /\n/, $declaration;
+	my $level = 1;
+	$declaration = "";
+	foreach my $clause (@def_args) {
+		$clause =~ s/^\s+//;
+		$clause =~ s/\s+$//;
+		$clause =~ s/\s+/ /;
+		next if (!$clause);
+		$level-- if ($clause =~ m/(})/ && $level > 1);
+		if (!($clause =~ m/^\s*#/)) {
+			$declaration .= "\t" x $level;
+		}
+		$declaration .= "\t" . $clause . "\n";
+		$level++ if ($clause =~ m/({)/ && !($clause =~m/}/));
+	}
 	output_declaration($declaration_name,
 			   'struct',
 			   {'struct' => $declaration_name,
 			    'module' => $modulename,
+			    'definition' => $declaration,
 			    'parameterlist' => \@parameterlist,
 			    'parameterdescs' => \%parameterdescs,
 			    'parametertypes' => \%parametertypes,
-- 
2.13.5

Re: [PATCH 09/10] scripts: kernel-doc: parse next structs/unions

[Mauro Carvalho Chehab]

Em Tue, 26 Sep 2017 14:59:19 -0300
Mauro Carvalho Chehab <mchehab@s-opensource.com> escreveu:

> There are several places within the Kernel tree with nested
> structs/unions, like this one:
> 
>   struct ingenic_cgu_clk_info {
>     const char *name;
>     enum {
>       CGU_CLK_NONE = 0,
>       CGU_CLK_EXT = BIT(0),
>       CGU_CLK_PLL = BIT(1),
>       CGU_CLK_GATE = BIT(2),
>       CGU_CLK_MUX = BIT(3),
>       CGU_CLK_MUX_GLITCHFREE = BIT(4),
>       CGU_CLK_DIV = BIT(5),
>       CGU_CLK_FIXDIV = BIT(6),
>       CGU_CLK_CUSTOM = BIT(7),
>     } type;
>     int parents[4];
>     union {
>       struct ingenic_cgu_pll_info pll;
>       struct {
>         struct ingenic_cgu_gate_info gate;
>         struct ingenic_cgu_mux_info mux;
>         struct ingenic_cgu_div_info div;
>         struct ingenic_cgu_fixdiv_info fixdiv;
>       };
>       struct ingenic_cgu_custom_info custom;
>     };
>   };
> 
> Currently, such struct is documented as:
> 
> 	**Definition**
> 
> 	::
> 	struct ingenic_cgu_clk_info {
> 	    const char * name;
> 	};
> 
> 	**Members**
> 
> 	``name``
> 	  name of the clock
> 
> With is obvioulsy wrong. It also generates an error:
> 	drivers/clk/ingenic/cgu.h:169: warning: No description found for parameter 'enum'
> 
> However, there's nothing wrong with this kernel-doc markup: everything
> is documented there.
> 
> It makes sense to document all fields there. So, add a
> way for the core to parse those structs.
> 
> With this patch, all documented fields will properly generate
> documentation.
> 
> Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
> ---
>  Documentation/doc-guide/kernel-doc.rst |  46 +++++++++++++
>  scripts/kernel-doc                     | 120 ++++++++++++++++++---------------
>  2 files changed, 112 insertions(+), 54 deletions(-)
> 
> diff --git a/Documentation/doc-guide/kernel-doc.rst b/Documentation/doc-guide/kernel-doc.rst
> index 50473f0db345..3916a28b82b7 100644
> --- a/Documentation/doc-guide/kernel-doc.rst
> +++ b/Documentation/doc-guide/kernel-doc.rst
> @@ -281,6 +281,52 @@ comment block.
>  The kernel-doc data structure comments describe each member of the structure,
>  in order, with the member descriptions.
>  
> +Nested structs/unions
> +~~~~~~~~~~~~~~~~~~~~~
> +
> +It is possible to document nested structs unions, like::
> +
> +      /**
> +       * struct nested_foobar - a struct with nested unions and structs
> +       * @arg1: - first argument of anonymous union/anonymous struct
> +       * @arg2: - second argument of anonymous union/anonymous struct
> +       * @arg3: - third argument of anonymous union/anonymous struct
> +       * @arg4: - fourth argument of anonymous union/anonymous struct
> +       * @bar.st1.arg1 - first argument of struct st1 on union bar
> +       * @bar.st1.arg2 - second argument of struct st1 on union bar
> +       * @bar.st2.arg1 - first argument of struct st2 on union bar
> +       * @bar.st2.arg2 - second argument of struct st2 on union bar
> +      struct nested_foobar {
> +        /* Anonymous union/struct*/
> +        union {
> +          struct {
> +            int arg1;
> +            int arg2;
> +	  }
> +          struct {
> +            void *arg3;
> +            int arg4;
> +	  }
> +	}
> +	union {
> +          struct {
> +            int arg1;
> +            int arg2;
> +	  } st1;
> +          struct {
> +            void *arg1;
> +            int arg2;
> +	  } st2;
> +	} bar;
> +      };
> +
> +.. note::
> +
> +   #) When documenting nested structs or unions, if the struct/union ``foo``
> +      is named, the argument ``bar`` inside it should be documented as
> +      ``@foo.bar:``
> +   #) When the nested struct/union is anonymous, the argument ``bar`` on it
> +      should be documented as ``@bar:``
>  
>  Typedef documentation
>  ---------------------
> diff --git a/scripts/kernel-doc b/scripts/kernel-doc
> index b6f3f6962897..880a196c7dc7 100755
> --- a/scripts/kernel-doc
> +++ b/scripts/kernel-doc
> @@ -210,7 +210,7 @@ my $anon_struct_union = 0;
>  my $type_constant = '\b``([^\`]+)``\b';
>  my $type_constant2 = '\%([-_\w]+)';
>  my $type_func = '(\w+)\(\)';
> -my $type_param = '\@(\w+(\.\.\.)?)';
> +my $type_param = '\@(\w[\.\w]*(\.\.\.)?)';
>  my $type_fp_param = '\@(\w+)\(\)';  # Special RST handling for func ptr params
>  my $type_env = '(\$\w+)';
>  my $type_enum = '\&(enum\s*([_\w]+))';
> @@ -663,32 +663,12 @@ sub output_struct_man(%) {
>      print ".SH NAME\n";
>      print $args{'type'} . " " . $args{'struct'} . " \\- " . $args{'purpose'} . "\n";
>  
> +    my $declaration = $args{'definition'};
> +    $declaration =~ s/\t/  /g;
> +    $declaration =~ s/\n/"\n.br\n.BI \"/g;
>      print ".SH SYNOPSIS\n";
>      print $args{'type'} . " " . $args{'struct'} . " {\n.br\n";
> -
> -    foreach my $parameter (@{$args{'parameterlist'}}) {
> -	if ($parameter =~ /^#/) {
> -	    print ".BI \"$parameter\"\n.br\n";
> -	    next;
> -	}
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	$type = $args{'parametertypes'}{$parameter};
> -	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -	    # pointer-to-function
> -	    print ".BI \"    " . $1 . "\" " . $parameter . " \") (" . $2 . ")" . "\"\n;\n";
> -	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
> -	    # bitfield
> -	    print ".BI \"    " . $1 . "\ \" " . $parameter . $2 . " \"" . "\"\n;\n";
> -	} else {
> -	    $type =~ s/([^\*])$/$1 /;
> -	    print ".BI \"    " . $type . "\" " . $parameter . " \"" . "\"\n;\n";
> -	}
> -	print "\n.br\n";
> -    }
> -    print "};\n.br\n";
> +    print ".BI \"$declaration\n};\n.br\n\n";
>  
>      print ".SH Members\n";
>      foreach $parameter (@{$args{'parameterlist'}}) {
> @@ -926,29 +906,9 @@ sub output_struct_rst(%) {
>  
>      print "**Definition**\n\n";
>      print "::\n\n";
> -    print "  " . $args{'type'} . " " . $args{'struct'} . " {\n";
> -    foreach $parameter (@{$args{'parameterlist'}}) {
> -	if ($parameter =~ /^#/) {
> -	    print "  " . "$parameter\n";
> -	    next;
> -	}
> -
> -	my $parameter_name = $parameter;
> -	$parameter_name =~ s/\[.*//;
> -
> -	($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
> -	$type = $args{'parametertypes'}{$parameter};
> -	if ($type =~ m/([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)/) {
> -	    # pointer-to-function
> -	    print "    $1 $parameter) ($2);\n";
> -	} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
> -	    # bitfield
> -	    print "    $1 $parameter$2;\n";
> -	} else {
> -	    print "    " . $type . " " . $parameter . ";\n";
> -	}
> -    }
> -    print "  };\n\n";
> +    my $declaration = $args{'definition'};
> +    $declaration =~ s/\t/  /g;
> +    print "  " . $args{'type'} . " " . $args{'struct'} . " {\n$declaration  };\n\n";
>  
>      print "**Members**\n\n";
>      $lineprefix = "  ";
> @@ -1022,20 +982,15 @@ sub dump_struct($$) {
>      my $nested;
>  
>      if ($x =~ /(struct|union)\s+(\w+)\s*{(.*)}/) {
> -	#my $decl_type = $1;
> +	my $decl_type = $1;
>  	$declaration_name = $2;
>  	my $members = $3;
>  
> -	# ignore embedded structs or unions
> -	$members =~ s/({.*})//g;
> -	$nested = $1;
> -
>  	# ignore members marked private:
>  	$members =~ s/\/\*\s*private:.*?\/\*\s*public:.*?\*\///gosi;
>  	$members =~ s/\/\*\s*private:.*//gosi;
>  	# strip comments:
>  	$members =~ s/\/\*.*?\*\///gos;
> -	$nested =~ s/\/\*.*?\*\///gos;
>  	# strip kmemcheck_bitfield_{begin,end}.*;
>  	$members =~ s/kmemcheck_bitfield_.*?;//gos;
>  	# strip attributes
> @@ -1047,13 +1002,70 @@ sub dump_struct($$) {
>  	# replace DECLARE_HASHTABLE
>  	$members =~ s/DECLARE_HASHTABLE\s*\(([^,)]+), ([^,)]+)\)/unsigned long $1\[1 << (($2) - 1)\]/gos;
>  
> +	my $declaration = $members;
> +
> +	# Split nested struct/union elements as newer ones
> +	my $cont = 1;
> +	while ($cont) {
> +		$cont = 0;
> +		while ($members =~ m/(struct|union)([^{};]+){([^{}]*)}([^{}\;]*)\;/) {
> +			my $newmember = "$1 $4;";
> +			my $id = $4;
> +			my $content = $3;
> +			$id =~ s/[:\[].*//;
> +			foreach my $arg (split /;/, $content) {
> +				next if ($arg =~ m/^\s*$/);
> +				my $type = $arg;
> +				my $name = $arg;
> +				$type =~ s/\s\S+$//;
> +				$name =~ s/.*\s//;
> +				next if (($name =~ m/^\s*$/));
> +				if ($id =~ m/^\s*$/) {
> +					# anonymous struct/union
> +					$newmember .= "$type $name;";
> +				} else {
> +					$newmember .= "$type $id.$name;";
> +				}
> +			}
> +			$members =~ s/(struct|union)([^{};]+){([^{}]*)}([^{}\;]*)\;/$newmember/;
> +			$cont = 1;
> +		};
> +	};
> +
> +	# Ignore other nested elements, like enums
> +	$members =~ s/({[^\{\}]*})//g;
> +	$nested = $decl_type;
> +	$nested =~ s/\/\*.*?\*\///gos;
> +
>  	create_parameterlist($members, ';', $file);
>  	check_sections($file, $declaration_name, "struct", $sectcheck, $struct_actual, $nested);
>  
> +	# Adjust declaration for better display
> +	$declaration =~ s/([{;])/$1\n/g;
> +	$declaration =~ s/}\s+;/};/g;
> +	# Better handle inlined enums
> +	do {} while ($declaration =~ s/(enum\s+{[^}]+),([^\n])/$1,\n$2/);
> +
> +	my @def_args = split /\n/, $declaration;
> +	my $level = 1;
> +	$declaration = "";
> +	foreach my $clause (@def_args) {
> +		$clause =~ s/^\s+//;
> +		$clause =~ s/\s+$//;
> +		$clause =~ s/\s+/ /;
> +		next if (!$clause);
> +		$level-- if ($clause =~ m/(})/ && $level > 1);
> +		if (!($clause =~ m/^\s*#/)) {
> +			$declaration .= "\t" x $level;
> +		}
> +		$declaration .= "\t" . $clause . "\n";
> +		$level++ if ($clause =~ m/({)/ && !($clause =~m/}/));
> +	}
>  	output_declaration($declaration_name,
>  			   'struct',
>  			   {'struct' => $declaration_name,
>  			    'module' => $modulename,
> +			    'definition' => $declaration,
>  			    'parameterlist' => \@parameterlist,
>  			    'parameterdescs' => \%parameterdescs,
>  			    'parametertypes' => \%parametertypes,

This patch actually need a fixup, in order to handle pointer,
array and bitmask IDs.

diff --git a/scripts/kernel-doc b/scripts/kernel-doc
index cff66ee91f2c..1aebeda444fa 100755
--- a/scripts/kernel-doc
+++ b/scripts/kernel-doc
@@ -1012,12 +1012,15 @@ sub dump_struct($$) {
 			my $id = $4;
 			my $content = $3;
 			$id =~ s/[:\[].*//;
+			$id =~ s/^\*+//;
 			foreach my $arg (split /;/, $content) {
 				next if ($arg =~ m/^\s*$/);
 				my $type = $arg;
 				my $name = $arg;
 				$type =~ s/\s\S+$//;
 				$name =~ s/.*\s//;
+				$name =~ s/[:\[].*//;
+				$name =~ s/^\*+//;
 				next if (($name =~ m/^\s*$/));
 				if ($id =~ m/^\s*$/) {
 					# anonymous struct/union


Thanks,
Mauro

Re: [PATCH 09/10] scripts: kernel-doc: parse next structs/unions

[Jonathan Corbet]

On Tue, 26 Sep 2017 17:29:47 -0300
Mauro Carvalho Chehab <mchehab@s-opensource.com> wrote:

> This patch actually need a fixup, in order to handle pointer,
> array and bitmask IDs.

Can you send a new series with the fixed patch?

I sure do like the shrinking of kernel-doc that comes with this series!  

Thanks,

jon

[PATCH 10/10] [RFC] w1_netlink.h: add support for nested structs

[Mauro Carvalho Chehab]

Describe nested struct/union fields

NOTE: This is a pure test patch, meant to validate if the
parsing logic for nested structs is working properly.

I've no idea if the random text I added there is correct!

Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
---
 drivers/w1/w1_netlink.h | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/drivers/w1/w1_netlink.h b/drivers/w1/w1_netlink.h
index a36661cd1f05..e781d1109cd7 100644
--- a/drivers/w1/w1_netlink.h
+++ b/drivers/w1/w1_netlink.h
@@ -60,6 +60,10 @@ enum w1_netlink_message_types {
  * @status: kernel feedback for success 0 or errno failure value
  * @len: length of data following w1_netlink_msg
  * @id: union holding master bus id (msg.id) and slave device id (id[8]).
+ * @id.id: Slave ID (8 bytes)
+ * @id.mst: master bus identification
+ * @id.mst.id: master bus ID
+ * @id.mst.res: master bus reserved
  * @data: start address of any following data
  *
  * The base message structure for w1 messages over netlink.
-- 
2.13.5

Re: [PATCH 10/10] [RFC] w1_netlink.h: add support for nested structs

[Evgeniy Polyakov]

Hi

26.09.2017, 20:59, "Mauro Carvalho Chehab" <mchehab@s-opensource.com>:
> Describe nested struct/union fields
>
> NOTE: This is a pure test patch, meant to validate if the
> parsing logic for nested structs is working properly.
>
> I've no idea if the random text I added there is correct!

It looks correct, although I would switch master bus with bus master.

Feel free to add my acked-by.

> Signed-off-by: Mauro Carvalho Chehab <mchehab@s-opensource.com>
> ---
>  drivers/w1/w1_netlink.h | 4 ++++
>  1 file changed, 4 insertions(+)
>
> diff --git a/drivers/w1/w1_netlink.h b/drivers/w1/w1_netlink.h
> index a36661cd1f05..e781d1109cd7 100644
> --- a/drivers/w1/w1_netlink.h
> +++ b/drivers/w1/w1_netlink.h
> @@ -60,6 +60,10 @@ enum w1_netlink_message_types {
>   * @status: kernel feedback for success 0 or errno failure value
>   * @len: length of data following w1_netlink_msg
>   * @id: union holding master bus id (msg.id) and slave device id (id[8]).
> + * @id.id: Slave ID (8 bytes)
> + * @id.mst: master bus identification
> + * @id.mst.id: master bus ID
> + * @id.mst.res: master bus reserved
>   * @data: start address of any following data
>   *
>   * The base message structure for w1 messages over netlink.
> --
> 2.13.5