// subroutine to build url

function build_url(prefix, mode, site, page, width, height, tile, ord, session_data)
{
  var giveback;
  if (session_data.length == 0)
  {
    giveback = prefix + "/" + mode + "/" + site + "/" + page + ";p=" + page + ";sz=" + width.toString() + "x" + height.toString() + ";tile=" + tile.toString() + ";ord=" + ord + "?";
  }
  else
  {
    giveback = prefix + "/" + mode + "/" + site + "/" + page + ";p=" + page + ";" + session_data + "sz=" + width.toString() + "x" + height.toString() + ";tile=" + tile.toString() + ";ord=" + ord + "?";
  };
  return giveback;
};

// subroutine to check existance of cookie key

function has_cookie(strCookieName)
{
  var giveback, firstletter;
  var fullCookie = document.cookie;
  firstletter = fullCookie.indexOf(strCookieName);
  if(firstletter != -1)
  {
    giveback = "true";
  }
  else
  {
    giveback = "false";
  };
  return giveback;
};

// subroutine to get the value of a cookie key

function get_cookie(strCookieName, strCookieKey)
{
  var giveback;
  var fullCookie = document.cookie;
  if (strCookieName.length == 0)
  {
       giveback = "";
  }
  else
  {
    fletter = fullCookie.indexOf(strCookieName);
    if(fletter != -1)
    {
      // move past Cookiename and =
      fletter += strCookieName.length + 1;
      lletter = fullCookie.indexOf(';', fletter);
      if(lletter == -1)
      {
         lletter = fullCookie.length;
      }
    }
    giveback = fullCookie.substring(fletter,lletter);
  }
  return giveback;
};

function printAdTag(site, page, width, height)
{

  var strVERSION_STRING = "adtag client v1.2-JS 2001-02-21-1700";
  var strDIRECT_PREFIX = "http://ad.doubleclick.net";
  var strPROXY_PREFIX = "http://adtag.sympatico.ca/tomcat/servlet/adtagserver";
  var strCOOKIE_NAME_SESSION_DATA = "adtagsessiondata";
  var tile = 1;
  var session_data = "";
  // randomize?
  var ord = parseInt(Math.random() * 1000000) + 1;
  var iframe_name = "dart_frame_1";
  if (has_cookie(strCOOKIE_NAME_SESSION_DATA) == "true")
  {
    if (get_cookie(strCOOKIE_NAME_SESSION_DATA,"") != "")
    {
      prefix = strDIRECT_PREFIX;
      session_data = get_cookie( strCOOKIE_NAME_SESSION_DATA, "" );
      rExpminus = new RegExp("-","g");
      session_data = session_data.replace(rExpminus, "=");
      rExpuscore = new RegExp("_","g");
      session_data = session_data.replace(rExpuscore,";");
            
    }
    else
    {
      if (get_cookie(strCOOKIE_NAME_SESSION_DATA,"") == "null")
      {
        prefix = strDIRECT_PREFIX
      }
      else
      {
        prefix = strPROXY_PREFIX
      }
    };
  }
  else
  {
     prefix = strPROXY_PREFIX;
  };
  url_adi = build_url(prefix, "adi", site, page, width, height, tile, ord, session_data);
  url_adj = build_url(prefix, "adj", site, page, width, height, tile, ord, session_data);
  url_jump = build_url(prefix, "jump", site, page, width, height, tile, ord, session_data);
  url_ad = build_url(prefix, "ad", site, page, width, height, tile, ord, session_data);
 
  // print tag out to browser
 
  // document.write("<iframe src=" + url_adi + " name=" + iframe_name + " width=" + String(width) + " height=" + String(height) + " border=0 frameborder=0 marginheight=0 marginwidth=0 scrolling=no>");
  document.write("<script language=JavaScript1.1 type=text/javascript src=" + url_adj + "></script>");
  document.write("<noscript><a href=" + url_jump + "><img src=" + url_ad + " width=" + String(width) + " height=" + String(height) + " border=0></a></noscript>");
  // document.write("</iframe>");
}