webapi-eca/webpages/handlers/coffee/forge_module.coffee

# Fetch the search string and transform it into an object for easy access
arrParams = window.location.search.substring(1).split '&'
oParams = {}
for param in arrParams
	arrKV = param.split '='
	oParams[ arrKV[ 0 ] ] = arrKV[ 1 ]

if oParams.type is 'event_poller'
	moduleName = 'Event Poller'
else
	moduleName = 'Action Invoker'
	oParams.type = 'action_invoker'
if oParams.id
	oParams.id = decodeURIComponent oParams.id

fErrHandler = ( errMsg ) ->
	( err ) ->
		if err.status is 401
			window.location.href = "forge?page=forge_module?type=#{ oParams.type }"
		else
			$( '#log_col' ).text ""
			fDelayed = () ->
				if err.responseText is ''
					msg = 'No Response from Server!'
				else
					try
						oErr = JSON.parse err.responseText
						msg = oErr.message
				$( '#info' ).text errMsg + msg
				$( '#info' ).attr 'class', 'error'
			setTimeout fDelayed, 500

fOnLoad = () ->
	document.title = "Forge #{ moduleName }"
	$( '#pagetitle' ).text "{{{user.username}}}, forge your custom #{ moduleName }!"

	# Setup the ACE editor
	editor = ace.edit "editor"
	editor.setTheme "ace/theme/monokai"
	editor.getSession().setMode "ace/mode/coffee"
	editor.setShowPrintMargin false
	editor.session.setUseSoftTabs false 
	
	$( '#editor_mode' ).change ( el ) ->
		if $( this ).val() is 'CoffeeScript'
			editor.getSession().setMode "ace/mode/coffee"
		else 
			editor.getSession().setMode "ace/mode/javascript"
	
	# Add parameter list functionality
	fChangeInputVisibility = () ->
		$( '#tableParams tr' ).each ( id ) ->
			if $( this ).is ':last-child' or $( this ).is ':only-child'
				$( 'img', this ).hide()
				$( 'input[type=checkbox]', this ).hide()
			else
				$( 'img', this ).show()
				$( 'input[type=checkbox]', this ).show()

	fAddInputRow = ( tag ) ->
		tr = $ '<tr>'
		img = $( '<img>' ).attr( 'title', 'Remove?').attr 'src', 'red_cross_small.png'
		cb = $( '<input>' ).attr( 'type', 'checkbox' ).attr 'title', 'Password shielded input?'
		inp = $( '<input>' ).attr( 'type', 'text' ).attr 'class', 'textinput'
		tr.append( $( '<td>' ).append img )
		tr.append( $( '<td>' ).append cb )
		tr.append( $( '<td>' ).append inp )
		tag.append tr
		fChangeInputVisibility()
		tr

	$( '#tableParams' ).on 'click', 'img', () ->
		par = $( this ).closest 'tr' 
		if not par.is ':last-child'
			par.remove()
		fChangeInputVisibility()

	$( '#tableParams' ).on 'keyup', 'input', ( e ) ->
		code = e.keyCode or e.which
		if code isnt 9
			par = $( this ).closest( 'tr' )
			if par.is ':last-child'
				fAddInputRow par.parent()
			else if $( this ).val() is '' and not par.is ':only-child'
				par.remove()

	fChangeInputVisibility()

	# Add submit button logic
	$( '#but_submit' ).click () ->
		if $( '#input_id' ).val() is ''
			alert "Please enter an #{ moduleName } name!"
		else
			listParams = {}
			$( '#tableParams tr' ).each () ->
				val =  $( 'input.textinput', this ).val()
				shld = $( 'input[type=checkbox]', this ).is ':checked'
				if val isnt ""
					listParams[val] = shld
				true
			obj =
				command: "forge_#{ oParams.type }"
				payload: JSON.stringify
					id: $( '#input_id' ).val()
					lang: $( '#editor_mode' ).val()
					public: $( '#is_public' ).is ':checked'
					data: editor.getValue()
					params: JSON.stringify listParams
			fCheckOverwrite = ( obj ) ->
				( err ) ->
					if err.status is 409
						if confirm 'Are you sure you want to overwrite the existing module?'
							payl = JSON.parse obj.payload
							payl.overwrite = true
							obj.payload = JSON.stringify payl
							$.post( '/usercommand', obj )
								.done ( data ) ->
									$( '#info' ).text data.message
									$( '#info' ).attr 'class', 'success'
									alert "You need to update the rules that use this module in 
													order for the changes to be applied to them!"
								.fail fErrHandler "#{ moduleName } not stored!"
					else
						fErrHandler( "#{ moduleName } not stored!" ) err
			window.scrollTo 0, 0
			$.post( '/usercommand', obj )
				.done ( data ) ->
					$( '#info' ).text data.message
					$( '#info' ).attr 'class', 'success'
				.fail fCheckOverwrite obj
	
	# EDIT MODULES

	fAddUserParam = ( param, shielded ) ->
		tr = fAddInputRow $( '#tableParams' )
		$( 'input.textinput', tr ).val param
		if shielded
			$( 'input[type=checkbox]', tr ).prop 'checked', true

	if oParams.id
		obj =
			command: "get_full_#{ oParams.type }"
			payload: JSON.stringify 
				id: oParams.id

		$.post( '/usercommand', obj )
			.done ( data ) ->
				oMod = JSON.parse data.message
				if oMod
					fAddUserParam param, shielded for param, shielded of JSON.parse oMod.params
					$( '#input_id' ).val oMod.id
					$( '#editor_mode' ).val oMod.lang
					if oMod.public is 'true' 
						$( '#is_public' ).prop 'checked', true
					editor.setValue oMod.data
					editor.moveCursorTo 0, 0
				fAddUserParam '', false

			.fail fErrHandler "Could not get module #{ oParams.id }!"

	else
		# We add the standard template, params and names
		editor.setValue $( "#template_#{ oParams.type }" ).text()
		editor.moveCursorTo 0, 0
		if oParams.type is 'event_poller'
			$( '#input_id' ).val 'EmailYak'
			fAddUserParam 'apikey', true
			fAddUserParam '', false
		else
			$( '#input_id' ).val 'ProBinder'
			fAddUserParam 'username', false
			fAddUserParam 'password', true
			fAddUserParam '', false

window.addEventListener 'load', fOnLoad, true