////////////////////////////////////////////////////////////////////////////////
//      file:     common_func.js
// Though fundamentaly public this software cannot
// be used in anyway then for educational purposes
// any commercial use of this software should be
// announced at info@robbor.nl
////////////////////////////////////////////////////////////////////////////////
var const_delimiter = "-!!-";
var const_line_delimiter = '!.n.!';
var const_word_delimiter = '!.w.!';


function prepare_data_for_save( str )
{
    str = trim( str  );
    str = string_replace( "\r\n",'(.br.)', str );
    str = string_replace( "\n",'(.br.)', str );
    str = string_replace( "\r",'(.br.)', str );
    str = string_replace( "&",'(.amp.)', str );
    str = string_replace( "@",'(.at.)', str );
    str = string_replace( "$",'(.ds.)', str );
    str = string_replace( "'",'(.sq.)', str );
    str = string_replace( "\"",'(.dq.)', str );
    str = string_replace( "\\",'(.bs.)', str );
    str = string_replace( "\t",'(.tab.)', str );
    str = string_replace( "|",'(.vl.)', str );
    str = string_replace( "<",'(.lt.)', str );
    str = string_replace( ">",'(.gt.)', str );
    return str;
}

function prepare_data_for_html_display( str )
{
    str = trim( str  );
    str = string_replace( '(.br.)', "<br />", str );
    str = string_replace( '(.br.)', "<br />", str );
    str = string_replace( '(.br.)', "<br />", str );
    str = string_replace( '(.amp.)', "&", str );
    str = string_replace( '(.at.)', "@", str );
    str = string_replace( '(.ds.)', "$", str );
    str = string_replace( '(.sq.)', "'", str );
    str = string_replace( '(.dq.)', "\"", str );
    str = string_replace( '(.bs.)', "\\", str );
    str = string_replace( '(.tab.)', "\t", str );
    str = string_replace( '(.vl.)', "|", str );
    str = string_replace( '(.lt.)', "<", str );
    str = string_replace( '(.gt.)', ">", str );
    return str;
}

function prepare_data_for_display( str )
{
    str = trim( str  );
    str = string_replace( '(.br.)', "\r\n", str );
    str = string_replace( '(.amp.)', "&", str );
    str = string_replace( '(.at.)', "@", str );
    str = string_replace( '(.ds.)', "$", str );
    str = string_replace( '(.sq.)', "'", str );
    str = string_replace( '(.dq.)', "\"", str );
    str = string_replace( '(.bs.)', "\\", str );
    str = string_replace( '(.tab.)', "\t", str );
    str = string_replace( '(.vl.)', "|", str );
    str = string_replace( '(.lt.)', "<", str );
    str = string_replace( '(.gt.)', ">", str );
    return str;
}


function create_safe_str( str )
{
    str = trim( str  );
    str = string_replace( "\r\n",'<!br!>', str );
    str = string_replace( "\n",'<!br!>', str );
    str = string_replace( "\r",'<!br!>', str );
    str = string_replace( "&",'<!amp!>', str );
    str = string_replace( "+",'<!pl!>', str );
    str = string_replace( "&nbsp;",'<!sp!>', str );
    str = string_replace( "'",'<!q!>', str );
    str = string_replace( "\"",'<!dq!>', str );
    str = string_replace( "\\",'<!sl!>', str );
    str = string_replace( "\t",'<!tab!>', str );
    str = string_replace( "|",'<!vl!>', str );
    return str;
}

function undo_js_safe_str( str )
{
    str = string_replace( '-!br!-', "\r\n", str );
    str = string_replace( '-!br!-', "\n", str );
    str = string_replace( '-!br!-', "\r", str );
    str = string_replace( '-!amp!-', "&", str );
    str = string_replace( '-!pl!-', "+", str );
    str = string_replace( '-!sp!-', "&nbsp;", str );
    str = string_replace( '-!q!-', "'", str );
    str = string_replace( '-!dq!-', "\"", str );
    str = string_replace( '-!sl!-', "\\", str );
    str = string_replace( '-!tab!-', "\t", str );
    str = string_replace( '-!vl!-', "|", str );
    str = string_replace( '-!lt!-', "<", str );
    str = string_replace( '-!gt!-', ">", str );
    return str;
}

