Changeset 29415

Timestamp:

2014-11-04T21:15:38+13:00 (9 years ago)

Author:

ak19

Message:

There was no option for downloading language files for GS3. But only if a filepath to that is provided does the other link show up that allows downloading the spreadsheet for offline translation. For now adding in a version that zips up all the GS3 important interface properties files in English, and those in the translator's language where these exist.

File:

• main/trunk/greenstone2/bin/script/gti.pl (modified) (3 diffs)

main/trunk/greenstone2/bin/script/gti.pl

@@ -37 +37 @@
 use strict;
 use util;
+use FileUtils;
 
 my $gsdl_root_directory = "$ENV{'GSDLHOME'}";
@@ -99 +100 @@
 # check it out as greenstone3
 { 'key' => "gs3interface",
-'file_type' => "resource_bundle",
-'source_file' => "greenstone3",
-'target_file' => "greenstone3"
+        'file_type' => "resource_bundle",
+        'source_file' => "greenstone3",
+        'target_file' => "greenstone3"
 }
 ];
@@ -1893 +1894 @@
     &log_message("Total number of target chunks requiring translation: " . scalar(@target_files_keys_requiring_translation));
     &log_message("Total number of target chunks requiring updating: " . scalar(@target_files_keys_requiring_updating));
-    
-    my $xml_response = &create_xml_response_for_chunks_requiring_work($translation_file_key, "", scalar(keys(%source_files_key_to_text_mapping)),
+
+    my $download_target_filepath = "";
+
+
+    # ****** DOWNLOADING LANGUAGE FILES WAS NOT YET IMPLEMENTED FOR GS3. RUDIMENTARY VERSION ****** #
+
+    # if there is no copy of the language files for download, there's also no link to the spreadsheet
+    # for translating offline. So GS3's download option, we will zip up all the relevant greenstone 3
+    # interface *.properties files,and link to that zip as the file for offline translation.
+    # Selecting only properties files for English and the language they're working on (if the last exists)
+
+    # tar -cvzf gs3interface.tar.gz greenstone3/AbstractBrowse.properties greenstone3/AbstractBrowse_nl.properties 
+    # will generate a tar file containing a folder called "greenstone3" with the specified *.properties files
+
+    my $sourcedir = "greenstone3";
+    my $zip = &FileUtils::filenameConcatenate("tmp", "gs3interface_".$target_language_code.".tar.gz");
+    my $tar_cmd = "tar -cvzf $zip";
+
+
+    # store cur dir and cd to gsdlhome to generate the correct path in the zip file
+    my $curdir = `pwd`;
+    chdir $gsdl_root_directory;
+
+    my $filelisting = "";
+    foreach my $interface_file (@gs3_interface_files) {
+
+    my $source_filepath = &FileUtils::filenameConcatenate($sourcedir, $interface_file.".properties");
+    my $target_filepath = &FileUtils::filenameConcatenate($sourcedir, $interface_file."_".$target_language_code.".properties");
+    
+    $filelisting = "$filelisting $source_filepath"; 
+    if(&FileUtils::fileExists($target_filepath)) {
+        $filelisting = "$filelisting $target_filepath";
+    }   
+    }
+    $tar_cmd .= " $filelisting";
+
+    # tar command will overwrite the previous version, but want to check we've created it
+    if(&FileUtils::fileExists($zip)) {
+    &FileUtils::removeFiles($zip);
+    }
+
+    #my $tar_result = system($tar_cmd); # works but then interface breaks
+    `$tar_cmd`;
+    my $tar_result = $?;
+
+    if(&FileUtils::fileExists($zip)) { ## if($tar_result == 0) {, # breaks the interface
+    $download_target_filepath = $zip;
+    } else {
+    &log_message("Unable to generate zip containing gs3interface files " . $download_target_filepath . "$!");
+    }
+
+    # change back to original working directory (cgi-bin/linux probably)
+    chdir $curdir;
+
+    # ************** END RUDIMENTARY VERSION OF DOWNLOADING LANGUAGE FILES FOR GS3 ************* #
+
+
+    my $xml_response = &create_xml_response_for_chunks_requiring_work($translation_file_key, $download_target_filepath, scalar(keys(%source_files_key_to_text_mapping)),
     \@target_files_keys_requiring_translation, \@target_files_keys_requiring_updating,
     $num_chunks_to_return, \%source_files_key_to_text_mapping, \%target_files_key_to_text_mapping,