X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=www%2Fopening-stats.pl;h=e809088cbaf3af9f4e594c24f49560f9155f658a;hb=e6461fab78d394c5eecf3a18051142941cfbb644;hp=8e490c17d87f9441c9939a950a7f20186aad0de4;hpb=1067590eb03c8571f6e4aafc215b71bcb7a71001;p=remoteglot-book diff --git a/www/opening-stats.pl b/www/opening-stats.pl index 8e490c1..e809088 100755 --- a/www/opening-stats.pl +++ b/www/opening-stats.pl @@ -17,22 +17,10 @@ my $pid = IPC::Open2::open2($chld_out, $chld_in, "../binlookup", "../open.mtbl", # Root position. Basically ignore everything except the opening (and later some root game stuff). my $fen = $cgi->param('fen') // 'rnbqkbnr/pppppppp/8/8/8/8/PPPPPPPP/RNBQKBNR w KQkq - 0 1'; -my $prevfen = $cgi->param('prevfen') // ''; my $includetransp = $cgi->param('includetransp') // 1; my $pos = Position->from_fen($fen); -my ($json_root_pos, $root_aux_data); -if ($includetransp) { - ($json_root_pos, $root_aux_data) = get_json_move($pos, undef, $chld_in, $chld_out); -} else { - my $prev_pos_hash = 0; - if ($prevfen ne '') { - my $prevpos = Position->from_fen($prevfen); - my (undef, $prev_aux_data) = get_json_move($prevpos, undef, $chld_in, $chld_out); - $prev_pos_hash = $prev_aux_data->{'pos_hash'}; - } - ($json_root_pos, $root_aux_data) = get_json_move($pos, $prev_pos_hash, $chld_in, $chld_out); -} +my ($json_root_pos, $root_aux_data) = get_json_move($pos, undef, $chld_in, $chld_out); my $opening = $openings{$json_root_pos->{'opening_num'}} // 'A00: Start position'; my @json_moves = ($json_root_pos);