Programmatically Uploading Images To JING At ScreenCast.com Using ColdFusion

<!---
	Set login credentials for ScreenCast.com. We are
	basically going to log into the system and upload the
	image programmatically.

	<cfset username = "............" />
	<cfset password = "............" />
--->
<cfinclude template="./credentials.cfm" />

<!---
	This is your display name - it's the folder YOU get for
	your content.
--->
<cfset displayName = "BenNadel" />


<!--- ----------------------------------------------------- --->
<!--- ----------------------------------------------------- --->


<!---
	This is the file path to the file that we are going to
	programmatically upload to the JING service (as hosted on
	ScreenCast.com).
--->
<cfset filePath = expandPath( "./sexy.jpg" ) />


<!--- ----------------------------------------------------- --->
<!--- ----------------------------------------------------- --->


<!---
	Create the CFHttpSession object that will be used to navigate
	through the ScreenCast.com system as if we were logged in.
--->
<cfset httpSession = createObject( "component", "CFHTTPSession" )
	.Init(
		LogFilePath = ExpandPath( "./log.txt" )
		)
	/>

<!---
	To kick off the session, let's hit the ScreenCast.com website.
	This will set us up with our initial cookies and get our URL
	referer values ready.
--->
<cfset httpSession
	.newRequest( "http://www.screencast.com" )
	.get()
	/>

<!---
	Now that our session has been initialized for the
	ScreenCast.com website, we can submit our login information.
	These form fields were taken out of the source of the
	screenCast.com homepage.
--->
<cfset httpSession
	.newRequest( "https://www.screencast.com/signin.aspx" )
	.addFormField( "emailAddress", username )
	.addFormField( "password", password )
	.addFormField( "task", "L" )
	.addFormField( "invitationCode", "" )
	.addFormField( "playlistId", "" )
	.post()
	/>


<!--- ----------------------------------------------------- --->
<!--- ----------------------------------------------------- --->


<!---
	At this point, our HTTP session used should be logged into the
	ScreenCast.com webiste. Now, we can navigate to the JING
	folder (we are assuming this exists).
--->
<cfset httpSession
	.newRequest( "http://www.screencast.com/users/#displayName#/folders/Jing" )
	.get()
	/>

<!---
	Once we are in the JING folder, let's make a request to the
	upload page. This is NOT where we are uploading the file just
	yet - this is a call to the Flash Modal Window which uploads
	the file eventually. We need this page to scrape some crucial
	system variables.
--->
<cfset httpResponse = httpSession
	.newRequest( "http://www.screencast.com/controls/lightboxes/upload.aspx" )
	.addURL( "userName", displayName )
	.addURL( "mediaGroupName", "Jing" )
	.addURL( "random", "12654141#randRange( 11111, 99999 )#" )
	.get()
	/>

<!---
	This modal window upload request is going to come back with a
	Flash uploader that is written to the page with Javascript.
	When this happens, it writes out all of the FORM values that
	the flash movie will need to upload in the form of:

	so.addVariable( "thumbnail", "False" );
	so.addVariable( "viewpage", "False" );
	so.addVariable( "multiselect", "True" );

	We need to grab thos variables in order to upload the file.
--->
<cfset flashVariables = reMatch(
	"addVariable\([^)]+\)",
	httpResponse.fileContent
	) />

<!---
	Now that we have the rough values, we need to extract them
	into a collection of form variables. Let's create a form
	collection.
--->
<cfset postVariables = [] />

<!---
	Loop over the scaped flash variables to parse them and clean
	them up.
--->
<cfloop
	index="flashVariable"
	array="#flashVariables#">

	<!--- Extract the name value pair from the variable data. --->
	<cfset nameValuePair = reMatch(
		"[""'][^""']*[""']",
		flashVariable
		) />

	<!---
		Check to see if this value is valid - we only want
		to add it to our collection is there are two elements
		(name + value) and the value has a length.
	--->
	<cfif (
		(arrayLen( nameValuePair ) eq 2) &&
		(len( nameValuePair[ 1 ]) gt 2) &&
		(len( nameValuePair[ 2 ]) gt 2)
		)>

		<!---
			Create a post variable (we need to remove the quotes
			from the name/value pairs).
		--->
		<cfset postVariable = {
			name = mid(
				nameValuePair[ 1 ],
				2,
				(len( nameValuePair[ 1 ] ) - 2)
				),
			value = mid(
				nameValuePair[ 2 ],
				2,
				(len( nameValuePair[ 2 ] ) - 2)
				)
			} />

		<!--- Add this to our post variables. --->
		<cfset arrayAppend( postVariables, postVariable ) />

	</cfif>

</cfloop>


<!--- ----------------------------------------------------- --->
<!--- ----------------------------------------------------- --->


<!---
	Now that we have the post values that we are going to need
	for the file upload, let's start a new request for the
	actual file post. Add the file name and file path.
--->
<cfset httpSession
	.newRequest( "http://www.screencast.com/handlers/filereceive.ashx" )
	.addFormField( "Filename", listLast( filePath, "\/" ) )
	.addFile( "FileData", filePath, "image/*" )
	/>

<!--- Loop over the post variables we collected previously. --->
<cfloop
	index="postVariable"
	array="#postVariables#">

	<!--- Add the form field. --->
	<cfset httpSession.addFormField(
		postVariable.name,
		postVariable.value
		) />

</cfloop>

<!---
	Now that we all the variables, let's post the file upload.
	***** THIS IS WHERE WE ARE UPLOADING THE ACTUAL FILE. *****
	***** THIS IS WHERE WE ARE UPLOADING THE ACTUAL FILE. *****
--->
<cfset httpResponse = httpSession.post() />


<!--- ----------------------------------------------------- --->
<!--- ----------------------------------------------------- --->


<!---
	At this point, the response file content *should* be XML-ish
	in nature. Let's take the response and try to wrap it up in
	an XML document (the uniqe ID of our upload will be stored
	in the "mediaSetId" XML node.
--->
<cftry>

	<!--- Create an XML document. --->
	<cfxml variable="xmlResponse">
		<response>
			<cfoutput>
				#httpResponse.fileContent#
			</cfoutput>
		</response>
	</cfxml>

	<!--- Get the media Set ID from the response. --->
	<cfset mediaSetID = xmlResponse.response.mediaSetId.xmlText />

	<!--- With the media set ID, build the URL. --->
	<cfset jingURL = (
		"http://www.screencast.com/users/#displayName#/" &
		"folders/Jing/media/#mediaSetID#"
		) />

	<!--- Link to the upload. --->
	<p>
		<cfoutput>
			<a href="#jingURL#" target="_blank">View JING Upload</a>
		</cfoutput>
	</p>

	<!--- ------------------------------------------------- --->

	<!--- Catch any errors. --->
	<cfcatch>

		<!---
			Honestly, if we made it here, then something went
			totally wrong - chances are they changed the way
			file uploads work and we'll have to tweak our
			process.
		--->
		<p>
			There was a problem parsing the file upload response
			into an XML document. Check the log files.
		</p>

	</cfcatch>
</cftry>