clone_all_packages.pl
changeset 31 cf4bd27a8280
parent 30 09f253c20209
equal deleted inserted replaced
30:09f253c20209 31:cf4bd27a8280
   308 "oss/MCL/utilities",
   308 "oss/MCL/utilities",
   309 # QEMU
   309 # QEMU
   310 "oss/FCL/interim/QEMU",
   310 "oss/FCL/interim/QEMU",
   311 );
   311 );
   312 
   312 
       
   313 my %export_control_special_case = (
       
   314   "oss/MCL/sf/os/security" => 1,
       
   315   "oss/FCL/sf/os/security" => 1,
       
   316   );
       
   317 
   313 sub do_system(@)
   318 sub do_system(@)
   314   {
   319   {
   315   my (@cmd) = @_;
   320   my (@cmd) = @_;
   316   
   321   
   317   if ($verbose)
   322   if ($verbose)
   351   
   356   
   352   $path .= "/$destdir";   # this is where the repository will go
   357   $path .= "/$destdir";   # this is where the repository will go
   353 
   358 
   354   my $repo_url = "https://$username:$password\@$hostname/$package/";
   359   my $repo_url = "https://$username:$password\@$hostname/$package/";
   355   my $repo_push_url =$repo_url;
   360   my $repo_push_url =$repo_url;
   356   if ($license ne "sfl")
   361   if ($license ne "sfl" && !$export_control_special_case{$package})
   357     {
   362     {
   358     # user registration is not required for reading public package repositories
   363     # user registration is not required for reading public package repositories
   359     $repo_url = "http://developer.symbian.org/$package/";
   364     $repo_url = "http://developer.symbian.org/$package/";
   360     }
   365     }
   361   
   366