// ---- funktioner för premium-betalning ----

var premium_payment_timer=[];
var premium_payment_last_message=null;

// -- betalning av premium --

function premium_payment_wait(user,url){
    // effekt: väntar på betalning av premium för user, meddelan sen
    premium_payment_check(user,url,0);
};

function premium_payment_check(user,url,turn){
    // effekt   : kör XML-anrop till premium_payment_check_place nu
    //            och några gånger till
    // rekursion: turn ökar, turn < maxvärde

    if(turn > 60){
	return;
    };
    
    window.setTimeout(function(){
	premium_payment_check(user,url,turn+1);
    },5*1000);
    
    // kör uppdaterare
    runXHR(url,function(text,xhr){premium_payment_check_place(user,text)},null);
};

function premium_payment_check_place(user,text){
    // effekt: gör meddelande med text om text

    if(text && (text != premium_payment_last_message)){
	window.location='/';
    };
};

// -- betalning av premium-voucher --

function premium_voucher_payment_wait(url,destination){
    // effekt: väntar på betalning av premium_voucher för session
    //         skicka till destination om betalning hittad
    
    premium_voucher_payment_check(url,destination,0);
};

function premium_voucher_payment_check(url,destination,turn){
    // effekt   : kör XML-anrop till premium_voucher_payment_check_place nu
    //            och några gånger till
    // rekursion: turn ökar, turn < maxvärde

    if(turn > 60){
	return;
    };
    
    window.setTimeout(function(){
	premium_voucher_payment_check(url,destination,turn+1);
    },5*1000);
    
    // kör uppdaterare
    runXHR(url,function(text,xhr){premium_voucher_payment_check_place(text,destination)},null);
};

function premium_voucher_payment_check_place(text,destination){
    // effekt: skicka vidare till destination om text

    if(text){
	window.location=destination;
    };
};