function RegisterNamespaces(){for(var i=0;i<arguments.length;i++){var p=arguments[i].split("."),w=window;for(var j=0;j<p.length;j++){if(!w[p[j]])w[p[j]]=new Object();w=w[p[j]];}}}
RegisterNamespaces("Inpl.CProfile");
Inpl.CProfile=new function(){
var objCProfile=this,profile={},user="",domain="",ttl=3600*24,cp="_inpl_cprofile",cu="ZNWWWID",su="ZNVAST",initialised=0;
this.Get=function(){Init();var a=arguments;if(user&&profile[a[0]])return profile[a[0]];else return null;}
this.Set=function(){Init();if(user){var a=arguments;profile[a[0]]=a[1];Update();return true}else return false}
this.Clear=function(n){Init();if(n)objCProfile.Set(n,null);else profile={};Update();}
function Update(){if(profile&&cu&&!profile[cu])profile[cu]=user;var s=Serialize();INTPL("setCookie",cp,s,(!s?-ttl:ttl),"/",domain);}
function Serialize(){var r="",v="",l=0;for(i in profile)if(profile[i]){r+=(r?"|":"")+escape(i)+":"+escape(profile[i]);l++}if(l<=1)r="";return r;}
function Init(){if(!initialised)objCProfile.Init();}
this.Init=function(){domain=arguments[0]||".interia.pl";initialised=1;try{var p=INTPL("getCookie",cp),v,r=[];user=INTPL("getCookie",cu),ses=INTPL("getCookie",su);if(p&&user&&ses){p=p.split("|");for(var i=0;i<p.length;i++){v=p[i].split(":");if(v[0])r[v[0]]=unescape(v[1]);}if(r[cu]==user)profile=r;else objCProfile.Clear();}else if(!user&&p)Update();}catch(e){Update();}}}