Clusterer = function ( map )
{
    this.map = map; 
    this.markers = [];
    this.clusters = [];
    this.timeout = null;
    this.currentZoomLevel = map.getZoom();

    this.maxVisibleMarkers = Clusterer.defaultMaxVisibleMarkers;
    this.gridSize = Clusterer.defaultGridSize;
    this.minMarkersPerCluster = Clusterer.defaultMinMarkersPerCluster;    
    this.icon = Clusterer.defaultIcon;
    
    GEvent.addListener( map, 'zoomend', Clusterer.MakeCaller( Clusterer.Display, this ) );
    GEvent.addListener( map, 'moveend', Clusterer.MakeCaller( Clusterer.Display, this ) );
    GEvent.addListener( map, 'infowindowclose', Clusterer.MakeCaller( Clusterer.PopDown, this ) );
};


Clusterer.defaultGridSize = 5;
Clusterer.defaultMaxVisibleMarkers = 150;
Clusterer.defaultIsInfoBoxTemplate = false;

Clusterer.defaultIcon = new GIcon();
Clusterer.defaultIcon.image = 'http://mapbeta.assist2sell.com/Blue2large.png';
Clusterer.defaultIcon.shadow = 'http://mapbeta.assist2sell.com/mm_20_shadow.png';
Clusterer.defaultIcon.iconSize = new GSize( 30, 51 );
Clusterer.defaultIcon.shadowSize = new GSize( 56, 51 );
Clusterer.defaultIcon.iconAnchor = new GPoint( 13, 34 );
Clusterer.defaultIcon.infoWindowAnchor = new GPoint( 13, 3 );
Clusterer.defaultIcon.infoShadowAnchor = new GPoint( 27, 37 );


// Call this to change the cluster icon.
Clusterer.prototype.SetIcon = function ( icon )
    {
    this.icon = icon;
    };


// Changes the maximum number of visible markers before clustering kicks in.
Clusterer.prototype.SetMaxVisibleMarkers = function ( n )
    {
    this.maxVisibleMarkers = n;
    };


// Sets the minumum number of markers for a cluster.
Clusterer.prototype.SetMinMarkersPerCluster = function ( n )
    {
    this.minMarkersPerCluster = n;
    };

// Call this to add a marker.
Clusterer.prototype.AddMarker = function ( marker, title )
    {
    if ( marker.setMap != null )
	marker.setMap( this.map );

    marker.title = title;
    marker.onMap = false;
    this.markers.push( marker );
    this.DisplayLater();
    };


// Call this to remove a marker.
Clusterer.prototype.RemoveMarker = function ( marker )
    {
//kc042508 comment below
//    for ( var i = 0; i < this.markers.length; ++i )
//	if ( this.markers[i] == marker )
//	    {
//	    if ( marker.onMap )
//		this.map.removeOverlay( marker );
//	    for ( var j = 0; j < this.clusters.length; ++j )
//		{
//		var cluster = this.clusters[j];
//		if ( cluster != null )
//		    {
//		    for ( var k = 0; k < cluster.markers.length; ++k )
//			if ( cluster.markers[k] == marker )
//			    {
//			    cluster.markers[k] = null;
//			    --cluster.markerCount;
//			    break;
//			    }
//		    if ( cluster.markerCount == 0 )
//			{
//			this.ClearCluster( cluster );
//			this.clusters[j] = null;
//			}
//		    else if ( cluster == this.poppedUpCluster )
//			Clusterer.RePop( this );
//		    }
//		}
//	    this.markers[i] = null;
//	    break;
//	    }
//    this.DisplayLater();
    };


Clusterer.prototype.DisplayLater = function ()
    {
    if ( this.timeout != null )
	clearTimeout( this.timeout );
    this.timeout = setTimeout( Clusterer.MakeCaller( Clusterer.Display, this ), 50 );
    };


