Kaydet (Commit) a2973722 authored tarafından Stephan Bergmann's avatar Stephan Bergmann

Quote .ddf content (potentially containing stuff like "%2F")

Change-Id: I532cbc97fe0a85f10dba4f52897c3744516c31c9
üst 937b80b0
...@@ -210,7 +210,7 @@ sub generate_cab_file_list ...@@ -210,7 +210,7 @@ sub generate_cab_file_list
write_ddf_file_header(\@ddffile, $cabinetfile, $installdir); write_ddf_file_header(\@ddffile, $cabinetfile, $installdir);
my $ddfline = "\"" . $sourcepath . "\"" . " " . $uniquename . "\n"; my $ddfline = "\"" . $sourcepath . "\" \"" . $uniquename . "\"\n";
if ( $doinclude ) { push(@ddffile, $ddfline); } if ( $doinclude ) { push(@ddffile, $ddfline); }
$counter++; # increasing the counter $counter++; # increasing the counter
...@@ -230,7 +230,7 @@ sub generate_cab_file_list ...@@ -230,7 +230,7 @@ sub generate_cab_file_list
my $nextfilestyles = ""; my $nextfilestyles = "";
if ( $nextfile->{'Styles'} ) { $nextfilestyles = $nextfile->{'Styles'}; } if ( $nextfile->{'Styles'} ) { $nextfilestyles = $nextfile->{'Styles'}; }
if ( $nextfilestyles =~ /\bDONT_PACK\b/ ) { $localdoinclude = 0; } if ( $nextfilestyles =~ /\bDONT_PACK\b/ ) { $localdoinclude = 0; }
$ddfline = "\"" . $sourcepath . "\"" . " " . $uniquename . "\n"; $ddfline = "\"" . $sourcepath . "\" \"" . $uniquename . "\"\n";
if ( $localdoinclude ) { push(@ddffile, $ddfline); } if ( $localdoinclude ) { push(@ddffile, $ddfline); }
$counter++; # increasing the counter! $counter++; # increasing the counter!
...@@ -306,7 +306,7 @@ sub generate_cab_file_list ...@@ -306,7 +306,7 @@ sub generate_cab_file_list
write_ddf_file_header(\@ddffile, $cabinetfile, $installdir); write_ddf_file_header(\@ddffile, $cabinetfile, $installdir);
my $ddfline = "\"" . $sourcepath . "\"" . " " . $uniquename . "\n"; my $ddfline = "\"" . $sourcepath . "\" \"" . $uniquename . "\"\n";
if ( $doinclude ) { push(@ddffile, $ddfline); } if ( $doinclude ) { push(@ddffile, $ddfline); }
my $nextfile = ""; my $nextfile = "";
...@@ -327,7 +327,7 @@ sub generate_cab_file_list ...@@ -327,7 +327,7 @@ sub generate_cab_file_list
my $nextfilestyles = ""; my $nextfilestyles = "";
if ( $nextfile->{'Styles'} ) { $nextfilestyles = $nextfile->{'Styles'}; } if ( $nextfile->{'Styles'} ) { $nextfilestyles = $nextfile->{'Styles'}; }
if ( $nextfilestyles =~ /\bDONT_PACK\b/ ) { $localdoinclude = 0; } if ( $nextfilestyles =~ /\bDONT_PACK\b/ ) { $localdoinclude = 0; }
$ddfline = "\"" . $sourcepath . "\"" . " " . $uniquename . "\n"; $ddfline = "\"" . $sourcepath . "\" \"" . $uniquename . "\"\n";
if ( $localdoinclude ) { push(@ddffile, $ddfline); } if ( $localdoinclude ) { push(@ddffile, $ddfline); }
$counter++; $counter++;
$nextfile = ""; $nextfile = "";
...@@ -392,7 +392,7 @@ sub generate_cab_file_list ...@@ -392,7 +392,7 @@ sub generate_cab_file_list
write_ddf_file_header(\@ddffile, $cabinetfile, $installdir); write_ddf_file_header(\@ddffile, $cabinetfile, $installdir);
my $ddfline = "\"" . $sourcepath . "\"" . " " . $uniquename . "\n"; my $ddfline = "\"" . $sourcepath . "\" \"" . $uniquename . "\"\n";
if ( $doinclude ) { push(@ddffile, $ddfline); } if ( $doinclude ) { push(@ddffile, $ddfline); }
my $nextfile = ${$filesref}[$i+1]; my $nextfile = ${$filesref}[$i+1];
...@@ -411,7 +411,7 @@ sub generate_cab_file_list ...@@ -411,7 +411,7 @@ sub generate_cab_file_list
my $nextfilestyles = ""; my $nextfilestyles = "";
if ( $nextfile->{'Styles'} ) { $nextfilestyles = $nextfile->{'Styles'}; } if ( $nextfile->{'Styles'} ) { $nextfilestyles = $nextfile->{'Styles'}; }
if ( $nextfilestyles =~ /\bDONT_PACK\b/ ) { $localdoinclude = 0; } if ( $nextfilestyles =~ /\bDONT_PACK\b/ ) { $localdoinclude = 0; }
$ddfline = "\"" . $sourcepath . "\"" . " " . $uniquename . "\n"; $ddfline = "\"" . $sourcepath . "\" \"" . $uniquename . "\"\n";
if ( $localdoinclude ) { push(@ddffile, $ddfline); } if ( $localdoinclude ) { push(@ddffile, $ddfline); }
$i++; # increasing the counter! $i++; # increasing the counter!
$nextfile = ${$filesref}[$i+1]; $nextfile = ${$filesref}[$i+1];
...@@ -480,7 +480,7 @@ sub generate_cab_file_list ...@@ -480,7 +480,7 @@ sub generate_cab_file_list
if ( $onefile->{'Styles'} ) { $styles = $onefile->{'Styles'}; }; if ( $onefile->{'Styles'} ) { $styles = $onefile->{'Styles'}; };
if ( $styles =~ /\bDONT_PACK\b/ ) { $doinclude = 0; } if ( $styles =~ /\bDONT_PACK\b/ ) { $doinclude = 0; }
my $ddfline = "\"" . $sourcepath . "\"" . " " . $uniquename . "\n"; my $ddfline = "\"" . $sourcepath . "\" \"" . $uniquename . "\"\n";
if ( $doinclude ) { push(@ddffile, $ddfline); } if ( $doinclude ) { push(@ddffile, $ddfline); }
$counter++; # increasing the counter $counter++; # increasing the counter
...@@ -538,7 +538,7 @@ sub generate_cab_file_list ...@@ -538,7 +538,7 @@ sub generate_cab_file_list
if ( $onefile->{'Styles'} ) { $styles = $onefile->{'Styles'}; }; if ( $onefile->{'Styles'} ) { $styles = $onefile->{'Styles'}; };
if ( $styles =~ /\bDONT_PACK\b/ ) { $doinclude = 0; } if ( $styles =~ /\bDONT_PACK\b/ ) { $doinclude = 0; }
my $ddfline = "\"" . $sourcepath . "\"" . " " . $uniquename . "\n"; my $ddfline = "\"" . $sourcepath . "\" \"" . $uniquename . "\"\n";
if ( $doinclude ) { push(@ddffile, $ddfline); } if ( $doinclude ) { push(@ddffile, $ddfline); }
} }
...@@ -616,7 +616,7 @@ sub save_packorder ...@@ -616,7 +616,7 @@ sub save_packorder
if ( $oneline =~ /^\s*\.Set\s+CabinetName.*\=(.*?)\s*$/ ) { $cabinetfile = $1; } if ( $oneline =~ /^\s*\.Set\s+CabinetName.*\=(.*?)\s*$/ ) { $cabinetfile = $1; }
if ( $oneline =~ /^\s*\.Set\s+/ ) { next; } if ( $oneline =~ /^\s*\.Set\s+/ ) { next; }
if ( $oneline =~ /^\s*\"(.*?)\"\s+(.*?)\s*$/ ) if ( $oneline =~ /^\s*\"(.*?)\"\s+\"(.*?)\"\s*$/ )
{ {
my $sourcefile = $1; my $sourcefile = $1;
my $uniquefilename = $2; my $uniquefilename = $2;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment