/**
 * 这个例子演示了 Google 地图 API 的以下功能:
 *   * 可拖拽的标记
 *   * 在地图上叠加折线
 *   * 计算地理距离
 *   * 事件处理（单击、拖拽）
 *   * 信息窗口
 *   * 利用链表维护各种对象
 *   * 自定义控件
 *
 * 注意：为了在 IE6 中正常显示折线，必须在网页的 <HTML> 标签中加上：
 *   <html xmlns:v="urn:schemas-microsoft-com:vml">
 *
 * @author haogang
 * @update ast
 */

/**
 * 本示例用一个双向链表维护用户设定的标记，能够容易的实现标记的遍历和删除
 * 每个链表结点 m 有如下字段：
 *    m.prev      前驱标记
 *    m.next      后继标记
 *    m.segPrev   连接本标记与前驱标记的线段
 *    m.segNext   连接本标记与后继标记的线段
 */
function GRulerControl() {
  var me = this;
  
  // 可国际化的字符串
  me.RESET_BUTTON_TITLE_ = '清除所有测距标记';
  me.ENABLE_BUTTON_TITLE_ = '添加测距标记已启用，单击这里禁用';
  me.DISABLE_BUTTON_TITLE_ = '添加测距标记已禁用，单击这里启用';
  me.DELETE_BUTTON_TITLE_ = '删除';
  me.HIDE_BUTTON_TITLE_ = '单击这里隐藏未命名标记';
  me.SHOW_BUTTON_TITLE_ = '单击这里显示所有标记';
  me.HIDE_MARK_TITLE_ = '隐藏';
  
  me.CHANGE_BUTTON_TITLE_ = '修改点名';

  me.RESET_BUTTON_IMAGE_ = 'images/ruler_clear.png';
  me.ENABLE_BUTTON_IMAGE_ = 'images/ruler_enabled.png';
  me.DISABLE_BUTTON_IMAGE_ = 'images/ruler_disabled.png';
  me.BACKGROUND_IMAGE_ = 'images/ruler_background.png';
  
  me.HIDE_BUTTON_IMAGE_ = 'images/ruler_hide.png';
  me.MARK_DOT_IMAGE_ = 'images/ruler_greenpt.png';
  me.LINE_COLOR_ = '#00cc00';
  me.LINE_SIZE_ = 5;
  
  me.KILOMETER_ = '公里';
  me.METER_ = '米';
  me.bHideNoNameMarker_=false;
}

GRulerControl.prototype = new GControl();

/**
 * 初始化标尺控件
 */
GRulerControl.prototype.initialize = function(map) 
{
  var me = this;
  var container = document.createElement('div');
  me.setButtonStyle_(container);
 
  // “启用/禁用”按钮
  var btnEnable = document.createElement('img');
  btnEnable.width = btnEnable.height = 19;
  GEvent.addDomListener(btnEnable, 'click', 
    function() {
      me.setEnabled(!me.isEnabled());
    }
  );
  container.appendChild(btnEnable);
  
  // “重置”按钮
  var btnReset = document.createElement('img');
  btnReset.width = btnReset.height = 19;
  btnReset.src = me.RESET_BUTTON_IMAGE_;
  btnReset.title = me.RESET_BUTTON_TITLE_;
  GEvent.addDomListener(btnReset, 'click', 
    function() {
      me.reset();
    }
  );
  container.appendChild(btnReset);

  //"隐藏"按钮
   var btnHide = document.createElement('img');
  btnHide.width = btnHide.height = 19;
  btnHide.src = me.HIDE_BUTTON_IMAGE_;
  btnHide.title = me.HIDE_BUTTON_TITLE_;
  GEvent.addDomListener(btnHide, 'click', 
    function() {
      me.hideMarker();
    }
  );
  container.appendChild(btnHide);

  // 距离标签
  var txtInfo = document.createElement('div');
  txtInfo.style.font = 'small Arial';
  txtInfo.style.fontWeight = 'bold';
  txtInfo.style.fontSize = '9pt';
  txtInfo.style.width = '82px';
  container.appendChild(txtInfo);
  
  // 初始化内部变量
  map.rulerControl_ = me;
  me.map_ = map;
  me.head_ = new Object();
  me.tail_ = new Object();
  me.head_.next_ = me.tail_;
  me.tail_.prev_ = me.head_;
  me.btnEnable_ = btnEnable;
  me.btnHide_ = btnHide;
  me.btnReset_ = btnReset;
  me.txtInfo_ = txtInfo;
  me.setEnabled(true);
  
  map.getContainer().appendChild(container);
  return container;
}


/**
 * 设置控件的格式
 */
GRulerControl.prototype.setButtonStyle_ = function(button) 
{
  button.style.backgroundImage = 'url(' + this.BACKGROUND_IMAGE_ + ')';
  button.style.font = 'small Arial';
  button.style.border = '1px solid #888888';
  button.style.padding = '4px';
  button.style.textAlign = 'right';
  button.style.cursor = 'pointer';
}

/**
 * 用恰当的格式表示距离
 */
GRulerControl.prototype.formatDistance_ = function(len) 
{
  var me = this;
  
  len = Math.round(len);
  if (len <= 1000) {
    return len + ' ' + me.METER_;
  } else if (len <= 1000000) {
    return len / 1000 + ' ' + me.KILOMETER_;
  }
  return Math.round(len / 1000) + ' ' + me.KILOMETER_;
}

/**
 * 格式化角度为字符串
 */
GRulerControl.prototype.formatDegree_ = function(value) 
{
  value = Math.abs(value);
  var v1 = Math.floor(value);
  var v2 = Math.floor((value - v1) * 60);
  var v3 = Math.round((value - v1) * 3600 % 60);
  return v1 + '°' + v2 + '\'' + v3 + '"';
}

/**
 * 格式化经纬度为字符串
 */
GRulerControl.prototype.formatLatLng_ = function(pt) 
{
  var me = this;
  
  var latName, lngName;
  var lat = pt.lat();
  var lng = pt.lng();
  latName = lat >= 0 ? '北纬' : '南纬';
  lngName = lng >= 0 ? '东经' : '西经';

  return lngName + me.formatDegree_(lng) + '，' 
    + latName + me.formatDegree_(lat);
}

/**
 * 返回控件的默认位置
 */
GRulerControl.prototype.getDefaultPosition = function() 
{
  return new GControlPosition(G_ANCHOR_BOTTOM_RIGHT, new GSize(8, 8));
}

/**
 * 返回控件是否已启用
 */
GRulerControl.prototype.isEnabled = function() 
{
  return this.enabled_;
}

/**
 * 设置控件的“启用/禁用"状态
 */
GRulerControl.prototype.setEnabled = function(value) 
{
  var me = this;
  if (value == me.enabled_)
    return;
  me.enabled_ = value;
  
  if (me.enabled_) {
    me.mapClickHandle_ = GEvent.addListener(me.map_, 'click', me.onMapClick_);
    me.txtInfo_.style.display = 'block';
    
    me.setButtonVisiable_();  

    me.btnEnable_.src = me.ENABLE_BUTTON_IMAGE_;
    me.btnEnable_.title = me.ENABLE_BUTTON_TITLE_;
    me.updateDistance_();
  } else {
    GEvent.removeListener(me.mapClickHandle_);
    me.txtInfo_.style.display = 'none';
    me.btnReset_.style.display = 'none';
    me.btnHide_.style.display = 'none';
    me.btnEnable_.src = me.DISABLE_BUTTON_IMAGE_;
    me.btnEnable_.title = me.DISABLE_BUTTON_TITLE_;
  }
}

GRulerControl.prototype.setButtonVisiable_ = function(value) 
{
  var me = this;
  
  if(me.head_  != me.tail_.prev_) 
  {
    me.btnReset_.style.display = 'inline';
    me.btnHide_.style.display = 'inline';
  }
  else
  {
    me.btnReset_.style.display = 'none';
    me.btnHide_.style.display = 'none';
  }
}

/**
 * 事件处理函数：当用户单击地图时，要在该位置添加一个标记
 */
GRulerControl.prototype.setMyIcon_ = function (icon) 
{ // Add icon attributes
	 icon.image = this.MARK_DOT_IMAGE_;
 	 icon.iconSize = new GSize(24, 24);
	 icon.shadowSize = new GSize(32, 24);
	 icon.iconAnchor = new GPoint(12, 24);
	 icon.infoWindowAnchor = new GPoint(15, 1);
}

