<?php

/*

Plugin Name: xili-dictionary

Plugin URI: http://dev.xiligroup.com/xili-dictionary/

Description: ONLY for >= WP 2.8. This plugin is a tool using wordpress's taxonomy for localized themes or multilingual themes managed by xili-language - a powerful tool to create .mo file(s) on the fly in the theme's folder and more... -

Author: MS

Version: 1.0.3

Author URI: http://dev.xiligroup.com

*/

# beta 1.0.3 - fixes some directories issues in (rare) xamp servers and in theme's terms import. Create .po with empty translations.

# beta 1.0.2 - JS and vars, create lang list, if xili-language absent, for international themes - lot of fixes

# beta 1.0.1 - add scripts for form with plural msg (id or str)

# beta 1.0.0 - use pomo libraries and classes - ONLY >= 2.8

# beta 0.9.9 - fixes existing msgid terms - better log display when importing theme's terms

# beta 0.9.8.2 - more html tags in msg str or id

# beta 0.9.8.1 - some fixes for IIS server and PHP 5.2.1

# beta 0.9.8 - WP 2.8 - fix query error

# beta 0.9.7.3 <- to - see readme.txt - from  0.9.4

# beta 0.9.3 - first published - 090131 MS

# This plugin is free software; you can redistribute it and/or

# modify it under the terms of the GNU Lesser General Public

# License as published by the Free Software Foundation; either

# version 2.1 of the License, or (at your option) any later version.

#

# This plugin is distributed in the hope that it will be useful,

# but WITHOUT ANY WARRANTY; without even the implied warranty of

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU

# Lesser General Public License for more details.

#

# You should have received a copy of the GNU Lesser General Public

# License along with this plugin; if not, write to the Free Software

# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

define('XILIDICTIONARY_VER','1.0.3');

include_once(ABSPATH . WPINC . '/pomo/po.php'); /* not included in wp-settings */

class xili_dictionary {

	var $subselect = ''; /* used to subselect by msgid or languages*/

	var $xililanguage = ''; /* neveractive isactive wasactive */

	var $tempoutput = "";

	var $langfolder ='/'; /* where po or mo files */

	var $xili_settings; /* saved in options */

	var $ossep = "/"; /* for recursive file search in xamp */

	function xili_dictionary($langsfolder = '/') {

		/* activated when first activation of plug */

		register_activation_hook(__FILE__,array(&$this,'xili_dictionary_activation'));

		$this->ossep = strtoupper(substr(PHP_OS,0,3)=='WIN')?'\\':'/'; /* for rare xamp servers*/

		/* get current settings - name of taxonomy - name of query-tag */

		$this->xililanguage_state();

		$this->xili_settings = get_option('xili_dictionary_settings');

		if(empty($this->xili_settings)) {

			$this->xili_dictionary_activation();

			$this->xili_settings = get_option('xili_dictionary_settings');			

		}

		define('DTAXONAME',$this->xili_settings['taxonomy']);

		define('XDDICTLANGS','xl-'.DTAXONAME.'-langs');

		/** * @since 1.0 */

		define('XPLURAL','[XPLURAL]'); /* to separate singular and plural entries */

		/* add new taxonomy in available taxonomies here dictionary terms */

		register_taxonomy( DTAXONAME, 'post',array('hierarchical' => true, 'update_count_callback' => ''));

		/* groups of terms by langs */

		register_taxonomy( XDDICTLANGS, 'term',array('hierarchical' => false, 'update_count_callback' => ''));

		/* test if version changed */

		$version = $this->xili_settings['version'];

		if ($version <= '0.2') {

				/* update relationships for grouping existing dictionary terms */

			$this->update_terms_langs_grouping();

			$this->xili_settings['version'] = '1.0';

			update_option('xili_dictionary_settings', $this->xili_settings);

		}

		$this->fill_default_languages_list();

		/* Actions */

		add_action('admin_menu', array(&$this,'xili_add_dict_pages'));

		add_action('init', array(&$this, 'init_textdomain'));

		add_filter('plugin_action_links',  array(&$this,'xilidict_filter_plugin_actions'), 10, 2);						

	}

	function xili_dictionary_activation() {

		$this->xili_settings = get_option('xili_dictionary_settings');

		if(empty($this->xili_settings)) { 

			$submitted_settings = array(

		    	'taxonomy'		=> 'dictionary',

		    	'langs_folder' => '',

		    	'version' 		=> '1.0'

	    	);

			update_option('xili_dictionary_settings', $submitted_settings);	

		} 			 	    

	}

	/** * add js in admin * @updated 1.0.2 */

