Lines Matching full:if
73 my @fixes = (); # If a patch description includes Fixes: lines
170 if (-f $conf) {
182 next if ($line =~ m/^\s*#/);
183 next if ($line =~ m/^\s*$/);
187 last if ($word =~ m/^#/);
192 unshift(@ARGV, @conf_args) if @conf_args;
197 if (-f $ignore_file) {
208 next if ($line =~ m/^\s*$/);
209 if (rfc822_valid($line)) {
216 if ($#ARGV > 0) {
218 if ($_ =~ /^-{1,2}self-test(?:=|$)/) {
224 if (!GetOptions(
267 die "$P: invalid argument - use --help if necessary\n";
270 if ($help != 0) {
275 if ($version != 0) {
280 if (defined $self_test) {
286 if (-t STDIN && !@ARGV) {
288 die "$P: missing patchfile or -f file - use --help if necessary\n";
291 $output_multiline = 0 if ($output_separator ne ", ");
292 $output_rolestats = 1 if ($interactive);
293 $output_roles = 1 if ($output_rolestats);
295 if ($sections || $letters ne "") {
307 if ($selections == 0) {
312 if ($email &&
336 if ($line =~ m/^([A-Z]):\s*(.*)/) {
341 if ($type eq "F" || $type eq "X") {
345 ##if pattern is a directory and it lacks a trailing slash, add one
346 if ((-d $value)) {
356 if (defined $self_test) {
366 return if ($file !~ m@/MAINTAINERS$@);
368 return if (! -f $file);
380 if (defined $maintainer_path) {
382 # Perl Cookbook tilde expansion if necessary
386 if (-d $path) {
387 $path .= '/' if ($path !~ m@/$@);
388 if ($find_maintainer_files) {
398 push(@mfiles, "$path$file") if ($file !~ /^\./);
406 die "$P: No MAINTAINER files found in '$path'\n" if (scalar(@mfiles) == 0);
415 return if ($file =~ m@\bMAINTAINERS$@);
417 if (-f $file && ($email_file_emails || $file =~ /\.yaml$/)) {
442 return if (!$email_use_mailmap || !(-f "${lk_path}.mailmap"));
451 next if (/^\s*$/); #skip empty lines
459 if (/^([^<]+)<([^>]+)>$/) {
508 if (!@ARGV) {
513 if ($file ne "&STDIN") {
515 ##if $file is a directory and it lacks a trailing slash, add one
516 if ((-d $file)) {
522 if ($from_filename && (vcs_exists() && !vcs_file_exists($file))) {
525 if ($from_filename || ($file ne "&STDIN" && vcs_file_exists($file))) {
529 if ($file ne "MAINTAINERS" && -f $file && $keywords) {
534 if ($keywords) {
536 if ($text =~ m/$keyword_hash{$line}/x) {
558 if (m/^ mode change [0-7]+ => [0-7]+ (\S+)\s*$/) {
570 push(@fixes, $1) if ($email_fixes);
579 if ($email_git_blame) {
584 if ($patch_line =~ m/${patch_prefix}$keyword_hash{$line}/x) {
592 if ($file_cnt == @files) {
616 if (@maintainers) {
621 if ($scm) {
626 if ($status) {
631 if ($subsystem) {
636 if ($web) {
656 if (($self_test eq "" || $self_test =~ /\bsections\b/) &&
664 if (grep(m@^\Q$x->{line}\E@, @section_headers)) {
674 if ($type eq "S") {
684 if (!$has_ML && $status !~ /orphan|obsolete/i) {
687 if (!$has_S) {
690 if (!$has_F) {
695 next if ($x->{line} !~ /^([A-Z]):\s*(.*)/);
701 if (($type eq "F" || $type eq "X") &&
706 ##if pattern is a directory and it lacks a trailing slash, add one
707 if ((-d $value)) {
710 if (!grep(m@^$value@, @lsfiles)) {
718 next if (grep(m@^\Q$value\E$@, @good_links));
720 if (grep(m@^\Q$value\E$@, @bad_links)) {
724 if ($? == 0) {
731 if ($isbad) {
738 next if (grep(m@^\Q$value\E$@, @good_links));
740 if (grep(m@^\Q$value\E$@, @bad_links)) {
747 $branch = $3 if $3;
749 if ($? == 0) {
758 if ($? == 0) {
765 if ($isbad) {
776 return 1 if ($ignore eq $address);
787 if ($line =~ m/^([A-Z]):\s*(.*)/) {
790 if ($type eq 'S') {
791 if ($value =~ /(maintain|support)/i) {
805 if ($line =~ m/^([A-Z]):\s*(.*)/) {
808 if ($type eq 'M') {
830 if ($email_git_all_signature_types) {
854 if ($line =~ m/^([A-Z]):\s*(.*)/) {
857 if ($type eq 'X') {
858 if (file_match_pattern($file, $value)) {
866 if (!$exclude) {
869 if ($line =~ m/^([A-Z]):\s*(.*)/) {
872 if ($type eq 'F') {
873 if (file_match_pattern($file, $value)) {
876 $value_pd++ if (substr($value,-1,1) ne "/");
877 $value_pd = -1 if ($value =~ /^\.\*/);
878 if ($value_pd >= $file_pd &&
883 if ($pattern_depth == 0 ||
889 if ($file =~ m/$value/x) {
901 if ($sections) {
907 if ($line =~ /^[FX]:/) { ##Restore file patterns
914 if ($letters eq "" || (!$count || $letters =~ /$1/i)) {
925 if ($keywords) {
937 if ($email &&
944 if ($email && $email_git_blame) {
949 if ($email) {
964 if ($email || $email_list) {
965 if ($email) {
968 if ($email_list) {
973 if ($interactive) {
982 if (substr($pattern, -1) eq "/") {
983 if ($file =~ m@^$pattern@) {
987 if ($file =~ m@^$pattern@) {
990 if ($s1 == $s2) {
1005 --email => print email address(es) if any
1017 --interactive => display a menu (mostly useful if used with the --git option)
1018 --m => include maintainer(s) if any
1019 --r => include reviewer(s) if any
1021 --l => include list(s) if any
1022 --moderated => include moderated lists(s) if any (default: true)
1023 --s => include subscriber only list(s) if any (default: false)
1029 --scm => print SCM tree(s) if any
1030 --status => print status if any
1031 --subsystem => print subsystem name if any
1032 --web => print website(s) if any
1036 using --separator also sets --nomultiline if --separator is not [, ]
1072 If git is not installed, but mercurial (hg) is installed and an .hg
1078 File ".get_maintainer.conf", if it exists in the kvm-unit-tests source root
1095 if ($formatted_email =~ /^([^<]+)<(.+\@.*)>.*$/) {
1108 if ($name =~ /[^\w \-]/i) { ##has "must quote" chars
1125 if ($name =~ /[^\w \-]/i) { ##has "must quote" chars
1130 if ($usename) {
1131 if ("$name" eq "") {
1148 if (($tv =~ m/^([A-Z]):\s*(.*)/)) {
1162 if (!($tv =~ m/^([A-Z]):\s*(.*)/)) {
1176 if (!($tv =~ m/^([A-Z]):\s*(.*)/)) {
1191 if ($output_section_maxlen && length($subsystem) > $output_section_maxlen) {
1211 if ($tv =~ m/^([A-Z]):\s*(.*)/) {
1214 if ($ptype eq "S") {
1221 if ($role eq "supported") {
1243 if ($subsystem eq "THE REST") {
1261 if ($tv =~ m/^([A-Z]):\s*(.*)/) {
1264 if ($ptype eq "L") {
1269 if ($list_role ne "") {
1272 if ($list_address =~ m/([^\s]+)\s+(.*)$/) {
1276 if ($list_additional =~ m/subscribers-only/) {
1277 if ($email_subscriber_list) {
1278 if (!$hash_list_to{lc($list_address)}) {
1285 if ($email_list) {
1286 if (!$hash_list_to{lc($list_address)}) {
1287 if ($list_additional =~ m/moderated/) {
1288 if ($email_moderated_list) {
1302 if ($email_maintainer) {
1307 if ($email_reviewer) {
1325 return 1 if (($name eq "") && ($address eq ""));
1326 return 1 if (($name ne "") && exists($email_hash_name{lc($name)}));
1327 return 1 if (($address ne "") && exists($email_hash_address{lc($address)}));
1337 if ($address eq "") {
1341 if (!$email_remove_duplicates) {
1345 $email_hash_name{lc($name)}++ if ($name ne "");
1357 if (rfc822_valid($address)) {
1365 if (!push_email_address($address, $role)) {
1378 if ($email_remove_duplicates) {
1380 if (($name eq $entry_name || $address eq $entry_address)
1383 if ($entry->[1] eq "") {
1390 if ($email eq $entry->[0]
1393 if ($entry->[1] eq "") {
1407 if (-e "$path/$bin") {
1419 if (-e "$path/$conf") {
1435 if (exists $mailmap->{names}->{$email} ||
1437 if (exists $mailmap->{names}->{$email}) {
1440 if (exists $mailmap->{addresses}->{$email}) {
1444 if (exists $mailmap->{names}->{$address}) {
1447 if (exists $mailmap->{addresses}->{$address}) {
1461 merge_by_realname(@mapped_emails) if ($email_use_mailmap);
1471 if (exists $address_map{$name}) {
1544 return (0, \@signatures, \@authors, \@stats) if !@signatures;
1546 save_commits_by_author(@lines) if ($interactive);
1547 save_commits_by_signer(@lines) if ($interactive);
1561 return @lines if !@lines;
1565 if ($line =~ m/$VCS_cmds{"author_pattern"}/) {
1573 save_commits_by_author(@lines) if ($interactive);
1574 save_commits_by_signer(@lines) if ($interactive);
1587 if ($line =~ m/$VCS_cmds{"blame_commit_pattern"}/) {
1600 return @commits if (!(-f $file));
1602 if (@range && $VCS_cmds{"blame_range_cmd"} eq "") {
1610 next if (!($file_range_diff =~ m/(.+):(.+):(.+)/));
1614 next if ("$file" ne "$diff_file");
1621 next if (!($file_range_diff =~ m/(.+):(.+):(.+)/));
1625 next if ("$file" ne "$diff_file");
1646 return 1 if eval $VCS_cmds{"available"};
1648 return 2 if eval $VCS_cmds{"available"};
1650 if (!$printed_novcs) {
1670 return if (!vcs_exists());
1685 @commit_authors = @{$commit_authors_ref} if defined $commit_authors_ref;
1686 @commit_signers = @{$commit_signers_ref} if defined $commit_signers_ref;
1707 $maintained = 1 if ($entry->[1] =~ /^(maintainer|supporter)/i);
1720 if ($redraw) {
1723 if ($email_git ||
1733 $sel = "*" if ($selected{$count});
1742 if ($authored > 0 || $signed > 0);
1744 if ($authored{$count}) {
1750 if ($signed{$count}) {
1761 $date_ref = \$email_hg_since if (vcs_is_hg());
1762 if ($print_options) {
1764 if (vcs_exists()) {
1808 $val = $1 if $str =~ /^(\d+)$/;
1810 if ($sel eq "y") {
1820 $toggle = 1 if ($sel eq '*');
1829 if (lc($str) eq "m") {
1832 if ($list[$i]->[1] =~ /^(maintainer|supporter)/i);
1837 if ($list[$i]->[1] =~ /^(author|commit|signer)/i);
1842 if ($list[$i]->[1] =~ /^(open list)/i);
1847 if ($list[$i]->[1] =~ /^(subscriber list)/i);
1851 if ($val > 0 && $val <= $count) {
1855 $toggle = 1 if ($str eq '*');
1861 if ($val > 0 && $val <= $count) {
1865 $toggle = 1 if ($str eq '*');
1874 if ($str eq "f") {
1881 if ($str eq "s") {
1888 if ($val > 0) {
1893 if ($val > 0) {
1898 if ($str ne "" && $val >= 0) {
1903 if (vcs_is_git()) {
1926 if ($str ne "" && $val >= 0) {
1938 If you have git or hg installed, you can choose to summarize the commit
1956 if ($rerun) {
1958 if ($email_git_blame);
1967 if ($selected{$count}) {
1978 if ($$bool_ref) {
1993 return $email if (!$email_remove_duplicates);
1997 if ($name ne "" && $deduplicate_name_hash{lc($name)}) {
2006 if (!$matched) {
2023 if ($line =~ m/$VCS_cmds{"author_pattern"}/) {
2028 push(@commits, $1) if ($line =~ m/$VCS_cmds{"commit_pattern"}/);
2029 push(@subjects, $1) if ($line =~ m/$VCS_cmds{"subject_pattern"}/);
2035 if (@{$ref}[0] eq $commits[$i] &&
2041 if (!$exists) {
2055 $commit = $1 if ($line =~ m/$VCS_cmds{"commit_pattern"}/);
2056 $subject = $1 if ($line =~ m/$VCS_cmds{"subject_pattern"}/);
2057 if ($line =~ /^[ \t]*${signature_pattern}.*\@.*$/) {
2070 if (@{$ref}[0] eq $commit &&
2077 if (!$exists) {
2091 return if (@lines <= 0);
2093 if ($divisor <= 0) {
2100 return if (@lines <= 0);
2112 $percent = 100 if ($percent > 100);
2113 next if (ignore_email_address($line));
2115 last if ($sign_offs < $email_git_min_signatures ||
2119 if ($output_rolestats) {
2140 return if (!$vcs_used);
2147 @signers = @{$signers_ref} if defined $signers_ref;
2148 @authors = @{$authors_ref} if defined $authors_ref;
2149 @stats = @{$stats_ref} if defined $stats_ref;
2159 if ($#authors == $#stats) {
2166 if ($stats[$i] =~ /$stat_pattern/) {
2182 if ($author eq deduplicate_email($authors[$i]) &&
2210 return if (!$vcs_used);
2217 if ($email_git_blame_signatures) {
2218 if (vcs_is_hg()) {
2232 @commit_authors = @{$commit_authors_ref} if defined $commit_authors_ref;
2233 @commit_signers = @{$commit_signers_ref} if defined $commit_signers_ref;
2250 @commit_authors = @{$commit_authors_ref} if defined $commit_authors_ref;
2251 @commit_signers = @{$commit_signers_ref} if defined $commit_signers_ref;
2258 if ($from_filename) {
2259 if ($output_rolestats) {
2261 if (vcs_is_hg()) {{ # Double brace for last exit
2276 last if !@lines;
2280 if ($line =~ m/$VCS_cmds{"author_pattern"}/) {
2287 save_commits_by_author(@lines) if ($interactive);
2288 save_commits_by_signer(@lines) if ($interactive);
2298 next if !@author;
2308 if (@blame_signers) {
2330 return 0 if (!$vcs_used);
2337 return 0 if ($? != 0);
2348 return 0 if (!$vcs_used);
2354 return () if ($? != 0);
2383 if ($name eq '"[,\.]"') {
2388 if (@nw > 2) {
2393 if (((length($first) == 1 && $first =~ m/[A-Za-z]/) ||
2403 if (substr($name, -1) =~ /[,\.]/) {
2409 if (substr($name, 0, 1) =~ /[,\.]/) {
2427 if (!$saw{$address}) {
2428 if ($output_roles) {
2443 if ($output_multiline) {
2503 # valid: returns true if the parameter is an RFC822 valid address
2508 if (!$rfc822re) {
2515 # validlist: In scalar context, returns true if the parameter is an RFC822
2528 if (!$rfc822re) {
2535 if ($s =~ m/^(?:$rfc822re)?(?:,(?:$rfc822re)?)*$/so &&