//点击地图，增加图标（在空白处时）
GRulerControl.prototype.onMapClick_ = function(marker, latlng) 
{
  var me = this.rulerControl_;
  
  // 如果用户单击的是标记，不再这里处理
  if (marker)
    return;

  // 创建标记，并添加到链表中
  var sticon = new GIcon(G_DEFAULT_ICON );
  me.setMyIcon_(sticon);
  var newMarker = new GMarker(latlng, {icon:sticon,draggable: true});

  var pos = me.tail_.prev_;
  newMarker.prev_ = pos;
  newMarker.next_ = pos.next_;
  pos.next_.prev_ = newMarker;
  pos.next_ = newMarker;
  
  pos.next_.info = "";
  // 为标记添加事件处理函数：拖拽标记时要更新连接线段和距离
  GEvent.addListener(newMarker, 'dragend',
    function() {
      me.map_.closeInfoWindow();
      me.updateSegments_(newMarker);
      me.updateDistance_();
    }
  );
  // 为标记添加事件处理函数：单击标记时要显示信息窗口
  GEvent.addListener(newMarker, 'click',
    function() {
      newMarker.openInfoWindow(me.createInfoWindow_(newMarker));
    }
  );
  
  // 将创建的标记添加到地图中
  me.map_.addOverlay(newMarker);

  if (newMarker.prev_ != me.head_) {
    // 如果这不是第一个标记，则创建连接到上一个标记的线段，并显示在地图中
    var segment = [newMarker.prev_.getLatLng(), latlng];
    var polyOptions = {geodesic:true};
    newMarker.segPrev_ = new GPolyline(segment,me.LINE_COLOR_,me.LINE_SIZE_,0.5,polyOptions);
    newMarker.prev_.segNext_ = newMarker.segPrev_;
    me.map_.addOverlay(newMarker.segPrev_);

    // 更新距离显示
    me.updateDistance_();
  }
  else
    me.setButtonVisiable_();  //是否显示reset 和 hidebutton
}

/**
 * 统计总距离，并显示在网页中
 */
GRulerControl.prototype.updateDistance_ = function() 
{
  var me = this;
  var len = me.getDistance();
  
  // 结果显示在网页中
  me.txtInfo_.innerHTML = me.formatDistance_(len);
}

/**
 * 遍历链表，统计总距离
 */
GRulerControl.prototype.getDistance = function() 
{
  var me = this;
  var len = 0;
  
  // 周游链表，累计相邻两个标记间的距离
  for (var m = me.head_; m != me.tail_; m = m.next_) {
    if (m.prev_ && m.prev_.getLatLng)
      len += m.prev_.getLatLng().distanceFrom(m.getLatLng());
  }
  return len;
}

GRulerControl.prototype.getMyArea = function() 
{
  var me = this;
  var area_ = "";
  
  // 周游链表，累计相邻两个标记间的距离
  var mypts = [];
  for (var m = me.head_; m != me.tail_; m = m.next_) 
  {
    if (m.prev_ )
      mypts.push(m.getLatLng());    
  }
  
  if(mypts.length > 2)
  {
	var polyShape=new GPolygon(mypts, "#ff0000", 3, .8, "#0000ff",.3);
 	
 	var unit = " m&sup2;";
 	var area= polyShape.getArea();
 	if(area < 100000)
 	{
 	  if(area < 1000)
 		area_=area.toFixed(2)+ unit;
 	  else
  		area_=Math.round(area)+ unit;
	}
 	else
 	{
 	unit = " km&sup2;";
 	area = area/(1000*1000);
 	
 	if(area < 1000)
 		area_=area.toFixed(3)+ unit;
 	else
 		area_=Math.round(area)+ unit;
 	}
 	
 	mypts.length=0;
 	
  }
  return area_;
}

/**
 * 清除所有标记，初始化链表
 */
GRulerControl.prototype.reset = function() 
{
  var me = this;
  
  for (var m = me.head_.next_; m != me.tail_; m = m.next_) {
    me.map_.removeOverlay(m);
    if (m.segNext_)
      me.map_.removeOverlay(m.segNext_);
  }
  me.head_ = new Object();
  me.tail_ = new Object();
  me.head_.next_ = me.tail_;
  me.tail_.prev_ = me.head_;
  
  me.bHideNoNameMarker_=false;
  me.btnHide_.title=me.HIDE_BUTTON_TITLE_;
  
  me.updateDistance_();
  me.setButtonVisiable_();  //是否显示reset 和 hidebutton
 
}

// 隐藏/显示无点名标记
GRulerControl.prototype.hideMarker = function(marker) 
{
  var me = this; 
  for(var m = me.head_.next_; m != me.tail_; m = m.next_) 
  {
	if(m.info=="")
	{
		if(! me.bHideNoNameMarker_ )
		{
			m.hide();
		}
		else
			m.show();
	}
	else
	  m.show();
	  
  }
  me.bHideNoNameMarker_ = ! me.bHideNoNameMarker_;
  if(me.bHideNoNameMarker_) me.btnHide_.title=me.SHOW_BUTTON_TITLE_;
  else me.btnHide_.title=me.HIDE_BUTTON_TITLE_;
 
 if(me.bHideNoNameMarker_) 
  me.txtInfo_.innerHTML = me.getMyArea();
  
}


