158 lines
		
	
	
		
			4.7 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			158 lines
		
	
	
		
			4.7 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
#!/usr/bin/php
 | 
						|
<?php
 | 
						|
/*********************************************************************************
 | 
						|
 *
 | 
						|
 * TimeTrex is a Workforce Management program developed by
 | 
						|
 * TimeTrex Software Inc. Copyright (C) 2003 - 2021 TimeTrex Software Inc.
 | 
						|
 *
 | 
						|
 * This program is free software; you can redistribute it and/or modify it under
 | 
						|
 * the terms of the GNU Affero General Public License version 3 as published by
 | 
						|
 * the Free Software Foundation with the addition of the following permission
 | 
						|
 * added to Section 15 as permitted in Section 7(a): FOR ANY PART OF THE COVERED
 | 
						|
 * WORK IN WHICH THE COPYRIGHT IS OWNED BY TIMETREX, TIMETREX DISCLAIMS THE
 | 
						|
 * WARRANTY OF NON INFRINGEMENT OF THIRD PARTY RIGHTS.
 | 
						|
 *
 | 
						|
 * This program 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 Affero General Public License for more
 | 
						|
 * details.
 | 
						|
 *
 | 
						|
 *
 | 
						|
 * You should have received a copy of the GNU Affero General Public License along
 | 
						|
 * with this program; if not, see http://www.gnu.org/licenses or write to the Free
 | 
						|
 * Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
 | 
						|
 * 02110-1301 USA.
 | 
						|
 *
 | 
						|
 *
 | 
						|
 * You can contact TimeTrex headquarters at Unit 22 - 2475 Dobbin Rd. Suite
 | 
						|
 * #292 West Kelowna, BC V4T 2E9, Canada or at email address info@timetrex.com.
 | 
						|
 *
 | 
						|
 *
 | 
						|
 * The interactive user interfaces in modified source and object code versions
 | 
						|
 * of this program must display Appropriate Legal Notices, as required under
 | 
						|
 * Section 5 of the GNU Affero General Public License version 3.
 | 
						|
 *
 | 
						|
 *
 | 
						|
 * In accordance with Section 7(b) of the GNU Affero General Public License
 | 
						|
 * version 3, these Appropriate Legal Notices must retain the display of the
 | 
						|
 * "Powered by TimeTrex" logo. If the display of the logo is not reasonably
 | 
						|
 * feasible for technical reasons, the Appropriate Legal Notices must display
 | 
						|
 * the words "Powered by TimeTrex".
 | 
						|
 *
 | 
						|
 ********************************************************************************/
 | 
						|
/*
 | 
						|
 * File Contributed By: Open Source Consulting, S.A.   San Jose, Costa Rica.
 | 
						|
 * http://osc.co.cr
 | 
						|
 */
 | 
						|
if ( PHP_SAPI != 'cli' ) {
 | 
						|
	echo "This script can only be called from the Command Line.\n";
 | 
						|
	exit;
 | 
						|
}
 | 
						|
 | 
						|
// Calculates percent complete statistics for all locales.
 | 
						|
// Must be run from tools/i18n directory.
 | 
						|
$root_dir = '../../interface/locale';
 | 
						|
if ( count( $argv ) > 1 ) {
 | 
						|
	$root_dir = $argv[1];
 | 
						|
}
 | 
						|
 | 
						|
$d = opendir( $root_dir );
 | 
						|
 | 
						|
if ( $d ) {
 | 
						|
 | 
						|
	echo "calculating locale statistics...\n";
 | 
						|
 | 
						|
	$outpath = $root_dir . '/' . 'locale_stats.txt';
 | 
						|
	$fh = fopen( $outpath, 'w' );
 | 
						|
 | 
						|
	$ignore_dirs = [ '.', '..', 'CVS' ];
 | 
						|
	while ( false !== ( $file = readdir( $d ) ) ) {
 | 
						|
		if ( is_dir( $root_dir . '/' . $file ) && !in_array( $file, $ignore_dirs ) ) {
 | 
						|
			$stats = calcStats( $root_dir, $file );
 | 
						|
			$pct = $stats['pct_complete'];
 | 
						|
			$team = $stats['team'];
 | 
						|
			fwrite( $fh, "$file|$pct|$team\n" );
 | 
						|
		}
 | 
						|
	}
 | 
						|
	closedir( $d );
 | 
						|
 | 
						|
	fclose( $fh );
 | 
						|
 | 
						|
	echo "done. stats saved in $outpath\n";
 | 
						|
}
 | 
						|
 | 
						|