Clusterer.Display = function ( clusterer )
    {
    var i, j, marker, cluster;

    clearTimeout( clusterer.timeout );

    var newZoomLevel = clusterer.map.getZoom();
    if ( newZoomLevel != clusterer.currentZoomLevel )
	{
	// When the zoom level changes, we have to remove all the clusters.
//kc042508 comment below
//	for ( i = 0; i < clusterer.clusters.length; ++i )
//	    if ( clusterer.clusters[i] != null )
//		{
//		clusterer.ClearCluster( clusterer.clusters[i] );
//		clusterer.clusters[i] = null;
//		}
	clusterer.clusters.length = 0;
	clusterer.currentZoomLevel = newZoomLevel;
	}

    // Get the current bounds of the visible area.
    var bounds = clusterer.map.getBounds();

    // Expand the bounds a little, so things look smoother when scrolling
    // by small amounts.
    var sw = bounds.getSouthWest();
    var ne = bounds.getNorthEast();
    var dx = ne.lng() - sw.lng();
    var dy = ne.lat() - sw.lat();
    if ( dx < 300 && dy < 150 )
	{
	dx *= 0.10;
	dy *= 0.10;
	bounds = new GLatLngBounds(
	  new GLatLng( sw.lat() - dy, sw.lng() - dx ),
	  new GLatLng( ne.lat() + dy, ne.lng() + dx ) );
	}

    // Partition the markers into visible and non-visible lists.
    var visibleMarkers = [];
    var nonvisibleMarkers = [];
    for ( i = 0; i < clusterer.markers.length; ++i )
	{
	marker = clusterer.markers[i];
	if ( marker != null )
	    if ( bounds.contains( marker.getPoint() ) )
		visibleMarkers.push( marker );
	    else
		nonvisibleMarkers.push( marker );
	}

    // Take down the non-visible markers.
//kc042508 comment below
//    for ( i = 0; i < nonvisibleMarkers.length; ++i )
//	{
//	marker = nonvisibleMarkers[i];
//	if ( marker.onMap )
//	    {
//	    clusterer.map.removeOverlay( marker );
//	    marker.onMap = false;
//	    }
//	}

//    // Take down the non-visible clusters.
//    for ( i = 0; i < clusterer.clusters.length; ++i )
//	{
//	cluster = clusterer.clusters[i];
//	if ( cluster != null && ! bounds.contains( cluster.marker.getPoint() ) && cluster.onMap )
//	    {
//	    clusterer.map.removeOverlay( cluster.marker );
//	    cluster.onMap = false;
//	    }
//	}

    // Clustering!  This is some complicated stuff.  We have three goals
    // here.  One, limit the number of markers & clusters displayed, so the
    // maps code doesn't slow to a crawl.  Two, when possible keep existing
    // clusters instead of replacing them with new ones, so that the app pans
    // better.  And three, of course, be CPU and memory efficient.

//kc042508 comment below
//    if ( visibleMarkers.length > clusterer.maxVisibleMarkers )
//	{
//	// Add to the list of clusters by splitting up the current bounds
//	// into a grid.
//	var latRange = bounds.getNorthEast().lat() - bounds.getSouthWest().lat();
//	var latInc = latRange / clusterer.gridSize;
//	var lngInc = latInc / Math.cos( ( bounds.getNorthEast().lat() + bounds.getSouthWest().lat() ) / 2.0 * Math.PI / 180.0 );
//	for ( var lat = bounds.getSouthWest().lat(); lat <= bounds.getNorthEast().lat(); lat += latInc )
//	    for ( var lng = bounds.getSouthWest().lng(); lng <= bounds.getNorthEast().lng(); lng += lngInc )
//		{
//		cluster = new Object();
//		cluster.clusterer = clusterer;
//		cluster.bounds = new GLatLngBounds( new GLatLng( lat, lng ), new GLatLng( lat + latInc, lng + lngInc ) );
//		cluster.markers = [];
//		cluster.markerCount = 0;
//		cluster.onMap = false;
//		cluster.marker = null;
//		clusterer.clusters.push( cluster );
//		}

//	// Put all the unclustered visible markers into a cluster - the first
//	// one it fits in, which favors pre-existing clusters.
//	for ( i = 0; i < visibleMarkers.length; ++i )
//	    {
//	    marker = visibleMarkers[i];
//	    if ( marker != null && ! marker.inCluster )
//		{
//		for ( j = 0; j < clusterer.clusters.length; ++j )
//		    {
//		    cluster = clusterer.clusters[j];
//		    if ( cluster != null && cluster.bounds.contains( marker.getPoint() ) )
//			{
//			cluster.markers.push( marker );
//			++cluster.markerCount;
//			marker.inCluster = true;
//			}
//		    }
//		}
//	    }

//	// Get rid of any clusters containing only a few markers.
//	for ( i = 0; i < clusterer.clusters.length; ++i )
//	    if ( clusterer.clusters[i] != null && clusterer.clusters[i].markerCount < clusterer.minMarkersPerCluster )
//		{
//		clusterer.ClearCluster( clusterer.clusters[i] );
//		clusterer.clusters[i] = null;
//		}

//	// Shrink the clusters list.
//	for ( i = clusterer.clusters.length - 1; i >= 0; --i )
//	    if ( clusterer.clusters[i] != null )
//		break;
//	    else
//		--clusterer.clusters.length;

//	// Ok, we have our clusters.  Go through the markers in each
//	// cluster and remove them from the map if they are currently up.
//	for ( i = 0; i < clusterer.clusters.length; ++i )
//	    {
//	    cluster = clusterer.clusters[i];
//	    if ( cluster != null )
//		{
//		for ( j = 0; j < cluster.markers.length; ++j )
//		    {
//		    marker = cluster.markers[j];
//		    if ( marker != null && marker.onMap )
//			{
//			clusterer.map.removeOverlay( marker );
//			marker.onMap = false;
//			}
//		    }
//		}
//	    }

//	// Now make cluster-markers for any clusters that need one.
//	for ( i = 0; i < clusterer.clusters.length; ++i )
//	    {
//	    cluster = clusterer.clusters[i];
//	    if ( cluster != null && cluster.marker == null )
//		{
//		// Figure out the average coordinates of the markers in this
//		// cluster.
//		var xTotal = 0.0, yTotal = 0.0;
//		for ( j = 0; j < cluster.markers.length; ++j )
//		    {
//		    marker = cluster.markers[j];
//		    if ( marker != null )
//			{
//			xTotal += ( + marker.getPoint().lng() );
//			yTotal += ( + marker.getPoint().lat() );
//			}
//		    }
//		var location = new GLatLng( yTotal / cluster.markerCount, xTotal / cluster.markerCount );
//		marker = new GMarker( location, { icon: clusterer.icon } );
//		cluster.marker = marker;
//		GEvent.addListener( marker, 'click', Clusterer.MakeCaller( Clusterer.PopUp, cluster ) );
//		}
//	    }
//	}

    // Display the visible markers not already up and not in clusters.
    for ( i = 0; i < visibleMarkers.length; ++i )
	{
	marker = visibleMarkers[i];
	if ( marker != null && ! marker.onMap && ! marker.inCluster )
	    {
	    clusterer.map.addOverlay( marker );
	    if ( marker.addedToMap != null )
		marker.addedToMap();
	    marker.onMap = true;
	    }
	}

    // Display the visible clusters not already up.
//kc042508 comment below
//    for ( i = 0; i < clusterer.clusters.length; ++i )
//	{
//	cluster = clusterer.clusters[i];
//	if ( cluster != null && ! cluster.onMap && bounds.contains( cluster.marker.getPoint() ) )
//	    {
//	    clusterer.map.addOverlay( cluster.marker );
//	    cluster.onMap = true;
//	    }
//	}

    // In case a cluster is currently popped-up, re-pop to get any new
    // markers into the infobox.
    Clusterer.RePop( clusterer );
    };


