Initial version

application/classes/Config.php

@@ -0,0 +1,113 @@
+<?php defined('SYSPATH') or die('No direct access allowed.');
+
+/**
+ * This class extends the core Kohana class by adding some core application
+ * specific functions, and configuration.
+ *
+ * @package    WWZ
+ * @category   Helpers
+ * @author     Deon George
+ * @copyright  (c) 2014 Deon George
+ * @license    http://dev.leenooks.net/license.html
+ */
+class Config extends Kohana_Config {
+	// Our default logo, if there is no site logo
+	public static $logo = 'img/logo-small.png';
+
+	/**
+	 * Some early initialisation
+	 *
+	 * At this point, KH hasnt been fully initialised either, so we cant rely on
+	 * too many KH functions yet.
+	 *
+	 * NOTE: Kohana doesnt provide a parent construct for the Kohana_Config class.
+	 */
+	public function __construct() {
+	}
+
+	/**
+	 * Get the singleton instance of Config.
+	 *
+	 *     $config = Config::instance();
+	 *
+	 * @return  Config
+	 * @compat Restore KH 3.1 functionality
+	 */
+	public static function instance() {
+		if (Config::$_instance === NULL)
+			// Create a new instance
+			Config::$_instance = new Config;
+
+		return Config::$_instance;
+	}
+
+	/**
+	 * Return our caching mechanism
+	 */
+	public static function cachetype() {
+		return is_null(Kohana::$config->load('config')->cache_type) ? 'file' : Kohana::$config->load('config')->cache_type;
+	}
+
+	public static function copywrite() {
+		return '(c) 2014 Deon George';
+	}
+
+	public static function country() {
+		return NULL;
+	}
+
+	/**
+	 * Show a date using a site configured format
+	 */
+	public static function date($date) {
+		return (is_null($date) OR ! $date) ? '' : date('d-M-Y',$date);
+	}
+
+	public static function language() {
+		// @todo To implement
+		return 'auto';
+	}
+
+	/**
+	 * The URI to show for the login prompt.
+	 * Normally if the user is logged in, we can replace it with something else
+	 */
+	public static function login_uri() {
+		return ($ao = Auth::instance()->get_user() AND is_object($ao)) ? $ao->name() : HTML::anchor('login',_('Login'));
+	}
+
+	public static function logo() {
+		return HTML::image(static::logo_uri(),array('class'=>'headlogo','alt'=>_('Logo')));
+	}
+
+	public static function logo_uri($protocol=NULL) {
+		list ($path,$suffix) = explode('.',static::$logo);
+
+		return URL::site(Route::get('default/media')->uri(array('file'=>$path.'.'.$suffix),array('alt'=>static::sitename())),$protocol);
+	}
+
+	public static function siteid($format=FALSE) {
+		return '';
+	}
+
+	/**
+	 * Work out our site mode (dev,test,prod)
+	 */
+	public static function sitemode() {
+		return Kohana::$config->load('config.site')->mode;
+	}
+
+	public static function sitename() {
+		return 'AER Translate';
+	}
+
+	public static function theme() {
+		return 'theme/'.Kohana::$config->load('config')->theme;
+	}
+
+	public static function version() {
+		// @todo Work out our versioning
+		return 'TBA';
+	}
+}
+?>

application/classes/Controller/Translate.php