function check_email_adres( str )
{
    if( str.indexOf( "@")  == -1 )
    {
    	return "in uw emailadres komt geen @ voor. <br>Het opgegeven adres klopt niet. U moet dit veranderen.";
    }
    if( str.indexOf( "." ) == -1 )
    {
    	return "in uw emailadres komt geen punt voor. <br>Het opgegeven adres klopt niet. U moet dit veranderen.";
    }
    if( str.indexOf( "\'" ) >= 0 )
    {
    	return "in uw emailadres komt een \' voor. <br>Het opgegeven adres klopt niet. U moet dit veranderen.";
    }
    if( str.indexOf( "\"" ) >= 0 )
    {
    	return "in uw emailadres komt een \" voor. <br>Het opgegeven adres klopt niet. U moet dit veranderen.";
    }
    return '';
}

function string_replace( to_replace,replace_with, str )
{
    temp = "" + str; // temporary holder
    while ( temp.indexOf( to_replace ) > -1 )
    {
        pos= temp.indexOf( to_replace );
        temp = "" + ( temp.substring( 0, pos ) + replace_with + temp.substring( ( pos + to_replace.length ), temp.length ) );
	}
    return temp;
}

function trimright( str )
{
    while( '' + str.charAt( str.length - 1 ) == ' ' )
    {
    	str = str.substring( 0, str.length - 1 );
    }
	return str;
}

function trimleft( str )
{
    while( '' + str.charAt( 0 ) == ' ' )
    {
    	str = str.substring( 1, str.length );
    }
	return str;
}

function trim( str )
{
    while( '' + str.charAt( str.length - 1 ) == ' ' )
    {
    	str = str.substring( 0, str.length - 1 );
    }
    while( '' + str.charAt( 0 ) == ' ' )
    {
    	str = str.substring( 1, str.length );
    }
	return str;
}

/*&document.onkeypress = function()
{
//    alert( window.event.srcElement );
    if( window.event.srcElement.tagName == "TEXTAREA" )
    {
       var str = window.event.srcElement.value;
       str = string_replace("\r\n","<br>", str )
       if( true )  // was str.length < 275 
       {
       	  return true
       }
       return false;
    }
    else if( window.event.keyCode == 13 )
    {
       return false;
    }
}
*/

function time_check( str )
{
    var arr = str.split(":");
    var num1;
    var num2;
    num1 = 0 + arr[0];
    num2 = 0 + arr[1];
    if( isNaN( num1 ) )
    {
		return false;
    }
    if( isNaN( num2 ) )
    {
		return false;
    }
	if( !( num1 >= 0 && num1 <= 24 ) )
    {
       return false;
    }
	if( !( num1 >= 0 && num1 <= 59 ) )
    {
       return false;
    }
    return true;
}

function dog( elementid )
{
    return document.getElementById( elementid ); 
}

function show_wait_div( show )
{
    if( show )
    {
        dog( "main_wait_div" ).style.visibility = "visible";
    }
    else
    {
        dog( "main_wait_div" ).style.visibility = "hidden";
    }
}

