Lines Matching full:path
95 for my $path (keys %paths) {
96 generateFileList($path, %diffFiles);
103 for my $path (sort patchpathcmp values %diffFiles) {
104 generateDiff($path, $prefix);
196 my $file = File::Spec->catdir($prefix, $fileData->{path});
228 my $path;
231 $path = substr($line, 8);
234 $path = substr($line, 7);
236 next if -d $path;
239 $diffFiles->{$path}->{path} = $path;
240 $diffFiles->{$path}->{modificationType} = $modificationType;
241 $diffFiles->{$path}->{isBinary} = isBinaryMimeType($path);
242 $diffFiles->{$path}->{isTestFile} = exists $testDirectories{(File::Spec->splitdir($path))[0]} ? 1 : 0;
244 my ($sourceFile, $sourceRevision) = findSourceFileAndRevision($path);
245 $diffFiles->{$path}->{sourceFile} = $sourceFile;
246 $diffFiles->{$path}->{sourceRevision} = $sourceRevision;
266 my $file = $fileData->{path};
310 my ($path) = @_;
312 return if (! -e $path);
315 open BINARY, $path or die;
331 my ($dira, $namea) = splitpath($fileDataA->{path});
332 my ($dirb, $nameb) = splitpath($fileDataB->{path});
349 die "can't handle empty string path\n" if $file eq "";
350 die "can't handle path with single quote in the name like \"$file\"\n" if $file =~ /'/; # ' (keep Xcode syntax highlighting happy)
364 for my $path (keys %result) {
365 for (my $parent = dirname($path); $parent ne '.'; $parent = dirname($parent)) {
367 delete $result{$path};
376 # Break up a path into the directory (with slash) and base name.
379 my ($path) = @_;
382 my $dirname = dirname($path) . $pathSeparator;
385 return ($dirname, basename($path));