@@ -0,0 +1,218 @@
+<?php defined('SYSPATH') or die('No direct script access.');
+
+include_once 'includes/kohana/modules/simplehtmldom/classes/simple_html_dom.php';
+
+class Controller_Translate extends Controller_TemplateDefault {
+	private $_tags = array(
+'span.aer_title',
+'span.source_panel_heading',
+'td.section_heading',
+'td.standard_point ul li',
+'span.source_panel_heading',
+'td.document_name',
+'td.collection',
+'td.author',
+'td.business_case_heading',
+'span.source_panel_heading',
+'span.target_panel_heading',
+'td.grid_header',
+'td.tco_label',
+'td.summary_header',
+'td.summary_tag',
+'td.summary_data',
+'span.target_mig_panel_heading',
+	);
+
+	private function aer() {
+		$file = '/local/WEB/sites/net.leenooks.dev/aer/application/media/aer/Honda Foundry_aer.htm';
+
+		// Fix errors in the HTML file
+		$data = file_get_contents($file);
+		$data = preg_replace('/<td class="grid_total"<td class="grid_header">/','<td class="grid_header">',$data);
+
+		return $data;
+	}
+
+	public function action_index() {
+		HTTP::redirect(URL::link('','translate/render'));
+		$output = '';
+
+		Block::factory()
+			->title('Hello')
+			->title_icon('icon-cog')
+			->body($output);
+	}
+
+	public function action_import() {
+		$html = new simple_html_dom();
+		$html->load($this->aer());
+
+		$this->store($html->find('head',0)->find('title',0));
+
+		foreach ($this->_tags as $z)
+			foreach ($html->find($z) as $x)
+				$this->store($x);
+
+		HTTP::redirect(URL::link('','translate/index'));
+	}
+
+	public function action_render() {
+		$output = '';
+
+		if ($this->request->post('language_id')) {
+			$html = new simple_html_dom();
+			$html->load($this->aer());
+
+			$x = $html->find('head',0);
+			$x->innertext .= '<meta http-equiv="content-type" content="text/html;charset=utf-8">';
+			$lo = ORM::factory('Language',$this->request->post('language_id'));
+
+			foreach ($this->_tags as $z)
+				foreach ($html->find($z) as $x)
+					$x->innertext = $this->translate($x,$lo);
+
+			// Convert order the img tags
+			foreach ($html->find('img') as $z) {
+				$z->src = sprintf('%s/%s',URL::site('media/aer'),$z->src);
+			}
+
+			$this->response->body($html);
+			$this->auto_render = FALSE;
+ 
+		// We dont know what sort of payment type yet
+		} else {
+			$x = $this->lang();
+			$output .= Form::open();
+			$output .= Form::select('language_id',ORM::factory('Language')->list_select(),$x->id);
+			$output .= Form::button('submit','Submit',array('class'=>'btn btn-primary'));
+			$output .= Form::close();
+		}
+
+		Block::factory()
+			->title('Render in...')
+			->title_icon('icon-share')
+			->body($output);
+	}
+
+	public function action_save() {
+		foreach ($this->request->post('x') as $id => $value) {
+			if (! $value)
+				continue;
+
+			$to = ORM::factory('Translate',array('language_id'=>$this->request->post('language_id'),'original_id'=>$id));
+
+			$to->translation = $value;
+			$to->language_id = $this->request->post('language_id');
+			$to->original_id = $id;
+			$to->save();
+		}
+
+		HTTP::redirect(sprintf('%s?language_id=%s&page=%s',URL::link('','translate/text'),$this->request->post('language_id'),$this->request->post('page')));
+	}
+
+	private function lang() {
+		foreach ($this->request->accept_lang() as $k=>$v) {
+			if (strlen($k) == 2)
+				$k = sprintf('%s_%s',strtolower($k),strtoupper($k));
+			else {
+				list($k,$v) = preg_split('/[-_]/',$k,2);
+				$k = sprintf('%s_%s',strtolower($k),strtoupper($v));
+			}
+
+			if ($x=ORM::factory('Language',array('iso'=>$k)))
+				return $x;
+		}
+	}
+
+	private function store(simple_html_dom_node $x,$l=0) {
+		if ($x->children()) {
+			foreach ($x->children() as $y) {
+				$this->store($y,$l+1);
+				$y->innertext = '%s';
+			}
+		}
+
+		// If we have a numeric value, convert it to %d
+		$x->innertext = preg_replace('/[0-9.]+/','%d',$x->innertext);
+
+		$oo = ORM::factory('Original',array('sentence'=>$x->innertext));
+
+		if (! trim($x->innertext) or (in_array(trim($x->innertext),array('$','&nbsp;')) or preg_match('/%d%?$/',$x->innertext))) {
+			return $x->innertext;
+
+		} elseif (! $oo->loaded()) {
+			$oo->sentence = $x->innertext;
+			$oo->save();
+		}
+
+		return $x->innertext;
+	}
+
+	private function translate(simple_html_dom_node $x,Model_Language $lo,$l=0) {
+		$nums = NULL;
+		$matches = array();
+		$dom_tmp = str_get_html($x->outertext);
+		$dom_tmp_node = $dom_tmp->firstChild();
+
+		$string = $this->store($dom_tmp_node,$l);
+		$oo = ORM::factory('Original',array('sentence'=>$string));
+
+		// If we have numbers, we'll need to save them.
+		if (preg_match('/%d/',$string))
+			$nums = preg_match('/[0-9.]+/',$x->innertext,$matches);
+
+		if ($oo->loaded()) {
+			$to = ORM::factory('Translate',array('original_id'=>$oo->id,'language_id'=>$lo->id));
+
+			$string = $to->loaded() ? $to->translation : $x->innertext;
+		}
+
+		if ($nums && $nums == 1)
+			$string = str_replace('%d',$matches[0],$string);
+		elseif ($nums > 1)
+			throw HTTP_Exception::factory('501','Argh, didnt allow for more than 1 match');
+
+
+		if ($x->children()) {
+			foreach ($x->children() as $y) {
+				$string = preg_replace('/%s/',$this->translate($y,$lo,$l+1),$string);
+			}
+		}
+
+		return $string;
+	}
+
+	public function action_text() {
+		$output = '';
+
+		if ($this->request->query('language_id')) {
+
+			$output .= Form::open(URL::link('','translate/save'));
+			$output .= Form::hidden('language_id',$this->request->query('language_id'));
+
+			$oo = ORM::factory('Original')
+				->select('translate.translation')
+				->join('translate','LEFT OUTER')
+				->on('original.id','=','translate.original_id')
+				->on('translate.language_id','=',$this->request->query('language_id'));
+
+			$output .= View::factory('translate')
+				->set('o',$oo->find_all());
+
+		// We dont know what sort of payment type yet
+		} else {
+			$x = $this->lang();
+			$output .= Form::open(NULL,array('method'=>'GET'));
+			$output .= Form::select('language_id',ORM::factory('Language')->list_select(),$x->id);
+		}
+
+		$output .= Form::button('submit','Submit',array('class'=>'btn btn-primary'));
+		$output .= Form::close();
+
+		Block::factory()
+			->title('Translate Text')
+			->title_icon('icon-share')
+			->body($output);
+	}
+
+} // End Welcome