Clusterer.TimerPopUp = function ()
{
	var cluster = Clusterer.TimerPopUp.cluster;
	var markers = cluster.markers;	
    if(markers.length == 0)
    {
		A2SGMaps.loader.Hide();
		return;
	}
		
	var clusterer = cluster.clusterer;
	var map = clusterer.map;
	
	// Create new bounds object
	var bounds = new GLatLngBounds();
	
	// Loop through the points, extending the bounds as necessary
	for (var i=0; i<markers.length; i++) 
	{
		bounds.extend(markers[i].getPoint());
	}

	// Get the bounds zoom level
	var zoom = map.getBoundsZoomLevel(bounds);	
	
	// Change the map to the new bounds values		
	if ( map.getZoom() != zoom )
		map.setCenter( bounds.getCenter(), zoom );
    else
		map.panTo( bounds.getCenter() );
		
	i = null;
	map = null;
	zoom = null;
	bounds = null;
	cluster = null;
	clusterer = null;
	Clusterer.TimerPopUp.cluster = null;

	A2SGMaps.loader.Hide();	
}

Clusterer.PopUp = function ( cluster )
{
    Clusterer.TimerPopUp.cluster = cluster;
    setTimeout(Clusterer.TimerPopUp, 1);    
    A2SGMaps.loader.Show();
};

