/* Palvelukohtaisia funktioita */

/* 
http://www.metalliliitto.fi/portal/suomi/jasenyys/liittyminen/ 
ja
http://www.metalliliitto.fi/portal/svenska/medlemskap/anslutning/
*/
function Lasku(form) {
x = 1.7*form.x.value/100;
form.maksu.value = x;
}

/* kommentointimoduulin email tarkistus */
function emailCheck (emailStr) {

var checkTLD=1;
var len=emailStr.length;

if(len>0)
{
    var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|fi|to|pro|museum)$/;
    var emailPat=/^(.+)@(.+)$/;
    var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
    var validChars="\[^\\s" + specialChars + "\]";
    var quotedUser="(\"[^\"]*\")";
    var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
    var atom=validChars + '+';
    var word="(" + atom + "|" + quotedUser + ")";
    var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
    var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
    var matchArray=emailStr.match(emailPat);
    
    if (matchArray==null) {
    
    alert("Sähköposti on virheellinen.");
    return false;
    }
    var user=matchArray[1];
    var domain=matchArray[2];
 
    // Domain is symbolic name.  Check if it's valid.
     
    var atomPat=new RegExp("^" + atom + "$");
    var domArr=domain.split(".");
    var len=domArr.length;
    for (i=0;i<len;i++) {
    if (domArr[i].search(atomPat)==-1) {
    alert("Sähköposti on virheellinen.");
    return false;
       }
    }   
    
    /* domain name seems valid, but now make sure that it ends in a
    known top-level domain (like com, edu, gov) or a two-letter word,
    representing country (uk, nl), and that there's a hostname preceding 
    the domain or country. */
    
    if (checkTLD && domArr[domArr.length-1].length!=2 && 
    domArr[domArr.length-1].search(knownDomsPat)==-1) {
    alert("Sähköposti on virheellinen");
    return false;
    }       
    
    // If we've gotten this far, everything's valid!
    return true;
}
}

//  End -->