function calcStats( $root_dir, $locale ) {
 | 
						|
	$messages = 0;
 | 
						|
	$translations = 0;
 | 
						|
	$fuzzy = 0;
 | 
						|
 | 
						|
	$team = '';
 | 
						|
 | 
						|
	$path = $root_dir . '/' . $locale . '/LC_MESSAGES/messages.po';
 | 
						|
	// echo "<li><b>$path</b>";
 | 
						|
	if ( file_exists( $path ) ) {
 | 
						|
		$lines = file( $path );
 | 
						|
 | 
						|
		$in_msgid = false;
 | 
						|
		$in_msgstr = false;
 | 
						|
		$found_translation = false;
 | 
						|
		$found_msg = false;
 | 
						|
		foreach ( $lines as $line ) {
 | 
						|
			// ignore comment lines
 | 
						|
			if ( $line[0] == '#' ) {
 | 
						|
				continue;
 | 
						|
			}
 | 
						|
 | 
						|
			// Parse out the contributors.
 | 
						|
			if ( strstr( $line, '"Language-Team: ' ) ) {
 | 
						|
				$endpos = strpos( $line, '\n' );
 | 
						|
				if ( $endpos === false ) {
 | 
						|
					$endpos = strlen( $line ) - 2;
 | 
						|
				}
 | 
						|
				$len = strlen( '"Language-Team: ' );
 | 
						|
				$field = substr( $line, $len, $endpos - $len );
 | 
						|
				$names = explode( ',', $field );
 | 
						|
				foreach ( $names as $name ) {
 | 
						|
					if ( $name != 'none' ) {
 | 
						|
						if ( $team != '' ) {
 | 
						|
							$team .= ',';
 | 
						|
						}
 | 
						|
						$team .= trim( $name );
 | 
						|
					}
 | 
						|
				}
 | 
						|
			}
 | 
						|
 | 
						|
			if ( strstr( $line, 'msgid "' ) ) {
 | 
						|
				$in_msgid = true;
 | 
						|
				$in_msgstr = false;
 | 
						|
				$found_msg = false;
 | 
						|
				$found_translation = false;
 | 
						|
			}
 | 
						|
			if ( $in_msgid && !$found_msg && strstr( $line, '"' ) && !strstr( $line, '""' ) ) {
 | 
						|
				// echo "<li>msgid: $line";
 | 
						|
				$found_msg = true;
 | 
						|
				$messages++;
 | 
						|
			} else if ( strstr( $line, 'msgstr "' ) ) {
 | 
						|
				$in_msgstr = true;
 | 
						|
				$in_msgid = false;
 | 
						|
			}
 | 
						|
			if ( $in_msgstr && $found_msg && !$found_translation ) {
 | 
						|
				if ( strstr( $line, '"' ) && !strstr( $line, '""' ) ) {
 | 
						|
					// echo "<li>msgstr: $line";
 | 
						|
					$translations++;
 | 
						|
					$found_translation = true;
 | 
						|
				}
 | 
						|
			} else if ( strstr( $line, '#, fuzzy' ) ) {
 | 
						|
				$fuzzy++;
 | 
						|
			}
 | 
						|
		}
 | 
						|
	}
 | 
						|
	$translations -= $fuzzy;
 | 
						|
	$pct_complete = $messages ? (int)( ( $translations / $messages ) * 100 ) : 0;
 | 
						|
 | 
						|
	return [ 'pct_complete' => $pct_complete, 'team' => $team ];
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
?>
 |