kernel-doc (3eb014a103701bedfaa11bc321f470e918c71ff7) kernel-doc (53f049fa5f18730b61faaee582ea0e045fd44f49)
1#!/usr/bin/perl -w
2
3use strict;
4
5## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##
6## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ##
7## Copyright (C) 2001 Simon Huggins ##
8## ##

--- 314 unchanged lines hidden (view full) ---

323 $verbose = 1;
324 } elsif (($cmd eq "-h") || ($cmd eq "--help")) {
325 usage();
326 } elsif ($cmd eq '-filelist') {
327 $filelist = shift @ARGV;
328 }
329}
330
1#!/usr/bin/perl -w
2
3use strict;
4
5## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##
6## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ##
7## Copyright (C) 2001 Simon Huggins ##
8## ##

--- 314 unchanged lines hidden (view full) ---

323 $verbose = 1;
324 } elsif (($cmd eq "-h") || ($cmd eq "--help")) {
325 usage();
326 } elsif ($cmd eq '-filelist') {
327 $filelist = shift @ARGV;
328 }
329}
330
331# get kernel version from env
332sub get_kernel_version() {
333 my $version;
331
334
335 if (defined($ENV{'KERNELVERSION'})) {
336 $version = $ENV{'KERNELVERSION'};
337 }
338 return $version;
339}
340
332# generate a sequence of code that will splice in highlighting information
333# using the s// operator.
334my $dohighlight = "";
335foreach my $pattern (keys %highlights) {
336# print STDERR "scanning pattern:$pattern, highlight:($highlights{$pattern})\n";
337 $dohighlight .= "\$contents =~ s:$pattern:$highlights{$pattern}:gs;\n";
338}
339

--- 256 unchanged lines hidden (view full) ---

596 print "<refentryinfo>\n";
597 print " <title>LINUX</title>\n";
598 print " <productname>Kernel Hackers Manual</productname>\n";
599 print " <date>$man_date</date>\n";
600 print "</refentryinfo>\n";
601 print "<refmeta>\n";
602 print " <refentrytitle><phrase>".$args{'function'}."</phrase></refentrytitle>\n";
603 print " <manvolnum>9</manvolnum>\n";
341# generate a sequence of code that will splice in highlighting information
342# using the s// operator.
343my $dohighlight = "";
344foreach my $pattern (keys %highlights) {
345# print STDERR "scanning pattern:$pattern, highlight:($highlights{$pattern})\n";
346 $dohighlight .= "\$contents =~ s:$pattern:$highlights{$pattern}:gs;\n";
347}
348

--- 256 unchanged lines hidden (view full) ---

605 print "<refentryinfo>\n";
606 print " <title>LINUX</title>\n";
607 print " <productname>Kernel Hackers Manual</productname>\n";
608 print " <date>$man_date</date>\n";
609 print "</refentryinfo>\n";
610 print "<refmeta>\n";
611 print " <refentrytitle><phrase>".$args{'function'}."</phrase></refentrytitle>\n";
612 print " <manvolnum>9</manvolnum>\n";
613 print " <refmiscinfo class=\"version\">" . get_kernel_version() . "</refmiscinfo>\n";
604 print "</refmeta>\n";
605 print "<refnamediv>\n";
606 print " <refname>".$args{'function'}."</refname>\n";
607 print " <refpurpose>\n";
608 print " ";
609 output_highlight ($args{'purpose'});
610 print " </refpurpose>\n";
611 print "</refnamediv>\n";

--- 60 unchanged lines hidden (view full) ---

672 print "<refentryinfo>\n";
673 print " <title>LINUX</title>\n";
674 print " <productname>Kernel Hackers Manual</productname>\n";
675 print " <date>$man_date</date>\n";
676 print "</refentryinfo>\n";
677 print "<refmeta>\n";
678 print " <refentrytitle><phrase>".$args{'type'}." ".$args{'struct'}."</phrase></refentrytitle>\n";
679 print " <manvolnum>9</manvolnum>\n";
614 print "</refmeta>\n";
615 print "<refnamediv>\n";
616 print " <refname>".$args{'function'}."</refname>\n";
617 print " <refpurpose>\n";
618 print " ";
619 output_highlight ($args{'purpose'});
620 print " </refpurpose>\n";
621 print "</refnamediv>\n";

--- 60 unchanged lines hidden (view full) ---

682 print "<refentryinfo>\n";
683 print " <title>LINUX</title>\n";
684 print " <productname>Kernel Hackers Manual</productname>\n";
685 print " <date>$man_date</date>\n";
686 print "</refentryinfo>\n";
687 print "<refmeta>\n";
688 print " <refentrytitle><phrase>".$args{'type'}." ".$args{'struct'}."</phrase></refentrytitle>\n";
689 print " <manvolnum>9</manvolnum>\n";
690 print " <refmiscinfo class=\"version\">" . get_kernel_version() . "</refmiscinfo>\n";
680 print "</refmeta>\n";
681 print "<refnamediv>\n";
682 print " <refname>".$args{'type'}." ".$args{'struct'}."</refname>\n";
683 print " <refpurpose>\n";
684 print " ";
685 output_highlight ($args{'purpose'});
686 print " </refpurpose>\n";
687 print "</refnamediv>\n";

--- 68 unchanged lines hidden (view full) ---

756 print "<refentryinfo>\n";
757 print " <title>LINUX</title>\n";
758 print " <productname>Kernel Hackers Manual</productname>\n";
759 print " <date>$man_date</date>\n";
760 print "</refentryinfo>\n";
761 print "<refmeta>\n";
762 print " <refentrytitle><phrase>enum ".$args{'enum'}."</phrase></refentrytitle>\n";
763 print " <manvolnum>9</manvolnum>\n";
691 print "</refmeta>\n";
692 print "<refnamediv>\n";
693 print " <refname>".$args{'type'}." ".$args{'struct'}."</refname>\n";
694 print " <refpurpose>\n";
695 print " ";
696 output_highlight ($args{'purpose'});
697 print " </refpurpose>\n";
698 print "</refnamediv>\n";

--- 68 unchanged lines hidden (view full) ---

767 print "<refentryinfo>\n";
768 print " <title>LINUX</title>\n";
769 print " <productname>Kernel Hackers Manual</productname>\n";
770 print " <date>$man_date</date>\n";
771 print "</refentryinfo>\n";
772 print "<refmeta>\n";
773 print " <refentrytitle><phrase>enum ".$args{'enum'}."</phrase></refentrytitle>\n";
774 print " <manvolnum>9</manvolnum>\n";
775 print " <refmiscinfo class=\"version\">" . get_kernel_version() . "</refmiscinfo>\n";
764 print "</refmeta>\n";
765 print "<refnamediv>\n";
766 print " <refname>enum ".$args{'enum'}."</refname>\n";
767 print " <refpurpose>\n";
768 print " ";
769 output_highlight ($args{'purpose'});
770 print " </refpurpose>\n";
771 print "</refnamediv>\n";

--- 1184 unchanged lines hidden --- 		776 print "</refmeta>\n";
777 print "<refnamediv>\n";
778 print " <refname>enum ".$args{'enum'}."</refname>\n";
779 print " <refpurpose>\n";
780 print " ";
781 output_highlight ($args{'purpose'});
782 print " </refpurpose>\n";
783 print "</refnamediv>\n";

--- 1184 unchanged lines hidden ---