head	1.17;
access;
symbols;
locks
	root:1.17; strict;
comment	@# @;


1.17
date	2006.12.07.17.25.27;	author root;	state Exp;
branches;
next	1.16;

1.16
date	2006.06.21.15.41.14;	author root;	state Exp;
branches;
next	1.15;

1.15
date	2006.06.08.10.16.14;	author root;	state Exp;
branches;
next	1.14;

1.14
date	2006.06.06.14.46.25;	author root;	state Exp;
branches;
next	1.13;

1.13
date	2006.05.16.14.57.45;	author root;	state Exp;
branches;
next	1.12;

1.12
date	2006.03.29.10.02.13;	author root;	state Exp;
branches;
next	1.11;

1.11
date	2006.03.28.16.21.30;	author root;	state Exp;
branches;
next	1.10;

1.10
date	2006.03.28.14.18.57;	author root;	state Exp;
branches;
next	1.9;

1.9
date	2006.02.16.11.17.51;	author root;	state Exp;
branches;
next	1.8;

1.8
date	2006.02.10.07.54.30;	author root;	state Exp;
branches;
next	1.7;

1.7
date	2006.01.27.07.49.33;	author root;	state Exp;
branches;
next	1.6;

1.6
date	2005.11.30.14.47.23;	author root;	state Exp;
branches;
next	1.5;

1.5
date	2005.11.22.12.43.22;	author root;	state Exp;
branches;
next	1.4;

1.4
date	2005.11.15.11.26.17;	author root;	state Exp;
branches;
next	1.3;

1.3
date	2005.11.11.16.47.44;	author root;	state Exp;
branches;
next	1.2;

1.2
date	2005.10.27.08.13.08;	author root;	state Exp;
branches;
next	1.1;

1.1
date	2005.10.27.07.21.44;	author root;	state Exp;
branches;
next	;


desc
@gimme cookie
@


1.17
log
@moo
@
text
@<trimlines><expire-time seconds=5><header name="Cache-Control" value="">


<COMMENT> BEGINNING OF COOKIE EVALUATION SECTION - authitem variable is yes if there's a cookie or a pseudo-cookie</COMMENT>
<set variable=cookieexists value=no><set variable=goodcookie value=no><set variable=authitem value=no>
<if  cookie="R1EuropeAuth_realmusic"><set variable=authitem value=yes></if>
<if  variable="keks"><set variable=authitem value=yes></if>
<if  variable="authitem is yes">
<set variable=cookieexists value=yes>
<cset variable=kook preparse><insert cookie=R1EuropeAuth_realmusic></cset>
<COMMENT> R1EuropeAuth_realmusic cookie is <insert encode=none cookie=R1EuropeAuth_realmusic></COMMENT>
<formoutput><rnwrite file=debug/cookiedebug>Cookie R1EuropeAuth_realmusic is #kook#\n</rnwrite></formoutput>
<cset variable=fullcookie preparse><insert cookie=R1EuropeAuth_realmusic></cset>
<if  variable="keks"><cset variable=fullcookie preparse><insert variable=keks></cset></if>
<if variable="fullcookie is removed"><set variable="fullcookie" value="COOKIE-REMOVED@@realmusic/1132239786_20051117140306|5082829813b135151ca3366666666666|"></if>
<arraycadd preparse name=ray delim="|"><insert variable=fullcookie></arraycadd>
<cset variable=field0 preparse><arrayfetch name=ray index=0 encode=none></cset>
<cset variable=md5input preparse><arrayfetch name=ray index=1 encode=none></cset>
<set variable=secret value=cowsonthemooneatcheesewhilewatchingthestarsgoby>
<if variable=keks><set variable=secret value=onceUPONaTIMEthereWASaCOWsittingONaCHEESE></if>
<if variable="CDN is BEON*"><set variable=secret value=OnceTheREwasACOWthatMoooooEDarouNd></if>
<if variable="CDN is JP"><set variable=secret value=KowzGoMooWhyDontYoo></if>
<formoutput encode=none><md5 quiet>#field0#</md5><md5 quiet>#secret#</md5></formoutput><cset preparse variable=mymd5><md5digest></cset>

