Changeset 26322

Timestamp:

2012-10-16T15:59:53+13:00 (12 years ago)

Author:

ak19

Message:

buildConfig.xml created at g2f-buildcol's end for a new fedora collection. Kathy thinks this may be better (because easier to do) than adjust the collConfig.xml to contain the same.

File:

• main/trunk/greenstone2/bin/script/g2f-buildcol.pl (modified) (1 diff)

main/trunk/greenstone2/bin/script/g2f-buildcol.pl

@@ -377 +377 @@
 
     
+    # for the Greenstone reader interface to make the new Fedora collection available,
+    # need to write out buildConfig.xml with FedoraServiceProxy as a new ServiceRack element
+    # Kathy thinks it's better to create a buildConfig.xml than put it in collectionConfig.xml
+    
+    my $indexdir = &util::filename_cat ($collectdir, $gs_col, "index");
+    &util::mk_dir($indexdir) unless &util::dir_exists($indexdir);
+    
+    my $buildcfg = &util::filename_cat ($indexdir, "buildConfig.xml");
+    if(-e $buildcfg) {
+    print STDERR "***** $buildcfg already exists for this fedora collection.\n";
+    print STDERR "***** Not modifying it to insert a FedoraServiceProxy ServiceRack.\n";
+    } 
+    else { # or do I just have a template buildConfig.xml that I copy over?
+    
+    my $contents = "<buildConfig>\n";
+    $contents .= "  <metadataList/>\n";
+    $contents .= "  <serviceRackList>\n";                                                            
+    $contents .= "    <serviceRack name=\"FedoraServiceProxy\" />\n";
+    $contents .= "  </serviceRackList>\n";
+    $contents .= "</buildConfig>\n";
+    
+    #print STDERR "**** collectcfg file: $collectcfg\n";
+    unless(open(FOUT, ">$buildcfg")) { 
+        print STDERR "g2f-buildcol.pl: Unable to open $collectcfg...ERROR: $!\n";
+        exit 1; 
+    }
+    print FOUT $contents;
+    close(FIN);
+    }
 }