application/classes/Controller/Welcome.php

@@ -0,0 +1,10 @@
+<?php defined('SYSPATH') or die('No direct script access.');
+
+class Controller_Welcome extends Controller {
+
+	public function action_index()
+	{
+		HTTP::redirect(URL::link('','translate'));
+	}
+
+} // End Welcome

application/classes/Cookie.php

@@ -0,0 +1,15 @@
+<?php defined('SYSPATH') or die('No direct access allowed.');
+
+/**
+ * This class overrides Kohana's Cookie
+ *
+ * @package    AER
+ * @category   Modifications
+ * @author     Deon George
+ * @copyright  (c) 2014 Deon George
+ * @license    http://dev.leenooks.net/license.html
+ */
+class Cookie extends Kohana_Cookie {
+	public static $salt = 'AER';
+}
+?>

application/classes/Model/Language.php

@@ -0,0 +1,30 @@
+<?php defined('SYSPATH') or die('No direct access allowed.');
+
+/**
+ * This class supports AER Languages Memos.
+ *
+ * @package    AER
+ * @category   Models
+ * @author     Deon George
+ * @copyright  (c) 2014 Deon George
+ * @license    http://dev.leenooks.net/license.html
+ */
+class Model_Language extends ORM_OSB {
+	// Relationships
+	protected $_belongs_to = array(
+	);
+	protected $_has_one = array(
+	);
+
+	protected $_form = array('id'=>'id','value'=>'name');
+
+	/**
+	 * Filters used to format the display of values into friendlier values
+	 */
+	protected $_display_filters = array(
+		'date_orig'=>array(
+			array('Config::datetime',array(':value')),
+		),
+	);
+}
+?>

application/classes/Model/Original.php

@@ -0,0 +1,28 @@
+<?php defined('SYSPATH') or die('No direct access allowed.');
+
+/**
+ * This class supports AER Original Text Memos.
+ *
+ * @package    AER
+ * @category   Models
+ * @author     Deon George
+ * @copyright  (c) 2014 Deon George
+ * @license    http://dev.leenooks.net/license.html
+ */
+class Model_Original extends ORM_OSB {
+	// Relationships
+	protected $_belongs_to = array(
+	);
+	protected $_has_one = array(
+	);
+
+	/**
+	 * Filters used to format the display of values into friendlier values
+	 */
+	protected $_display_filters = array(
+		'date_orig'=>array(
+			array('Config::datetime',array(':value')),
+		),
+	);
+}
+?>

application/classes/Model/Translate.php

@@ -0,0 +1,30 @@
+<?php defined('SYSPATH') or die('No direct access allowed.');
+
+/**
+ * This class supports AER Translated Text.
+ *
+ * @package    AER
+ * @category   Models
+ * @author     Deon George
+ * @copyright  (c) 2014 Deon George
+ * @license    http://dev.leenooks.net/license.html
+ */
+class Model_Translate extends ORM_OSB {
+	// Relationships
+	protected $_belongs_to = array(
+	);
+	protected $_has_one = array(
+	);
+
+	protected $_form = array('id'=>'id','value'=>'translation');
+
+	/**
+	 * Filters used to format the display of values into friendlier values
+	 */
+	protected $_display_filters = array(
+		'date_orig'=>array(
+			array('Config::datetime',array(':value')),
+		),
+	);
+}
+?>

