Return webroot relative paths

[chef.git] / cookbooks / planet / templates / default / apache-latest-planet-filename.erb

diff --git a/cookbooks/planet/templates/default/apache-latest-planet-filename.erb b/cookbooks/planet/templates/default/apache-latest-planet-filename.erb
index d7c8695c7408103620557e5bbe49baa10f6736c2..9107436b3d38cbfddfcd0114393c5a059791a222 100644 (file)
--- a/cookbooks/planet/templates/default/apache-latest-planet-filename.erb
+++ b/cookbooks/planet/templates/default/apache-latest-planet-filename.erb
@@ -2,9 +2,25 @@
 
 # DO NOT EDIT - This file is being maintained by Chef
 
+use strict;
+use warnings;
+
+use Cwd qw(abs_path);
+
 $| = 1;
-while (<STDIN>) {
-       my $where = readlink("<%= node[:planet][:dump][:xml_directory] %>/planet-latest.osm.bz2");
-       s/planet\/planet\-latest\.osm\.bz2/planet\/$where/g;
-       print $_;
+
+while (my $path = <STDIN>)
+{
+    chomp $path;
+
+    my $file = abs_path("/store/planet${path}");
+
+    if ($file && $file =~ m|^/store/planet(/.*)$| && -f $file)
+    {
+        print "$1\n";
+    }
+    else
+    {
+        print "NULL\n";
+    }
 }