/**
 * 事件处理函数：当用户拖拽标记、标记坐标改变时被调用，这里要更新与该标记连接的线段
 * @param {GMarker} marker 被拖拽的标记
 */
GRulerControl.prototype.updateSegments_ = function(marker) 
{
  var me = this;
  var segment;
  
  // 更新连接前驱的线段
  if (marker.segPrev_ && marker.prev_.getLatLng) {
    // 从地图上删除旧的线段
    me.map_.removeOverlay(marker.segPrev_);
    
    // 根据标记的当前坐标构造新的线段，并更新链表结点的相关字段
    segment = [marker.prev_.getLatLng(), marker.getLatLng()];
    var polyOptions = {geodesic:true};
    marker.segPrev_ = new GPolyline(segment,me.LINE_COLOR_,me.LINE_SIZE_,0.5,polyOptions);
    marker.prev_.segNext_ = marker.segPrev_;
    
    // 将新线段添加到地图中
    me.map_.addOverlay(marker.segPrev_);
  }
  
  // 更新连接后继的线段，与上类似
  if (marker.segNext_ && marker.next_.getLatLng) {
    me.map_.removeOverlay(marker.segNext_);
    segment = [marker.getLatLng(), marker.next_.getLatLng()];
    var polyOptions = {geodesic:true};
    marker.segNext_ = new GPolyline(segment,me.LINE_COLOR_,me.LINE_SIZE_,0.5,polyOptions);
    marker.next_.segPrev_ = marker.segNext_;
    me.map_.addOverlay(marker.segNext_);
  }
}


/**
 * 为信息窗口创建 DOM 对象，包括标记的坐标和“删除”按钮
 * @param {GMarker} marker 对应的标记
 */
  var input1 = document.createElement('input');
 
  
GRulerControl.prototype.createInfoWindow_ = function(marker,oldinfo) 
{
  var me = this;
  
  // 为气泡提示窗口创建动态 DOM 对象，这里我们用 DIV 标签
  var div = document.createElement('div');
  div.style.fontSize = '9pt';
  div.style.width = '250px';
  
  // 创建点名输入框
 input1.id = 'text';
  input1.type = 'TEXT';
  input1.name = 'TEXT1';
  input1.size = '30';
  input1.value = "";
  if(oldinfo) input1.value = oldinfo;
  //当还没有点名的时候，或者修改点名的时候，弹出输入对话框
  if(marker.info =="" || oldinfo)
  {
  var name = document.createElement('div');
  var tag = document.createTextNode("输入点名:");
  div.appendChild(tag);   
  div.appendChild(name);
  var form = document.createElement('form');
  form.id = 'form';
  form.method = 'post';
  div.appendChild(form);
  form.appendChild(input1);

  var input2 = document.createElement('input');
  input2.id = 'submit';
  input2.type = 'button';
  input2.value = '确定';
  input2.onclick = function ()
   {
    if(input1.value.length < 1 ) {alert("请输入点名");input1.focus();return;}
    marker.info = input1.value;

    me.map_.closeInfoWindow();
    marker.openInfoWindow(me.createInfoWindow_(marker));
   }  
  form.appendChild(input2);
  }else{
  var newdiv = document.createElement('div');
  newdiv.style.fontSize = '9pt';
  newdiv.style.width = '250px';
  div.appendChild(newdiv);
  var tspan=document.createElement('span');
  tspan.innerHTML="<b>"+marker.info+"</b>";
  newdiv.appendChild( tspan);  
  }
 
  div.appendChild( document.createTextNode(me.formatLatLng_(marker.getLatLng())));
    
  var hr = document.createElement('hr');
  hr.style.border = 'solid 1px #cccccc';
  div.appendChild(hr);
    
	
 
  // 创建“删除”按钮
  var lnk = document.createElement('span');
  lnk.innerHTML = me.DELETE_BUTTON_TITLE_+"  ";
  lnk.style.color = '#0000cc';
  lnk.style.cursor = 'pointer';
  //lnk.style.textDecoration = 'underline';
  
  // 为“删除”按钮添加事件处理：调用 removePoint() 并重新计算距离
  lnk.onclick =
    function() {
      me.map_.closeInfoWindow();
      me.removePoint_(marker);
      me.updateDistance_();
      me.setButtonVisiable_();  //是否显示reset 和 hidebutton
    };

  
   // 创建“隐藏”按钮
  var lnkhide = document.createElement('span');
  lnkhide.innerHTML = me.HIDE_MARK_TITLE_+"  ";
  lnkhide.style.color = '#0000cc';
  lnkhide.style.cursor = 'pointer';
 // lnkhide.style.textDecoration = 'underline'; 
  
  // 为“隐藏”按钮添加事件处理
  lnkhide.onclick =
    function() {
      me.map_.closeInfoWindow();
      marker.hide();
    }; 
  div.appendChild(lnk);
  div.appendChild(lnkhide);

  
   // 创建“更改点名”按钮
  var lnkchange = document.createElement('span');
  lnkchange.innerHTML = me.CHANGE_BUTTON_TITLE_;
  lnkchange.style.color = '#0000cc';
  lnkchange.style.cursor = 'pointer';
 // lnkhide.style.textDecoration = 'underline'; 
  
  lnkchange.onclick =
    function() {
    var oldin=marker.info;
 //   marker.info="";
    me.map_.closeInfoWindow();
    marker.openInfoWindow(me.createInfoWindow_(marker,oldin));
    }; 

  if(marker.info)  div.appendChild(lnkchange);
 
  // 当用户关闭信息窗口时 Google 地图 API 会自动释放该对象 
  return div;
}


