#!/usr/bin/perl -w

use strict;

my @match;
my @del;
my @add;

my $line;

while (<>)
{
    last if (m#GV_Draw_Marker#);
    #s#<div style="width:\d+px;#<div style="width:1060px;# and $match[1] = 1;
    $match[1] = 1;
    s#<div id="gmap_div" style="width:\d+px;#<div id="gmap_div" style="width:824px;# and $match[2] = 1;
    s#class="gv_marker_list" style="width:\d+px#class="gv_marker_list" style="width:160px# and $match[3] = 1;
    s#gv_options.width = \d+;#gv_options.width = 824;# and $match[4] = 1;
    s#gv_options.centering_options = { 'open_info_window':true, 'partial_match':true, 'center_key':'center', 'default_zoom':null }#gv_options.centering_options = { 'open_info_window':true, 'partial_match':true, 'center_key':'center', 'default_zoom':10 }# and $match[5] = 1;
    s#gv_options.tracklist_options.position = \['G_ANCHOR_TOP_RIGHT'#gv_options.tracklist_options.position = ['G_ANCHOR_BOTTOM_RIGHT'# and $match[6] = 1;
    s#gv_options.thumbnail_width = 0#gv_options.thumbnail_width = 480# and $match[7] = 1;
    s#gv_options.marker_list_options.position = \['G_ANCHOR_BOTTOM_RIGHT',6,38\]#gv_options.marker_list_options.position = ['G_ANCHOR_BOTTOM_LEFT',6,64]# and $match[8] = 1;
    s#gv_options.marker_list_options.width = 220#gv_options.marker_list_options.width = 240# and $match[9] = 1;

    s#.*gv_options.full_screen = false;.*## and $del[1] = 1;
    s#.*gv_options.map_type =.*## and $del[2] = 1;

    if ($_ =~ /gv_options.legend_options = /)
    {
	$add[4] = 1;
	print <<EOF;
				gv_options.map_type_control.custom = [ { id:'VFRCHART',menu_name:'VFR Chart', url:['http://www.runwayfinder.com/media/charts/?x={X}&y={Y}&z={Z}'], tile_function:'function(a,b){var z=17-b;var f="http://www.runwayfinder.com/media/charts/?x="+a.x+"&y="+a.y+"&z="+z;return f;}', copyright:'Runway data from <a target="_blank" href="http://www.runwayfinder.com/">RunwayFinder.com</a>' } ];
	
EOF
    }

    if ($_ =~ /function GV_Map/)
    {
	$add[3] = 1;
	print <<EOF;
			function MyHideTracks() {
				<?php
				echo "var showtracks = [{\$in['showonlytrack']}];";
				?>
				GV_Toggle_All_Tracks(false);
				for (var t=0; t<showtracks.length; t++) {
					GV_Show_Track(+showtracks[t]);
				}
			}
	
EOF
    }


    print $_;

    if ($_ =~ /gv_options.zoom /)
    {
	$add[1] = 1;
	print <<EOF;
				<?php \$in = \$_REQUEST; 
				if (\$in['lat'])
				{
					echo "gv_options.center = [";
					echo \$in['lat'];
					echo ",";
					echo \$in['lon'];
					echo "];";
					// higher number means closer view; at 600px wide, 7 = width of New Mexico, 12 = width of San Francisco
					if (\$in['zoom'])
					{
						echo "gv_options.zoom = ";
						echo \$in['zoom'];
						echo ";";
					}
					else
					{
						echo "gv_options.zoom = 13;";
					}
				}
				// popular map_type choices are 'G_NORMAL_MAP', 'G_SATELLITE_MAP', 'G_HYBRID_MAP', 'G_PHYSICAL_MAP', 'MYTOPO_TILES'
				if (\$in['maptype'])
				{
					echo "gv_options.map_type = '";
					echo \$in['maptype'];
					echo "';";
				}
				else
				{
					echo "gv_options.map_type = 'G_HYBRID_MAP';";
				}
				?>
EOF
    }

    if ($_ =~ /gv_options.tracklist_options.collapsible /)
    {
	$add[2] = 1;
	print <<EOF;
				<?php \$in = \$_REQUEST;
				if (isset(\$in['fullscreen']) and \$in['fullscreen'] == 0)
				{
					echo "gv_options.full_screen = false;\\n";
				}
				else
				{
					// true|false: should the map fill the entire page (or frame)?
					echo "gv_options.full_screen = true;\\n";
					// when full screen, marker list will grow from the bottom, so tracklist should grow from the top
					echo "gv_options.tracklist_options.position = ['G_ANCHOR_TOP_RIGHT',6,40];\\n";
				}
				?>

EOF
    }
}

$line = $_ or die "Read too many lines, none left (were there no waypoints?)";
for (my $i = 1; $i < 10; $i++)
{
    die "Did not match $i" if (not $match[$i]);
}

for (my $i = 1; $i < 3; $i++)
{
    die "Did not delete $i" if (not $del[$i]);
}

for (my $i = 1; $i < 5; $i++)
{
    die "Did not add $i" if (not $add[$i]);
}

print <<EOF;
					<?php 
					if (\$in['showonlytrack']) {
						echo "window.setTimeout('MyHideTracks()', 1000);";
					}
					if (\$in['name'])
					{
						echo "wpts.push( GV_Marker(gmap,{lat:";
						echo \$in['lat'];
						echo ",lon:";
						echo \$in['lon'];
						echo ",name:'";
						echo str_replace("'","\\\\\\\\'",\$in['name']);
						echo "',desc:'";
						echo str_replace("'","\\\\\\\\'",\$in['desc']);
						echo "',url:'";
						echo str_replace("'","\\\\\\\\'",\$in['url']);
						echo "',thumbnail:'";
						echo str_replace("'","\\\\\\\\'",\$in['thumbnail']);
						echo "',color:'red',icon:'camera',folder:'photos'}) );";
						echo "GV_Center_On_Marker('photo',{open_info_window:true});";
					}
					?>
EOF

print $line;
while (<>)
{
    last if (m#GV_Finish_Map# );
    print $_;

}
print <<EOF;

					<?php 
					if (!\$in['name'])
					{
					?>

					<?php
					}
					?>

					
					// this is optional to resize the waypoint list height on the first display
					\$('gv_marker_list').style.height = (gmap.getSize().height-640)+'px';
					GEvent.addListener(gmap, "resize", function() {
						// resize accordingly when needed
						\$('gv_marker_list').style.height = (gmap.getSize().height-640)+'px';
					});


					GV_Finish_Map(gv_options);

				} else {
					document.getElementById('gmap_div').style.backgroundColor = '#DDDDDD';
					document.getElementById('gmap_div').innerHTML = 'Sorry, your Google Map cannot be displayed.';
				}
			}
			GV_Map(); // execute the above code
		</script>
		
		
	</body>

</html>
EOF

# vim:sts=4:sw=4