<?php
/**
 * Classify texts using ngrams. See help below for options.
 */
require_once __DIR__.'/TextCat.php';

$options = getopt( 'a:c:d:f:t:u:l:h' );

if ( isset( $options['h'] ) ) {
	$help = <<<HELP
{$argv[0]} [-d Dir] [-a Int] [-f Int] [-l Text] [-t Int] [-u Float]

    -a NUM  the program returns the best-scoring language together
            with all languages which are <N times worse (set by option -u).
            If the number of languages to be printed is larger than the value
            of this option then no language is returned, but
            instead a message that the input is of an unknown language is
            printed. Default: 10.
    -c LANG,LANG,...
            lists the candidate languages. Only languages listed will be
            considered for detection.
    -d DIR  indicates in which directory the language models are
            located (files ending in .lm). Currently only a single
            directory is supported. Default: ./LM .
    -f NUM  Before sorting is performed the Ngrams which occur this number
            of times or less are removed. This can be used to speed up
            the program for longer inputs. For short inputs you should use
            the default or -f 0. Default: 0.
    -l TEXT indicates that input is given as an argument on the command line,
            e.g. {$argv[0]} -l "this is english text"
            If this option is not given, the input is stdin.
    -t NUM  indicates the topmost number of ngrams that should be used.
            Default: 3000
    -u NUM  determines how much worse result must be in order not to be
            mentioned as an alternative. Typical value: 1.05 or 1.1.
            Default: 1.05.

HELP;
	echo $help;
	exit( 0 );
}

if ( !empty( $options['d'] ) ) {
	$dir = $options['d'];
} else {
	$dir = __DIR__."/LM";
}

$cat = new TextCat( $dir );

if ( !empty( $options['t'] ) ) {
	$cat->setMaxNgrams( intval( $options['t'] ) );
}
if ( !empty( $options['f'] ) ) {
	$cat->setMinFreq( intval( $options['f'] ) );
}

$input = isset( $options['l'] ) ? $options['l'] : file_get_contents( "php://stdin" );
if ( !empty( $options['c'] ) ) {
	$result = $cat->classify( $input, explode( ",", $options['c'] ) );
} else {
	$result = $cat->classify( $input );
}

if ( empty( $result ) ) {
	echo "No match found.\n";
	exit( 1 );
}

if ( !empty( $options['u'] ) ) {
	$max = reset( $result ) * $options['u'];
} else {
	$max = reset( $result ) * 1.05;
}

if ( !empty( $options['a'] ) ) {
	$top = $options['a'];
} else {
	$top = 10;
}
$result = array_filter( $result, function ( $res ) use( $max ) { return $res < $max;

} );
if ( $result && count( $result ) <= $top ) {
	echo join( " OR ", array_keys( $result ) ) . "\n";
	exit( 0 );
} else {
	echo "Cannot determine language.\n";
	exit( 1 );
}