application/classes/ORM/OSB.php

@@ -0,0 +1,287 @@
+<?php defined('SYSPATH') or die('No direct access allowed.');
+
+/**
+ * This class extends Kohana's [ORM] class to create defaults for OSB.
+ *
+ * @package    OSB
+ * @category   Helpers
+ * @author     Deon George
+ * @copyright  (c) 2009-2013 Open Source Billing
+ * @license    http://dev.osbill.net/license.html
+ */
+abstract class ORM_OSB extends ORM {
+	/**
+	 * @var string Database to connect to
+	 */
+	protected $_db = 'default';
+
+	protected $_created_column = array('column'=>'date_orig','format'=>TRUE);
+	protected $_updated_column = array('column'=>'date_last','format'=>TRUE);
+
+	// Our attributes used in forms.
+	protected $_form = array();
+
+	// Our attributes that should be converted to NULL when empty
+	protected $_nullifempty = array();
+
+	// Our attribute values that need to be stored as serialized
+	protected $_serialize_column = array();
+
+	// If we need to load any sub items on loading this model
+	protected $_sub_items = array();
+	protected $_sub_items_load = array();
+	protected $_sub_items_sorted = FALSE;
+
+	// Rules to assist with site ID and getting next record ID for inserts.
+	public function xrules() {
+		return array(
+			'id'=>array(
+				array('ORM_OSB::get_next_id',array(':model',':field')),
+			),
+			'site_id'=>array(
+				array('ORM_OSB::set_site_id',array(':model',':field')),
+			),
+		);
+	}
+
+	/**
+	 * Retrieve and Store DB BLOB data.
+	 */
+	private function _blob($data,$set=FALSE) {
+		try {
+			return $set ? gzcompress($this->_serialize($data,$set)) : $this->_serialize(gzuncompress($data));
+
+		// Maybe the data isnt compressed?
+		} catch (Exception $e) {
+			return $this->_serialize($data,$set);
+		}
+	}
+
+	/**
+	 * Auto process some data as it comes from the database
+	 * @see parent::__get()
+	 */
+	public function __get($column) {
+		if (array_key_exists($column,$this->_table_columns)) {
+			// If the column is a blob, we'll decode it automatically
+			if (
+				$this->_table_columns[$column]['data_type'] == 'blob'
+				AND ! is_null($this->_object[$column])
+				AND ! isset($this->_changed[$column])
+				AND (! isset($this->_table_columns[$column]['auto_convert']) OR ! $this->_table_columns[$column]['auto_convert'])
+			) {
+
+				// In case our blob hasnt been saved as one.
+				try {
+					 $this->_object[$column] = $this->_blob($this->_object[$column]);
+				}
+				catch(Exception $e) {
+					HTTP_Exception::factory(501,Kohana_Exception::text($e));
+				}
+
+				$this->_table_columns[$column]['auto_convert'] = TRUE;
+			}
+
+			// If the column is a serialized object, we'll unserialize it.
+			if (
+				in_array($column,$this->_serialize_column)
+				AND is_string($this->_object[$column])
+				AND ! is_null($this->_object[$column])
+				AND ! isset($this->_changed[$column])
+				AND (! isset($this->_table_columns[$column]['unserialized']) OR ! $this->_table_columns[$column]['unserialized'])
+			) {
+
+				// In case our object hasnt been saved as serialized.
+				try {
+					$this->_object[$column] = unserialize($this->_object[$column]);
+				}
+				catch(Exception $e) {
+					HTTP_Exception::factory(501,Kohana_Exception::text($e));
+				}
+
+				$this->_table_columns[$column]['unserialized'] = TRUE;
+			}
+		}
+
+		return parent::__get($column);
+	}
+
+	/**
+	 * Intercept our object load, so that we can load our subitems
+	 */
+	protected function _load_values(array $values) {
+		parent::_load_values($values);
+
+		$sort = FALSE;
+		if ($this->_loaded AND $this->_sub_items_load AND count($this->_sub_items_load) == 1)
+			foreach ($this->_sub_items_load as $item => $sort)
+				$this->_sub_items = $this->$item->find_all()->as_array();
+
+		if ($sort) {
+			Sort::MAsort($this->_sub_items,$sort);
+			$this->_sub_items_sorted = TRUE;
+		}
+
+		return $this;
+	}
+
+	/**
+	 * If a column is marked to be nullified if it is empty, this is where it is done.
+	 */
+	private function _nullifempty(array $array) {
+		foreach ($array as $k=>$v) {
+			if (is_array($v)) {
+				if (is_null($x=$this->_nullifempty($v)))
+					unset($array[$k]);
+				else
+					$array[$k] = $x;
+
+			} elseif (! $v AND $v !== 0 AND $v !== '0')
+				unset($array[$k]);
+
+		}
+
+		return count($array) ? $array : NULL;
+	}
+
+	/**
+	 * Try and (un)serialize our data, and if it fails, just return it.
+	 */
+	private function _serialize($data,$set=FALSE) {
+		try {
+			return $set ? serialize($data) : unserialize($data);
+
+		// Maybe the data serialized?
+		} catch (Exception $e) {
+			return $data;
+		}
+	}
+
+	public function config($key) {
+		$mc = Config::instance()->module_config($this->_object_name);
+
+		return empty($mc[$key]) ? '' : $mc[$key];
+	}
+
+	public function dump() {
+		$result = array();
+
+		$result['this'] = $this->object();
+
+		foreach ($this->_sub_items as $o)
+			$result['sub'][] = $o->dump();
+
+		return $result;
+	}
+
+	/**
+	 * Get Next record id
+	 *
+	 * @param array Validate object
+	 * @param string Primary Key
+	 */
+	final public static function get_next_id($model,$field) {
+		if (! is_null($model->$field))
+			return TRUE;
+
+		$model->_changed[$field] = $field;
+
+		$ido = ORM::factory('Module')
+			->where('name','=',$model->_table_name)
+			->find();
+
+		if (! $ido->loaded())
+			throw new Kohana_Exception('Problem getting record_id for :table',array(':table'=>$model->_table_name));
+
+		$model->$field = $ido->record_id->next_id($ido->id);
+
+		return TRUE;
+	}
+
+	public function keyget($column,$key=NULL) {
+		if (is_null($key) OR ! is_array($this->$column))
+			return $this->$column;
+		else
+			return array_key_exists($key,$this->$column) ? $this->{$column}[$key] : NULL;
+	}
+
+	final public function mid() {
+		return ORM::factory('Module',array('name'=>$this->_table_name));
+	}
+
+	public function xsave(Validation $validation=NULL) {
+		// Find any fields that have changed, and process them.
+		if ($this->_changed)
+			foreach ($this->_changed as $c) {
+				// Any fields that are blobs, and encode them.
+				if (! is_null($this->_object[$c]) AND $this->_table_columns[$c]['data_type'] == 'blob') {
+					$this->_object[$c] = $this->_blob($this->_object[$c],TRUE);
+
+					// We need to reset our auto_convert flag
+					if (isset($this->_table_columns[$c]['auto_convert']))
+						$this->_table_columns[$c]['auto_convert'] = FALSE;
+
+				// Any fields that should be seriailzed, we'll do that.
+				} elseif (is_array($this->_object[$c]) AND in_array($c,$this->_serialize_column)) {
+					$this->_object[$c] = serialize($this->_object[$c]);
+				}
+
+				// Test if the value has still changed
+				if ($this->_original_values AND $this->_object[$c] == $this->_original_values[$c])
+					unset($this->_changed[$c]);
+			}
+
+		return parent::save($validation);
+	}
+
+	/**
+	 * Set the site ID attribute for each row update
+	 */
+	final public static function set_site_id($model,$field) {
+		if (! is_null($model->$field))
+			return TRUE;
+
+		$model->_changed[$field] = $field;
+		$model->$field = Company::instance()->site();
+
+		return TRUE;
+	}
+
+	public function subitems() {
+		return $this->_sub_items;
+	}
+
+	/**
+	 * Override the Kohana processing so we can null values if required.
+	 */
+	public function values(array $values,array $expected=NULL) {
+		foreach ($values as $k=>$v) {
+			// Convert to NULL
+			if (in_array($k,$this->_nullifempty)) {
+				if (is_array($v))
+					$values[$k] = $this->_nullifempty($v);
+
+				elseif (! $v AND $v !== 0 AND $v !== '0')
+					$values[$k] = NULL;
+			}
+		}
+
+		return parent::values($values,$expected);
+	}
+
+	/**
+	 * Function help to find records that are active
+	 */
+	public function list_active($active=TRUE) {
+		$x=($active ? $this->_where_active() : $this);
+
+		return $x->find_all();
+	}
+
+	public function list_count($active=TRUE) {
+		$x=($active ? $this->_where_active() : $this);
+
+		return $x->find_all()->count();
+	}
+}
+?>