<COMMENT><BR>The MD5 that I calculate is <insert variable=mymd5> the cookie's MD5 is <insert variable=md5input></COMMENT>
<formoutput><if variable="mymd5 is #md5input#"><set variable=goodmd5 value=yes></if></formoutput>
<arraycset preparse name=ray delim=":"><insert variable=field0 encode=none></arraycset><arraysize name=ray set=numprods>
<COMMENT> FOR LOOP from HELL</COMMENT>
<formoutput quote=$$$><for variable=loopcounter from=1 to=$$$numprods$$$>
<formoutput><set variable=arrayptr expr="#loopcounter#-1"</formoutput><if not variable=arrayptr><set variable=arrayptr value="0"></if>
<formoutput><cset variable=firstentitle preparse><arrayfetch name=ray index=#arrayptr# encode=none></cset></formoutput>
<arrayclear name=entitle><arraycadd preparse name=entitle delim="@@"><insert variable=firstentitle></arraycadd>
<cset variable=username preparse><arrayfetch name=entitle index=0 encode=none></cset>
<cset variable=proddate preparse><arrayfetch name=entitle index=1 encode=none></cset>
<arraycset preparse name=entitle2 delim="/"><insert variable=proddate></arraycset>
<cset variable=prodcode preparse><arrayfetch name=entitle2 index=0 encode=none></cset>
<cset variable=datecodes preparse><arrayfetch name=entitle2 index=1 encode=none></cset>
<arraycset preparse name=entitle3 delim="_"><insert variable=datecodes></arraycset>
<cset variable=cookieepoch preparse><arrayfetch name=entitle3 index=0 encode=none></cset>

<cset preparse variable=diff><formoutput><rndate GMT add=-#cookieepoch#></formoutput></cset>
<formoutput><IF match="#diff# is -*"><set variable=cookietime value=good></IF></formoutput>
</for></formoutput>
<COMMENT> END OF FOR LOOP from HELL</COMMENT>

</if><COMMENT>END OF "authitem is yes"</COMMENT>
<COMMENT> END OF COOKIE EVALUATION SECTION </COMMENT>


<COMMENT> JAPAN FREE TRIAL </COMMENT>
<if variable="rmsrc is type.rm|station.rmjp11,type.rm|station.rmjp15,type.rm|station.rmjp16,type.rm|station.rmjp17,type.rm|station.rmjp18">
<if variable="CDN is JP">
<set variable=cookietime value=good>
<set variable=goodmd5 value=yes>
</if></if>

<COMMENT> INSERT SERIAL-NUMBER CODE HERE! </COMMENT>

<if variable="cookietime is good"><if variable="goodmd5 is yes"><set variable=thrown value=yes>
<if not variable=redir>
<if not variable=keks><header name="Content-Type" value="audio/x-pn-realaudio"></if>
<COMMENT> *** Calculate the rollcode required by the honest-to-goodness voodoo plugin *** </COMMENT>
<md5 quiet>kanadian klowns kreate krap</Md5>
<Md5 quiet><rndate GMT>%y%m%d%H%M</Rndate></MD5>
<cset preparse variable=goodrollcode><rndate GMT>%d%H%M</rndate>.<md5digest></cset>
<set variable=appendarama value="">

<if not variable=pid><set variable=pid value=nopid></if><if not variable=spart><set variable=spart value=nospart></if>
<formoutput><if variable=copyright><cset preparse variable=appendarama>#appendarama#?copyright=<insert variable=copyright encode=url></cset></if></formoutput>

<if not variable=CDN><set variable=CDN value=SEA></if>
<set variable="contentpath" value="radiopass/">

<if variable="CDN is JP">
<set variable=streamingserver value=61.195.68.123>
<set variable=streamingserver value=61.195.68.45>
<set variable=streamingserver value=61.195.68.58>
</if>

<if variable="CDN is BEON">
<set variable=streamingserver value=207.188.20.164>
</if>

<if variable="CDN is BEONHHD,HHD">
<set variable=streamingserver value=drache.euro.real.com>
</if>

<if variable="CDN is HH">
<set variable=streamingserver value=62.201.170.10>
</if>

