Lines Matching full:s
45 $ln =~ s,/\*.*(\*/),,g;
47 $is_comment = 1 if ($ln =~ s,/\*.*,,);
49 if ($ln =~ s,^(.*\*/),,) {
56 if ($is_enum && $ln =~ m/^\s*([_\w][\w\d_]+)\s*[\,=]?/) {
57 my $s = $1;
62 $enum_symbols{$s} = "\\ :ref:`$s <$n>`\\ ";
69 if ($ln =~ m/^\s*#\s*define\s+([_\w][\w\d_]+)\s+_IO/) {
70 my $s = $1;
74 $ioctls{$s} = "\\ :ref:`$s <$n>`\\ ";
78 if ($ln =~ m/^\s*#\s*define\s+([_\w][\w\d_]+)\s+/) {
79 my $s = $1;
84 $defines{$s} = "\\ :ref:`$s <$n>`\\ ";
88 if ($ln =~ m/^\s*typedef\s+([_\w][\w\d_]+)\s+(.*)\s+([_\w][\w\d_]+);/) {
89 my $s = $2;
92 $typedefs{$n} = "\\ :c:type:`$n <$s>`\\ ";
95 if ($ln =~ m/^\s*enum\s+([_\w][\w\d_]+)\s+\{/
96 || $ln =~ m/^\s*enum\s+([_\w][\w\d_]+)$/
97 || $ln =~ m/^\s*typedef\s*enum\s+([_\w][\w\d_]+)\s+\{/
98 || $ln =~ m/^\s*typedef\s*enum\s+([_\w][\w\d_]+)$/) {
99 my $s = $1;
101 $enums{$s} = "enum :c:type:`$s`\\ ";
106 if ($ln =~ m/^\s*struct\s+([_\w][\w\d_]+)\s+\{/
107 || $ln =~ m/^\s*struct\s+([[_\w][\w\d_]+)$/
108 || $ln =~ m/^\s*typedef\s*struct\s+([_\w][\w\d_]+)\s+\{/
109 || $ln =~ m/^\s*typedef\s*struct\s+([[_\w][\w\d_]+)$/
111 my $s = $1;
113 $structs{$s} = "struct :c:type:`$s`\\ ";
123 my @matches = ($data =~ m/typedef\s+struct\s+\S+?\s*\{[^\}]+\}\s*(\S+)\s*\;/g,
124 $data =~ m/typedef\s+enum\s+\S+?\s*\{[^\}]+\}\s*(\S+)\s*\;/g,);
126 my $s = $m;
128 $typedefs{$s} = "\\ :c:type:`$s`\\ ";
148 next if (m/^\s*$/ || m/^\s*#/);
152 if (m/^ignore\s+ioctl\s+(\S+)/) {
156 if (m/^ignore\s+define\s+(\S+)/) {
160 if (m/^ignore\s+typedef\s+(\S+)/) {
164 if (m/^ignore\s+enum\s+(\S+)/) {
168 if (m/^ignore\s+struct\s+(\S+)/) {
172 if (m/^ignore\s+symbol\s+(\S+)/) {
180 if (m/^replace\s+(\S+)\s+(\S+)\s+(\S+)/) {
242 $data =~ s/\n/\n /g;
243 $data =~ s/\n\s+$/\n/g;
244 $data =~ s/\n\s+\n/\n\n/g;
249 $data =~ s,([\_\`\*\<\>\&\\\\:\/\|\%\$\#\{\}\~\^]),\\$1,g;
251 $data =~ s,DEPRECATED,**DEPRECATED**,g;
258 my $end_delim = "(\\s|,|\\\\=|\\\\:|\\;|\\\)|\\}|\\{)";
261 my $s = $ioctls{$r};
263 $r =~ s,([\_\`\*\<\>\&\\\\:\/]),\\\\$1,g;
265 print "$r -> $s\n" if ($debug);
267 $data =~ s/($start_delim)($r)$end_delim/$1$s$3/g;
271 my $s = $defines{$r};
273 $r =~ s,([\_\`\*\<\>\&\\\\:\/]),\\\\$1,g;
275 print "$r -> $s\n" if ($debug);
277 $data =~ s/($start_delim)($r)$end_delim/$1$s$3/g;
281 my $s = $enum_symbols{$r};
283 $r =~ s,([\_\`\*\<\>\&\\\\:\/]),\\\\$1,g;
285 print "$r -> $s\n" if ($debug);
287 $data =~ s/($start_delim)($r)$end_delim/$1$s$3/g;
291 my $s = $enums{$r};
293 $r =~ s,([\_\`\*\<\>\&\\\\:\/]),\\\\$1,g;
295 print "$r -> $s\n" if ($debug);
297 $data =~ s/enum\s+($r)$end_delim/$s$2/g;
301 my $s = $structs{$r};
303 $r =~ s,([\_\`\*\<\>\&\\\\:\/]),\\\\$1,g;
305 print "$r -> $s\n" if ($debug);
307 $data =~ s/struct\s+($r)$end_delim/$s$2/g;
311 my $s = $typedefs{$r};
313 $r =~ s,([\_\`\*\<\>\&\\\\:\/]),\\\\$1,g;
315 print "$r -> $s\n" if ($debug);
316 $data =~ s/($start_delim)($r)$end_delim/$1$s$3/g;
319 $data =~ s/\\ ([\n\s])/\1/g;
326 $title =~ s,.*/,,;
385 Please read Documentation/doc-guide/parse-headers.rst at the Kernel's