	function xili_add_js() {

		wp_enqueue_script( 'xd-plural', '/'.PLUGINDIR.'/'.dirname(plugin_basename(__FILE__)).'/plural.php?var='.XPLURAL, array('jquery'), XILIDICTIONARY_VER);

	}

	/** *add admin menu and associated page */

	function xili_add_dict_pages() {

		 $this->thehook = add_management_page(__('Dictionary','xili-dictionary'), __('Dictionary','xili-dictionary'), 'import', 'dictionary_page', array(&$this,'xili_dictionary_settings'));

		  add_action('load-'.$this->thehook, array(&$this,'on_load_page'));

		  add_action( "admin_print_scripts-".$this->thehook, array(&$this,'xili_add_js'));		 

	}

	function on_load_page() {

			wp_enqueue_script('common');

			wp_enqueue_script('wp-lists');

			wp_enqueue_script('postbox');

			add_meta_box('xili-dictionary-sidebox-1', __('Message','xili-dictionary'), array(&$this,'on_sidebox_1_content'), $this->thehook , 'side', 'core');

			add_meta_box('xili-dictionary-sidebox-2', __('Info','xili-dictionary'), array(&$this,'on_sidebox_2_content'), $this->thehook , 'side', 'core');

	}

	/**

	 * Add action link(s) to plugins page

	 * 

	 * @since 0.9.3

	 * @author MS

	 * @copyright Dion Hulse, http://dd32.id.au/wordpress-plugins/?configure-link and scripts@schloebe.de

	 */

	function xilidict_filter_plugin_actions($links, $file){

		static $this_plugin;

		if (!$this_plugin ) $this_plugin = plugin_basename(__FILE__);

		if ($file == $this_plugin ) {

			$settings_link = '<a href="tools.php?&amp;page=dictionary_page">' . __('Settings') . '</a>';

			$links = array_merge( array($settings_link), $links); // before other links

		}

		return $links;

	}

	function init_textdomain() {

	/*multilingual for admin pages and menu*/

		load_plugin_textdomain('xili-dictionary',PLUGINDIR.'/'.dirname(plugin_basename(__FILE__)), dirname(plugin_basename(__FILE__)));

		if (!defined('THEME_LANGS_FOLDER')) { /* set or detect at least a .mo or .po */

			if ($this->xili_settings['langs_folder'] == "") {

				$this->find_files(get_template_directory(), '/.[mp]o$/', array(&$this,'searchpath'));

				update_option('xili_dictionary_settings', $this->xili_settings);

			}

			define('THEME_LANGS_FOLDER',$this->xili_settings['langs_folder']); // for bkwd compatibility with xili-dictionary

		}

	}

	function searchpath($path, $filename) { 

		$this->xili_settings['langs_folder'] = str_replace(get_template_directory(),'',$path);

	}

	function xililanguage_state() {

	/* test if xili-language is present or was present */

		if (class_exists('xili_language')) {

			$this->xililanguage = 'isactive';

		} else {

			/* test if language taxonomy relationships are present */

			$xl_settings = get_option('xili_language_settings');

			if (empty($xl_settings)) {

				$this->xililanguage = 'neveractive';

			} else {

				$this->xililanguage = 'wasactive';

			}			

		}	

	}

	/** * @since 1.02 */

	function fill_default_languages_list() {

		if ($this->xililanguage == 'neveractive' || $this->xililanguage == 'wasactive') {

			if 	(!$this->xili_settings[XDDICTLANGS]) {

				$default_langs_array = array( 

					'en_us' => array('en_US', 'english'),

					'fr_fr' => array('fr_FR', 'french'),

					'de_de' => array('de_DE', 'german'),

					'es_es' => array('es_ES', 'spanish'),

					'it_it' => array('it_IT', 'italian')

				);

				/* add wp admin lang */

				if (defined ('WPLANG')) { 

					$lkey = strtolower(WPLANG);

					if (!array_key_exists($lkey, $default_langs_array)) $default_langs_array[$lkey] = array (WPLANG, WPLANG);

				}

				$this->xili_settings[XDDICTLANGS] = $default_langs_array;

				update_option('xili_dictionary_settings', $this->xili_settings);

			}

		}

	}

	/**

	 * private function to update grouping of terms if xili-language is active

	 *

	 *

	 *

	 */

