18c2e8227SGreg Roach<?php 28c2e8227SGreg Roach/** 38c2e8227SGreg Roach * webtrees: online genealogy 48fcd0d32SGreg Roach * Copyright (C) 2019 webtrees development team 58c2e8227SGreg Roach * This program is free software: you can redistribute it and/or modify 68c2e8227SGreg Roach * it under the terms of the GNU General Public License as published by 78c2e8227SGreg Roach * the Free Software Foundation, either version 3 of the License, or 88c2e8227SGreg Roach * (at your option) any later version. 98c2e8227SGreg Roach * This program is distributed in the hope that it will be useful, 108c2e8227SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of 118c2e8227SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 128c2e8227SGreg Roach * GNU General Public License for more details. 138c2e8227SGreg Roach * You should have received a copy of the GNU General Public License 148c2e8227SGreg Roach * along with this program. If not, see <http://www.gnu.org/licenses/>. 158c2e8227SGreg Roach */ 16e7f56f2aSGreg Roachdeclare(strict_types=1); 17e7f56f2aSGreg Roach 1876692c8bSGreg Roachnamespace Fisharebest\Webtrees\Module; 1976692c8bSGreg Roach 200e62c4b8SGreg Roachuse Fisharebest\Webtrees\Auth; 21e5a6b4d4SGreg Roachuse Fisharebest\Webtrees\Contracts\UserInterface; 220bc54ba3SGreg Roachuse Fisharebest\Webtrees\Exceptions\FamilyNotFoundException; 230bc54ba3SGreg Roachuse Fisharebest\Webtrees\Exceptions\IndividualNotFoundException; 240bc54ba3SGreg Roachuse Fisharebest\Webtrees\Exceptions\MediaNotFoundException; 250bc54ba3SGreg Roachuse Fisharebest\Webtrees\Exceptions\NoteNotFoundException; 260bc54ba3SGreg Roachuse Fisharebest\Webtrees\Exceptions\RepositoryNotFoundException; 270bc54ba3SGreg Roachuse Fisharebest\Webtrees\Exceptions\SourceNotFoundException; 280e62c4b8SGreg Roachuse Fisharebest\Webtrees\Family; 295a78cd34SGreg Roachuse Fisharebest\Webtrees\Functions\FunctionsExport; 305a78cd34SGreg Roachuse Fisharebest\Webtrees\Gedcom; 310e62c4b8SGreg Roachuse Fisharebest\Webtrees\GedcomRecord; 320e62c4b8SGreg Roachuse Fisharebest\Webtrees\I18N; 330e62c4b8SGreg Roachuse Fisharebest\Webtrees\Individual; 345a78cd34SGreg Roachuse Fisharebest\Webtrees\Media; 350e62c4b8SGreg Roachuse Fisharebest\Webtrees\Menu; 365a78cd34SGreg Roachuse Fisharebest\Webtrees\Note; 375a78cd34SGreg Roachuse Fisharebest\Webtrees\Repository; 38e5a6b4d4SGreg Roachuse Fisharebest\Webtrees\Services\UserService; 390e62c4b8SGreg Roachuse Fisharebest\Webtrees\Session; 405a78cd34SGreg Roachuse Fisharebest\Webtrees\Source; 41aee13b6dSGreg Roachuse Fisharebest\Webtrees\Tree; 425a78cd34SGreg Roachuse League\Flysystem\Filesystem; 435a78cd34SGreg Roachuse League\Flysystem\ZipArchive\ZipArchiveAdapter; 445a78cd34SGreg Roachuse Symfony\Component\HttpFoundation\BinaryFileResponse; 455a78cd34SGreg Roachuse Symfony\Component\HttpFoundation\RedirectResponse; 465a78cd34SGreg Roachuse Symfony\Component\HttpFoundation\Request; 475a78cd34SGreg Roachuse Symfony\Component\HttpFoundation\Response; 485a78cd34SGreg Roachuse Symfony\Component\HttpFoundation\ResponseHeaderBag; 49e5a6b4d4SGreg Roachuse function str_replace; 508c2e8227SGreg Roach 518c2e8227SGreg Roach/** 528c2e8227SGreg Roach * Class ClippingsCartModule 538c2e8227SGreg Roach */ 5437eb8894SGreg Roachclass ClippingsCartModule extends AbstractModule implements ModuleMenuInterface 55c1010edaSGreg Roach{ 5649a243cbSGreg Roach use ModuleMenuTrait; 5749a243cbSGreg Roach 585a78cd34SGreg Roach // Routes that have a record which can be added to the clipboard 5916d6367aSGreg Roach private const ROUTES_WITH_RECORDS = [ 60c1010edaSGreg Roach 'family', 61c1010edaSGreg Roach 'individual', 62c1010edaSGreg Roach 'media', 63c1010edaSGreg Roach 'note', 64c1010edaSGreg Roach 'repository', 65c1010edaSGreg Roach 'source', 66c1010edaSGreg Roach ]; 675a78cd34SGreg Roach 6849a243cbSGreg Roach /** @var int The default access level for this module. It can be changed in the control panel. */ 6949a243cbSGreg Roach protected $access_level = Auth::PRIV_USER; 7049a243cbSGreg Roach 71961ec755SGreg Roach /** 72e5a6b4d4SGreg Roach * @var UserService 73e5a6b4d4SGreg Roach */ 74e5a6b4d4SGreg Roach private $user_service; 75e5a6b4d4SGreg Roach 76e5a6b4d4SGreg Roach /** 77e5a6b4d4SGreg Roach * ClippingsCartModule constructor. 78e5a6b4d4SGreg Roach * 79e5a6b4d4SGreg Roach * @param UserService $user_service 80e5a6b4d4SGreg Roach */ 81e5a6b4d4SGreg Roach public function __construct(UserService $user_service) 82e5a6b4d4SGreg Roach { 83e5a6b4d4SGreg Roach $this->user_service = $user_service; 84e5a6b4d4SGreg Roach } 85e5a6b4d4SGreg Roach 86e5a6b4d4SGreg Roach /** 870cfd6963SGreg Roach * How should this module be identified in the control panel, etc.? 88961ec755SGreg Roach * 89961ec755SGreg Roach * @return string 90961ec755SGreg Roach */ 9149a243cbSGreg Roach public function title(): string 92c1010edaSGreg Roach { 93bbb76c12SGreg Roach /* I18N: Name of a module */ 94bbb76c12SGreg Roach return I18N::translate('Clippings cart'); 958c2e8227SGreg Roach } 968c2e8227SGreg Roach 97961ec755SGreg Roach /** 98961ec755SGreg Roach * A sentence describing what this module does. 99961ec755SGreg Roach * 100961ec755SGreg Roach * @return string 101961ec755SGreg Roach */ 10249a243cbSGreg Roach public function description(): string 103c1010edaSGreg Roach { 104bbb76c12SGreg Roach /* I18N: Description of the “Clippings cart” module */ 105bbb76c12SGreg Roach return I18N::translate('Select records from your family tree and save them as a GEDCOM file.'); 1068c2e8227SGreg Roach } 1078c2e8227SGreg Roach 1080ee13198SGreg Roach /** 10949a243cbSGreg Roach * The default position for this menu. It can be changed in the control panel. 1100ee13198SGreg Roach * 1110ee13198SGreg Roach * @return int 1120ee13198SGreg Roach */ 1138f53f488SRico Sonntag public function defaultMenuOrder(): int 114c1010edaSGreg Roach { 115353b36abSGreg Roach return 6; 1168c2e8227SGreg Roach } 1178c2e8227SGreg Roach 1180ee13198SGreg Roach /** 1190ee13198SGreg Roach * A menu, to be added to the main application menu. 1200ee13198SGreg Roach * 121aee13b6dSGreg Roach * @param Tree $tree 122aee13b6dSGreg Roach * 1230ee13198SGreg Roach * @return Menu|null 1240ee13198SGreg Roach */ 12546295629SGreg Roach public function getMenu(Tree $tree): ?Menu 126c1010edaSGreg Roach { 1275a78cd34SGreg Roach $request = Request::createFromGlobals(); 1288c2e8227SGreg Roach 1299e648e55SGreg Roach $route = $request->get('route', ''); 1305a78cd34SGreg Roach 1315a78cd34SGreg Roach $submenus = [ 13249a243cbSGreg Roach new Menu($this->title(), route('module', [ 13326684e68SGreg Roach 'module' => $this->name(), 134c1010edaSGreg Roach 'action' => 'Show', 135aa6f03bbSGreg Roach 'ged' => $tree->name(), 136c1010edaSGreg Roach ]), 'menu-clippings-cart', ['rel' => 'nofollow']), 1375a78cd34SGreg Roach ]; 1385a78cd34SGreg Roach 1395a78cd34SGreg Roach if (in_array($route, self::ROUTES_WITH_RECORDS)) { 1409e648e55SGreg Roach $xref = $request->get('xref', ''); 1415a78cd34SGreg Roach $action = 'Add' . ucfirst($route); 142c1010edaSGreg Roach $add_route = route('module', [ 14326684e68SGreg Roach 'module' => $this->name(), 144c1010edaSGreg Roach 'action' => $action, 145c1010edaSGreg Roach 'xref' => $xref, 146aa6f03bbSGreg Roach 'ged' => $tree->name(), 147c1010edaSGreg Roach ]); 1485a78cd34SGreg Roach 14925b2dde3SGreg Roach $submenus[] = new Menu(I18N::translate('Add to the clippings cart'), $add_route, 'menu-clippings-add', ['rel' => 'nofollow']); 1508c2e8227SGreg Roach } 151cbc1590aSGreg Roach 1525a78cd34SGreg Roach if (!$this->isCartEmpty($tree)) { 153c1010edaSGreg Roach $submenus[] = new Menu(I18N::translate('Empty the clippings cart'), route('module', [ 15426684e68SGreg Roach 'module' => $this->name(), 155c1010edaSGreg Roach 'action' => 'Empty', 156aa6f03bbSGreg Roach 'ged' => $tree->name(), 157c1010edaSGreg Roach ]), 'menu-clippings-empty', ['rel' => 'nofollow']); 158c1010edaSGreg Roach $submenus[] = new Menu(I18N::translate('Download'), route('module', [ 15926684e68SGreg Roach 'module' => $this->name(), 160c1010edaSGreg Roach 'action' => 'DownloadForm', 161aa6f03bbSGreg Roach 'ged' => $tree->name(), 162c1010edaSGreg Roach ]), 'menu-clippings-download', ['rel' => 'nofollow']); 1635a78cd34SGreg Roach } 1645a78cd34SGreg Roach 16549a243cbSGreg Roach return new Menu($this->title(), '#', 'menu-clippings', ['rel' => 'nofollow'], $submenus); 1668c2e8227SGreg Roach } 1678c2e8227SGreg Roach 16876692c8bSGreg Roach /** 1695a78cd34SGreg Roach * @param Request $request 170b6db7c1fSGreg Roach * @param Tree $tree 17176692c8bSGreg Roach * 1725a78cd34SGreg Roach * @return BinaryFileResponse 17376692c8bSGreg Roach */ 174b6db7c1fSGreg Roach public function getDownloadAction(Request $request, Tree $tree): BinaryFileResponse 175c1010edaSGreg Roach { 1769e648e55SGreg Roach $privatize_export = $request->get('privatize_export', ''); 1775a78cd34SGreg Roach $convert = (bool) $request->get('convert'); 1788c2e8227SGreg Roach 17913abd6f3SGreg Roach $cart = Session::get('cart', []); 1808c2e8227SGreg Roach 181aa6f03bbSGreg Roach $xrefs = array_keys($cart[$tree->name()] ?? []); 1825a78cd34SGreg Roach 1835a78cd34SGreg Roach // Create a new/empty .ZIP file 1845a78cd34SGreg Roach $temp_zip_file = tempnam(sys_get_temp_dir(), 'webtrees-zip-'); 1855a78cd34SGreg Roach $zip_filesystem = new Filesystem(new ZipArchiveAdapter($temp_zip_file)); 1865a78cd34SGreg Roach 1875a78cd34SGreg Roach // Media file prefix 1885a78cd34SGreg Roach $path = $tree->getPreference('MEDIA_DIRECTORY'); 1895a78cd34SGreg Roach 1905a78cd34SGreg Roach // GEDCOM file header 191a3d8780cSGreg Roach $filetext = FunctionsExport::gedcomHeader($tree, $convert ? 'ANSI' : 'UTF-8'); 1925a78cd34SGreg Roach 1935a78cd34SGreg Roach switch ($privatize_export) { 1945a78cd34SGreg Roach case 'gedadmin': 1955a78cd34SGreg Roach $access_level = Auth::PRIV_NONE; 1965a78cd34SGreg Roach break; 1975a78cd34SGreg Roach case 'user': 1985a78cd34SGreg Roach $access_level = Auth::PRIV_USER; 1995a78cd34SGreg Roach break; 2005a78cd34SGreg Roach case 'visitor': 2015a78cd34SGreg Roach $access_level = Auth::PRIV_PRIVATE; 2025a78cd34SGreg Roach break; 2035a78cd34SGreg Roach case 'none': 2045a78cd34SGreg Roach default: 2055a78cd34SGreg Roach $access_level = Auth::PRIV_HIDE; 2065a78cd34SGreg Roach break; 2075a78cd34SGreg Roach } 2085a78cd34SGreg Roach 2095a78cd34SGreg Roach foreach ($xrefs as $xref) { 2105a78cd34SGreg Roach $object = GedcomRecord::getInstance($xref, $tree); 2115a78cd34SGreg Roach // The object may have been deleted since we added it to the cart.... 2125a78cd34SGreg Roach if ($object) { 2135a78cd34SGreg Roach $record = $object->privatizeGedcom($access_level); 2145a78cd34SGreg Roach // Remove links to objects that aren't in the cart 2158d0ebef0SGreg Roach preg_match_all('/\n1 ' . Gedcom::REGEX_TAG . ' @(' . Gedcom::REGEX_XREF . ')@(\n[2-9].*)*/', $record, $matches, PREG_SET_ORDER); 2165a78cd34SGreg Roach foreach ($matches as $match) { 2175a78cd34SGreg Roach if (!array_key_exists($match[1], $xrefs)) { 2185a78cd34SGreg Roach $record = str_replace($match[0], '', $record); 2195a78cd34SGreg Roach } 2205a78cd34SGreg Roach } 2218d0ebef0SGreg Roach preg_match_all('/\n2 ' . Gedcom::REGEX_TAG . ' @(' . Gedcom::REGEX_XREF . ')@(\n[3-9].*)*/', $record, $matches, PREG_SET_ORDER); 2225a78cd34SGreg Roach foreach ($matches as $match) { 2235a78cd34SGreg Roach if (!array_key_exists($match[1], $xrefs)) { 2245a78cd34SGreg Roach $record = str_replace($match[0], '', $record); 2255a78cd34SGreg Roach } 2265a78cd34SGreg Roach } 2278d0ebef0SGreg Roach preg_match_all('/\n3 ' . Gedcom::REGEX_TAG . ' @(' . Gedcom::REGEX_XREF . ')@(\n[4-9].*)*/', $record, $matches, PREG_SET_ORDER); 2285a78cd34SGreg Roach foreach ($matches as $match) { 2295a78cd34SGreg Roach if (!array_key_exists($match[1], $xrefs)) { 2305a78cd34SGreg Roach $record = str_replace($match[0], '', $record); 2315a78cd34SGreg Roach } 2325a78cd34SGreg Roach } 2335a78cd34SGreg Roach 23455167344SGreg Roach if ($object instanceof Individual || $object instanceof Family) { 2355a78cd34SGreg Roach $filetext .= $record . "\n"; 2365a78cd34SGreg Roach $filetext .= "1 SOUR @WEBTREES@\n"; 2371f273236SGreg Roach $filetext .= '2 PAGE ' . $object->url() . "\n"; 23855167344SGreg Roach } elseif ($object instanceof Source) { 2395a78cd34SGreg Roach $filetext .= $record . "\n"; 2401f273236SGreg Roach $filetext .= '1 NOTE ' . $object->url() . "\n"; 24155167344SGreg Roach } elseif ($object instanceof Media) { 24255167344SGreg Roach // Add the media files to the archive 2435a78cd34SGreg Roach foreach ($object->mediaFiles() as $media_file) { 2445a78cd34SGreg Roach if (file_exists($media_file->getServerFilename())) { 245e364afe4SGreg Roach $fp = fopen($media_file->getServerFilename(), 'rb'); 2465a78cd34SGreg Roach $zip_filesystem->writeStream($path . $media_file->filename(), $fp); 2475a78cd34SGreg Roach fclose($fp); 2485a78cd34SGreg Roach } 2495a78cd34SGreg Roach } 2505a78cd34SGreg Roach $filetext .= $record . "\n"; 25155167344SGreg Roach } else { 2525a78cd34SGreg Roach $filetext .= $record . "\n"; 2538c2e8227SGreg Roach } 2548c2e8227SGreg Roach } 2558c2e8227SGreg Roach } 2568c2e8227SGreg Roach 2575a78cd34SGreg Roach // Create a source, to indicate the source of the data. 2585a78cd34SGreg Roach $filetext .= "0 @WEBTREES@ SOUR\n1 TITL " . WT_BASE_URL . "\n"; 259e5a6b4d4SGreg Roach $author = $this->user_service->find((int) $tree->getPreference('CONTACT_USER_ID')); 2605a78cd34SGreg Roach if ($author !== null) { 261e5a6b4d4SGreg Roach $filetext .= '1 AUTH ' . $author->realName() . "\n"; 2625a78cd34SGreg Roach } 2635a78cd34SGreg Roach $filetext .= "0 TRLR\n"; 2645a78cd34SGreg Roach 2655a78cd34SGreg Roach // Make sure the preferred line endings are used 266a3d8780cSGreg Roach $filetext = str_replace('\n', Gedcom::EOL, $filetext); 2675a78cd34SGreg Roach 26855167344SGreg Roach if ($convert) { 2695a78cd34SGreg Roach $filetext = utf8_decode($filetext); 2708c2e8227SGreg Roach } 271cbc1590aSGreg Roach 2725a78cd34SGreg Roach // Finally add the GEDCOM file to the .ZIP file. 2735a78cd34SGreg Roach $zip_filesystem->write('clippings.ged', $filetext); 2745a78cd34SGreg Roach 2755a78cd34SGreg Roach // Need to force-close the filesystem 27602a92f80SGreg Roach unset($zip_filesystem); 2775a78cd34SGreg Roach 2785a78cd34SGreg Roach $response = new BinaryFileResponse($temp_zip_file); 2795a78cd34SGreg Roach $response->deleteFileAfterSend(true); 2805a78cd34SGreg Roach 2815a78cd34SGreg Roach $response->headers->set('Content-Type', 'application/zip'); 2825a78cd34SGreg Roach $response->setContentDisposition( 2835a78cd34SGreg Roach ResponseHeaderBag::DISPOSITION_ATTACHMENT, 2845a78cd34SGreg Roach 'clippings.zip' 2855a78cd34SGreg Roach ); 2865a78cd34SGreg Roach 2875a78cd34SGreg Roach return $response; 2888c2e8227SGreg Roach } 2898c2e8227SGreg Roach 2908c2e8227SGreg Roach /** 291b6db7c1fSGreg Roach * @param Tree $tree 292e5a6b4d4SGreg Roach * @param UserInterface $user 29376692c8bSGreg Roach * 2945a78cd34SGreg Roach * @return Response 2958c2e8227SGreg Roach */ 296e5a6b4d4SGreg Roach public function getDownloadFormAction(Tree $tree, UserInterface $user): Response 297c1010edaSGreg Roach { 2985a78cd34SGreg Roach $title = I18N::translate('Family tree clippings cart') . ' — ' . I18N::translate('Download'); 2998c2e8227SGreg Roach 3005a78cd34SGreg Roach return $this->viewResponse('modules/clippings/download', [ 3015a78cd34SGreg Roach 'is_manager' => Auth::isManager($tree, $user), 3025a78cd34SGreg Roach 'is_member' => Auth::isMember($tree, $user), 3035a78cd34SGreg Roach 'title' => $title, 3045a78cd34SGreg Roach ]); 3058c2e8227SGreg Roach } 3068c2e8227SGreg Roach 3075a78cd34SGreg Roach /** 308b6db7c1fSGreg Roach * @param Tree $tree 3095a78cd34SGreg Roach * 3105a78cd34SGreg Roach * @return RedirectResponse 3115a78cd34SGreg Roach */ 312b6db7c1fSGreg Roach public function getEmptyAction(Tree $tree): RedirectResponse 313c1010edaSGreg Roach { 3145a78cd34SGreg Roach $cart = Session::get('cart', []); 315aa6f03bbSGreg Roach $cart[$tree->name()] = []; 3165a78cd34SGreg Roach Session::put('cart', $cart); 3178c2e8227SGreg Roach 318c1010edaSGreg Roach $url = route('module', [ 31926684e68SGreg Roach 'module' => $this->name(), 320c1010edaSGreg Roach 'action' => 'Show', 321aa6f03bbSGreg Roach 'ged' => $tree->name(), 322c1010edaSGreg Roach ]); 3235a78cd34SGreg Roach 3245a78cd34SGreg Roach return new RedirectResponse($url); 3255a78cd34SGreg Roach } 3265a78cd34SGreg Roach 3275a78cd34SGreg Roach /** 3285a78cd34SGreg Roach * @param Request $request 329b6db7c1fSGreg Roach * @param Tree $tree 3305a78cd34SGreg Roach * 3315a78cd34SGreg Roach * @return RedirectResponse 3325a78cd34SGreg Roach */ 333b6db7c1fSGreg Roach public function postRemoveAction(Request $request, Tree $tree): RedirectResponse 334c1010edaSGreg Roach { 3359e648e55SGreg Roach $xref = $request->get('xref', ''); 3365a78cd34SGreg Roach 3375a78cd34SGreg Roach $cart = Session::get('cart', []); 338aa6f03bbSGreg Roach unset($cart[$tree->name()][$xref]); 3395a78cd34SGreg Roach Session::put('cart', $cart); 3405a78cd34SGreg Roach 341c1010edaSGreg Roach $url = route('module', [ 34226684e68SGreg Roach 'module' => $this->name(), 343c1010edaSGreg Roach 'action' => 'Show', 344aa6f03bbSGreg Roach 'ged' => $tree->name(), 345c1010edaSGreg Roach ]); 3465a78cd34SGreg Roach 3475a78cd34SGreg Roach return new RedirectResponse($url); 3485a78cd34SGreg Roach } 3495a78cd34SGreg Roach 3505a78cd34SGreg Roach /** 351b6db7c1fSGreg Roach * @param Tree $tree 3525a78cd34SGreg Roach * 3535a78cd34SGreg Roach * @return Response 3545a78cd34SGreg Roach */ 355b6db7c1fSGreg Roach public function getShowAction(Tree $tree): Response 356c1010edaSGreg Roach { 3575a78cd34SGreg Roach return $this->viewResponse('modules/clippings/show', [ 3585a78cd34SGreg Roach 'records' => $this->allRecordsInCart($tree), 3595a78cd34SGreg Roach 'title' => I18N::translate('Family tree clippings cart'), 3605a78cd34SGreg Roach 'tree' => $tree, 3615a78cd34SGreg Roach ]); 3625a78cd34SGreg Roach } 3635a78cd34SGreg Roach 3645a78cd34SGreg Roach /** 3655a78cd34SGreg Roach * @param Request $request 366b6db7c1fSGreg Roach * @param Tree $tree 3675a78cd34SGreg Roach * 3685a78cd34SGreg Roach * @return Response 3695a78cd34SGreg Roach */ 370b6db7c1fSGreg Roach public function getAddFamilyAction(Request $request, Tree $tree): Response 371c1010edaSGreg Roach { 3729e648e55SGreg Roach $xref = $request->get('xref', ''); 3735a78cd34SGreg Roach 3745a78cd34SGreg Roach $family = Family::getInstance($xref, $tree); 3755a78cd34SGreg Roach 3765a78cd34SGreg Roach if ($family === null) { 37759f2f229SGreg Roach throw new FamilyNotFoundException(); 3785a78cd34SGreg Roach } 3795a78cd34SGreg Roach 3805a78cd34SGreg Roach $options = $this->familyOptions($family); 3815a78cd34SGreg Roach 38239ca88baSGreg Roach $title = I18N::translate('Add %s to the clippings cart', $family->fullName()); 3835a78cd34SGreg Roach 3845a78cd34SGreg Roach return $this->viewResponse('modules/clippings/add-options', [ 3855a78cd34SGreg Roach 'options' => $options, 3865a78cd34SGreg Roach 'default' => key($options), 3875a78cd34SGreg Roach 'record' => $family, 3885a78cd34SGreg Roach 'title' => $title, 3895a78cd34SGreg Roach 'tree' => $tree, 3905a78cd34SGreg Roach ]); 3915a78cd34SGreg Roach } 3925a78cd34SGreg Roach 3935a78cd34SGreg Roach /** 3945a78cd34SGreg Roach * @param Family $family 3955a78cd34SGreg Roach * 3965a78cd34SGreg Roach * @return string[] 3975a78cd34SGreg Roach */ 398c1010edaSGreg Roach private function familyOptions(Family $family): array 399c1010edaSGreg Roach { 40039ca88baSGreg Roach $name = strip_tags($family->fullName()); 4015a78cd34SGreg Roach 4025a78cd34SGreg Roach return [ 4035a78cd34SGreg Roach 'parents' => $name, 404bbb76c12SGreg Roach /* I18N: %s is a family (husband + wife) */ 405bbb76c12SGreg Roach 'members' => I18N::translate('%s and their children', $name), 406bbb76c12SGreg Roach /* I18N: %s is a family (husband + wife) */ 407bbb76c12SGreg Roach 'descendants' => I18N::translate('%s and their descendants', $name), 4085a78cd34SGreg Roach ]; 4095a78cd34SGreg Roach } 4105a78cd34SGreg Roach 4115a78cd34SGreg Roach /** 4125a78cd34SGreg Roach * @param Request $request 413b6db7c1fSGreg Roach * @param Tree $tree 4145a78cd34SGreg Roach * 4155a78cd34SGreg Roach * @return RedirectResponse 4165a78cd34SGreg Roach */ 417b6db7c1fSGreg Roach public function postAddFamilyAction(Request $request, Tree $tree): RedirectResponse 418c1010edaSGreg Roach { 4199e648e55SGreg Roach $xref = $request->get('xref', ''); 4209e648e55SGreg Roach $option = $request->get('option', ''); 4215a78cd34SGreg Roach 4225a78cd34SGreg Roach $family = Family::getInstance($xref, $tree); 4235a78cd34SGreg Roach 4245a78cd34SGreg Roach if ($family === null) { 42559f2f229SGreg Roach throw new FamilyNotFoundException(); 4265a78cd34SGreg Roach } 4275a78cd34SGreg Roach 4285a78cd34SGreg Roach switch ($option) { 4295a78cd34SGreg Roach case 'parents': 4305a78cd34SGreg Roach $this->addFamilyToCart($family); 4315a78cd34SGreg Roach break; 4325a78cd34SGreg Roach 4335a78cd34SGreg Roach case 'members': 4345a78cd34SGreg Roach $this->addFamilyAndChildrenToCart($family); 4355a78cd34SGreg Roach break; 4365a78cd34SGreg Roach 4375a78cd34SGreg Roach case 'descendants': 4385a78cd34SGreg Roach $this->addFamilyAndDescendantsToCart($family); 4395a78cd34SGreg Roach break; 4405a78cd34SGreg Roach } 4415a78cd34SGreg Roach 4425a78cd34SGreg Roach return new RedirectResponse($family->url()); 4435a78cd34SGreg Roach } 4445a78cd34SGreg Roach 4455a78cd34SGreg Roach /** 4465a78cd34SGreg Roach * @param Family $family 44718d7a90dSGreg Roach * 44818d7a90dSGreg Roach * @return void 4495a78cd34SGreg Roach */ 450e364afe4SGreg Roach private function addFamilyToCart(Family $family): void 451c1010edaSGreg Roach { 4525a78cd34SGreg Roach $this->addRecordToCart($family); 4535a78cd34SGreg Roach 45439ca88baSGreg Roach foreach ($family->spouses() as $spouse) { 4555a78cd34SGreg Roach $this->addRecordToCart($spouse); 4565a78cd34SGreg Roach } 4575a78cd34SGreg Roach } 4585a78cd34SGreg Roach 4595a78cd34SGreg Roach /** 4605a78cd34SGreg Roach * @param Family $family 46118d7a90dSGreg Roach * 46218d7a90dSGreg Roach * @return void 4635a78cd34SGreg Roach */ 464e364afe4SGreg Roach private function addFamilyAndChildrenToCart(Family $family): void 465c1010edaSGreg Roach { 4665a78cd34SGreg Roach $this->addRecordToCart($family); 4675a78cd34SGreg Roach 46839ca88baSGreg Roach foreach ($family->spouses() as $spouse) { 4695a78cd34SGreg Roach $this->addRecordToCart($spouse); 4705a78cd34SGreg Roach } 47139ca88baSGreg Roach foreach ($family->children() as $child) { 4725a78cd34SGreg Roach $this->addRecordToCart($child); 4735a78cd34SGreg Roach } 4745a78cd34SGreg Roach } 4755a78cd34SGreg Roach 4765a78cd34SGreg Roach /** 4775a78cd34SGreg Roach * @param Family $family 47818d7a90dSGreg Roach * 47918d7a90dSGreg Roach * @return void 4805a78cd34SGreg Roach */ 481e364afe4SGreg Roach private function addFamilyAndDescendantsToCart(Family $family): void 482c1010edaSGreg Roach { 4835a78cd34SGreg Roach $this->addRecordToCart($family); 4845a78cd34SGreg Roach 48539ca88baSGreg Roach foreach ($family->spouses() as $spouse) { 4865a78cd34SGreg Roach $this->addRecordToCart($spouse); 4875a78cd34SGreg Roach } 48839ca88baSGreg Roach foreach ($family->children() as $child) { 4895a78cd34SGreg Roach $this->addRecordToCart($child); 49039ca88baSGreg Roach foreach ($child->spouseFamilies() as $child_family) { 4915a78cd34SGreg Roach $this->addFamilyAndDescendantsToCart($child_family); 4925a78cd34SGreg Roach } 4935a78cd34SGreg Roach } 4945a78cd34SGreg Roach } 4955a78cd34SGreg Roach 4965a78cd34SGreg Roach /** 4975a78cd34SGreg Roach * @param Request $request 498b6db7c1fSGreg Roach * @param Tree $tree 4995a78cd34SGreg Roach * 5005a78cd34SGreg Roach * @return Response 5015a78cd34SGreg Roach */ 502b6db7c1fSGreg Roach public function getAddIndividualAction(Request $request, Tree $tree): Response 503c1010edaSGreg Roach { 5049e648e55SGreg Roach $xref = $request->get('xref', ''); 5055a78cd34SGreg Roach 5065a78cd34SGreg Roach $individual = Individual::getInstance($xref, $tree); 5075a78cd34SGreg Roach 5085a78cd34SGreg Roach if ($individual === null) { 50959f2f229SGreg Roach throw new IndividualNotFoundException(); 5105a78cd34SGreg Roach } 5115a78cd34SGreg Roach 5125a78cd34SGreg Roach $options = $this->individualOptions($individual); 5135a78cd34SGreg Roach 51439ca88baSGreg Roach $title = I18N::translate('Add %s to the clippings cart', $individual->fullName()); 5155a78cd34SGreg Roach 5165a78cd34SGreg Roach return $this->viewResponse('modules/clippings/add-options', [ 5175a78cd34SGreg Roach 'options' => $options, 5185a78cd34SGreg Roach 'default' => key($options), 5195a78cd34SGreg Roach 'record' => $individual, 5205a78cd34SGreg Roach 'title' => $title, 5215a78cd34SGreg Roach 'tree' => $tree, 5225a78cd34SGreg Roach ]); 5235a78cd34SGreg Roach } 5245a78cd34SGreg Roach 5255a78cd34SGreg Roach /** 5265a78cd34SGreg Roach * @param Individual $individual 5275a78cd34SGreg Roach * 5285a78cd34SGreg Roach * @return string[] 5295a78cd34SGreg Roach */ 530c1010edaSGreg Roach private function individualOptions(Individual $individual): array 531c1010edaSGreg Roach { 53239ca88baSGreg Roach $name = strip_tags($individual->fullName()); 5335a78cd34SGreg Roach 53439ca88baSGreg Roach if ($individual->sex() === 'F') { 5355a78cd34SGreg Roach return [ 5365a78cd34SGreg Roach 'self' => $name, 5375a78cd34SGreg Roach 'parents' => I18N::translate('%s, her parents and siblings', $name), 5385a78cd34SGreg Roach 'spouses' => I18N::translate('%s, her spouses and children', $name), 5395a78cd34SGreg Roach 'ancestors' => I18N::translate('%s and her ancestors', $name), 5405a78cd34SGreg Roach 'ancestor_families' => I18N::translate('%s, her ancestors and their families', $name), 5415a78cd34SGreg Roach 'descendants' => I18N::translate('%s, her spouses and descendants', $name), 5425a78cd34SGreg Roach ]; 543b2ce94c6SRico Sonntag } 544b2ce94c6SRico Sonntag 5455a78cd34SGreg Roach return [ 5465a78cd34SGreg Roach 'self' => $name, 5475a78cd34SGreg Roach 'parents' => I18N::translate('%s, his parents and siblings', $name), 5485a78cd34SGreg Roach 'spouses' => I18N::translate('%s, his spouses and children', $name), 5495a78cd34SGreg Roach 'ancestors' => I18N::translate('%s and his ancestors', $name), 5505a78cd34SGreg Roach 'ancestor_families' => I18N::translate('%s, his ancestors and their families', $name), 5515a78cd34SGreg Roach 'descendants' => I18N::translate('%s, his spouses and descendants', $name), 5525a78cd34SGreg Roach ]; 5535a78cd34SGreg Roach } 5545a78cd34SGreg Roach 5555a78cd34SGreg Roach /** 5565a78cd34SGreg Roach * @param Request $request 557b6db7c1fSGreg Roach * @param Tree $tree 5585a78cd34SGreg Roach * 5595a78cd34SGreg Roach * @return RedirectResponse 5605a78cd34SGreg Roach */ 561b6db7c1fSGreg Roach public function postAddIndividualAction(Request $request, Tree $tree): RedirectResponse 562c1010edaSGreg Roach { 5639e648e55SGreg Roach $xref = $request->get('xref', ''); 5649e648e55SGreg Roach $option = $request->get('option', ''); 5655a78cd34SGreg Roach 5665a78cd34SGreg Roach $individual = Individual::getInstance($xref, $tree); 5675a78cd34SGreg Roach 5685a78cd34SGreg Roach if ($individual === null) { 56959f2f229SGreg Roach throw new IndividualNotFoundException(); 5705a78cd34SGreg Roach } 5715a78cd34SGreg Roach 5725a78cd34SGreg Roach switch ($option) { 5735a78cd34SGreg Roach case 'self': 5745a78cd34SGreg Roach $this->addRecordToCart($individual); 5755a78cd34SGreg Roach break; 5765a78cd34SGreg Roach 5775a78cd34SGreg Roach case 'parents': 57839ca88baSGreg Roach foreach ($individual->childFamilies() as $family) { 5795a78cd34SGreg Roach $this->addFamilyAndChildrenToCart($family); 5805a78cd34SGreg Roach } 5815a78cd34SGreg Roach break; 5825a78cd34SGreg Roach 5835a78cd34SGreg Roach case 'spouses': 58439ca88baSGreg Roach foreach ($individual->spouseFamilies() as $family) { 5855a78cd34SGreg Roach $this->addFamilyAndChildrenToCart($family); 5865a78cd34SGreg Roach } 5875a78cd34SGreg Roach break; 5885a78cd34SGreg Roach 5895a78cd34SGreg Roach case 'ancestors': 5905a78cd34SGreg Roach $this->addAncestorsToCart($individual); 5915a78cd34SGreg Roach break; 5925a78cd34SGreg Roach 5935a78cd34SGreg Roach case 'ancestor_families': 5945a78cd34SGreg Roach $this->addAncestorFamiliesToCart($individual); 5955a78cd34SGreg Roach break; 5965a78cd34SGreg Roach 5975a78cd34SGreg Roach case 'descendants': 59839ca88baSGreg Roach foreach ($individual->spouseFamilies() as $family) { 5995a78cd34SGreg Roach $this->addFamilyAndDescendantsToCart($family); 6005a78cd34SGreg Roach } 6015a78cd34SGreg Roach break; 6025a78cd34SGreg Roach } 6035a78cd34SGreg Roach 6045a78cd34SGreg Roach return new RedirectResponse($individual->url()); 6055a78cd34SGreg Roach } 6065a78cd34SGreg Roach 6075a78cd34SGreg Roach /** 6085a78cd34SGreg Roach * @param Individual $individual 60918d7a90dSGreg Roach * 61018d7a90dSGreg Roach * @return void 6115a78cd34SGreg Roach */ 612e364afe4SGreg Roach private function addAncestorsToCart(Individual $individual): void 613c1010edaSGreg Roach { 6145a78cd34SGreg Roach $this->addRecordToCart($individual); 6155a78cd34SGreg Roach 61639ca88baSGreg Roach foreach ($individual->childFamilies() as $family) { 61739ca88baSGreg Roach foreach ($family->spouses() as $parent) { 6185a78cd34SGreg Roach $this->addAncestorsToCart($parent); 6195a78cd34SGreg Roach } 6205a78cd34SGreg Roach } 6215a78cd34SGreg Roach } 6225a78cd34SGreg Roach 6235a78cd34SGreg Roach /** 6245a78cd34SGreg Roach * @param Individual $individual 62518d7a90dSGreg Roach * 62618d7a90dSGreg Roach * @return void 6275a78cd34SGreg Roach */ 628e364afe4SGreg Roach private function addAncestorFamiliesToCart(Individual $individual): void 629c1010edaSGreg Roach { 63039ca88baSGreg Roach foreach ($individual->childFamilies() as $family) { 6315a78cd34SGreg Roach $this->addFamilyAndChildrenToCart($family); 63239ca88baSGreg Roach foreach ($family->spouses() as $parent) { 6335a78cd34SGreg Roach $this->addAncestorsToCart($parent); 6345a78cd34SGreg Roach } 6355a78cd34SGreg Roach } 6365a78cd34SGreg Roach } 6375a78cd34SGreg Roach 6385a78cd34SGreg Roach /** 6395a78cd34SGreg Roach * @param Request $request 640b6db7c1fSGreg Roach * @param Tree $tree 6415a78cd34SGreg Roach * 6425a78cd34SGreg Roach * @return Response 6435a78cd34SGreg Roach */ 644b6db7c1fSGreg Roach public function getAddMediaAction(Request $request, Tree $tree): Response 645c1010edaSGreg Roach { 6469e648e55SGreg Roach $xref = $request->get('xref', ''); 6475a78cd34SGreg Roach 6485a78cd34SGreg Roach $media = Media::getInstance($xref, $tree); 6495a78cd34SGreg Roach 6505a78cd34SGreg Roach if ($media === null) { 65159f2f229SGreg Roach throw new MediaNotFoundException(); 6525a78cd34SGreg Roach } 6535a78cd34SGreg Roach 6545a78cd34SGreg Roach $options = $this->mediaOptions($media); 6555a78cd34SGreg Roach 65639ca88baSGreg Roach $title = I18N::translate('Add %s to the clippings cart', $media->fullName()); 6575a78cd34SGreg Roach 6585a78cd34SGreg Roach return $this->viewResponse('modules/clippings/add-options', [ 6595a78cd34SGreg Roach 'options' => $options, 6605a78cd34SGreg Roach 'default' => key($options), 6615a78cd34SGreg Roach 'record' => $media, 6625a78cd34SGreg Roach 'title' => $title, 6635a78cd34SGreg Roach 'tree' => $tree, 6645a78cd34SGreg Roach ]); 6655a78cd34SGreg Roach } 6665a78cd34SGreg Roach 6675a78cd34SGreg Roach /** 6685a78cd34SGreg Roach * @param Media $media 6695a78cd34SGreg Roach * 6705a78cd34SGreg Roach * @return string[] 6715a78cd34SGreg Roach */ 672c1010edaSGreg Roach private function mediaOptions(Media $media): array 673c1010edaSGreg Roach { 67439ca88baSGreg Roach $name = strip_tags($media->fullName()); 6755a78cd34SGreg Roach 6765a78cd34SGreg Roach return [ 6775a78cd34SGreg Roach 'self' => $name, 6785a78cd34SGreg Roach ]; 6795a78cd34SGreg Roach } 6805a78cd34SGreg Roach 6815a78cd34SGreg Roach /** 6825a78cd34SGreg Roach * @param Request $request 683b6db7c1fSGreg Roach * @param Tree $tree 6845a78cd34SGreg Roach * 6855a78cd34SGreg Roach * @return RedirectResponse 6865a78cd34SGreg Roach */ 687b6db7c1fSGreg Roach public function postAddMediaAction(Request $request, Tree $tree): RedirectResponse 688c1010edaSGreg Roach { 6899e648e55SGreg Roach $xref = $request->get('xref', ''); 6905a78cd34SGreg Roach 6915a78cd34SGreg Roach $media = Media::getInstance($xref, $tree); 6925a78cd34SGreg Roach 6935a78cd34SGreg Roach if ($media === null) { 69459f2f229SGreg Roach throw new MediaNotFoundException(); 6955a78cd34SGreg Roach } 6965a78cd34SGreg Roach 6975a78cd34SGreg Roach $this->addRecordToCart($media); 6985a78cd34SGreg Roach 6995a78cd34SGreg Roach return new RedirectResponse($media->url()); 7005a78cd34SGreg Roach } 7015a78cd34SGreg Roach 7025a78cd34SGreg Roach /** 7035a78cd34SGreg Roach * @param Request $request 704b6db7c1fSGreg Roach * @param Tree $tree 7055a78cd34SGreg Roach * 7065a78cd34SGreg Roach * @return Response 7075a78cd34SGreg Roach */ 708b6db7c1fSGreg Roach public function getAddNoteAction(Request $request, Tree $tree): Response 709c1010edaSGreg Roach { 7109e648e55SGreg Roach $xref = $request->get('xref', ''); 7115a78cd34SGreg Roach 7125a78cd34SGreg Roach $note = Note::getInstance($xref, $tree); 7135a78cd34SGreg Roach 7145a78cd34SGreg Roach if ($note === null) { 71559f2f229SGreg Roach throw new NoteNotFoundException(); 7165a78cd34SGreg Roach } 7175a78cd34SGreg Roach 7185a78cd34SGreg Roach $options = $this->noteOptions($note); 7195a78cd34SGreg Roach 72039ca88baSGreg Roach $title = I18N::translate('Add %s to the clippings cart', $note->fullName()); 7215a78cd34SGreg Roach 7225a78cd34SGreg Roach return $this->viewResponse('modules/clippings/add-options', [ 7235a78cd34SGreg Roach 'options' => $options, 7245a78cd34SGreg Roach 'default' => key($options), 7255a78cd34SGreg Roach 'record' => $note, 7265a78cd34SGreg Roach 'title' => $title, 7275a78cd34SGreg Roach 'tree' => $tree, 7285a78cd34SGreg Roach ]); 7295a78cd34SGreg Roach } 7305a78cd34SGreg Roach 7315a78cd34SGreg Roach /** 7325a78cd34SGreg Roach * @param Note $note 7335a78cd34SGreg Roach * 7345a78cd34SGreg Roach * @return string[] 7355a78cd34SGreg Roach */ 736c1010edaSGreg Roach private function noteOptions(Note $note): array 737c1010edaSGreg Roach { 73839ca88baSGreg Roach $name = strip_tags($note->fullName()); 7395a78cd34SGreg Roach 7405a78cd34SGreg Roach return [ 7415a78cd34SGreg Roach 'self' => $name, 7425a78cd34SGreg Roach ]; 7435a78cd34SGreg Roach } 7445a78cd34SGreg Roach 7455a78cd34SGreg Roach /** 7465a78cd34SGreg Roach * @param Request $request 747b6db7c1fSGreg Roach * @param Tree $tree 7485a78cd34SGreg Roach * 7495a78cd34SGreg Roach * @return RedirectResponse 7505a78cd34SGreg Roach */ 751b6db7c1fSGreg Roach public function postAddNoteAction(Request $request, Tree $tree): RedirectResponse 752c1010edaSGreg Roach { 7539e648e55SGreg Roach $xref = $request->get('xref', ''); 7545a78cd34SGreg Roach 7555a78cd34SGreg Roach $note = Note::getInstance($xref, $tree); 7565a78cd34SGreg Roach 7575a78cd34SGreg Roach if ($note === null) { 75859f2f229SGreg Roach throw new NoteNotFoundException(); 7595a78cd34SGreg Roach } 7605a78cd34SGreg Roach 7615a78cd34SGreg Roach $this->addRecordToCart($note); 7625a78cd34SGreg Roach 7635a78cd34SGreg Roach return new RedirectResponse($note->url()); 7645a78cd34SGreg Roach } 7655a78cd34SGreg Roach 7665a78cd34SGreg Roach /** 7675a78cd34SGreg Roach * @param Request $request 768b6db7c1fSGreg Roach * @param Tree $tree 7695a78cd34SGreg Roach * 7705a78cd34SGreg Roach * @return Response 7715a78cd34SGreg Roach */ 772b6db7c1fSGreg Roach public function getAddRepositoryAction(Request $request, Tree $tree): Response 773c1010edaSGreg Roach { 7749e648e55SGreg Roach $xref = $request->get('xref', ''); 7755a78cd34SGreg Roach 7765a78cd34SGreg Roach $repository = Repository::getInstance($xref, $tree); 7775a78cd34SGreg Roach 7785a78cd34SGreg Roach if ($repository === null) { 77959f2f229SGreg Roach throw new RepositoryNotFoundException(); 7805a78cd34SGreg Roach } 7815a78cd34SGreg Roach 7825a78cd34SGreg Roach $options = $this->repositoryOptions($repository); 7835a78cd34SGreg Roach 78439ca88baSGreg Roach $title = I18N::translate('Add %s to the clippings cart', $repository->fullName()); 7855a78cd34SGreg Roach 7865a78cd34SGreg Roach return $this->viewResponse('modules/clippings/add-options', [ 7875a78cd34SGreg Roach 'options' => $options, 7885a78cd34SGreg Roach 'default' => key($options), 7895a78cd34SGreg Roach 'record' => $repository, 7905a78cd34SGreg Roach 'title' => $title, 7915a78cd34SGreg Roach 'tree' => $tree, 7925a78cd34SGreg Roach ]); 7935a78cd34SGreg Roach } 7945a78cd34SGreg Roach 7955a78cd34SGreg Roach /** 7965a78cd34SGreg Roach * @param Repository $repository 7975a78cd34SGreg Roach * 7985a78cd34SGreg Roach * @return string[] 7995a78cd34SGreg Roach */ 800c1010edaSGreg Roach private function repositoryOptions(Repository $repository): array 801c1010edaSGreg Roach { 80239ca88baSGreg Roach $name = strip_tags($repository->fullName()); 8035a78cd34SGreg Roach 8045a78cd34SGreg Roach return [ 8055a78cd34SGreg Roach 'self' => $name, 8065a78cd34SGreg Roach ]; 8075a78cd34SGreg Roach } 8085a78cd34SGreg Roach 8095a78cd34SGreg Roach /** 8105a78cd34SGreg Roach * @param Request $request 811b6db7c1fSGreg Roach * @param Tree $tree 8125a78cd34SGreg Roach * 8135a78cd34SGreg Roach * @return RedirectResponse 8145a78cd34SGreg Roach */ 815b6db7c1fSGreg Roach public function postAddRepositoryAction(Request $request, Tree $tree): RedirectResponse 816c1010edaSGreg Roach { 8179e648e55SGreg Roach $xref = $request->get('xref', ''); 8185a78cd34SGreg Roach 8195a78cd34SGreg Roach $repository = Repository::getInstance($xref, $tree); 8205a78cd34SGreg Roach 8215a78cd34SGreg Roach if ($repository === null) { 82259f2f229SGreg Roach throw new RepositoryNotFoundException(); 8235a78cd34SGreg Roach } 8245a78cd34SGreg Roach 8255a78cd34SGreg Roach $this->addRecordToCart($repository); 8265a78cd34SGreg Roach 8275a78cd34SGreg Roach return new RedirectResponse($repository->url()); 8285a78cd34SGreg Roach } 8295a78cd34SGreg Roach 8305a78cd34SGreg Roach /** 8315a78cd34SGreg Roach * @param Request $request 832b6db7c1fSGreg Roach * @param Tree $tree 8335a78cd34SGreg Roach * 8345a78cd34SGreg Roach * @return Response 8355a78cd34SGreg Roach */ 836b6db7c1fSGreg Roach public function getAddSourceAction(Request $request, Tree $tree): Response 837c1010edaSGreg Roach { 8389e648e55SGreg Roach $xref = $request->get('xref', ''); 8395a78cd34SGreg Roach 8405a78cd34SGreg Roach $source = Source::getInstance($xref, $tree); 8415a78cd34SGreg Roach 8425a78cd34SGreg Roach if ($source === null) { 84359f2f229SGreg Roach throw new SourceNotFoundException(); 8445a78cd34SGreg Roach } 8455a78cd34SGreg Roach 8465a78cd34SGreg Roach $options = $this->sourceOptions($source); 8475a78cd34SGreg Roach 84839ca88baSGreg Roach $title = I18N::translate('Add %s to the clippings cart', $source->fullName()); 8495a78cd34SGreg Roach 8505a78cd34SGreg Roach return $this->viewResponse('modules/clippings/add-options', [ 8515a78cd34SGreg Roach 'options' => $options, 8525a78cd34SGreg Roach 'default' => key($options), 8535a78cd34SGreg Roach 'record' => $source, 8545a78cd34SGreg Roach 'title' => $title, 8555a78cd34SGreg Roach 'tree' => $tree, 8565a78cd34SGreg Roach ]); 8575a78cd34SGreg Roach } 8585a78cd34SGreg Roach 8595a78cd34SGreg Roach /** 8605a78cd34SGreg Roach * @param Source $source 8615a78cd34SGreg Roach * 8625a78cd34SGreg Roach * @return string[] 8635a78cd34SGreg Roach */ 864c1010edaSGreg Roach private function sourceOptions(Source $source): array 865c1010edaSGreg Roach { 86639ca88baSGreg Roach $name = strip_tags($source->fullName()); 8675a78cd34SGreg Roach 8685a78cd34SGreg Roach return [ 86939ca88baSGreg Roach 'only' => strip_tags($source->fullName()), 8705a78cd34SGreg Roach 'linked' => I18N::translate('%s and the individuals that reference it.', $name), 8715a78cd34SGreg Roach ]; 8725a78cd34SGreg Roach } 8735a78cd34SGreg Roach 8745a78cd34SGreg Roach /** 8755a78cd34SGreg Roach * @param Request $request 876b6db7c1fSGreg Roach * @param Tree $tree 8775a78cd34SGreg Roach * 8785a78cd34SGreg Roach * @return RedirectResponse 8795a78cd34SGreg Roach */ 880b6db7c1fSGreg Roach public function postAddSourceAction(Request $request, Tree $tree): RedirectResponse 881c1010edaSGreg Roach { 8829e648e55SGreg Roach $xref = $request->get('xref', ''); 8839e648e55SGreg Roach $option = $request->get('option', ''); 8845a78cd34SGreg Roach 8855a78cd34SGreg Roach $source = Source::getInstance($xref, $tree); 8865a78cd34SGreg Roach 8875a78cd34SGreg Roach if ($source === null) { 88859f2f229SGreg Roach throw new SourceNotFoundException(); 8895a78cd34SGreg Roach } 8905a78cd34SGreg Roach 8915a78cd34SGreg Roach $this->addRecordToCart($source); 8925a78cd34SGreg Roach 8935a78cd34SGreg Roach if ($option === 'linked') { 8945a78cd34SGreg Roach foreach ($source->linkedIndividuals('SOUR') as $individual) { 8955a78cd34SGreg Roach $this->addRecordToCart($individual); 8965a78cd34SGreg Roach } 8975a78cd34SGreg Roach foreach ($source->linkedFamilies('SOUR') as $family) { 8985a78cd34SGreg Roach $this->addRecordToCart($family); 8995a78cd34SGreg Roach } 9005a78cd34SGreg Roach } 9015a78cd34SGreg Roach 9025a78cd34SGreg Roach return new RedirectResponse($source->url()); 9035a78cd34SGreg Roach } 9045a78cd34SGreg Roach 9055a78cd34SGreg Roach /** 9065a78cd34SGreg Roach * Get all the records in the cart. 9075a78cd34SGreg Roach * 9085a78cd34SGreg Roach * @param Tree $tree 9095a78cd34SGreg Roach * 9105a78cd34SGreg Roach * @return GedcomRecord[] 9115a78cd34SGreg Roach */ 912c1010edaSGreg Roach private function allRecordsInCart(Tree $tree): array 913c1010edaSGreg Roach { 9145a78cd34SGreg Roach $cart = Session::get('cart', []); 9155a78cd34SGreg Roach 916aa6f03bbSGreg Roach $xrefs = array_keys($cart[$tree->name()] ?? []); 9175a78cd34SGreg Roach 9185a78cd34SGreg Roach // Fetch all the records in the cart. 919*0b5fd0a6SGreg Roach $records = array_map(static function (string $xref) use ($tree): GedcomRecord { 9205a78cd34SGreg Roach return GedcomRecord::getInstance($xref, $tree); 9215a78cd34SGreg Roach }, $xrefs); 9225a78cd34SGreg Roach 9235a78cd34SGreg Roach // Some records may have been deleted after they were added to the cart. 9245a78cd34SGreg Roach $records = array_filter($records); 9255a78cd34SGreg Roach 9265a78cd34SGreg Roach // Group and sort. 927*0b5fd0a6SGreg Roach uasort($records, static function (GedcomRecord $x, GedcomRecord $y): int { 928c156e8f5SGreg Roach return $x::RECORD_TYPE <=> $y::RECORD_TYPE ?: GedcomRecord::nameComparator()($x, $y); 9295a78cd34SGreg Roach }); 9305a78cd34SGreg Roach 9315a78cd34SGreg Roach return $records; 9325a78cd34SGreg Roach } 9335a78cd34SGreg Roach 9345a78cd34SGreg Roach /** 9355a78cd34SGreg Roach * Add a record (and direclty linked sources, notes, etc. to the cart. 9365a78cd34SGreg Roach * 9375a78cd34SGreg Roach * @param GedcomRecord $record 93818d7a90dSGreg Roach * 93918d7a90dSGreg Roach * @return void 9405a78cd34SGreg Roach */ 941e364afe4SGreg Roach private function addRecordToCart(GedcomRecord $record): void 942c1010edaSGreg Roach { 9435a78cd34SGreg Roach $cart = Session::get('cart', []); 9445a78cd34SGreg Roach 945f4afa648SGreg Roach $tree_name = $record->tree()->name(); 9465a78cd34SGreg Roach 9475a78cd34SGreg Roach // Add this record 948c0935879SGreg Roach $cart[$tree_name][$record->xref()] = true; 9495a78cd34SGreg Roach 9505a78cd34SGreg Roach // Add directly linked media, notes, repositories and sources. 9518d0ebef0SGreg Roach preg_match_all('/\n\d (?:OBJE|NOTE|SOUR|REPO) @(' . Gedcom::REGEX_XREF . ')@/', $record->gedcom(), $matches); 9525a78cd34SGreg Roach 9535a78cd34SGreg Roach foreach ($matches[1] as $match) { 9545a78cd34SGreg Roach $cart[$tree_name][$match] = true; 9555a78cd34SGreg Roach } 9565a78cd34SGreg Roach 9575a78cd34SGreg Roach Session::put('cart', $cart); 9585a78cd34SGreg Roach } 9595a78cd34SGreg Roach 9605a78cd34SGreg Roach /** 9615a78cd34SGreg Roach * @param Tree $tree 9625a78cd34SGreg Roach * 9635a78cd34SGreg Roach * @return bool 9645a78cd34SGreg Roach */ 965c1010edaSGreg Roach private function isCartEmpty(Tree $tree): bool 966c1010edaSGreg Roach { 9675a78cd34SGreg Roach $cart = Session::get('cart', []); 9685a78cd34SGreg Roach 969aa6f03bbSGreg Roach return empty($cart[$tree->name()]); 9705a78cd34SGreg Roach } 9718c2e8227SGreg Roach} 972