Lines Matching +full:0 +full:x80
22 my $P = $0;
29 my $quiet = 0;
30 my $verbose = 0;
38 my $emacs = 0;
39 my $terse = 0;
40 my $showfile = 0;
41 my $file = 0;
42 my $git = 0;
44 my $check = 0;
45 my $check_orig = 0;
47 my $mailback = 0;
48 my $summary_file = 0;
49 my $show_types = 0;
50 my $list_types = 0;
51 my $fix = 0;
52 my $fix_inplace = 0;
62 my $help = 0;
65 my $ignore_perl_version = 0;
66 my $minimum_perl_version = 5.10.0;
69 my $codespell = 0;
126 --debug KEY=[0|1] turn on/off debugging of KEY, where KEY is one of
165 my $count = 0;
257 my $in_desc = 0;
280 $in_desc = 0;
361 # $help is 1 if either -h, --help or --version is passed as option - exitcode: 0
373 $color = 0;
381 list_types(0) if ($list_types);
386 my $exit = 0;
390 $perl_version_ok = 0;
396 if ($#ARGV < 0) {
435 my $dbg_values = 0;
436 my $dbg_possible = 0;
437 my $dbg_type = 0;
438 my $dbg_attr = 0;
445 my $rpt_cleaners = 0;
460 } elsif ($0 =~ m@(.*)/scripts/[^/]*$@ &&
472 my $emitted_corrupt = 0;
535 our $Binary = qr{(?i)0b[01]+$Int_type?};
536 our $Hex = qr{(?i)0x[0-9a-f]+$Int_type?};
537 our $Int = qr{[0-9]+$Int_type?};
538 our $Octal = qr{0[0-7]+$Int_type?};
540 our $Float_hex = qr{(?i)0x[0-9a-f]+p-?[0-9]+[fl]?};
541 our $Float_dec = qr{(?i)(?:[0-9]+\.[0-9]*|[0-9]*\.[0-9]+)(?:e-?[0-9]+)?[fl]?};
542 our $Float_int = qr{(?i)[0-9]+e-?[0-9]+[fl]?};
566 [\xC2-\xDF][\x80-\xBF] # non-overlong 2-byte
567 | \xE0[\xA0-\xBF][\x80-\xBF] # excluding overlongs
568 | [\xE1-\xEC\xEE\xEF][\x80-\xBF]{2} # straight 3-byte
569 | \xED[\x80-\x9F][\x80-\xBF] # excluding surrogates
570 | \xF0[\x90-\xBF][\x80-\xBF]{2} # planes 1-3
571 | [\xF1-\xF3][\x80-\xBF]{3} # planes 4-15
572 | \xF4[\x80-\x8F][\x80-\xBF]{2} # plane 16
599 our $zero_initializer = qr{(?:(?:0[xX])?0+$Int_type?|NULL|false)\b};
680 my $min = $arr[0];
681 for my $i (0 .. ($len-1)) {
699 for my $i (0 .. $len1) {
700 for my $j (0 .. $len2) {
701 if ($i == 0) {
703 } elsif ($j == 0) {
836 $mode_perms_search .= $entry->[0];
870 0[0-7][0-7][2367]
907 return trim($string) if ($string =~ /^\s*0[0-7]{3,3}\s*$/);
911 my $to = 0;
912 my $curpos = 0;
913 my $lastpos = 0;
918 last if ($lastpos > 0 && ($curpos - length($omatch) != $lastpos));
1011 return 0;
1064 (?:(?:\s|\*|\[\])+\s*const|(?:\s|\*\s*(?:const\s*)?|\[\])+|(?:\s*\[\s*\])+){0,4}
1069 (?:(?:\s|\*|\[\])+\s*const|(?:\s|\*\s*(?:const\s*)?|\[\])+|(?:\s*\[\s*\])+){0,4}
1077 our $Typecast = qr{\s*(\(\s*$NonptrType\s*\)){0,1}\s*};
1084 our $LvalOrFunc = qr{((?:[\&\*]\s*)?$Lval)\s*($balanced_parens{0,1})\s*};
1085 our $FuncArg = qr{$Typecast{0,1}($LvalOrFunc|$Constant|$String)};
1088 (?:$Storage\s+)?(?:[A-Z_][A-Z0-9]*_){0,2}(?:DEFINE|DECLARE)(?:_[A-Z0-9]+){1,6}\s*\(|
1146 return 0 if (!$tree || !(-e "$root/scripts/get_maintainer.pl"));
1162 return 0 if ($status ne "");
1166 my $camelcase_seeded = 0;
1181 my $last_mod_date = 0;
1227 return 0 if ((which("git") eq "") || !(-e "$gitroot"));
1243 return ($id, $desc) if ($#lines < 0);
1245 if ($lines[0] =~ /^error: short SHA1 $commit is ambiguous/) {
1255 …} elsif ($lines[0] =~ /^fatal: ambiguous argument '$commit': unknown revision or path not in the w…
1256 $lines[0] =~ /^fatal: bad object $commit/) {
1259 $id = substr($lines[0], 0, 12);
1260 $desc = substr($lines[0], 41);
1266 $chk_signoff = 0 if ($file);
1267 $chk_fixes_tag = 0 if ($file);
1293 $line =~ /^([0-9a-fA-F]{40,40}) (.*)$/;
1301 die "$P: no git commits after extraction!\n" if (@commits == 0);
1327 $vname = "Commit " . substr($filename, 0, 12) . ' ("' . $git_commits{$filename} . '")';
1338 if ($#ARGV > 0 && $quiet == 0) {
1392 return 0;
1532 my $n = 0;
1537 for (; ($n % $tabsize) != 0; $n++) {
1583 my $qlen = 0;
1584 my $off = 0;
1588 $res = substr($line, 0, 1);
1636 if ($off != 0 && $sanitise_quote eq '*/' && $c ne "\t") {
1638 } elsif ($off != 0 && $sanitise_quote eq '//' && $c ne "\t") {
1640 } elsif ($off != 0 && $sanitise_quote && $c ne "\t") {
1675 return substr($rawline, $-[0], $+[0] - $-[0]);
1684 my $coff_set = 0;
1686 my $loff = 0;
1689 my $level = 0;
1693 my $len = 0;
1697 @stack = (['', 0]) if ($#stack == -1);
1703 for (; $remain > 0; $line++) {
1718 if ($level == 0 && substr($blk, $off) =~ /^.\s*#\s*define/) {
1740 if ($level == 0 && $c eq ';') {
1745 if ($level == 0 && $coff_set == 0 &&
1761 $type = ($level != 0)? '(' : '';
1763 if ($level == 0 && $coff < $soff) {
1775 $type = ($level != 0)? '{' : '';
1777 if ($level == 0) {
1866 if (!($remain > 0 && $condition =~ /^\s*(?:\n[+-])?\s*(?:if|else|do)\b/s)) {
1876 last if (!($remain > 0 && $condition =~ /^(?:\s*\n[+-])*\s*(?:else|do)\b/s));
1893 my $level = 0;
1895 for ($line = $start; $remain > 0; $line++) {
1912 if ($off > 0) {
1917 if ($c eq $close && $level > 0) {
1919 last if ($level == 0);
1929 last if ($level == 0);
1937 my ($level, @r) = ctx_block_get($linenr, $remain, 1, '{', '}', 0);
1943 my ($level, @r) = ctx_block_get($linenr, $remain, 0, '{', '}', 0);
1949 my ($level, @r) = ctx_block_get($linenr, $remain, 0, '(', ')', $off);
1955 return ctx_block_get($linenr, $remain, 0, '{', '}', 0);
1960 return ctx_block_get($linenr, $remain, 0, '(', ')', $off);
1980 my $in_comment = 0;
1996 $in_comment = 0;
2032 my $stat_real = raw_line($linenr, 0);
2034 $stat_real = $stat_real . "\n" . raw_line($count, 0);
2044 for (my $n = 0; $n < $cnt; $n++) {
2068 my $av_preprocessor = 0;
2074 $av_preprocessor = 0;
2090 @av_paren_type = ('E') if ($#av_paren_type < 0);
2097 $av_preprocessor = 0;
2334 return defined $use_type{$type} if (scalar keys %use_type > 0);
2344 return 0;
2371 $output = (split('\n', $output))[0] . "\n";
2404 my $range_last_linenr = 0;
2405 my $delta_offset = 0;
2407 my $old_linenr = 0;
2408 my $new_linenr = 0;
2410 my $next_insert = 0;
2411 my $next_delete = 0;
2422 $delta_offset = 0;
2425 fixup_current_range(\$line, $delta_offset, 0);
2430 $save_line = 0;
2477 our $clean = 0;
2481 return 0;
2487 # our $clean = 0;
2491 return 0;
2497 our $clean = 0;
2501 return 0;
2518 return 0;
2582 my $pos = 0;
2587 my $last_openparen = 0;
2589 if (($opens == 0) || ($closes >= $opens)) {
2595 for ($pos = 0; $pos < $len; $pos++) {
2606 return length(expand_tabs(substr($line, 0, $last_openparen))) + 1;
2613 for my $i (0 .. (length($line) - 1)) {
2634 my $linenr=0;
2642 my $previndent=0;
2643 my $stashindent=0;
2646 my $signoff = 0;
2647 my $fixes_tag = 0;
2648 my $is_revert = 0;
2651 my $authorsignoff = 0;
2653 my $is_patch = 0;
2655 my $in_header_lines = $file ? 0 : 1;
2656 my $in_commit_log = 0; #Scanning lines before patch
2657 my $has_patch_separator = 0; #Found a --- line
2658 my $has_commit_log = 0; #Encountered lines before patch
2659 my $commit_log_lines = 0; #Number of commit log lines
2660 my $commit_log_possible_stack_dump = 0;
2661 my $commit_log_long_line = 0;
2662 my $commit_log_has_diff = 0;
2663 my $reported_maintainer_file = 0;
2664 my $non_utf8_charset = 0;
2668 my $last_blank_line = 0;
2672 our $cnt_lines = 0;
2673 our $cnt_error = 0;
2674 our $cnt_warn = 0;
2675 our $cnt_chk = 0;
2679 my $realline = 0;
2680 my $realcnt = 0;
2683 my $in_comment = 0;
2684 my $comment_edge = 0;
2685 my $first_line = 0;
2694 my $suppress_statement = 0;
2702 my $setup_docs = 0;
2704 my $camelcase_file_seeded = 0;
2717 $setup_docs = 0;
2730 $in_comment = 0;
2738 for (my $ln = $linenr + 1; $cnt > 0; $ln++) {
2776 $realcnt = 0;
2789 $realcnt = 0;
2790 $linenr = 0;
2803 ($line =~ /^ mode change [0-7]+ => [0-7]+ \S+\s*$/ ||
2827 $suppress_statement = 0;
2840 $realcnt-- if ($realcnt != 0);
2856 my $hunk_line = ($realcnt != 0);
2861 my $found_file = 0;
2866 $in_commit_log = 0;
2871 $in_commit_log = 0;
2925 $here .= "FILE: $realfile:$realline:" if ($realcnt != 0);
2931 $cnt_lines++ if ($realcnt != 0);
2957 if ($line =~ /^new (file )?mode.*[7531]\d{0,2}$/) {
2981 $in_commit_log = 0;
3020 $in_commit_log = 0;
3216 $line =~ /^\s*fixes:?\s*(?:commit\s*)?[0-9a-f]{5,}\b/i) {
3224 my $title_has_quotes = 0;
3227 if ($line =~ /(\s*fixes:?)\s+([0-9a-f]{5,})\s+($balanced_parens)/i) {
3232 $tag_case = 0 if $tag eq "Fixes:";
3233 $tag_space = 0 if ($line =~ /^fixes:? [0-9a-f]{5,} ($balanced_parens)/i);
3235 $id_length = 0 if ($orig_commit =~ /^[0-9a-f]{12}$/i);
3236 $id_case = 0 if ($orig_commit !~ /[A-F]/);
3280 $line =~ /^\s*\[\<[0-9a-fA-F]{8,}\>\]/) ||
3281 $line =~ /^(?:\s+\w+:\s+[0-9a-fA-F]+){3,3}/ ||
3282 $line =~ /^\s*\#\d+\s*\[[0-9a-fA-F]+\]\s*\w+ at [0-9a-fA-F]+/) {
3305 $commit_log_possible_stack_dump = 0;
3352 $line !~ /^This reverts commit [0-9a-f]{7,40}/ &&
3353 (($line =~ /\bcommit\s+[0-9a-f]{5,}\b/i ||
3354 …($line =~ /\bcommit\s*$/i && defined($rawlines[$linenr]) && $rawlines[$linenr] =~ /^\s*[0-9a-f]{5,…
3355 ($line =~ /(?:\s|^)[0-9a-f]{12,40}(?:[\s"'\(\[]|$)/i &&
3356 $line !~ /[\<\[][0-9a-f]{12,40}[\>\]]/i &&
3357 $line !~ /\bfixes:\s*[0-9a-f]{12,40}/i))) {
3361 my $long = 0;
3368 my $has_parens = 0;
3369 my $has_quotes = 0;
3372 if ($line =~ /(?:\bcommit\s+[0-9a-f]{5,}|\bcommit\s*$)/i) {
3373 for (my $n = 0; $n < 2; $n++) {
3374 if ($input =~ /\bcommit\s+[0-9a-f]{5,}\s*($balanced_parens)/i) {
3392 if ($input =~ /\b(c)ommit\s+([0-9a-f]{5,})\b/i) {
3395 $short = 0 if ($input =~ /\bcommit\s+[0-9a-f]{12,40}/i);
3396 $long = 1 if ($input =~ /\bcommit\s+[0-9a-f]{41,}/i);
3397 $space = 0 if ($input =~ /\bcommit [0-9a-f]/i);
3398 $case = 0 if ($input =~ /\b[Cc]ommit\s+[0-9a-f]{5,40}[^A-F]/);
3399 } elsif ($input =~ /\b([0-9a-f]{12,40})\b/i) {
3443 if ($realcnt != 0 && $line !~ m{^(?:\+|-| |\\ No newline|$)}) {
3455 my $ptr = substr($blank, 0, length($utf8_prefix)) . "^";
3467 $in_header_lines = 0;
3506 my $ptr = substr($blank, 0, $-[1]) . "^" x length($typo);
3522 if ($in_commit_log && $line =~ /(^fixes:|\bcommit)\s+([0-9a-f]{6,40})\b/i) {
3554 $start_char = substr($rawline, $start_pos - 1, 1) if ($start_pos > ($in_commit_log ? 0 : 1));
3561 if ($first =~ /\b[0-9a-f]{2,}\b/i) {
3629 my $needs_help = 0;
3630 my $has_help = 0;
3631 my $help_length = 0;
3694 if ($curindex < 0) {
3698 if ($previndex >= 0 && $curindex < $previndex) {
3703 ($prevval cmp $curval) > 0) {
3739 $compat3 =~ s/\,([a-z]*)[0-9]*\-/\,$1<\.\*>\-/;
3791 $spdx_license !~ /GPL-2\.0(?:-only)? OR BSD-2-Clause/) {
3802 $spdx_license !~ /GPL-2\.0(?:-only)? OR \S+/) {
3956 my $line_end = substr($prevrawline, $-[0]);
3983 if ($pos >= 0) {
4009 # structure definitions like "(struct foo) { 0 };"
4235 ctx_statement_block($linenr, $realcnt, 0);
4291 substr($ctx, 0, $name_len + 1, '');
4336 my ($level, @ctx) = ctx_statement_level($linenr, $realcnt, 0);
4365 if ($level == 0 && $pre_ctx !~ /}\s*while\s*\($/ &&
4381 ctx_statement_block($linenr, $realcnt, 0)
4385 substr($s, 0, length($c), '');
4408 my $continuation = 0;
4409 my $check = 0;
4423 $prevline =~ /\\\s*$/) && $continuation == 0) {
4424 $check = 0;
4428 $continuation = 0;
4435 $check = 0;
4439 # 1) blank lines, they should be at 0,
4446 $continuation = ($s =~ /^.*?\\\n/) ? 1 : 0;
4460 $check = 0;
4469 (($sindent % $tabsize) != 0 ||
4759 # check for sizeof(foo)/sizeof(foo[0]) that could be ARRAY_SIZE(foo)
4762 …if ($line =~ m@\b(sizeof\s*\(\s*\Q$array\E\s*\)\s*/\s*sizeof\s*\(\s*\Q$array\E\s*\[\s*0\s*\]\s*\))…
5047 # 2. at the beginning of a line for slice initialisers -- [0...10] = 5,
5048 # 3. inside a curly brace -- = { [0...10] = 5 }
5052 ($where != 0 || $prefix !~ /^.\s+$/) &&
5066 my $ctx_before = substr($line, 0, $-[1]);
5101 my $line_fixed = 0;
5118 my $off = 0;
5125 $off = 0;
5130 for (my $n = 0; $n < $#elements; $n += 2) {
5139 my $ca = substr($opline, 0, $off);
5172 my $ptr = substr($blank, 0, $off) . "^";
5222 my $rtrim_before = 0;
5223 my $space_after = 0;
5357 my $ok = 0;
5377 if ($ok == 0) {
5398 if (($#elements % 2) == 0) {
5550 for (my $n = 0; $n < $cnt; $n++) {
5682 ctx_statement_block($linenr, $realcnt, 0)
5705 my $fixed_assign_in_if = 0;
5737 substr($s, 0, length($c), '');
5757 $cond_lines == 0 &&
5775 \s*0[xX][0-9]+\s*
5779 \s*0[xX][0-9]+\s*
5835 my ($s, $c) = ctx_statement_block($linenr, $realcnt, 0);
5839 substr($s, 0, length($c), '');
5914 if ($asminclude > 0) {
5935 my $has_flow_statement = 0;
5936 my $has_arg_concat = 0;
5938 ctx_statement_block($linenr, $realcnt, 0);
6036 $first = 0;
6098 # do {} while (0) macro tests:
6099 # single-statement macros do not need to be enclosed in do while (0) loop,
6109 ctx_statement_block($linenr, $realcnt, 0);
6115 …if ($dstat =~ /^\+\s*#\s*define\s+$Ident\s*${balanced_parens}\s*do\s*{(.*)\s*}\s*while\s*\(\s*0\s*…
6126 "Single statement macros should not use a do {} while (0) loop\n" . "$herectx");
6130 "do {} while (0) macros should not be semicolon terminated\n" . "$herectx");
6147 #print "APW: <<$chunks[1][0]>><<$chunks[1][1]>>\n";
6148 if ($#chunks > 0 && $level == 0) {
6150 my $allow = 0;
6151 my $seen = 0;
6161 $allowed[$allow] = 0;
6170 substr($block, 0, length($cond), '');
6190 my $sum_allowed = 0;
6194 if ($sum_allowed == 0) {
6207 my $allowed = 0;
6210 if (substr($line, 0, $-[0]) =~ /(\}\s*)$/) {
6216 ctx_statement_full($linenr, $realcnt, $-[0]);
6219 my ($cond, $block) = @{$chunks[0]};
6222 substr($block, 0, length($cond), '');
6240 substr($block, 0, length($cond), '');
6247 if ($level == 0 && $block =~ /^\s*\{/ && !$allowed) {
6291 $prevrawline !~ /(?:\\(?:[ntr]|[0-7]{1,3}|x[0-9a-fA-F]{1,2})|;\s*|\{\s*)"\s*$/) {
6339 …if ($rawline =~ /^\+.*\([^"]*"$tracing_logging_tags{0,3}%s(?:\s*\(\s*\)\s*)?$tracing_logging_tags{…
6364 my $extracted_string = substr($rawline, $-[0], $+[0] - $-[0]);
6377 my $extracted_string = substr($rawline, $-[0], $+[0] - $-[0]);
6378 $fixed[$fixlinenr] =~ s/\Q$extracted_string\E\s*"/substr($extracted_string, 0, -1)/e;
6393 $show_L = 0;
6399 $show_Z = 0;
6401 # check for 0x<decimal>
6402 if ($string =~ /0x%[\*\d\.\$\Llzth]*[diou]/) {
6404 "Prefixing 0x with decimal output is defective\n" . $herecurr);
6414 # warn about #if 0
6415 if ($line =~ /^.\s*\#\s*if\s+0\b/) {
6417 "Consider removing the code enclosed by this #if 0 and its #endif\n" . $herecurr);
6441 $do_fix = 0;
6446 $do_fix = 0;
6449 $do_fix = 0;
6467 my ($s, $c) = ctx_statement_block($linenr - 3, $realcnt, 0);
6497 index($stat, '"') >= 0) {
6505 my $lineoff = substr($stat_real, 0, $-[1]) =~ tr@\n@@;
6646 # $clean = 0;
6923 my $fmt = get_quoted_string($lines[$count - 1], raw_line($count, 0));
6974 if ($ms_size =~ /^(0x|)0$/i) {
6976 "memset to 0's uses 0 as the 2nd argument, not the 3rd\n" . "$here\n$stat\n");
6977 } elsif ($ms_size =~ /^(0x|)1$/i) {
7002 # check for memset(foo, 0x0, ETH_ALEN) that could be eth_zero_addr
7003 # check for memset(foo, 0xFF, ETH_ALEN) that could be eth_broadcast_addr
7010 # if ($ms_val =~ /^(?:0x|)0+$/i) {
7016 # } elsif ($ms_val =~ /^(?:0xff|255)$/i) {
7153 substr($s, 0, length($cond), '');
7209 my $ok = 0;
7212 for (my $n = 0; $n < $cnt; $n++) {
7216 $ok = 1 if ($rl =~ /\{/ && $n == 0);
7413 if ($line =~ /^.\s*sema_init.+,\W?0\W?\)/) {
7474 # likely/unlikely comparisons similar to "(likely(foo) > 0)"
7488 substr($fixed[$fixlinenr], $offset, 0) = '\\n';
7494 $prevline =~ /^\+\s*(?:\}(?:\s*__packed\s*)?|$Type)\s*$Ident\s*\[\s*(0|1)\s*\]\s*;\s*$/) {
7497 $1 == '0' && $fix) {
7498 $fixed[$fixlinenr - 1] =~ s/\[\s*0\s*\]/[]/;
7565 …$stat =~ /\bDEVICE_ATTR\s*\(\s*(\w+)\s*,\s*\(?\s*(\s*(?:${multi_mode_perms_string_search}|0[0-7]{3…
7619 # o Ignore module_param*(...) uses with a decimal 0 permission as that has a
7621 # o Ignore proc_create*(...) uses with a decimal 0 permission as that means
7627 my $func = $entry->[0];
7643 if (!($func =~ /^(?:module_param|proc_create)/ && $val eq "0") &&
7703 exit(0);
7709 exit(0);
7715 exit(0);
7729 if ($signoff == 0) {
7734 # 0 -> missing sign off
7743 if ($authorsignoff == 0) {
7770 if ($quiet == 0) {
7782 $rpt_cleaners = 0;
7791 if ($clean == 0 && $fix &&
7793 $#fixed_inserted >= 0 || $#fixed_deleted >= 0)) {
7796 my $linecount = 0;
7830 if ($quiet == 0) {