	function update_terms_langs_grouping() {

		if ($this->xililanguage == 'isactive') {

			$listdictiolines = get_terms(DTAXONAME, array('hide_empty' => false,'get'=>'all'));

			if (!empty($listdictiolines)) {

		    	foreach ($listdictiolines as $dictioline) {

		    		/* check slug before creating relationship if parent = O select msgid */

		    		if ($dictioline->parent != 0) {

		    			$extend = substr($dictioline->slug,-5);

			    		$lang = get_term_by('slug',$extend,TAXONAME,OBJECT);

			    		if ($lang) { 

			    			$term = $lang->name; 

			    		} else { 

			    			$term = $extend; 

			    		}

						$args = array( 'alias_of' => '', 'description' => 'Dictionary Group in '.$term, 'parent' => 0, 'slug' =>$extend);

				    	$theids = wp_insert_term( $term, XDDICTLANGS, $args);

			    		wp_set_object_terms((int) $dictioline->term_id, $extend, XDDICTLANGS,false);

		    		}

		    	}

		    }

		}	

	}

	/**

	 * private functions for dictionary_settings

	 * @since 0.9.3

	 *

	 * fill the content of the boxes (right side and normal)

	 * 

	 */

	function  on_sidebox_1_content($data) { 

		extract($data);

		?>

	 	<h4><?php _e('Note:','xili-dictionary') ?></h4>

		<p><?php echo $message;?></p>

		<?php

	}

	function  on_sidebox_2_content() { ?>

		<p><?php _e('xili-dictionary is a plugin (compatible with xili-language) to build a multilingual dictionary saved in the taxonomy tables of WordPress. With this dictionary, it is possible to create and update .mo file in the current theme folder. And more...','xili-dictionary') ?></p>

		<fieldset style="margin:2px; padding:12px 6px; border:1px solid #ccc;"><legend><?php echo __("Theme's informations:",'xili-dictionary').' ('.get_option("template").')'; ?></legend>

	 		<p>

				<?php $langfolder = (defined('THEME_LANGS_FOLDER')) ? THEME_LANGS_FOLDER : $this->xili_settings['langs_folder'];

				echo __("Languages sub-folder:",'xili-dictionary').' '. $langfolder; ?><br />

	 			<?php _e('Available MO files:','xili-dictionary'); echo '<br />';

	 			$this->find_files(get_template_directory(), '/.mo$/', array(&$this,'available_mo_files')) ;?>

	 		</p>

	 	</fieldset>

		<?php

	}

	function on_normal_1_content($data) { 

		extract($data); 

		$sortparent = (($this->subselect == '') ? '' : '&tagsgroup_parent_select='.$this->subselect );

		?>

			<table class="widefat">

				<thead>

				<tr>

					<th scope="col"><a href="?page=dictionary_page"><?php _e('ID') ?></a></th>

			        <th scope="col"><a href="?page=dictionary_page&amp;orderby=name<?php echo $sortparent; ?>"><?php _e('Text') ?></a></th>

			        <th scope="col"><a href="?page=dictionary_page&amp;orderby=slug<?php echo $sortparent; ?>"><?php _e('Slug','xili-dictionary') ?></a></th>

			        <th scope="col" ><?php _e('Group','xili-dictionary') ?></th>

			        <th colspan="2"><?php _e('Action') ?></th>

				</tr>

				</thead>

				<tbody id="the-list">

			<?php $this->xili_dict_row($orderby,$tagsnamelike,$tagsnamesearch); /* the lines */

			?>

				</tbody>

			</table>

			<?php if ($action=='edit' || $action=='delete') :?>

				<p>(<a href="?action=add&page=dictionary_page"><?php _e('Add a term','xili-dictionary') ?></a>)</p>

	   		<?php endif;	

	}	

