// Copyright 1999 - 2006 - The website owner asserts copyright on this program and all of its components
function search_string()
{var temp  = document.referrer;
 var start = 2+temp.indexOf('q=');

if (start == 1)
   {start = 6+temp.indexOf('query=')
   };

 var end   = temp.indexOf('&',start)-3;
 
 if (end < 1)
    {end = temp.length;
    };
	
 temp      = temp.substr(start,(end-start)+3);
 temp      = unescape(temp.replace(/\+/g,' '));
 record("Search string found: " + temp); 
};

function report_error(msg, url, line)
{var info;
 info =  'msg=' + msg + ', url=' + url + ', line=' + line;
 record('WEBPAGEERROR>>>' + info);
 alert('Sorry, there is a minor problem with this page:\n\n'+
	    info + '\n\n' +
       'The fault has been logged & we will fix it soon.\n\n' +
       'Meanwhile, this page may - or may not - work correctly for you.\n\n' +
       'If you are not using Internet Explorer - then using it will probably avoid this error.\n' +
       'Alternatively, you are welcome to email or phone on 01234 306993 during UK office hours.\n\n'+
       'Once again, we apologise for any inconvenience this may have caused you.');
 return true;
};
window.onerror = report_error;

var UTILversion = 1;

function GetCookie(name)
{  var allcookies = unescape(document.cookie);
   var pos = allcookies.indexOf(name+"=", start);
   if (pos != -1)
      {var start = pos + name.length + 1
       var end   = allcookies.indexOf(";", start)
       if (end == -1) end = allcookies.length;
       return unescape(allcookies.substring(start, end))
      }
   else return "";
};

function debug(msg)
{
 if (GetCookie('DEBUG')=="ON")
    {
     alert(msg)
    };
};

function ESubmit()
{document.cookie = "firstname=" + document.forms.Elist.firstname.value + '; expires=Tue, 31-Dec-2012 00:00:00 GMT';
 document.cookie = "email="     + document.forms.Elist.email.value     + '; expires=Tue, 31-Dec-2012 00:00:00 GMT';
// document.forms.Elist.submit();
};

function CheckForm()
{document.forms.myform.submit()
};

function record(info)
{  var LogVersion = '1';
    var BID = GetCookie('BID');
    if (BID == '')
       {
        var now = new Date();
        BID = Date.parse(now.toUTCString())/1000;
        document.cookie = "BID=" + BID + '; expires=Tue, 31-Dec-2012 00:00:00 GMT';
        BID = GetCookie('BID');
       };

    var undefined;
    var NQ        = document.URL.split('?');
    if (NQ[1] == undefined) NQ[1]='';

    var pagename  = NQ[0].split(/\\|\//);
        pagename   = pagename[pagename.length-1];

//    pagename = pagename + '+' + UTILversion;

    if (info == undefined) info = '';
    if (info != '') pagename = pagename + '+' + info;
    if (NQ[1] !='') pagename = pagename + '?' + NQ[1];
    pagename = escape(pagename);

    if (pagename.length > 255)
       { pagename = pagename.slice(0,254)
       };

    NQ = document.referrer.split('?');
    if      ((NQ[0] == undefined) || (NQ[0] == ''))
           {myreferrer = ''
           }
    else  {var  temp1       = NQ[0].split('/');
                   myreferrer  = temp1[temp1.length-1];
                   refdomain  = temp1[2]; if (refdomain == undefined) refdomain = '';

           if (refdomain != '' && refdomain != document.domain) myreferrer = document.referrer;
           if (myreferrer.length > 255)
              {myreferrer = myreferrer.slice(0,254)
              };
          };
	   
    var x = new Image();
    var logstring = 'http://www.chriswesley.org/cgi-bin/log.pl?' +
                     LogVersion        + '^'
                      + pagename       + '^'
                      + BID            + '^'
                      + "ONLINE"       + '^'
                      + escape(myreferrer);
    x.src = logstring;
};

record();

var newnumber = Math.random() + "";
document.cookie = "test=" + newnumber;
if   (GetCookie("test") != newnumber)
     {alert('This web page uses cookies,\n' +
            'but your web browser is not saving them.\n\n' +
            'Please set your browser to accept cookies.\n\n' +
            'Or disengage any cookie filtering software\n' +
            'to enable it to work.');
      record("cookie warning");
      history.back();
     };