13763c3f2SGreg Roach<?php 23763c3f2SGreg Roach/** 33763c3f2SGreg Roach * webtrees: online genealogy 4369c0ce6SGreg Roach * Copyright (C) 2016 webtrees development team 53763c3f2SGreg Roach * This program is free software: you can redistribute it and/or modify 63763c3f2SGreg Roach * it under the terms of the GNU General Public License as published by 73763c3f2SGreg Roach * the Free Software Foundation, either version 3 of the License, or 83763c3f2SGreg Roach * (at your option) any later version. 93763c3f2SGreg Roach * This program is distributed in the hope that it will be useful, 103763c3f2SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of 113763c3f2SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 123763c3f2SGreg Roach * GNU General Public License for more details. 133763c3f2SGreg Roach * You should have received a copy of the GNU General Public License 143763c3f2SGreg Roach * along with this program. If not, see <http://www.gnu.org/licenses/>. 153763c3f2SGreg Roach */ 1676692c8bSGreg Roachnamespace Fisharebest\Webtrees\Module; 1776692c8bSGreg Roach 180e62c4b8SGreg Roachuse Fisharebest\Webtrees\Auth; 190e62c4b8SGreg Roachuse Fisharebest\Webtrees\Filter; 203d7a8a4cSGreg Roachuse Fisharebest\Webtrees\Functions\FunctionsEdit; 210e62c4b8SGreg Roachuse Fisharebest\Webtrees\I18N; 220e62c4b8SGreg Roachuse Fisharebest\Webtrees\Stats; 230e62c4b8SGreg Roachuse Fisharebest\Webtrees\Theme; 243763c3f2SGreg Roach 253763c3f2SGreg Roach/** 263763c3f2SGreg Roach * Class TopGivenNamesModule 273763c3f2SGreg Roach */ 28e2a378d3SGreg Roachclass TopGivenNamesModule extends AbstractModule implements ModuleBlockInterface { 293763c3f2SGreg Roach /** {@inheritdoc} */ 303763c3f2SGreg Roach public function getTitle() { 313763c3f2SGreg Roach return /* I18N: Name of a module. Top=Most common */ I18N::translate('Top given names'); 323763c3f2SGreg Roach } 333763c3f2SGreg Roach 343763c3f2SGreg Roach /** {@inheritdoc} */ 353763c3f2SGreg Roach public function getDescription() { 363763c3f2SGreg Roach return /* I18N: Description of the “Top given names” module */ I18N::translate('A list of the most popular given names.'); 373763c3f2SGreg Roach } 383763c3f2SGreg Roach 3976692c8bSGreg Roach /** 4076692c8bSGreg Roach * Generate the HTML content of this block. 4176692c8bSGreg Roach * 4276692c8bSGreg Roach * @param int $block_id 4376692c8bSGreg Roach * @param bool $template 44727f238cSGreg Roach * @param string[] $cfg 4576692c8bSGreg Roach * 4676692c8bSGreg Roach * @return string 4776692c8bSGreg Roach */ 4876692c8bSGreg Roach public function getBlock($block_id, $template = true, $cfg = array()) { 493763c3f2SGreg Roach global $ctype, $WT_TREE; 503763c3f2SGreg Roach 51e2a378d3SGreg Roach $num = $this->getBlockSetting($block_id, 'num', '10'); 52e2a378d3SGreg Roach $infoStyle = $this->getBlockSetting($block_id, 'infoStyle', 'table'); 533763c3f2SGreg Roach 54838cc89dSGreg Roach foreach (array('num', 'infoStyle') as $name) { 553763c3f2SGreg Roach if (array_key_exists($name, $cfg)) { 563763c3f2SGreg Roach $$name = $cfg[$name]; 573763c3f2SGreg Roach } 583763c3f2SGreg Roach } 593763c3f2SGreg Roach 603763c3f2SGreg Roach $stats = new Stats($WT_TREE); 613763c3f2SGreg Roach 623763c3f2SGreg Roach $id = $this->getName() . $block_id; 633763c3f2SGreg Roach $class = $this->getName() . '_block'; 643763c3f2SGreg Roach if ($ctype === 'gedcom' && Auth::isManager($WT_TREE) || $ctype === 'user' && Auth::check()) { 659353052eSGreg Roach $title = '<a class="icon-admin" title="' . I18N::translate('Configure') . '" href="block_edit.php?block_id=' . $block_id . '&ged=' . $WT_TREE->getNameHtml() . '&ctype=' . $ctype . '"></a>'; 663763c3f2SGreg Roach } else { 673763c3f2SGreg Roach $title = ''; 683763c3f2SGreg Roach } 693763c3f2SGreg Roach if ($num == 1) { 703763c3f2SGreg Roach // I18N: i.e. most popular given name. 713763c3f2SGreg Roach $title .= I18N::translate('Top given name'); 723763c3f2SGreg Roach } else { 733763c3f2SGreg Roach // I18N: Title for a list of the most common given names, %s is a number. Note that a separate translation exists when %s is 1 743763c3f2SGreg Roach $title .= I18N::plural('Top %s given name', 'Top %s given names', $num, I18N::number($num)); 753763c3f2SGreg Roach } 763763c3f2SGreg Roach 773763c3f2SGreg Roach $content = '<div class="normal_inner_block">'; 783763c3f2SGreg Roach //Select List or Table 793763c3f2SGreg Roach switch ($infoStyle) { 803763c3f2SGreg Roach case "list": // Output style 1: Simple list style. Better suited to left side of page. 813763c3f2SGreg Roach if (I18N::direction() === 'ltr') { 823763c3f2SGreg Roach $padding = 'padding-left: 15px'; 833763c3f2SGreg Roach } else { 843763c3f2SGreg Roach $padding = 'padding-right: 15px'; 853763c3f2SGreg Roach } 863763c3f2SGreg Roach $params = array(1, $num, 'rcount'); 873763c3f2SGreg Roach // List Female names 883763c3f2SGreg Roach $totals = $stats->commonGivenFemaleTotals($params); 893763c3f2SGreg Roach if ($totals) { 903763c3f2SGreg Roach $content .= '<b>' . I18N::translate('Females') . '</b><div class="wrap" style="' . $padding . '">' . $totals . '</div><br>'; 913763c3f2SGreg Roach } 923763c3f2SGreg Roach // List Male names 933763c3f2SGreg Roach $totals = $stats->commonGivenMaleTotals($params); 943763c3f2SGreg Roach if ($totals) { 953763c3f2SGreg Roach $content .= '<b>' . I18N::translate('Males') . '</b><div class="wrap" style="' . $padding . '">' . $totals . '</div><br>'; 963763c3f2SGreg Roach } 973763c3f2SGreg Roach break; 983763c3f2SGreg Roach case "table": // Style 2: Tabular format. Narrow, 2 or 3 column table, good on right side of page 993763c3f2SGreg Roach $params = array(1, $num, 'rcount'); 1003763c3f2SGreg Roach $content .= '<table style="margin:auto;"> 101a86dd8b1SGreg Roach <tr> 1023763c3f2SGreg Roach <td>' . $stats->commonGivenFemaleTable($params) . '</td> 1033763c3f2SGreg Roach <td>' . $stats->commonGivenMaleTable($params) . '</td>'; 1043763c3f2SGreg Roach $content .= '</tr></table>'; 1053763c3f2SGreg Roach break; 1063763c3f2SGreg Roach } 1073763c3f2SGreg Roach $content .= "</div>"; 1083763c3f2SGreg Roach 1093763c3f2SGreg Roach if ($template) { 1103763c3f2SGreg Roach return Theme::theme()->formatBlock($id, $title, $class, $content); 1113763c3f2SGreg Roach } else { 1123763c3f2SGreg Roach return $content; 1133763c3f2SGreg Roach } 1143763c3f2SGreg Roach } 1153763c3f2SGreg Roach 1163763c3f2SGreg Roach /** {@inheritdoc} */ 1173763c3f2SGreg Roach public function loadAjax() { 1183763c3f2SGreg Roach return true; 1193763c3f2SGreg Roach } 1203763c3f2SGreg Roach 1213763c3f2SGreg Roach /** {@inheritdoc} */ 1223763c3f2SGreg Roach public function isUserBlock() { 1233763c3f2SGreg Roach return true; 1243763c3f2SGreg Roach } 1253763c3f2SGreg Roach 1263763c3f2SGreg Roach /** {@inheritdoc} */ 1273763c3f2SGreg Roach public function isGedcomBlock() { 1283763c3f2SGreg Roach return true; 1293763c3f2SGreg Roach } 1303763c3f2SGreg Roach 13176692c8bSGreg Roach /** 13276692c8bSGreg Roach * An HTML form to edit block settings 13376692c8bSGreg Roach * 13476692c8bSGreg Roach * @param int $block_id 13576692c8bSGreg Roach */ 1363763c3f2SGreg Roach public function configureBlock($block_id) { 1373763c3f2SGreg Roach if (Filter::postBool('save') && Filter::checkCsrf()) { 138e2a378d3SGreg Roach $this->setBlockSetting($block_id, 'num', Filter::postInteger('num', 1, 10000, 10)); 139e2a378d3SGreg Roach $this->setBlockSetting($block_id, 'infoStyle', Filter::post('infoStyle', 'list|table', 'table')); 1403763c3f2SGreg Roach } 1413763c3f2SGreg Roach 142e2a378d3SGreg Roach $num = $this->getBlockSetting($block_id, 'num', '10'); 143e2a378d3SGreg Roach $infoStyle = $this->getBlockSetting($block_id, 'infoStyle', 'table'); 1443763c3f2SGreg Roach 1453763c3f2SGreg Roach echo '<tr><td class="descriptionbox wrap width33">'; 146*4ba103aeSGreg Roach echo /* I18N: ... to show in a list */ I18N::translate('Number of given names'); 1473763c3f2SGreg Roach echo '</td><td class="optionbox">'; 1483763c3f2SGreg Roach echo '<input type="text" name="num" size="2" value="', $num, '">'; 1493763c3f2SGreg Roach echo '</td></tr>'; 1503763c3f2SGreg Roach 1513763c3f2SGreg Roach echo '<tr><td class="descriptionbox wrap width33">'; 1523763c3f2SGreg Roach echo I18N::translate('Presentation style'); 1533763c3f2SGreg Roach echo '</td><td class="optionbox">'; 1543d7a8a4cSGreg Roach echo FunctionsEdit::selectEditControl('infoStyle', array('list' => I18N::translate('list'), 'table' => I18N::translate('table')), null, $infoStyle, ''); 1553763c3f2SGreg Roach echo '</td></tr>'; 1563763c3f2SGreg Roach } 1573763c3f2SGreg Roach} 158