<if variable="CDN is BEONHHDL,HHDL">
<RANDOM><set variable=hhliveserver value=213.128.134.1>
<set variable=hhliveserver value=213.128.134.2>
<set variable=hhliveserver value=213.128.134.3></RANDOM>
<RANDOM><set variable=hhliveserver value=62.201.160.85>
<set variable=hhliveserver value=62.201.160.86></RANDOM>
<cset variable=streamingserver preparse><insert variable=hhliveserver></cset>
<set variable="contentpath" value="">
</if>

<if variable="CDN is BEONSEA,SEA">
<COMMENT> *** write a little file that indicates a stream request, a background job will discover it *** 
    one file for realmusic, one for radiopass  [get rid of radiopass one after launch]
**** This script is: /home/rawww/html/euroc4/SKRIPPZ/radiopass/send-request-looper.csh</COMMENT>
<set variable=directory value=radiopass>
<formoutput><rnwrite file=#directory#/#filename#>dogbarf is yum!</rnwrite></formoutput>
<set variable=directory value=realmusic>
<formoutput><rnwrite file=#directory#/#filename#>dogbarf is yum!</rnwrite></formoutput>
<set variable=streamingserver value=glomphradio.euro.real.com>
<set variable=prerollserver value=drache.euro.real.com>
rtsp://<insert variable=prerollserver>/unauthorized/welcome1.rm
<cset preparse variable=filename>RM<insert variable=filename></cset>
</if>

<if variable="CDN is HHFLV">
<sed><e>s/^.*(..)..\.rm$//</e><source variable=filename><destination variable=twoletter></sed>
<formoutput><redirect to="http://amplify.music.euro.real.com/events/#goodrollcode#/#filename#?rmsrc=#rmsrc#"></formoutput>
<COMMENT><formoutput><redirect to="http://amplify.music.euro.real.com/events/#goodrollcode#/#filename#"></formoutput></COMMENT>
</if>

<if variable="CDN is HHAMPLIFY">
<COMMENT>http://www.glomph.com/stuff/<insert variable=filename></COMMENT>
<redirect to="http://www.glomph.com/stuff/20828927.flv">
</if>
<if not variable="CDN is HHAMPLIFY,HHFLV">
rtsp://<insert variable=streamingserver>/events/<insert variable=goodrollcode>/<insert variable=contentpath><insert variable=filename>?pid=<insert variable=pid>&spart=<insert variable=spart><if variable=copyright>&copyright=<insert variable=copyright encode=url></if><if variable=stationid>&stationid=<insert variable=stationid encode=url></if><if variable=rmsrc>&rmsrc=<insert variable=rmsrc encode=url></if>
</if><COMMENT>not CDN=HHAMPLIFY,HHFLV</COMMENT>
</if><COMMENT>not variable=redir</COMMENT>
<else><COMMENT>yes variable=redir</COMMENT>
<formoutput encode=none><redirect to="#redir#"></formoutput>
</else>
</if></if><COMMENT>cookietime & goodmd5</COMMENT>

<if not variable=thrown>
<header name="Content-Type" value="application/smil">
<if variable="cookieexists is yes"><insert nocache file="relogin.smil"></if>
<else><insert nocache file="buysomethingyoujerk.smil"></else>
<COMMENT> IN CASE OF SMIL FAILURE RESULTS... WE INCORRECTLY THOUGHT IT CONFUSES PLAYER
<header name="Content-Type" value="audio/x-pn-realaudio">
<if variable="cookieexists is yes">rtsp://drache.euro.real.com/unauthorized/relogin.rm</if>
<else>rtsp://drache.euro.real.com/unauthorized/upsell.rm</else></COMMENT>
</if></trimlines>
@


1.16
log
@prior to the serial number code-insertion
@
text
@d57 1
@


1.15
log
@moo
@
text
@d21 2
a22 1
<if variable="CDN is BEON"><set variable=secret value=QuesoDeCabraSinGas!></if>
d83 1
a83 1
<if variable="CDN is HHD">
d91 1
a91 1
<if variable="CDN is HHDL">
d101 1
a101 1
<if variable="CDN is SEA">
@


1.14
log
@prior to BEON
@
text
@d21 1
d78 4
@


