Subversion Repositories eFlore/Projets.eflore-projets

<?php

/*

 * @author		Raphaël Droz <raphael@tela-botanica.org>

 * @copyright	Copyright (c) 2011, 2013 Tela Botanica (accueil@tela-botanica.org)

 * @license		http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL

 * @license		http://www.gnu.org/licenses/gpl.html Licence GNU-GPL

 *

 * Corrige les erreurs de saisie de nom à l'aide d'une recherche via un index sphinx

 * pour les observations ayant un nom saisi et dont l'un au moins de nom_ret[nn],

 * nt ou famille est NULL ou vide.

 *

 */

// time php -d memory_limit=1024M sphinx-maj-nom-ret.php 0 > sphinx-maj.log

// 23 secondes

// settings

define('USE_NVJFL', FALSE);

define('ESCAPE_ON_SPHINX_SYNERROR', TRUE);

define('TRY_FORCE_START_LINE', TRUE);

define('TRY_SPLIT',			   TRUE);

define('TRY_EXACT',			   TRUE);

define('TRY_REF',			   TRUE);

define('TRY_SPLIT_AND_AUTEUR', FALSE);

define('TRY_REMOVE_L',		   TRUE);

define('M_TRY_SPLIT',	0x01);

define('M_TRY_EXACT',	0x02);

define('M_TRY_REF',		0x04);

define('M_TRY_SPLIT_AND_AUTEUR',	0x08);

error_reporting(E_ALL);

$db = mysql_connect('localhost', 'root', '') or die('no mysql');

mysql_select_db('tb_cel', $db);

mysql_query("SET NAMES utf8", $db) or die('no sphinx');

$dbs = mysql_connect('127.0.0.1:9306', NULL, NULL, TRUE);

$req = <<<EOF

	SELECT id_observation, nom_sel, nom_sel_nn, nom_ret, nom_ret_nn, nt, famille, nom_referentiel

        FROM `cel_obs`

        WHERE nom_sel IS NOT NULL AND nom_sel != '' AND

		id_observation BETWEEN %d AND %d AND

		( nom_ret IS NULL or nom_ret = ''

		  OR nt IS NULL or nt = 0 or nt = ''

		  OR famille IS NULL or famille = '' )

	LIMIT %d, %d

EOF;

// non: car nom_ret_nn peut-être légitimement à 0 [taxon identifié, sans nom_retenu]

// OR nom_ret_nn IS NULL or nom_ret_nn = 0 or nom_ret_nn = ''

array_shift($argv);

$start = array_shift($argv);

$max = array_shift($argv);

$chunk_size = array_shift($argv);

if(!$start) $start = 0;

// 1036314

if(!$max) $max = intval(mysql_fetch_assoc(mysql_query("SELECT MAX(id_observation) AS max FROM cel_obs", $db))['max']) + 1;

if(!$chunk_size) $chunk_size = 50000;

// escape sphinx

$from = array ( '\\', '(',')','|','-','!','@','~','"','&', '/', '^', '$', '=', "'", "\x00", "\n", "\r", "\x1a" );

$to   = array ( '\\\\', '\\\(','\\\)','\\\|','\\\-','\\\!','\\\@','\\\~','\\\"', '\\\&', '\\\/', '\\\^', '\\\$', '\\\=', "\\'", "\\x00", "\\n", "\\r", "\\x1a" );

$stats = ['no_nom_sel' => ['count' => 0, 'data' => [] ],

		  'not found' => ['count' => 0, 'data' => [] ],

		  'too many' => ['count' => 0, 'data' => [] ],

		  'fixable' => ['count' => 0, 'data' => [] ],

		  'sauvages' => ['count' => 0, 'data' => [] ],

		  'sphinx errors' => ['count' => 0, 'data' => [] ],

		  'ref pb' => ['count' => 0, 'data' => [] ], ];

$sphinx_req = sprintf("SELECT * FROM i_bdtfx %s WHERE MATCH('%%s') LIMIT 5", USE_NVJFL ? ", i_nvjfl" : "");