function sprintf ( ) {
    // http://kevin.vanzonneveld.net
    // +   original by: Ash Searle (http://hexmen.com/blog/)
    // + namespaced by: Michael White (http://getsprink.com)
    // +    tweaked by: Jack
    // +   improved by: Kevin van Zonneveld (http://kevin.vanzonneveld.net)
    // +      input by: Paulo Ricardo F. Santos
    // +   improved by: Kevin van Zonneveld (http://kevin.vanzonneveld.net)
    // +      input by: Brett Zamir (http://brett-zamir.me)
    // +   improved by: Kevin van Zonneveld (http://kevin.vanzonneveld.net)
    // *     example 1: sprintf("%01.2f", 123.1);
    // *     returns 1: 123.10
    // *     example 2: sprintf("[%10s]", 'monkey');
    // *     returns 2: '[    monkey]'
    // *     example 3: sprintf("[%'#10s]", 'monkey');
    // *     returns 3: '[####monkey]'
 
    var regex = /%%|%(\d+\$)?([-+\'#0 ]*)(\*\d+\$|\*|\d+)?(\.(\*\d+\$|\*|\d+))?([scboxXuidfegEG])/g;
    var a = arguments, i = 0, format = a[i++];
 
    // pad()
    var pad = function (str, len, chr, leftJustify) {
        if (!chr) {chr = ' ';}
        var padding = (str.length >= len) ? '' : Array(1 + len - str.length >>> 0).join(chr);
        return leftJustify ? str + padding : padding + str;
    };
 
    // justify()
    var justify = function (value, prefix, leftJustify, minWidth, zeroPad, customPadChar) {
        var diff = minWidth - value.length;
        if (diff > 0) {
            if (leftJustify || !zeroPad) {
                value = pad(value, minWidth, customPadChar, leftJustify);
            } else {
                value = value.slice(0, prefix.length) + pad('', diff, '0', true) + value.slice(prefix.length);
            }
        }
        return value;
    };
 
    // formatBaseX()
    var formatBaseX = function (value, base, prefix, leftJustify, minWidth, precision, zeroPad) {
        // Note: casts negative numbers to positive ones
        var number = value >>> 0;
        prefix = prefix && number && {'2': '0b', '8': '0', '16': '0x'}[base] || '';
        value = prefix + pad(number.toString(base), precision || 0, '0', false);
        return justify(value, prefix, leftJustify, minWidth, zeroPad);
    };
 
    // formatString()
    var formatString = function (value, leftJustify, minWidth, precision, zeroPad, customPadChar) {
        if (precision != null) {
            value = value.slice(0, precision);
        }
        return justify(value, '', leftJustify, minWidth, zeroPad, customPadChar);
    };
 
    // doFormat()
    var doFormat = function (substring, valueIndex, flags, minWidth, _, precision, type) {
        var number;
        var prefix;
        var method;
        var textTransform;
        var value;
 
        if (substring == '%%') {return '%';}
 
        // parse flags
        var leftJustify = false, positivePrefix = '', zeroPad = false, prefixBaseX = false, customPadChar = ' ';
        var flagsl = flags.length;
        for (var j = 0; flags && j < flagsl; j++) {
            switch (flags.charAt(j)) {
                case ' ': positivePrefix = ' '; break;
                case '+': positivePrefix = '+'; break;
                case '-': leftJustify = true; break;
                case "'": customPadChar = flags.charAt(j+1); break;
                case '0': zeroPad = true; break;
                case '#': prefixBaseX = true; break;
            }
        }
 
        // parameters may be null, undefined, empty-string or real valued
        // we want to ignore null, undefined and empty-string values
        if (!minWidth) {
            minWidth = 0;
        } else if (minWidth == '*') {
            minWidth = +a[i++];
        } else if (minWidth.charAt(0) == '*') {
            minWidth = +a[minWidth.slice(1, -1)];
        } else {
            minWidth = +minWidth;
        }
 
        // Note: undocumented perl feature:
        if (minWidth < 0) {
            minWidth = -minWidth;
            leftJustify = true;
        }
 
        if (!isFinite(minWidth)) {
            throw new Error('sprintf: (minimum-)width must be finite');
        }
 
        if (!precision) {
            precision = 'fFeE'.indexOf(type) > -1 ? 6 : (type == 'd') ? 0 : undefined;
        } else if (precision == '*') {
            precision = +a[i++];
        } else if (precision.charAt(0) == '*') {
            precision = +a[precision.slice(1, -1)];
        } else {
            precision = +precision;
        }
 
        // grab value using valueIndex if required?
        value = valueIndex ? a[valueIndex.slice(0, -1)] : a[i++];
 
        switch (type) {
            case 's': return formatString(String(value), leftJustify, minWidth, precision, zeroPad, customPadChar);
            case 'c': return formatString(String.fromCharCode(+value), leftJustify, minWidth, precision, zeroPad);
            case 'b': return formatBaseX(value, 2, prefixBaseX, leftJustify, minWidth, precision, zeroPad);
            case 'o': return formatBaseX(value, 8, prefixBaseX, leftJustify, minWidth, precision, zeroPad);
            case 'x': return formatBaseX(value, 16, prefixBaseX, leftJustify, minWidth, precision, zeroPad);
            case 'X': return formatBaseX(value, 16, prefixBaseX, leftJustify, minWidth, precision, zeroPad).toUpperCase();
            case 'u': return formatBaseX(value, 10, prefixBaseX, leftJustify, minWidth, precision, zeroPad);
            case 'i':
            case 'd':
                number = parseInt(+value, 10);
                prefix = number < 0 ? '-' : positivePrefix;
                value = prefix + pad(String(Math.abs(number)), precision, '0', false);
                return justify(value, prefix, leftJustify, minWidth, zeroPad);
            case 'e':
            case 'E':
            case 'f':
            case 'F':
            case 'g':
            case 'G':
                number = +value;
                prefix = number < 0 ? '-' : positivePrefix;
                method = ['toExponential', 'toFixed', 'toPrecision']['efg'.indexOf(type.toLowerCase())];
                textTransform = ['toString', 'toUpperCase']['eEfFgG'.indexOf(type) % 2];
                value = prefix + Math.abs(number)[method](precision);
                return justify(value, prefix, leftJustify, minWidth, zeroPad)[textTransform]();
            default: return substring;
        }
    };
 
    return format.replace(regex, doFormat);
}