1.13
log
@prior to free JP
@
text
@d47 9
d72 2
@


1.12
log
@moo
@
text
@d78 2
d100 2
a101 1
<formoutput><redirect to="http://amplify.music.euro.real.com/events/#goodrollcode#/#filename#"></formoutput>
d109 2
a110 2
rtsp://<insert variable=streamingserver>/events/<insert variable=goodrollcode>/<insert variable=contentpath><insert variable=filename>?pid=<insert variable=pid>&spart=<insert variable=spart><if variable=copyright>&copyright=<insert variable=copyright encode=url></if><if variable=stationid>&stationid=<insert variable=stationid encode=url></if>
</if><COMMENT>not CDN=HHAMPLIFY</COMMENT>
@


1.11
log
@moo
@
text
@d98 1
a98 1
<redirect to="http://amplify.music.euro.real.com/events/<insert variable=goodrollcode>/rnde/<insert variable=twoletter>/<insert variable=filename>">
@


1.10
log
@prior to HHFLV-ification.  HHAMPLIFY removed.
@
text
@d96 5
d105 1
a105 1
<if not variable="CDN is HHAMPLIFY">
@


1.9
log
@prior to AMPLIFY GOO
@
text
@d4 5
a8 3
<COMMENT> BEGINNING OF COOKIE EVALUATION SECTION </COMMENT>
<set variable=cookieexists value=no><set variable=goodcookie value=no>
<if  cookie="R1EuropeAuth_realmusic">
d14 1
d20 1
d44 1
a44 1
</if><COMMENT>END OF cookie="R1EuropeAuth_realmusic"</COMMENT>
d49 1
a49 1
<header name="Content-Type" value="audio/x-pn-realaudio">
d96 5
d102 1
@


1.8
log
@prior to JP addition
@
text
@d58 4
@


1.7
log
@prior to mac-stuff
@
text
@d44 1
d89 4
@


1.6
log
@panic time
@
text
@d87 1
a87 1
rtsp://<insert variable=streamingserver>/events/<insert variable=goodrollcode>/<insert variable=contentpath><insert variable=filename>?pid=<insert variable=pid>&spart=<insert variable=spart><if variable=copyright>&copyright=<insert variable=copyright encode=url><if variable=stationid>&stationid=<insert variable=stationid encode=url></if>
@


1.5
log
@prior to pelzer upsell
@
text
@d87 1
a87 1
rtsp://<insert variable=streamingserver>/events/<insert variable=goodrollcode>/<insert variable=contentpath><insert variable=filename>?pid=<insert variable=pid>&spart=<insert variable=spart><if variable=copyright>&copyright=<insert variable=copyright encode=url></if>
@


1.4
log
@prior to smil-> .rm upsell.relogin crap
@
text
@a10 1

d12 1
d55 1
d65 8
d87 1
a87 1
rtsp://<insert variable=streamingserver>/events/<insert variable=goodrollcode>/radiopass/<insert variable=filename>?pid=<insert variable=pid>&spart=<insert variable=spart><if variable=copyright>&copyright=<insert variable=copyright encode=url></if>
d94 4
@


1.3
log
@no cookie check? whaaaaa
@
text
@d8 1
a8 1

d10 1
d40 1
a40 1
</if>
@


1.2
log
@moo
@
text
@d65 1
d67 4
a70 1
<formoutput><rnwrite file=radiopass/#filename#>dogbarf is yum!</rnwrite></formoutput>
d74 1
@


1.1
log
@Initial revision
@
text
@a22 1
<HR>
a26 1
username for velocity-checking purposes is: <insert variable=username><BR>
d35 1
a35 2
<formoutput><IF match="#diff# is -*"><set variable=cookietime value=good>
cookie still valid! Luser "#username#" is entitled to see "#prodcode#" stuff! (assuming MD5 eval is ok)</IF></formoutput>
d53 2
d73 1
a73 1
</if></if> <COMMENT>cookietime & goodmd5</COMMENT>
d76 4
a79 7
<if variable="cookieexists is yes"><redirect to="http://www.glomph.com/stalecookie.html"></if>
<else><redirect to="http://www.glomph.com/buysomethingyoujerk.html"></else>
</if>



</trimlines>
@