/**
 * 事件处理函数：当用户选择删除标记时被调用，这里要删除与该标记连接的线段
 * @param {GMarker} marker 要删除的标记
 */
GRulerControl.prototype.removePoint_ = function(marker) 
{
  var me = this;
  
  // 先从地图上删除该标记
  me.map_.removeOverlay(marker);
  
  // 对于中间结点，还要把它的前驱和后继用线段连接起来
  if (marker.prev_.getLatLng && marker.next_.getLatLng) {
    var segment = [marker.prev_.getLatLng(), marker.next_.getLatLng()];
    var polyOptions = {geodesic:true};
    var polyline = new GPolyline(segment,me.LINE_COLOR_,me.LINE_SIZE_,0.5,polyOptions);
    marker.prev_.segNext_ = polyline;
    marker.next_.segPrev_ = polyline;
    me.map_.addOverlay(polyline);
  }
  marker.prev_.next_ = marker.next_;
  marker.next_.prev_ = marker.prev_;
  
  if (marker.segPrev_)
    me.map_.removeOverlay(marker.segPrev_);
  if (marker.segNext_)
    me.map_.removeOverlay(marker.segNext_);
}

//---------------------------------------------------------------------------------

function GastControl() 
{
  var me = this;
  me.TIP_TITLE_ = '制作维护：武汉大学中国南极测绘研究中心';
  me.TIP_TEXT_ = 'Wuhan University';
  me.TIP_FONT_COLOR_ = '#ffffff';
}

GastControl.prototype = new GControl();

/**
 * 初始化控件
 */
GastControl.prototype.initialize = function(map) 
{
  var me = this;
  var container = document.createElement('div');
  me.setButtonStyle_(container);
 
  var txtInfo = document.createElement('div');
  txtInfo.style.font = 'small Arial';
  txtInfo.style.fontSize = '8pt';
  txtInfo.style.width = '148px';
  txtInfo.style.color = me.TIP_FONT_COLOR_;
  txtInfo.innerHTML ='Support by:<a href=http://pole.whu.edu.cn target=blank title='+me.TIP_TITLE_+'><font color='+ me.TIP_FONT_COLOR_ +'>'+me.TIP_TEXT_+'</font></a>';
  container.appendChild(txtInfo);
  
  // 初始化内部变量
  map.astControl_ = me;
  me.map_ = map;

  map.getContainer().appendChild(container);
  return container;
}


/**
 * 设置控件的格式
 */
GastControl.prototype.setButtonStyle_ = function(button) 
{
  button.style.font = 'small Arial';
  button.style.padding = '4px';
  button.style.textAlign = 'center';
}

/**
 * 返回控件的默认位置
 */
GastControl.prototype.getDefaultPosition = function() 
{
  return new GControlPosition(G_ANCHOR_BOTTOM_RIGHT, new GSize(45, 12));
}

/**
 * 返回控件是否已启用
 */
GastControl.prototype.isEnabled = function() 
{
  return this.enabled_;
}