aboutsummaryrefslogtreecommitdiffstats
path: root/scripts/kernel-doc
diff options
context:
space:
mode:
authorJani Nikula <jani.nikula@intel.com>2016-05-26 10:18:17 -0400
committerJani Nikula <jani.nikula@intel.com>2016-05-30 06:38:58 -0400
commitc099ff6989baf286da8eaed5c7b3d18ae60ea2e7 (patch)
tree348e441878bea8a3da3f6ff6b10e61fd5de447ac /scripts/kernel-doc
parent9c9193c49c1f1662b00476b3d0697a1be37c6b08 (diff)
kernel-doc/rst: highlight function/struct/enum purpose lines too
Let the user use @foo, &bar, %baz, etc. in the first kernel-doc purpose line too. Signed-off-by: Jani Nikula <jani.nikula@intel.com>
Diffstat (limited to 'scripts/kernel-doc')
-rwxr-xr-xscripts/kernel-doc37
1 files changed, 25 insertions, 12 deletions
diff --git a/scripts/kernel-doc b/scripts/kernel-doc
index 8f9eac509377..76bad55c031e 100755
--- a/scripts/kernel-doc
+++ b/scripts/kernel-doc
@@ -1805,6 +1805,7 @@ sub output_highlight_rst {
1805sub output_function_rst(%) { 1805sub output_function_rst(%) {
1806 my %args = %{$_[0]}; 1806 my %args = %{$_[0]};
1807 my ($parameter, $section); 1807 my ($parameter, $section);
1808 my $oldprefix = $lineprefix;
1808 my $start; 1809 my $start;
1809 1810
1810 print ".. c:function:: "; 1811 print ".. c:function:: ";
@@ -1829,9 +1830,13 @@ sub output_function_rst(%) {
1829 print $type . " " . $parameter; 1830 print $type . " " . $parameter;
1830 } 1831 }
1831 } 1832 }
1832 print ")\n\n " . $args{'purpose'} . "\n\n"; 1833 print ")\n\n";
1834 $lineprefix = " ";
1835 output_highlight_rst($args{'purpose'});
1836 print "\n";
1833 1837
1834 print ":Parameters:\n\n"; 1838 print ":Parameters:\n\n";
1839 $lineprefix = " ";
1835 foreach $parameter (@{$args{'parameterlist'}}) { 1840 foreach $parameter (@{$args{'parameterlist'}}) {
1836 my $parameter_name = $parameter; 1841 my $parameter_name = $parameter;
1837 #$parameter_name =~ s/\[.*//; 1842 #$parameter_name =~ s/\[.*//;
@@ -1844,15 +1849,14 @@ sub output_function_rst(%) {
1844 } 1849 }
1845 if (defined($args{'parameterdescs'}{$parameter_name}) && 1850 if (defined($args{'parameterdescs'}{$parameter_name}) &&
1846 $args{'parameterdescs'}{$parameter_name} ne $undescribed) { 1851 $args{'parameterdescs'}{$parameter_name} ne $undescribed) {
1847 my $oldprefix = $lineprefix;
1848 $lineprefix = " ";
1849 output_highlight_rst($args{'parameterdescs'}{$parameter_name}); 1852 output_highlight_rst($args{'parameterdescs'}{$parameter_name});
1850 $lineprefix = $oldprefix;
1851 } else { 1853 } else {
1852 print "\n _undescribed_\n"; 1854 print "\n _undescribed_\n";
1853 } 1855 }
1854 print "\n"; 1856 print "\n";
1855 } 1857 }
1858
1859 $lineprefix = $oldprefix;
1856 output_section_rst(@_); 1860 output_section_rst(@_);
1857} 1861}
1858 1862
@@ -1874,14 +1878,16 @@ sub output_section_rst(%) {
1874sub output_enum_rst(%) { 1878sub output_enum_rst(%) {
1875 my %args = %{$_[0]}; 1879 my %args = %{$_[0]};
1876 my ($parameter); 1880 my ($parameter);
1881 my $oldprefix = $lineprefix;
1877 my $count; 1882 my $count;
1878 my $name = "enum " . $args{'enum'}; 1883 my $name = "enum " . $args{'enum'};
1879 1884
1880 print "\n\n.. c:type:: " . $name . "\n\n"; 1885 print "\n\n.. c:type:: " . $name . "\n\n";
1881 print " " . $args{'purpose'} . "\n\n"; 1886 $lineprefix = " ";
1887 output_highlight_rst($args{'purpose'});
1888 print "\n";
1882 1889
1883 print "..\n\n:Constants:\n\n"; 1890 print "..\n\n:Constants:\n\n";
1884 my $oldprefix = $lineprefix;
1885 $lineprefix = " "; 1891 $lineprefix = " ";
1886 foreach $parameter (@{$args{'parameterlist'}}) { 1892 foreach $parameter (@{$args{'parameterlist'}}) {
1887 print " `$parameter`\n"; 1893 print " `$parameter`\n";
@@ -1892,6 +1898,7 @@ sub output_enum_rst(%) {
1892 } 1898 }
1893 print "\n"; 1899 print "\n";
1894 } 1900 }
1901
1895 $lineprefix = $oldprefix; 1902 $lineprefix = $oldprefix;
1896 output_section_rst(@_); 1903 output_section_rst(@_);
1897} 1904}
@@ -1899,23 +1906,29 @@ sub output_enum_rst(%) {
1899sub output_typedef_rst(%) { 1906sub output_typedef_rst(%) {
1900 my %args = %{$_[0]}; 1907 my %args = %{$_[0]};
1901 my ($parameter); 1908 my ($parameter);
1902 my $count; 1909 my $oldprefix = $lineprefix;
1903 my $name = "typedef " . $args{'typedef'}; 1910 my $name = "typedef " . $args{'typedef'};
1904 1911
1905 ### FIXME: should the name below contain "typedef" or not? 1912 ### FIXME: should the name below contain "typedef" or not?
1906 print "\n\n.. c:type:: " . $name . "\n\n"; 1913 print "\n\n.. c:type:: " . $name . "\n\n";
1907 print " " . $args{'purpose'} . "\n\n"; 1914 $lineprefix = " ";
1915 output_highlight_rst($args{'purpose'});
1916 print "\n";
1908 1917
1918 $lineprefix = $oldprefix;
1909 output_section_rst(@_); 1919 output_section_rst(@_);
1910} 1920}
1911 1921
1912sub output_struct_rst(%) { 1922sub output_struct_rst(%) {
1913 my %args = %{$_[0]}; 1923 my %args = %{$_[0]};
1914 my ($parameter); 1924 my ($parameter);
1925 my $oldprefix = $lineprefix;
1915 my $name = $args{'type'} . " " . $args{'struct'}; 1926 my $name = $args{'type'} . " " . $args{'struct'};
1916 1927
1917 print "\n\n.. c:type:: " . $name . "\n\n"; 1928 print "\n\n.. c:type:: " . $name . "\n\n";
1918 print " " . $args{'purpose'} . "\n\n"; 1929 $lineprefix = " ";
1930 output_highlight_rst($args{'purpose'});
1931 print "\n";
1919 1932
1920 print ":Definition:\n\n"; 1933 print ":Definition:\n\n";
1921 print " ::\n\n"; 1934 print " ::\n\n";
@@ -1944,6 +1957,7 @@ sub output_struct_rst(%) {
1944 print " };\n\n"; 1957 print " };\n\n";
1945 1958
1946 print ":Members:\n\n"; 1959 print ":Members:\n\n";
1960 $lineprefix = " ";
1947 foreach $parameter (@{$args{'parameterlist'}}) { 1961 foreach $parameter (@{$args{'parameterlist'}}) {
1948 ($parameter =~ /^#/) && next; 1962 ($parameter =~ /^#/) && next;
1949 1963
@@ -1953,13 +1967,12 @@ sub output_struct_rst(%) {
1953 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next; 1967 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
1954 $type = $args{'parametertypes'}{$parameter}; 1968 $type = $args{'parametertypes'}{$parameter};
1955 print " `$type $parameter`" . "\n"; 1969 print " `$type $parameter`" . "\n";
1956 my $oldprefix = $lineprefix;
1957 $lineprefix = " ";
1958 output_highlight_rst($args{'parameterdescs'}{$parameter_name}); 1970 output_highlight_rst($args{'parameterdescs'}{$parameter_name});
1959 $lineprefix = $oldprefix;
1960 print "\n"; 1971 print "\n";
1961 } 1972 }
1962 print "\n"; 1973 print "\n";
1974
1975 $lineprefix = $oldprefix;
1963 output_section_rst(@_); 1976 output_section_rst(@_);
1964} 1977}
1965 1978