Clusterer.RePop = function ( clusterer )
    {
    if ( clusterer.poppedUpCluster != null )
	Clusterer.PopUp( clusterer.poppedUpCluster );
    };


Clusterer.PopDown = function ( clusterer )
    {
    clusterer.poppedUpCluster = null;
    };


Clusterer.prototype.ClearCluster = function ( cluster )
    {
    var i, marker;

    for ( i = 0; i < cluster.markers.length; ++i )
	if ( cluster.markers[i] != null )
	    {
	    cluster.markers[i].inCluster = false;
	    cluster.markers[i] = null;
	    }
    cluster.markers.length = 0;
    cluster.markerCount = 0;
    if ( cluster == this.poppedUpCluster )
	this.map.closeInfoWindow();
    if ( cluster.onMap )
	{
	this.map.removeOverlay( cluster.marker );
	cluster.onMap = false;
	}
    };


// This returns a function closure that calls the given routine with the
// specified arg.
Clusterer.MakeCaller = function ( func, arg )
    {
    return function () { func( arg ); };
    };


// Augment GMarker so it handles markers that have been created but
// not yet addOverlayed.

GMarker.prototype.setMap = function ( map )
    {
    this.map = map;
    };

GMarker.prototype.addedToMap = function ()
    {
    this.map = null;
    };

GMarker.prototype.origOpenInfoWindow = GMarker.prototype.openInfoWindow;
GMarker.prototype.openInfoWindow = function ( node, opts )
    {
    if ( this.map != null )
	return this.map.openInfoWindow( this.getPoint(), node, opts );
    else
	return this.origOpenInfoWindow( node, opts );
    };

GMarker.prototype.origOpenInfoWindowHtml = GMarker.prototype.openInfoWindowHtml;
GMarker.prototype.openInfoWindowHtml = function ( html, opts )
    {
    if ( this.map != null )
	return this.map.openInfoWindowHtml( this.getPoint(), html, opts );
    else
	return this.origOpenInfoWindowHtml( html, opts );
    };

GMarker.prototype.origOpenInfoWindowTabs = GMarker.prototype.openInfoWindowTabs;
GMarker.prototype.openInfoWindowTabs = function ( tabNodes, opts )
    {
    if ( this.map != null )
	return this.map.openInfoWindowTabs( this.getPoint(), tabNodes, opts );
    else
	return this.origOpenInfoWindowTabs( tabNodes, opts );
    };

GMarker.prototype.origOpenInfoWindowTabsHtml = GMarker.prototype.openInfoWindowTabsHtml;
GMarker.prototype.openInfoWindowTabsHtml = function ( tabHtmls, opts )
    {
    if ( this.map != null )
	return this.map.openInfoWindowTabsHtml( this.getPoint(), tabHtmls, opts );
    else
	return this.origOpenInfoWindowTabsHtml( tabHtmls, opts );
    };

GMarker.prototype.origShowMapBlowup = GMarker.prototype.showMapBlowup;
GMarker.prototype.showMapBlowup = function ( opts )
    {
    if ( this.map != null )
	return this.map.showMapBlowup( this.getPoint(), opts );
    else
	return this.origShowMapBlowup( opts );
    };
