silverstripe-frameworktest/code/FrameworktestRegressSessionAdmin.php

<?php
/**
 * Starts a test session with various configurations set in session.
 * These configurations are assumed to be evaluated in mysite/_config.php,
 * with custom switches for the different options.
 */
class FrameworktestRegressSessionAdmin extends Controller {
	
	protected $template = 'BlankPage';
	
	function init() {
		parent::init();
		
		if(!Permission::check('ADMIN')) return Security::permissionFailure($this);
	}
	
	function Link($action = null) {
		return Controller::join_links('dev', 'regress', $action);
	}
	
	function Form() {
		$isRunning = (Session::get('db'));
		
		if($isRunning) {
			$actions = new FieldSet(
				new FormAction('endsession', 'End Session')
			);
		} else {
			$actions = new FieldSet(
				new FormAction('startsession', 'Start Session')
			);
		}
		
		$form = new Form(
			$this,
			'Form',
			new FieldSet(
				new HeaderField('Header1', ($isRunning) ? 'Session is already running' : 'Start new regress session'),
				new LiteralField('Lit1', 
					'<p>Use this form to set configuration prior to starting a <a href="http://regress.silverstripe.com">regress.silverstripe.com</a> test session (manual testing).</p>'
				),
				$dbField = new DropdownField(
					'db',
					'Database',
					array(
						'mysql' => 'MySQL',
						'postgresql' => 'Postgres',
						'mssql' => 'MSSQL',
						'sqlite3' => 'SQLite3',
					),
					Session::get('db')
				),
				$chkField = new CheckboxField(
					'enabletranslatable',
					'Translatable?',
					Session::get('enabletranslatable')
				)
			),
			$actions
		);
		$dbField->setHasEmptyDefault(false);
		
		if($isRunning) {
			foreach($form->Fields() as $field) {
				$form->Fields()->replaceField($field->Name(), 
					$field->performReadonlyTransformation()
				);
			}
		}
		
		return $form;
	}

	function startsession($data, $form) {
		Session::set('enabletranslatable', (isset($data['enabletranslatable'])) ? $data['enabletranslatable'] : null);
		Session::set('db', $data['db']);
		
		return $this->redirect('dev/build/?BackURL=admin');
	}
	
	function endsession() {
		Session::set('enabletranslatable', null);
		Session::set('db', null);
		
		return $this->redirectBack();
	}
	
}