Lines Matching full:my
59 my $errors = 0;
60 my $warnings = 0;
61 my $anon_struct_union = 0;
64 my $type_constant = '\b``([^\`]+)``\b';
65 my $type_constant2 = '\%([-_*\w]+)';
66 my $type_func = '(\w+)\(\)';
67 my $type_param = '\@(\w*((\.\w+)|(->\w+))*(\.\.\.)?)';
68 my $type_param_ref = '([\!~\*]?)\@(\w*((\.\w+)|(->\w+))*(\.\.\.)?)';
69 my $type_fp_param = '\@(\w+)\(\)'; # Special RST handling for func ptr params
70 my $type_fp_param2 = '\@(\w+->\S+)\(\)'; # Special RST handling for structs with func ptr params
71 my $type_env = '(\$\w+)';
72 my $type_enum = '\&(enum\s*([_\w]+))';
73 my $type_struct = '\&(struct\s*([_\w]+))';
74 my $type_typedef = '\&(typedef\s*([_\w]+))';
75 my $type_union = '\&(union\s*([_\w]+))';
76 my $type_member = '\&([_\w]+)(\.|->)([_\w]+)';
77 my $type_fallback = '\&([_\w]+)';
78 my $type_member_func = $type_member . '\(\)';
84 my @highlights_man = (
97 my $blankline_man = "";
100 my @highlights_rst = (
119 my $blankline_rst = "\n";
132 my $kernelversion;
133 my ($sphinx_major, $sphinx_minor, $sphinx_patch);
135 my $dohighlight = "";
137 my $verbose = 0;
138 my $Werror = 0;
139 my $Wreturn = 0;
140 my $Wshort_desc = 0;
141 my $Wcontents_before_sections = 0;
142 my $output_mode = "rst";
143 my $output_preformatted = 0;
144 my $no_doc_sections = 0;
145 my $enable_lineno = 0;
146 my @highlights = @highlights_rst;
147 my $blankline = $blankline_rst;
148 my $modulename = "Kernel API";
156 my $output_selection = OUTPUT_ALL;
157 my $show_not_found = 0; # No longer used
159 my @export_file_list;
161 my @build_time;
163 (my $seconds = `date -d "${ENV{'KBUILD_BUILD_TIMESTAMP'}}" +%s`) ne '') {
169 my $man_date = ('January', 'February', 'March', 'April', 'May', 'June',
178 my ($function, %function_table, %parametertypes, $declaration_purpose);
179 my %nosymbol_table = ();
180 my $declaration_start_line;
181 my ($type, $declaration_name, $return_type);
182 my ($newsection, $newcontents, $prototype, $brcount, %source_map);
189 my $kcflags = "$ENV{'KCFLAGS'}";
211 my $section_counter = 0;
213 my $lineprefix="";
226 my $state;
227 my $in_doc_sect;
228 my $leading_space;
240 my $inline_doc_state;
244 my $decl_type;
247 my $identifier;
249 my $doc_start = '^/\*\*\s*$'; # Allow whitespace at end of comment start.
250 my $doc_end = '\*/';
251 my $doc_com = '\s*\*\s*';
252 my $doc_com_body = '\s*\* ?';
253 my $doc_decl = $doc_com . '(\w+)';
261 my $doc_sect = $doc_com .
263 my $doc_content = $doc_com_body . '(.*)';
264 my $doc_block = $doc_com . 'DOC:\s*(.*)?';
265 my $doc_inline_start = '^\s*/\*\*\s*$';
266 my $doc_inline_sect = '\s*\*\s*(@\s*[\w][\w\.]*\s*):(.*)';
267 my $doc_inline_end = '^\s*\*/\s*$';
268 my $doc_inline_oneline = '^\s*/\*\*\s*(@[\w\s]+):\s*(.*)\s*\*/\s*$';
269 my $export_symbol = '^\s*EXPORT_SYMBOL(_GPL)?\s*\(\s*(\w+)\s*\)\s*;';
270 my $export_symbol_ns = '^\s*EXPORT_SYMBOL_NS(_GPL)?\s*\(\s*(\w+)\s*,\s*"\S+"\)\s*;';
271 my $function_pointer = qr{([^\(]*\(\*)\s*\)\s*\(([^\)]*)\)};
272 my $attribute = qr{__attribute__\s*\(\([a-z0-9,_\*\s\(\)]*\)\)}i;
274 my %parameterdescs;
275 my %parameterdesc_start_lines;
276 my @parameterlist;
277 my %sections;
278 my @sectionlist;
279 my %section_start_lines;
280 my $sectcheck;
281 my $struct_actual;
283 my $contents = "";
284 my $new_start_line = 0;
287 my $section_default = "Description"; # default section
288 my $section_intro = "Introduction";
289 my $section = $section_default;
290 my $section_context = "Context";
291 my $section_return = "Return";
293 my $undescribed = "-- undescribed --";
298 my $cmd = $1;
317 my $symbol = shift @ARGV;
326 my $file = shift @ARGV;
351 my $ver_string = shift @ARGV;
401 my $ver;
403 my $cmd = "sphinx-build";
405 my $cmd = "sphinx-build3";
437 my $version = 'unknown kernel version';
447 my $lineno = shift;
454 my $location = shift;
455 my $msg = shift;
463 my $file = shift;
464 my $name = shift;
465 my $contents = join "\n", @_;
499 my $file = shift;
500 my $name = shift;
501 my $contents = join "\n", @_;
533 my $contents = join "\n",@_;
534 my $line;
569 my %args = %{$_[0]};
570 my ($parameter, $section);
571 my $count;
572 my $func_macro = $args{'func_macro'};
573 my $paramcount = $#{$args{'parameterlist'}}; # -1 is empty
587 my $parenth = "(";
588 my $post = ",";
589 foreach my $parameter (@{$args{'parameterlist'}}) {
610 my $parameter_name = $parameter;
625 my %args = %{$_[0]};
626 my ($parameter, $section);
627 my $count;
637 foreach my $parameter (@{$args{'parameterlist'}}) {
650 my $parameter_name = $parameter;
665 my %args = %{$_[0]};
666 my ($parameter, $section);
673 my $declaration = $args{'definition'};
684 my $parameter_name = $parameter;
700 my %args = %{$_[0]};
701 my ($parameter, $section);
715 my %args = %{$_[0]};
716 my ($parameter, $section);
717 my $count;
737 my %args = %{$_[0]};
738 my ($parameter, $section);
758 my $contents = shift;
767 my $sphinx_literal = '^[^.].*::$';
768 my $sphinx_cblock = '^\.\.\ +code-block::';
771 my $input = join "\n",@_;
772 my $output = "";
773 my $line;
774 my $in_literal = 0;
775 my $litprefix;
776 my $block = "";
825 my %args = %{$_[0]};
826 my ($parameter, $section);
827 my $oldprefix = $lineprefix;
829 my $signature = "";
830 my $func_macro = $args{'func_macro'};
831 my $paramcount = $#{$args{'parameterlist'}}; # -1 is empty
842 my $count = 0;
843 foreach my $parameter (@{$args{'parameterlist'}}) {
910 my $parameter_name = $parameter;
938 my %args = %{$_[0]};
939 my $section;
940 my $oldprefix = $lineprefix;
952 my %args = %{$_[0]};
953 my ($parameter);
954 my $oldprefix = $lineprefix;
955 my $count;
956 my $outer;
959 my $name = "enum " . $args{'enum'};
962 my $name = $args{'enum'};
990 my %args = %{$_[0]};
991 my ($parameter);
992 my $oldprefix = $lineprefix;
993 my $name;
1011 my %args = %{$_[0]};
1012 my ($parameter);
1013 my $oldprefix = $lineprefix;
1016 my $name = $args{'type'} . " " . $args{'struct'};
1019 my $name = $args{'struct'};
1033 my $declaration = $args{'definition'};
1043 my $parameter_name = $parameter;
1084 my $name = shift;
1085 my $functype = shift;
1086 my $func = "output_${functype}_$output_mode";
1106 my $func = "output_blockhead_" . $output_mode;
1116 my ($prototype, $file) = @_;
1117 my $func = "dump_" . $decl_type;
1126 my $x = shift;
1127 my $file = shift;
1128 my $decl_type;
1129 my $members;
1130 my $type = qr{struct|union};
1132 …my $qualifiers = qr{$attribute|__packed|__aligned|____cacheline_aligned_in_smp|____cacheline_align…
1133 my $definition_body = qr{\{(.*)\}\s*$qualifiers*};
1134 my $struct_members = qr{($type)([^\{\};]+)\{([^\{\}]*)\}([^\{\}\;]*)\;};
1175 my $args = qr{([^,)]+)};
1192 my $declaration = $members;
1196 my $newmember;
1197 my $maintype = $1;
1198 my $ids = $4;
1199 my $content = $3;
1200 foreach my $id(split /,/, $ids) {
1205 foreach my $arg (split /;/, $content) {
1209 my $type = $1;
1210 my $name = $2;
1211 my $extra = $3;
1220 my $type;
1221 my $names;
1242 foreach my $name (split /,/, $names) {
1270 my @def_args = split /\n/, $declaration;
1271 my $level = 1;
1273 foreach my $clause (@def_args) {
1306 my $functype = shift;
1307 my $name = shift;
1338 my $x = shift;
1339 my $file = shift;
1340 my $members;
1369 my %_members;
1374 foreach my $arg (split ',', $members) {
1386 while (my ($k, $v) = each %parameterdescs) {
1410 my $typedef_type = qr { ((?:\s+[\w\*]+\b){1,8})\s* }x;
1411 my $typedef_ident = qr { \*?\s*(\w\S+)\s* }x;
1412 my $typedef_args = qr { \s*\((.*)\); }x;
1414 my $typedef1 = qr { typedef$typedef_type\($typedef_ident\)$typedef_args }x;
1415 my $typedef2 = qr { typedef$typedef_type$typedef_ident$typedef_args }x;
1418 my $x = shift;
1419 my $file = shift;
1427 my $args = $3;
1481 my $actual = shift;
1489 my $args = shift;
1490 my $splitter = shift;
1491 my $file = shift;
1492 my $declaration_name = shift;
1493 my $type;
1494 my $param;
1497 my $arg_expr = qr{\([^\),]+};
1502 foreach my $arg (split($splitter, $args)) {
1539 my @args = split('\s*,\s*', $arg);
1544 my @first_arg;
1576 my $param = shift;
1577 my $type = shift;
1578 my $org_arg = shift;
1579 my $file = shift;
1580 my $declaration_name = shift;
1649 my ($file, $decl_name, $decl_type, $sectcheck, $prmscheck) = @_;
1650 my @sects = split ' ', $sectcheck;
1651 my @prms = split ' ', $prmscheck;
1652 my $err;
1653 my ($px, $sx);
1654 my $prm_clean; # strip trailing "[array size]" and/or beginning "*"
1696 my $file = shift;
1697 my $declaration_name = shift;
1698 my $return_type = shift;
1720 my $prototype = shift;
1721 my $file = shift;
1722 my $func_macro = 0;
1748 my $define = $prototype =~ s/^#\s*define\s+//; #ak added
1773 my $name = qr{[a-zA-Z0-9_~:]+};
1774 my $prototype_end1 = qr{[^\(]*};
1775 my $prototype_end2 = qr{[^\{]*};
1776 my $prototype_end = qr{\(($prototype_end1|$prototype_end2)\)};
1777 my $type1 = qr{[\w\s]+};
1778 my $type2 = qr{$type1\*+};
1793 my $args = $3;
1806 my $prms = join " ", @parameterlist;
1868 my $file = shift;
1869 my $tracepointname = 0;
1870 my $tracepointargs = 0;
1895 my $void = 0;
1913 my $count = 0;
1914 my $len = length($prototype);
1918 for (my $ix = 0; $ix < $len; $ix++) {
1929 my $x = shift;
1930 my $file = shift;
1963 my $x = shift;
1964 my $file = shift;
1999 my $file;
2000 my ($orig_file) = @_;
2016 my ($orig_file) = @_;
2017 my $file = map_filename($orig_file);
2056 my $file = shift;
2057 my $descr;
2071 my $is_kernel_comment = 0;
2072 my $decl_start = qr{$doc_com};
2074 my $fn_type = qr{\w+\s*\*\s*};
2075 my $parenthesis = qr{\(\w*\)};
2076 my $decl_end = qr{[-:].*};
2142 my $file = shift;
2225 my $cont = $1;
2249 my $file = shift;
2274 my $file = shift;
2301 my $file = shift;
2341 my $file;
2342 my ($orig_file) = @_;
2399 for (my $k = 0; $k < @highlights; $k++) {
2400 my $pattern = $highlights[$k][0];
2401 my $result = $highlights[$k][1];
2409 my ($relname, $absname);