for($current = 0; $current < intval($max/$chunk_size) + 1; $current++) {

	// printf("current = %d, chunk_size = %d, max = %d (rmax = %d) [real limit: %d]\n", $current, $chunk_size, $max, intval($max/$chunk_size) + 1, $current*$chunk_size);

	// printf(strtr($req, "\n", " ") . "\n", $start, $max, $current*$chunk_size, $chunk_size);

	$data = mysql_query(sprintf($req, $start, $max, $current*$chunk_size, $chunk_size), $db);

	if(!$data) { var_dump(mysql_error()); die('end'); }

	while($d = mysql_fetch_assoc($data)) {

		$n  = trim($d['nom_sel']);

		//d: fprintf(STDERR, "$n\n");

		if(!$n) {

			$stats['no_nom_sel']['count']++;

			// $stats['no_nom_sel']['data'][] = [$d['id_observation'], $n];*/

			continue;

		}

		if($n == 'Autre(s) espèce(s) (écrire le/les nom(s) dans les notes)' ||

		   $n == '-') {

			$stats['sauvages']['count']++;

			// $stats['sauvages']['data'][] = [$d['id_observation'], $n];

			continue;

		}

		$MASQUE = 0;

		if(TRY_REMOVE_L) {

			$n = str_replace(' L.','', $n);

		}

		$orig_n = $n;

	recherche:

		if(TRY_FORCE_START_LINE && !_has($MASQUE, M_TRY_EXACT)) {

			$n = '^' . $n;

		}

		$s = mysql_query(sprintf($sphinx_req, $n), $dbs);

		if(!$s && ESCAPE_ON_SPHINX_SYNERROR) {

			$s = mysql_query(sprintf($sphinx_req, str_replace($from,$to,$n)), $dbs);

		}

		if(!$s) {

			$stats['sphinx errors']['count']++;

			// $stats['sphinx errors']['data'][] = [$d['id_observation'], $orig_n];

			continue;

		}

		$c = mysql_num_rows($s);

		//d: fprintf(STDERR, "\t search [nb:%d] \"%s\" (msk:%d)\n", $c, $n, $MASQUE);

		if($c == 0) {

			if(TRY_SPLIT && !_has($MASQUE, M_TRY_SPLIT)) {

				require_once('lib-split-auteur.php');

				$MASQUE |= M_TRY_SPLIT;

				// $n = RechercheInfosTaxonBeta::supprimerAuteur($orig_n);

				// list($ret, $m) = RechercheInfosTaxonBeta::contientAuteur($orig_n);

				$ret = RechercheInfosTaxonBeta::supprimerAuteurBis($orig_n, $m);

				if($ret) {

					// printf("===================== SPLIT: contientAuteur \"%s\" [@%s @%s)\n", $orig_n, $ret, $m);

					$n = sprintf('%s @auteur %s', $ret, $m);

					goto recherche;

				}

			}

			if(TRY_SPLIT_AND_AUTEUR && !_has($MASQUE, M_TRY_SPLIT_AND_AUTEUR) && strpos($orig_n, ' ') !== FALSE) {

				require_once('lib-split-auteur.php');

				$MASQUE |= M_TRY_SPLIT_AND_AUTEUR;

				$ns = RechercheInfosTaxonBeta::supprimerAuteur($orig_n);

				if($ns) {

					$a = trim(substr($orig_n, strlen($n)));

					$n = sprintf("%s @auteur %s", $ns, $a);

					// echo "===================== SPLIT N/A: $n\n";

					goto recherche;

				}

			}

			$stats['not found']['count']++;

			// $stats['not found']['data'][] = [$d['id_observation'], $orig_n];

			continue;

		}

		if($c > 1) {

			if($c == 2) {

				if(mysql_fetch_array($s)['group_id'] !=

				   mysql_fetch_array($s)['group_id']) {

					// recherche donne seulement 2 résultats dans 2 référentiels

					// potentiellement fixable si l'on peut se référer à $d['nom_referentiel']

					$stats['ref pb']['count']++;

					// $stats['ref pb']['data'][] = [$d['id_observation'], $orig_n];

					continue;

				}

			}

			if(TRY_EXACT && !_has($MASQUE, M_TRY_EXACT)) {

				$MASQUE |= M_TRY_EXACT;

				$n = '"^' . trim($orig_n) . '$"';

				goto recherche;

			}

			if(TRY_REF && isset($d['nom_referentiel']) && !_has($MASQUE, M_TRY_REF)) {

				$MASQUE |= M_TRY_REF;

				$n = $orig_n . ' @group_id ' . $d['nom_referentiel'];

				goto recherche;

			}

			$stats['too many']['count']++;

			// $stats['too many']['data'][] = [$d['id_observation'], $orig_n];

			continue;

		}

	ok:

		$stats['fixable']['count']++;

		// $stats['fixable']['data'][] = [$d['id_observation'], $orig_n];

	}

}

function _has($v, $r) {

	return ($v & $r) == $r;

}

array_walk($stats, function(&$v) { unset($v['data']); });

print_r($stats);

printf("total traité: %d\n", array_sum(array_map(function($v) { return $v['count']; }, $stats)));