Skin Spider : Code Viewer : Kinky Solutions by Ben Nadel

<!--- ------------------------------------------------------------------------- ----
	
	File:		age_verification.cfm
	Author:		Ben Nadel
	Section:	N/A
	Desc:		This is a disclaimer page.
				
	Sample Code:
		
				N/A
				
	Update History:
	
				10/04/2006 - Ben Nadel
				Pointed the entry page to home.cfm to accomodate people who
				are not passing in http_referer with their browsers. See
				the Application.cfm page for more information.
	
				10/03/2006 - Ben Nadel
				Built the first run of the page.
	
----- ---------------------------------------------------------------------//// --->

<!--- Kill extra output. --->
<cfsilent>

	<!--- Param url variables. --->
	<cfparam name="URL.image" type="string" default="" />

</cfsilent>

<!--- 
	Check to see what action we are performing. Since this is a self-contained
	page, we don't want to have required images integrated with the standard file 
	system. Therefore, we are going to embed these images directly into this page.
	If an image is requested in the URL, then we are going to return the image.
	If not, then we are going to return the HTML page.
	
	The idea here is that page will be able to call itself to get images.
--->
<cfswitch expression="#URL.image#">

	<cfcase value="background,logo" delimiters=",">
	
		<!--- 
			Save the Base64 image encoding. We are doing this because this is a 
			stand-alone page in the system and is only here temporarily. As such,
			we don't want it to integrate with standard file system. 
			
			The Base64 is created by calling BinaryEncode() on the image binary 
			data with "Base64" chosen as the encoding.
			
			Check to see which image we want. 
		--->
		<cfif NOT CompareNoCase( URL.image, "background" )>
			
			<!--- Set the background data. --->
			<cfset strImageData = "R0lGODlhGQAZAIAAADw8PCYmJiH5BAAHAP8ALAAAAAAZABkAAAI8RB6GepwI34Kuztuozljyb3WhR47k9pWoyYqomraYHEfuDb40Dfc+wzPphjNi7Yj0BFdGX3P3ZOJ6S0wBADs=" />
			
		<cfelseif NOT CompareNoCase( URL.image, "logo" )>
			
			<!--- Set the logo data. --->
			<cfset strImageData = "R0lGODlh9gBCAPcAAP////T09PPz8/Ly8unp6efn5+bm5uXl5eTk5OLi4t3d3dvb29ra2tjY2NfX19bW1tTU1NHR0c/Pz87OzszMzMnJycjIyMfHx8bGxsXFxcPDw/28UcLCwsHBwcDAwL+/v76+vr29vby8vLu7u7q6urm5ubi4uLe3t7a2trW1tbS0tLOzs7KysrGxsbCwsK+vr66urqysrKurq6qqqqmpqaioqKampqWlpaSkpKOjo6KioqGhoaCgoJ+fn56enp2dnZycnJubm5qampmZmZiYmJeXl5aWlpSUlJOTk5KSkpGRkZCQkI+Pj46Ojo2NjYyMjIuLi4qKiomJiYiIiIaGhoWFhYSEhIODg4KCgoGBgYCAgH9/f35+fnx8fHp6enl5eXh4eHd3d3Z2dnNzc3JycnBwcG9vb21tbWxsbGtra2pqamlpaWhoaGdnZ2ZmZmVlZWNjY2JiYmFhYWBgYF9fX15eXl1dXVxcXFtbW1paWllZWVdXV1ZWVlVVVVNTU1BQUE5OTk1NTUhISEdHR0ZGRkFBQUBAQD09PTw8PDo6Ojg4ODc3NzY2NjQ0NDMzMzIyMjExMTAwMC8vLy4uLi0tLSoqKigoKCYmJiQkJCMjIyEhISAgIB8fHx4eHh0dHRsbGxkZGRgYGBcXFxQUFBISEhERERAQEA8PDw4ODg0NDQwMDAoKCgkJCQgICAYGBgUFBQQEBAMDAwAAAP///wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAEHALMALAAAAAD2AEIAAAj/AGcJHEiwoMGDCBMqXMiwocOHECNKnEixosWLGDNq3Mixo8ePIEOKHEmypMmTKFOqXMmypcuXMGNuxKEAwYcwMnPq3ClSgxNUrALdqMOzqNGjEMfEgCWrKaIISKNKnWpCUNOmsWSQmcq1a04Iqa42FQPEq9mzKj+IbVqoA9q3cEHGkbFWVqQJcfPqvVhlSl1NDPYKHuzwiZm6pQgQXsy44A4/dTkFbkyZMApHdTdNNnnnzpnOB+XciXhHDsHPoxmmzui58+qCrlF3ln3w9azYrluDRjg7t2zPp30L3zhBVV1JeEWq0TAAgPPnzgPAIFgBwEIHKAgCqDBQwvMBphVu/6/4RURz6N+nD6yOvj2AAwXHC2TvHr0DNdTro0/tXf93Hxd5kURdshzigEg7OHdABTv4gMSDSGhwAAAHzmcdQkg4t4N23FmIRIIDLCSfRDMoWMEMECLhgwgTVjhLdQ5CGOODKwIQ4kAjwpjijCruwF4V6wGw45BIBEkjkUiIEICQFXkxwyMEPqKCBk+AZKNtBWWYhIUIOQBAAbbleCEYNoonAUVXKpQhkC9eqFAVAGwpEABnctlQAPAJ5N1D1TV0wI0SuYADJgQ29QolYdhgQ0dnALChiB32WRCcAMxwkJgDkRlAQiNCdIejDMm3Z6gi4NjhLKMyBIObkjbUqkIJnv8h0RU7FFqXKT9YwdGnRS60Axh6umnhAF8gRGeQBMEJaHynesqkr8C22dCImDYEJ37SOvRqQhliyVAFmNm6VielctTpt25W0Vy5xp6aqkBkgmfQuQ8dy6ewnJ5arWoAAJgtQj5Eiyq+AAPg7UIQtCJuXVUUwdGEA4hwpIxIsGlndQNgmy+yBcU7b7MQFWCjxDzGaPG/4qk3y74L8WpnuxwvtK1DGCxcFyZucQTDef6xKWlzIF966syzkJknjnVOtLN/zkVLdEEiAGCxvSgr1Giv7xr02tMDfeGlixCJYHNdMoD0m2xVLPly1M/C/HLHACzA4UWi4eZaEs0Fa1CG6Mn/bWp3BPP2LNcGET4L271GVMPYa5lhxEYHO2bwwASpMeEBsl6aNNdw6hu0Q5ETlOBoM4MhQQWoiyDn328rpIbUrStk+G1fSsRGDoyLNQkGGrm8ULdVz5IgACrPrXdCJ9Pb0Kf+qgmArLN/HPPvz8eeUNYIYc+QFFTkflUrGWwEQHYyX/i0lwOcvPLQgbstEfHoWg/p9ApNSL/s7RcUfUFJoOH9VUZAg0ZEljjYqCFqdeLckprFMhElLSITKiBB7nBA+exPO5vL30DUUB2VeQd1FTgdCEXIPldpECE9sMP/mqKFJmyEZ/rJ4EKiJrAGiudzDoFhfdx1QqEBjmnPaRbb/5iWuehdcCAzAMQKZaGHG3CkCigAYQgrIDEkhMdTMkkCDEaYOhV5BAlcDCMVfRC6l6TAELJQBRsikbs8PKoycERKDPggCzZMoAniCgQIRNEUN8bxj0ZZQwsaEQI4kKATtrLBDzxgCVn4EZCQ1EkJGFAsHeTBVtnZQgwW8YEuRPKTMsmcGI5gqxcIxAsJyAIoVymTPBDBVmVhpSxl8oYV2KoIa5ilLl2SBiTYqg1L2KUwVVIDOtgqEzgcpjIjMgIGGMAAEwCBEbjwhlnIgQ0wKMEpxAWGCHxhDV8AAgs6QE4lLPOcCmkAGThhClNAog9nmEIOQhACGOBhbJSAAhO08P+GQ5BCFps4gQDReZANbEAiBg1JQlFCgzks0XuDUAFBC3rQgiwUIRf1SEYNctGNTsQCo3ho7kJxgYlytKIQ8ehGVDoQllYEA6EQKeNMATZdGlSlC81pRW/a0Z36VCA4vWlLhQrUn84ioTw9aE+X6lIoeEATMrWZG8p2To8iFaU6LapWe6pVi6K0qIi4RFaPalSukvUSiBirS6uQgjcYJ6oEwoSllJnUk2ZUrT7dKE8p2tNLiLWsgB0qWP/aVZcKJAY6+ERUCZGEf15FCFqoyBAmS9nKWvaymM2sZjfL2SEoxKB+tSpRCwtYvY7WqzoNbWDJ2lXWnpWwrjWsQLAgADD/rGUVkQjEHv5gCEZYAhTtNIUnEtGHLKAABRloZFPqQL5hgjatX90qVld7Va8uJLWwxWtrsavdhtBgBYy4CiEY0AEi/IAHxwWBBjRQgRDEIAhZwMMsSACJpmziaHTdq3VjS12jtha1X9Wva8k6WqEyVbADZggYVnAHpshCERwoVkNYkAlZuKIIAjOpSGRrFghs4SqVoIBDPMBHQ4BAwyXhsFlQkIamqOIB2jKFLJ4gYRTb2CBZOEBTutACh4AAFLIwQhluTOQNzgCqcYjBQ0zQCFlwQX1FNukYQlDfJJT0IUdw6CNMEGUbr0EChAoDCSJCBxNYuAZd1jAaKhCFNQjBPQUToQEXYuEGGqTZpDUAAg+CSZEIiGEUCrizoB0SAw9oIA6DTrRC7nCCHCj60ZCOtKQnTelKW/rSmIZjQAAAOw==" />
			
		<cfelse>
		
			<!--- Set a blank data field. --->
			<cfset strImageData = "" />
			
		</cfif>

		<!--- Check to see if we have data to return. --->
		<cfif Len( strImageData )>
		
			<!--- Set the content. --->
			<cfcontent 
				type="image/*"
				variable="#BinaryDecode( strImageData, 'Base64' )#" 
				reset="true"
				/>
						
		</cfif>
	
	</cfcase>


	<!--- This is the default case. Show the HTML page. --->
	<cfdefaultcase>
				
		<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
		<html>
		<head>
			<title>Skin Spider : Age Verification</title>
			
			<style type="text/css">
				
				body {
					background-color: #262626 ;
					background-image: url( "./age_verification.cfm?image=background" ) ;
					color: #FBB02F ;
					margin: 15% 0px 50px 0px ;
					text-align: center ;
					}
					
				h1,
				p {
					font-family: verdana ;
					}
				
				#disclaimer {
					font-size: 16px ;
					line-height: 22px ;
					padding-bottom: 40px ;
					}
					
				#links a {
					background-color: #FFEFD5 ;
					border: 2px solid #FBB02F ;
					color: #000000 ;
					font-weight: bold ;
					margin: 0px 10px 0px 10px ;
					padding: 10px 30px 10px 30px ;
					text-decoration: none ;
					}
			
			</style>
		</head>
		<body>
		
			<h1>
				<img 
					src="./age_verification.cfm?image=logo" 
					width="246" 
					height="66" 
					alt="Skin Spider : A Kinky Solution" 
					/><br />
			</h1>
						
			<p id="disclaimer">
				This site is a ColdFusion application development demo.<br />
				It does, however, contain adult content. You must be 18 years or older to enter.
			</p>
		
			<p id="links">
				<a href="./home.cfm">Yes, I Am Old Enough</a>
				<a href="http://www.google.com">No, I Am Too Young</a>
			</p>
		
		</body>
		</html>
		
	</cfdefaultcase>

</cfswitch>