xref: /webtrees/tests/app/Census/CensusOfCanadaPraries1916Test.php (revision 8d018ab2fe3b6881cab8124d97e1a69e0be79d32)
1<?php
2
3/**
4 * webtrees: online genealogy
5 * Copyright (C) 2023 webtrees development team
6 * This program is free software: you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation, either version 3 of the License, or
9 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program. If not, see <https://www.gnu.org/licenses/>.
16 */
17
18declare(strict_types=1);
19
20namespace Fisharebest\Webtrees\Census;
21
22use Fisharebest\Webtrees\TestCase;
23
24/**
25 * Test harness for the class CensusOfCanadaPraries1916
26 */
27class CensusOfCanadaPraries1916Test extends TestCase
28{
29    /**
30     * Test the census place and date
31     *
32     * @covers \Fisharebest\Webtrees\Census\CensusOfCanadaPraries1916
33     *
34     * @return void
35     */
36    public function testPlaceAndDate(): void
37    {
38        $census = new CensusOfCanadaPraries1916();
39
40        self::assertSame('Canada', $census->censusPlace());
41        self::assertSame('01 JUN 1916', $census->censusDate());
42    }
43
44    /**
45     * Test the census columns
46     *
47     * @covers \Fisharebest\Webtrees\Census\CensusOfCanadaPraries1916
48     * @covers \Fisharebest\Webtrees\Census\AbstractCensusColumn
49     *
50     * @return void
51     */
52    public function testColumns(): void
53    {
54        $census  = new CensusOfCanadaPraries1916();
55        $columns = $census->columns();
56
57        self::assertCount(19, $columns);
58        self::assertInstanceOf(CensusColumnFullName::class, $columns[0]);
59        self::assertInstanceOf(CensusColumnNull::class, $columns[1]);
60        self::assertInstanceOf(CensusColumnRelationToHeadEnglish::class, $columns[2]);
61        self::assertInstanceOf(CensusColumnSexMF::class, $columns[3]);
62        self::assertInstanceOf(CensusColumnConditionCanada::class, $columns[4]);
63        self::assertInstanceOf(CensusColumnAge::class, $columns[5]);
64        self::assertInstanceOf(CensusColumnBirthPlaceSimple::class, $columns[6]);
65        self::assertInstanceOf(CensusColumnNull::class, $columns[7]);
66        self::assertInstanceOf(CensusColumnNull::class, $columns[8]);
67        self::assertInstanceOf(CensusColumnNull::class, $columns[11]);
68        self::assertInstanceOf(CensusColumnNull::class, $columns[12]);
69        self::assertInstanceOf(CensusColumnNull::class, $columns[13]);
70        self::assertInstanceOf(CensusColumnNull::class, $columns[14]);
71        self::assertInstanceOf(CensusColumnNull::class, $columns[15]);
72        self::assertInstanceOf(CensusColumnOccupation::class, $columns[16]);
73        self::assertInstanceOf(CensusColumnNull::class, $columns[17]);
74        self::assertInstanceOf(CensusColumnNull::class, $columns[18]);
75
76        self::assertSame('Name', $columns[0]->abbreviation());
77        self::assertSame('Mil', $columns[1]->abbreviation());
78        self::assertSame('Relation', $columns[2]->abbreviation());
79        self::assertSame('Sex', $columns[3]->abbreviation());
80        self::assertSame('S/M/W/D/L', $columns[4]->abbreviation());
81        self::assertSame('Age', $columns[5]->abbreviation());
82        self::assertSame('Birth Loc', $columns[6]->abbreviation());
83        self::assertSame('Religion', $columns[7]->abbreviation());
84        self::assertSame('Yr. immigrated', $columns[8]->abbreviation());
85        self::assertSame('Nationality', $columns[9]->abbreviation());
86        self::assertSame('Origin', $columns[10]->abbreviation());
87        self::assertSame('English', $columns[11]->abbreviation());
88        self::assertSame('French', $columns[12]->abbreviation());
89        self::assertSame('Language', $columns[13]->abbreviation());
90        self::assertSame('Read', $columns[14]->abbreviation());
91        self::assertSame('Write', $columns[15]->abbreviation());
92        self::assertSame('Occupation', $columns[16]->abbreviation());
93        self::assertSame('E/W/OA', $columns[17]->abbreviation());
94        self::assertSame('Where employed', $columns[18]->abbreviation());
95
96        self::assertSame('Name of each person in family, household or institution', $columns[0]->title());
97        self::assertSame('Military Service', $columns[1]->title());
98        self::assertSame('Relationship to Head of Family or household', $columns[2]->title());
99        self::assertSame('Sex', $columns[3]->title());
100        self::assertSame('Single, Married, Widowed, Divorced or Legally Separated', $columns[4]->title());
101        self::assertSame('Age at last birthday - on June 1, 1916', $columns[5]->title());
102        self::assertSame('Country or place of birth', $columns[6]->title());
103        self::assertSame('Religion', $columns[7]->title());
104        self::assertSame('Year of immigration to Canada', $columns[8]->title());
105        self::assertSame('Nationality', $columns[9]->title());
106        self::assertSame('Racial or tribal origin', $columns[10]->title());
107        self::assertSame('Can speak English', $columns[11]->title());
108        self::assertSame('Can speak French', $columns[12]->title());
109        self::assertSame('Mother tongue', $columns[13]->title());
110        self::assertSame('Can read', $columns[14]->title());
111        self::assertSame('Can write', $columns[15]->title());
112        self::assertSame('Chief occupation or trade', $columns[16]->title());
113        self::assertSame('Employer "e", Employee or worker "w", Working on own account "o.a."', $columns[17]->title());
114        self::assertSame('State where person was employed as "on farm", "in cotton mill", "in foundry", "in dry goods store", "in saw-mill", etc.', $columns[18]->title());
115    }
116}
117