	function on_normal_2_content($data) { 

		extract($data); 

	 	/* the create - edit - delete form */ ?>

	 	<div style="background:#f5f5fe;">

	 	<p id="add_edit"><?php _e($formhow,'xili-dictionary') ?></p>

		<?php 

		if ($action=='export' || $action=='importmo' || $action=='import' || $action=='exportpo' ) { ?>

			<label for="language_file">

			<select name="language_file" ><?php

	   			$extend = WPLANG;

	   			$listlanguages = get_terms(TAXONAME, array('hide_empty' => false));

				if (is_wp_error($listlanguages) || empty($listlanguages)) { 

					$langs_array = $this->xili_settings[XDDICTLANGS];

						echo '<option value="" >...</option>';	            	

	         		foreach ($langs_array as $lkey => $reflanguage) {

	         			echo '<option value="'.$reflanguage[0].'"'; 

	     				if ($extend == $reflanguage[0]) { 

	     					echo ' selected="selected"';

	     				} 

	     				echo ">".__($reflanguage[1],'xili-dictionary').'</option>';

	         		}

	     	 } else { 

	     			foreach ($listlanguages as $reflanguage) {

	     				echo '<option value="'.$reflanguage->name.'"'; 

	     				if ($extend == $reflanguage->name) { 

	     					echo ' selected="selected"';

	     				} 

	     				echo ">".__($reflanguage->description,'xili-dictionary').'</option>';	

	     			}

	     		} ?>

	     	</select></label>

	     	<br />&nbsp;<br />

			<input class="button" type="submit" name="reset" value="<?php echo $cancel_text ?>" />&nbsp;&nbsp;&nbsp;&nbsp;<input class="button-primary" type="submit" name="submit" value="<?php echo $submit_text ?>" /><br /></div>

		<?php

		} elseif ($action=='importcats' || $action=='erasedictionary' || $action=='importcurthemeterms') {

			?>

			<br />&nbsp;<br />

			<input class="button" type="submit" name="reset" value="<?php echo $cancel_text ?>" />&nbsp;&nbsp;&nbsp;&nbsp;

			<input class="button-primary" type="submit" name="submit" value="<?php echo $submit_text ?>" /><br /></div>

		<?php

		} else {

			//print_r($dictioline);

			/* rules for edit dictioline */

			$noedit = "" ; $noedited = "" ;

			if ($action=='edit' && $dictioline->parent == 0)   {

				$noedited = 'disabled="disabled"';

				$extend = "";

			} elseif ($action=='edit') {

			/* search default */

				$extend = substr($dictioline->slug,-5);

			} elseif ($action=='delete' && $dictioline->parent == 0) {	

				$noedit = 'disabled="disabled"';

				$extend = "";

			} elseif ($action=='delete') {

				$noedit = 'disabled="disabled"';

				$extend = substr($dictioline->slug,-5);

			}		

			?>

		<table class="editform" width="100%" cellspacing="2" cellpadding="5">

			<tr>

			<?php if ($action=='edit' || $action=='delete') { 

					$areacontent = $dictioline->description;

					$textareas = explode(XPLURAL,$dictioline->description);

					$firstcontent = $textareas[0]; /* also always before js splitting*/

				} else {

					$areacontent = "";

					$firstcontent = "";

				}

					?>

				<th scope="row" valign="top" align="right" width="25%"><label for="dictioline_description1">

					<?php 

					if ($action=='edit' && $dictioline->parent == 0) {

						_e('Full msgid (original)','xili-dictionary'); 

					} elseif ($action=='edit') {

						_e('Full msgstr (translation)','xili-dictionary');

					} else {

						_e('Full msg (id or str)','xili-dictionary');

					} ?> :&nbsp;</label>

					<textarea style="visibility:hidden" name="dictioline_description" id="dictioline_description" cols="12" rows="3"  disabled="disabled" ><?php echo $areacontent; ?></textarea>

				</th>

				<td align="left">

				<input type="hidden" id="termnblines" name="termnblines" value="1" />

				<div id="input1" style="margin-bottom:4px;" class="clonedInput">

				  <p id="areatitle1"><?php _e('Singular text','xili-dictionary'); ?></p>

				  <textarea style="visibility:visible" class="plural" name="dictioline_description1" id="dictioline_description1" cols="50" rows="3"  <?php echo $noedit; ?> ><?php echo $firstcontent; ?></textarea>

				</div>

				<?php if ($action != 'delete') { ?>

					<div>

						<span style="display:block; float:right; width:60%"><small>&nbsp;<?php _e('Use only plural terms if theme contains _n() functions','xili-dictionary') ?></small></span>

						<input type="button" id="btnAdd" value="<?php _e('Add a plural','xili-dictionary') ?>" />

						<input type="button" id="btnDel" value="<?php _e('Delete a plural','xili-dictionary') ?>" />

					</div>

				<?php } ?>

				</td>

			</tr>

			<tr class="form-field">

				<th scope="row" valign="top" align="right"><label for="dictioline_lang"><?php _e('Language','xili-dictionary') ?></label> :&nbsp;</th>

				<td>

	  				<select name="dictioline_lang" id="dictioline_lang"  <?php echo $noedit.$noedited;?> >

	  					<option value="" <?php if ($extend == '') { ?> selected="selected"<?php } ?>>

	  						<?php _e('default','xili-dictionary'); ?></option>

	  			<?php $listlanguages = get_terms(TAXONAME, array('hide_empty' => false,'slug' => $curlang));

					if (is_wp_error($listlanguages) || empty($listlanguages)) { 

						$langs_array = $this->xili_settings[XDDICTLANGS];

							foreach ($langs_array as $lkey => $reflanguage) {

	         				echo '<option value="'.$reflanguage[0].'"'; 

	     					if ($extend == strtolower($reflanguage[0])) {