Lines Matching refs:args
478 my %args = %{$_[0]};
481 foreach $section (@{$args{'sectionlist'}}) {
484 output_highlight($args{'sections'}{$section});
491 my %args = %{$_[0]};
494 print "<h2>enum " . $args{'enum'} . "</h2>\n";
496 print "<b>enum " . $args{'enum'} . "</b> {<br>\n";
498 foreach $parameter (@{$args{'parameterlist'}}) {
500 if ($count != $#{$args{'parameterlist'}}) {
510 foreach $parameter (@{$args{'parameterlist'}}) {
513 output_highlight($args{'parameterdescs'}{$parameter});
522 my %args = %{$_[0]};
525 print "<h2>typedef " . $args{'typedef'} . "</h2>\n";
527 print "<b>typedef " . $args{'typedef'} . "</b>\n";
534 my %args = %{$_[0]};
537 print "<h2>" . $args{'type'} . " " . $args{'struct'} . " - " . $args{'purpose'} . "</h2>\n";
538 print "<b>" . $args{'type'} . " " . $args{'struct'} . "</b> {<br>\n";
539 foreach $parameter (@{$args{'parameterlist'}}) {
547 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
548 $type = $args{'parametertypes'}{$parameter};
563 foreach $parameter (@{$args{'parameterlist'}}) {
569 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
572 output_highlight($args{'parameterdescs'}{$parameter_name});
581 my %args = %{$_[0]};
585 print "<h2>" . $args{'function'} . " - " . $args{'purpose'} . "</h2>\n";
586 print "<i>" . $args{'functiontype'} . "</i>\n";
587 print "<b>" . $args{'function'} . "</b>\n";
590 foreach $parameter (@{$args{'parameterlist'}}) {
591 $type = $args{'parametertypes'}{$parameter};
598 if ($count != $#{$args{'parameterlist'}}) {
607 foreach $parameter (@{$args{'parameterlist'}}) {
611 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
614 output_highlight($args{'parameterdescs'}{$parameter_name});
623 my %args = %{$_[0]};
627 foreach $section (@{$args{'sectionlist'}}) {
630 output_highlight($args{'sections'}{$section});
637 my %args = %{$_[0]};
641 foreach $section (@{$args{'sectionlist'}}) {
649 output_highlight($args{'sections'}{$section});
661 my %args = %{$_[0]};
666 $id = "API-" . $args{'function'};
676 print " <refentrytitle><phrase>" . $args{'function'} . "</phrase></refentrytitle>\n";
681 print " <refname>" . $args{'function'} . "</refname>\n";
684 output_highlight ($args{'purpose'});
691 print " <funcdef>" . $args{'functiontype'} . " ";
692 print "<function>" . $args{'function'} . " </function></funcdef>\n";
695 if ($#{$args{'parameterlist'}} >= 0) {
696 foreach $parameter (@{$args{'parameterlist'}}) {
697 $type = $args{'parametertypes'}{$parameter};
715 if ($#{$args{'parameterlist'}} >= 0) {
717 foreach $parameter (@{$args{'parameterlist'}}) {
724 output_highlight($args{'parameterdescs'}{$parameter_name});
739 my %args = %{$_[0]};
743 $id = "API-struct-" . $args{'struct'};
753 …print " <refentrytitle><phrase>" . $args{'type'} . " " . $args{'struct'} . "</phrase></refentrytit…
758 print " <refname>" . $args{'type'} . " " . $args{'struct'} . "</refname>\n";
761 output_highlight ($args{'purpose'});
768 print $args{'type'} . " " . $args{'struct'} . " {\n";
769 foreach $parameter (@{$args{'parameterlist'}}) {
782 defined($args{'parameterdescs'}{$parameter_name}) || next;
783 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
784 $type = $args{'parametertypes'}{$parameter};
802 if ($#{$args{'parameterlist'}} >= 0) {
804 foreach $parameter (@{$args{'parameterlist'}}) {
810 defined($args{'parameterdescs'}{$parameter_name}) || next;
811 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
815 output_highlight($args{'parameterdescs'}{$parameter_name});
832 my %args = %{$_[0]};
837 $id = "API-enum-" . $args{'enum'};
847 print " <refentrytitle><phrase>enum " . $args{'enum'} . "</phrase></refentrytitle>\n";
852 print " <refname>enum " . $args{'enum'} . "</refname>\n";
855 output_highlight ($args{'purpose'});
862 print "enum " . $args{'enum'} . " {\n";
864 foreach $parameter (@{$args{'parameterlist'}}) {
866 if ($count != $#{$args{'parameterlist'}}) {
879 foreach $parameter (@{$args{'parameterlist'}}) {
886 output_highlight($args{'parameterdescs'}{$parameter_name});
900 my %args = %{$_[0]};
904 $id = "API-typedef-" . $args{'typedef'};
914 print " <refentrytitle><phrase>typedef " . $args{'typedef'} . "</phrase></refentrytitle>\n";
918 print " <refname>typedef " . $args{'typedef'} . "</refname>\n";
921 output_highlight ($args{'purpose'});
927 print " <synopsis>typedef " . $args{'typedef'} . ";</synopsis>\n";
937 my %args = %{$_[0]};
941 my $id = $args{'module'};
946 foreach $section (@{$args{'sectionlist'}}) {
947 if (!$args{'content-only'}) {
955 output_highlight($args{'sections'}{$section});
961 if (!$args{'content-only'}) {
971 my %args = %{$_[0]};
976 $id = $args{'module'} . "-" . $args{'function'};
980 print " <title id=\"$id\">" . $args{'function'} . "</title>\n";
983 print " <funcdef>" . $args{'functiontype'} . " ";
984 print "<function>" . $args{'function'} . " ";
988 if ($#{$args{'parameterlist'}} >= 0) {
989 foreach $parameter (@{$args{'parameterlist'}}) {
990 $type = $args{'parametertypes'}{$parameter};
1004 if ($#{$args{'parameterlist'}} >= 0) {
1010 foreach $parameter (@{$args{'parameterlist'}}) {
1017 output_highlight($args{'parameterdescs'}{$parameter_name});
1027 foreach $section (@{$args{'sectionlist'}}) {
1034 output_highlight($args{'sections'}{$section});
1049 my %args = %{$_[0]};
1053 …print ".TH \"$args{'function'}\" 9 \"$args{'function'}\" \"$man_date\" \"Kernel Hacker's Manual\" …
1056 print $args{'function'} . " \\- " . $args{'purpose'} . "\n";
1059 if ($args{'functiontype'} ne "") {
1060 print ".B \"" . $args{'functiontype'} . "\" " . $args{'function'} . "\n";
1062 print ".B \"" . $args{'function'} . "\n";
1067 foreach my $parameter (@{$args{'parameterlist'}}) {
1068 if ($count == $#{$args{'parameterlist'}}) {
1071 $type = $args{'parametertypes'}{$parameter};
1084 foreach $parameter (@{$args{'parameterlist'}}) {
1089 output_highlight($args{'parameterdescs'}{$parameter_name});
1091 foreach $section (@{$args{'sectionlist'}}) {
1093 output_highlight($args{'sections'}{$section});
1100 my %args = %{$_[0]};
1104 print ".TH \"$args{'module'}\" 9 \"enum $args{'enum'}\" \"$man_date\" \"API Manual\" LINUX\n";
1107 print "enum " . $args{'enum'} . " \\- " . $args{'purpose'} . "\n";
1110 print "enum " . $args{'enum'} . " {\n";
1112 foreach my $parameter (@{$args{'parameterlist'}}) {
1114 if ($count == $#{$args{'parameterlist'}}) {
1125 foreach $parameter (@{$args{'parameterlist'}}) {
1130 output_highlight($args{'parameterdescs'}{$parameter_name});
1132 foreach $section (@{$args{'sectionlist'}}) {
1134 output_highlight($args{'sections'}{$section});
1141 my %args = %{$_[0]};
1144 …print ".TH \"$args{'module'}\" 9 \"" . $args{'type'} . " " . $args{'struct'} . "\" \"$man_date\" \…
1147 print $args{'type'} . " " . $args{'struct'} . " \\- " . $args{'purpose'} . "\n";
1150 print $args{'type'} . " " . $args{'struct'} . " {\n.br\n";
1152 foreach my $parameter (@{$args{'parameterlist'}}) {
1160 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
1161 $type = $args{'parametertypes'}{$parameter};
1177 foreach $parameter (@{$args{'parameterlist'}}) {
1183 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
1185 output_highlight($args{'parameterdescs'}{$parameter_name});
1187 foreach $section (@{$args{'sectionlist'}}) {
1189 output_highlight($args{'sections'}{$section});
1196 my %args = %{$_[0]};
1199 print ".TH \"$args{'module'}\" 9 \"$args{'typedef'}\" \"$man_date\" \"API Manual\" LINUX\n";
1202 print "typedef " . $args{'typedef'} . " \\- " . $args{'purpose'} . "\n";
1204 foreach $section (@{$args{'sectionlist'}}) {
1206 output_highlight($args{'sections'}{$section});
1211 my %args = %{$_[0]};
1215 print ".TH \"$args{'module'}\" 9 \"$args{'module'}\" \"$man_date\" \"API Manual\" LINUX\n";
1217 foreach $section (@{$args{'sectionlist'}}) {
1219 output_highlight($args{'sections'}{$section});
1226 my %args = %{$_[0]};
1231 print $args{'function'} . " - " . $args{'purpose'} . "\n";
1234 if ($args{'functiontype'} ne "") {
1235 $start = $args{'functiontype'} . " " . $args{'function'} . " (";
1237 $start = $args{'function'} . " (";
1242 foreach my $parameter (@{$args{'parameterlist'}}) {
1243 $type = $args{'parametertypes'}{$parameter};
1250 if ($count != $#{$args{'parameterlist'}}) {
1260 foreach $parameter (@{$args{'parameterlist'}}) {
1264 print $parameter . "\n\t" . $args{'parameterdescs'}{$parameter_name} . "\n";
1271 my %args = %{$_[0]};
1275 foreach $section (@{$args{'sectionlist'}}) {
1277 output_highlight($args{'sections'}{$section});
1284 my %args = %{$_[0]};
1289 print "enum " . $args{'enum'} . " - " . $args{'purpose'} . "\n\n";
1290 print "enum " . $args{'enum'} . " {\n";
1292 foreach $parameter (@{$args{'parameterlist'}}) {
1294 if ($count != $#{$args{'parameterlist'}}) {
1303 foreach $parameter (@{$args{'parameterlist'}}) {
1305 print $args{'parameterdescs'}{$parameter} . "\n";
1313 my %args = %{$_[0]};
1318 print "typedef " . $args{'typedef'} . " - " . $args{'purpose'} . "\n";
1324 my %args = %{$_[0]};
1327 print $args{'type'} . " " . $args{'struct'} . " - " . $args{'purpose'} . "\n\n";
1328 print $args{'type'} . " " . $args{'struct'} . " {\n";
1329 foreach $parameter (@{$args{'parameterlist'}}) {
1338 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
1339 $type = $args{'parametertypes'}{$parameter};
1353 foreach $parameter (@{$args{'parameterlist'}}) {
1359 ($args{'parameterdescs'}{$parameter_name} ne $undescribed) || next;
1361 print $args{'parameterdescs'}{$parameter_name} . "\n";
1368 my %args = %{$_[0]};
1371 foreach $section (@{$args{'sectionlist'}}) {
1374 output_highlight($args{'sections'}{$section});
1381 my %args = %{$_[0]};
1383 print $args{'function'} . "\n";
1388 my %args = %{$_[0]};
1389 print $args{'enum'} . "\n";
1394 my %args = %{$_[0]};
1395 print $args{'typedef'} . "\n";
1400 my %args = %{$_[0]};
1402 print $args{'struct'} . "\n";
1406 my %args = %{$_[0]};
1409 foreach $section (@{$args{'sectionlist'}}) {
1578 my $args = shift;
1585 while ($args =~ /(\([^\),]+),/) {
1586 $args =~ s/(\([^\),]+),/$1#/g;
1589 foreach my $arg (split($splitter, $args)) {
1615 my @args = split('\s*,\s*', $arg);
1616 if ($args[0] =~ m/\*/) {
1617 $args[0] =~ s/(\*+)\s*/ $1/;
1621 if ($args[0] =~ /^(.*\s+)(.*?\[.*\].*)$/) {
1622 shift @args;
1626 @first_arg = split('\s+', shift @args);
1629 unshift(@args, pop @first_arg);
1632 foreach $param (@args) {
1826 my $args = $3;
1828 create_parameterlist($args, ',', $file);