Changeset 9251

Timestamp:

2005-03-02T14:03:49+13:00 (19 years ago)

Author:

mdewsnip

Message:

Now sets a whole lot of permissions (for the Installshield X installer).

File:

• trunk/gsdl/bin/script/create_distributions.pl (modified) (5 diffs)

trunk/gsdl/bin/script/create_distributions.pl

@@ -376 +376 @@
     &util::cp_r (&util::filename_cat ($tmpdemo, "import"), $demodir);
     &util::cp_r (&util::filename_cat ($tmpdemo, "metadata"), $demodir);
+
+    # Make sure the whole thing is user-writeable
+    `chmod -R u+rw $cdrom_dist_dir`;
 }
 
@@ -448 +451 @@
     &force_windows_line_endings(&util::filename_cat($gsdldir, "etc", "main.cfg"));
     &force_windows_line_endings(&util::filename_cat($gsdldir, "etc", "oai.cfg"));
+
+    # Make sure certain files in the etc directory are writeable by everyone
+    my $error_txt_file = &util::filename_cat($gsdldir, "etc", "error.txt");
+    `chmod a+w $error_txt_file`;
+    my $history_db_file = &util::filename_cat($gsdldir, "etc", "history.db");
+    `chmod a+w $history_db_file`;
+    my $key_db_file = &util::filename_cat($gsdldir, "etc", "key.db");
+    `chmod a+w $key_db_file`;
+    my $main_cfg_file = &util::filename_cat($gsdldir, "etc", "main.cfg");
+    `chmod a+w $main_cfg_file`;
+    my $usage_txt_file = &util::filename_cat($gsdldir, "etc", "usage.txt");
+    `chmod a+w $usage_txt_file`;
+    my $users_db_file = &util::filename_cat($gsdldir, "etc", "users.db");
+    `chmod a+rw $users_db_file`;  # Readable too
 
     # We shouldn't distribute the GLI applet signed by us
@@ -572 +589 @@
 
     # Make Unix scripts executable
-    my $clean_sh = &util::filename_cat($gli_dir, "clean.sh");
-    `chmod a+x $clean_sh`;
-    my $document_sh = &util::filename_cat($gli_dir, "document.sh");
-    `chmod a+x $document_sh`;
-    my $gems_sh = &util::filename_cat($gli_dir, "gems.sh");
-    `chmod a+x $gems_sh`;
-    my $gli_sh = &util::filename_cat($gli_dir, "gli.sh");
-    `chmod a+x $gli_sh`;
-    my $makegli_sh = &util::filename_cat($gli_dir, "makegli.sh");
-    `chmod a+x $makegli_sh`;
-    my $makejar_sh = &util::filename_cat($gli_dir, "makejar.sh");
-    `chmod a+x $makejar_sh`;
+    `chmod a+x $gli_dir/*.sh`;
 
     # Copy the customised languages.xml file with only core languages enabled
@@ -662 +668 @@
     &util::cp (&util::filename_cat ($tmpdir, "gsdl", "configtest.pl"), $srcunixdir);
     &util::cp (&util::filename_cat ($tmpdir, "gsdl", "configure"), $srcunixdir);
-    # make sure configure script is executable
+    # make sure configure and setup scripts are executable
     my $configure_script = &util::filename_cat ($srcunixdir , "configure");
     `chmod a+x $configure_script`;
+
     &util::cp (&util::filename_cat ($tmpdir, "gsdl", "configure.in"), $srcunixdir);
     &util::cp (&util::filename_cat ($tmpdir, "gsdl", "config.sub"), $srcunixdir);
@@ -671 +678 @@
     &util::cp (&util::filename_cat ($tmpdir, "gsdl", "setup.bash"), $srcunixdir);
     &util::cp (&util::filename_cat ($tmpdir, "gsdl", "setup.csh"), $srcunixdir);
+    `chmod a+x $srcunixdir/setup.*`;
     }
 }