| /scripts/ |
| D | markup_oops.pl | 51 my ($line) = @_;
52 if ($line =~ /EAX: ([0-9a-f]+) EBX: ([0-9a-f]+) ECX: ([0-9a-f]+) EDX: ([0-9a-f]+)/) {
58 if ($line =~ /ESI: ([0-9a-f]+) EDI: ([0-9a-f]+) EBP: ([0-9a-f]+) ESP: ([0-9a-f]+)/) {
63 if ($line =~ /RAX: ([0-9a-f]+) RBX: ([0-9a-f]+) RCX: ([0-9a-f]+)/) {
68 if ($line =~ /RDX: ([0-9a-f]+) RSI: ([0-9a-f]+) RDI: ([0-9a-f]+)/) {
73 if ($line =~ /RBP: ([0-9a-f]+) R08: ([0-9a-f]+) R09: ([0-9a-f]+)/) {
77 if ($line =~ /R10: ([0-9a-f]+) R11: ([0-9a-f]+) R12: ([0-9a-f]+)/) {
82 if ($line =~ /R13: ([0-9a-f]+) R14: ([0-9a-f]+) R15: ([0-9a-f]+)/) {
100 my ($line, $cntr) = @_;
102 if (length($line) < 40) {
[all …]
|
| D | checkpatch.pl | 168 my $line = $_;
170 $line =~ s/\s*\n?$//g;
171 $line =~ s/^\s*//g;
172 $line =~ s/\s+/ /g;
174 next if ($line =~ m/^\s*#/);
175 next if ($line =~ m/^\s*$/);
177 my @words = split(" ", $line);
617 my $line = $_;
619 $line =~ s/\s*\n?$//g;
620 $line =~ s/^\s*//g;
[all …]
|
| D | headers_check.pl | 29 my $line;
39 while ($line = <$fh>) {
53 if ($line =~ m/^\s*#\s*include\s+<((asm|linux).*)>/) {
71 if ($line =~ m/^void seqbuf_dump\(void\);/) {
75 if ($line =~ m/^extern "C"/) {
78 if ($line =~ m/^(\s*extern|unsigned|char|short|int|long|void)\b/) {
87 if ($line =~ m/[^a-zA-Z0-9_]+CONFIG_([a-zA-Z0-9_]+)[^a-zA-Z0-9_]/) {
103 if ($line =~ m/^\s*#\s*include\s+<asm\/types.h>/) {
132 my $line;
133 while ($line = <$fh>) {
[all …]
|
| D | show_delta | 44 def get_time(line): argument
45 if line[0]!="[":
49 (time_str, rest) = string.split(line[1:],']',1)
61 def convert_line(line, base_time): argument
65 (time, rest) = get_time(line)
68 return line
109 for line in lines:
111 (time, rest) = get_time(line)
125 for line in lines:
126 print (convert_line(line, base_time),)
|
| D | cleanfile | 139 while ( defined($line = <FILE>) ) {
141 $in_bytes += length($line);
142 $line =~ s/[ \t\r]*$//; # Remove trailing spaces
143 $line = clean_space_tabs($line);
145 if ( $line eq "\n" ) {
146 push(@blanks, $line);
147 $blank_bytes += length($line);
151 push(@lines, $line);
152 $out_bytes += length($line);
157 $l_width = strwidth($line);
|
| D | get_maintainer.pl | 179 my $line = $_;
181 $line =~ s/\s*\n?$//g;
182 $line =~ s/^\s*//g;
183 $line =~ s/\s+/ /g;
185 next if ($line =~ m/^\s*#/);
186 next if ($line =~ m/^\s*$/);
188 my @words = split(" ", $line);
204 my $line = $_;
206 $line =~ s/\s*\n?$//;
207 $line =~ s/^\s*//;
[all …]
|
| D | cleanpatch | 140 while ( defined($line = <FILE>) ) {
142 $in_bytes += length($line);
145 if ($line =~
151 @hunk_lines = ($line);
154 push(@lines, $line);
155 $out_bytes += length($line);
160 if ($line =~ /^\+/) {
163 $text = substr($line, 1);
175 } elsif ($line =~ /^\-/) {
177 push(@hunk_lines, $line);
[all …]
|
| D | checkkconfigsymbols.py | 246 for line in stdout:
247 if re.findall(r"[URMADC]{1}", line[:2]):
394 for line in lines:
395 if "CONFIG_" not in line:
397 symbols = REGEX_SOURCE_SYMBOL.findall(line)
406 def get_symbols_in_line(line): argument
408 return REGEX_SYMBOL.findall(line)
444 line = lines[i]
445 line = line.strip('\n')
446 line = line.split("#")[0] # ignore comments
[all …]
|
| D | parse-maintainers.pl | 84 my $line = $_;
87 if ($line =~ m/^([A-Z]):\s*(.*)/) {
88 $line = $1 . ":\t" . trim($2) . "\n";
90 $$hashref{$case} = $$hashref{$case} . $line;
95 $$hashref{$case} = $line;
102 $lastline = $line;
106 $lastline = $line;
|
| D | decode_stacktrace.sh | 141 while read line; do
143 if [[ $line =~ \[\<([^]]+)\>\] ]] ||
144 [[ $line =~ [^+\ ]+\+0x[0-9a-f]+/0x[0-9a-f]+ ]]; then
146 handle_line "$line"
148 elif [[ $line == *Code:* ]]; then
149 decode_code "$line"
152 echo "$line"
|
| D | diffconfig | 42 for line in config_file:
43 line = line[:-1]
44 if line[:7] == "CONFIG_":
45 name, val = line[7:].split("=", 1)
47 if line[-11:] == " is not set":
48 d[line[9:-11]] = "n"
|
| D | checkstack.pl | 122 while (my $line = <STDIN>) {
123 if ($line =~ m/$funcre/) {
126 elsif ($line =~ m/(.*):\s*file format/) {
134 elsif ($line =~ m/$re/) {
145 next if $line !~ m/^($xs*)/;
159 elsif (defined $dre && $line =~ m/$dre/) {
162 next if $line !~ m/^($xs*)/;
|
| D | bootgraph.pl | 83 my $line = $_;
84 if ($line =~ /([0-9\.]+)\] calling ([a-zA-Z0-9\_\.]+)\+/) {
93 if ($line =~ /\@ ([0-9]+)/) {
99 if ($line =~ /([0-9\.]+)\] async_waiting @ ([0-9]+)/) {
120 if ($line =~ /([0-9\.]+)\] initcall ([a-zA-Z0-9\_\.]+)\+.*returned/) {
127 if ($line =~ /([0-9\.]+)\] async_continuing @ ([0-9]+)/) {
133 if ($line =~ /Write protecting the/) {
136 if ($line =~ /Freeing unused kernel memory/) {
|
| D | profile2linkerlist.pl | 14 my $line = $_;
19 unless ($line =~ /unknown/) || ($line =~ /total/);
|
| D | extract-sys-certs.pl | 32 foreach my $line (@lines) {
33 chomp($line);
34 …if ($line =~ /\s*([0-9]+)\s+(\S+)\s+([0-9a-f]+)\s+([0-9a-f]+)\s+([0-9a-f]+)\s+([0-9a-f]+)\s+2[*][*…
65 foreach my $line (@_) {
66 chomp($line);
67 if ($line =~ /([0-9a-f]+)\s([a-zA-Z])\s(\S+)/
|
| D | extract-cert.c | 40 int e, line; in display_openssl_errors() local
46 while ((e = ERR_get_error_line(&file, &line))) { in display_openssl_errors()
48 fprintf(stderr, "- SSL %s: %s:%d\n", buf, file, line); in display_openssl_errors()
55 int line; in drain_openssl_errors() local
59 while (ERR_get_error_line(&file, &line)) {} in drain_openssl_errors()
|
| D | leaking_addresses.pl | 192 my ($line) = @_;
196 if ($line =~ '^SigBlk:' or
197 $line =~ '^SigCgt:') {
201 if ($line =~ '\bKEY=[[:xdigit:]]{14} [[:xdigit:]]{16} [[:xdigit:]]{16}\b' or
202 $line =~ '\b[[:xdigit:]]{14} [[:xdigit:]]{16} [[:xdigit:]]{16}\b') {
|
| /scripts/dtc/ |
| D | dt_to_config | 555 my $line;
574 $line = $line . $next_line;
576 $line =~ s/\\$/ /;
579 if ($line =~ /^\s*#/) {
580 $line = "";
586 if ($line =~ /^([ ]\s*|)else\b/) {
590 $line =~ s/^([ ]\s*|)else\b//;
593 …($null, $ifeq_config, $ifeq_config_val ) = $line =~ /^([ ]\s*|)ifeq\b.*\b(CONFIG_[A-Za-z0-9_]*)(…
594 …($null, $ifneq_config, $ifneq_config_val) = $line =~ /^([ ]\s*|)ifneq\b.*\b(CONFIG_[A-Za-z0-9_]*)…
595 …($null, $ifdef_config) = $line =~ /^([ ]\s*|)ifdef\b.*\b(CONFIG_[A-Za-z0-9_]*)…
[all …]
|
| D | dtc-parser.tab.c_shipped | 65 #line 20 "dtc-parser.y" /* yacc.c:339 */
84 #line 85 "dtc-parser.tab.c" /* yacc.c:339 */
149 #line 39 "dtc-parser.y" /* yacc.c:355 */
169 #line 170 "dtc-parser.tab.c" /* yacc.c:355 */
200 #line 201 "dtc-parser.tab.c" /* yacc.c:358 */
498 /* YYRLINE[YYN] -- Source line where rule number YYN was defined. */
908 YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu):\n",
1459 Otherwise, the following line sets YYVAL to garbage.
1472 #line 110 "dtc-parser.y" /* yacc.c:1646 */
1477 #line 1478 "dtc-parser.tab.c" /* yacc.c:1646 */
[all …]
|
| /scripts/coccinelle/misc/ |
| D | doubleinit.cocci | 39 if int(ps[0].line) < int(pr[0].line) or (int(ps[0].line) == int(pr[0].line) and int(ps[0].column) <…
51 if int(ps[0].line) < int(pr[0].line) or (int(ps[0].line) == int(pr[0].line) and int(ps[0].column) <…
52 msg = "%s: first occurrence line %s, second occurrence line %s" % (fld,ps[0].line,pr[0].line)
|
| /scripts/kconfig/ |
| D | conf.c | 45 static char line[PATH_MAX]; variable
92 line[0] = '\n'; in conf_askvalue()
93 line[1] = 0; in conf_askvalue()
97 line[0] = '\n'; in conf_askvalue()
98 line[1] = 0; in conf_askvalue()
113 xfgets(line, sizeof(line), stdin); in conf_askvalue()
130 printf("%s", line); in conf_askvalue()
147 switch (line[0]) { in conf_string()
152 if (line[1] == '\n') { in conf_string()
159 line[strlen(line)-1] = 0; in conf_string()
[all …]
|
| D | streamline_config.pl | 162 my $line;
180 $_ = $line . " " . $_;
185 $line = $_;
274 my ($line, %vars) = @_;
278 while ($line =~ s/^(.*?)(\$\((.*?)\))//) {
290 $process .= $line;
298 my $line = "";
306 $line .= $1;
310 $line .= $_;
311 $_ = $line;
[all …]
|
| /scripts/coccinelle/free/ |
| D | pci_free_consistent.cocci | 42 …free_consistent; pci_alloc_consistent on line %s and return without freeing on line %s" % (p1[0].l…
50 …free_consistent; pci_alloc_consistent on line %s and return without freeing on line %s" % (p1[0].l…
|
| /scripts/tracing/ |
| D | draw_functrace.py | 102 def parseLine(line): argument
103 line = line.strip()
104 if line.startswith("#"):
106 m = re.match("[^]]+?\\] +([0-9.]+): (\\w+) <-(\\w+)", line)
116 for line in sys.stdin:
118 calltime, callee, caller = parseLine(line)
|
| /scripts/kconfig/lxdialog/ |
| D | textbox.c | 343 char *line; in print_line() local
345 line = get_line(); in print_line()
346 line += MIN(strlen(line), hscroll); /* Scroll horizontally */ in print_line()
349 waddnstr(win, line, MIN(strlen(line), width - 2)); in print_line()
372 static char line[MAX_LEN + 1]; in get_line() local
380 line[i++] = *(page++); in get_line()
384 line[i++] = '\0'; in get_line()
389 line[i] = '\0'; in get_line()
393 return line; in get_line()
|