1acded470Sglarwill<?php 2acded470Sglarwill 3acded470Sglarwill/** 4acded470Sglarwill * webtrees: online genealogy 5d11be702SGreg Roach * Copyright (C) 2023 webtrees development team 6acded470Sglarwill * This program is free software: you can redistribute it and/or modify 7acded470Sglarwill * it under the terms of the GNU General Public License as published by 8acded470Sglarwill * the Free Software Foundation, either version 3 of the License, or 9acded470Sglarwill * (at your option) any later version. 10acded470Sglarwill * This program is distributed in the hope that it will be useful, 11acded470Sglarwill * but WITHOUT ANY WARRANTY; without even the implied warranty of 12acded470Sglarwill * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13acded470Sglarwill * GNU General Public License for more details. 14acded470Sglarwill * You should have received a copy of the GNU General Public License 15acded470Sglarwill * along with this program. If not, see <https://www.gnu.org/licenses/>. 16acded470Sglarwill */ 17acded470Sglarwill 18acded470Sglarwilldeclare(strict_types=1); 19acded470Sglarwill 20acded470Sglarwillnamespace Fisharebest\Webtrees\Census; 21acded470Sglarwill 22acded470Sglarwilluse Fisharebest\Webtrees\TestCase; 23*202c018bSGreg Roachuse PHPUnit\Framework\Attributes\CoversClass; 24acded470Sglarwill 25*202c018bSGreg Roach#[CoversClass(CensusOfCanada1921::class)] 26*202c018bSGreg Roach#[CoversClass(AbstractCensusColumn::class)] 27acded470Sglarwillclass CensusOfCanada1921Test extends TestCase 28acded470Sglarwill{ 29acded470Sglarwill /** 30acded470Sglarwill * Test the census place and date 31acded470Sglarwill */ 32acded470Sglarwill public function testPlaceAndDate(): void 33acded470Sglarwill { 34acded470Sglarwill $census = new CensusOfCanada1921(); 35acded470Sglarwill 36acded470Sglarwill self::assertSame('Canada', $census->censusPlace()); 37acded470Sglarwill self::assertSame('01 JUN 1921', $census->censusDate()); 38acded470Sglarwill } 39acded470Sglarwill 40acded470Sglarwill /** 41acded470Sglarwill * Test the census columns 42acded470Sglarwill */ 43acded470Sglarwill public function testColumns(): void 44acded470Sglarwill { 45acded470Sglarwill $census = new CensusOfCanada1921(); 46acded470Sglarwill $columns = $census->columns(); 47acded470Sglarwill 48acded470Sglarwill self::assertCount(32, $columns); 49acded470Sglarwill self::assertInstanceOf(CensusColumnFullName::class, $columns[0]); 50acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[1]); 51acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[2]); 52acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[3]); 53acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[4]); 54acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[5]); 55acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[6]); 56acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[7]); 57acded470Sglarwill self::assertInstanceOf(CensusColumnRelationToHeadEnglish::class, $columns[8]); 58acded470Sglarwill self::assertInstanceOf(CensusColumnSexMF::class, $columns[9]); 59da3cb887Sglarwill self::assertInstanceOf(CensusColumnConditionCanada::class, $columns[10]); 60acded470Sglarwill self::assertInstanceOf(CensusColumnAge::class, $columns[11]); 61acded470Sglarwill self::assertInstanceOf(CensusColumnBirthPlaceSimple::class, $columns[12]); 62acded470Sglarwill self::assertInstanceOf(CensusColumnFatherBirthPlaceSimple::class, $columns[13]); 63acded470Sglarwill self::assertInstanceOf(CensusColumnMotherBirthPlaceSimple::class, $columns[14]); 64acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[15]); 65acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[16]); 66acded470Sglarwill self::assertInstanceOf(CensusColumnNationality::class, $columns[17]); 67acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[18]); 68acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[19]); 69acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[20]); 70acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[21]); 71acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[22]); 72acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[23]); 73acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[24]); 74acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[25]); 75acded470Sglarwill self::assertInstanceOf(CensusColumnOccupation::class, $columns[26]); 76acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[27]); 77acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[28]); 78acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[29]); 79acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[30]); 80acded470Sglarwill self::assertInstanceOf(CensusColumnNull::class, $columns[31]); 81acded470Sglarwill 82acded470Sglarwill self::assertSame('Name', $columns[0]->abbreviation()); 83acded470Sglarwill self::assertSame('Sec/Twp', $columns[1]->abbreviation()); 84acded470Sglarwill self::assertSame('Municipality', $columns[2]->abbreviation()); 85acded470Sglarwill self::assertSame('Own/Rent', $columns[3]->abbreviation()); 86acded470Sglarwill self::assertSame('Rent $', $columns[4]->abbreviation()); 87acded470Sglarwill self::assertSame('Home Type', $columns[5]->abbreviation()); 88acded470Sglarwill self::assertSame('Materials', $columns[6]->abbreviation()); 89acded470Sglarwill self::assertSame('Rooms', $columns[7]->abbreviation()); 90acded470Sglarwill self::assertSame('Relation', $columns[8]->abbreviation()); 91acded470Sglarwill self::assertSame('Sex', $columns[9]->abbreviation()); 92acded470Sglarwill self::assertSame('S/M/W/D/L', $columns[10]->abbreviation()); 93acded470Sglarwill self::assertSame('Age', $columns[11]->abbreviation()); 94acded470Sglarwill self::assertSame('Birth Loc', $columns[12]->abbreviation()); 95acded470Sglarwill self::assertSame('FBP', $columns[13]->abbreviation()); 96acded470Sglarwill self::assertSame('MBP', $columns[14]->abbreviation()); 97acded470Sglarwill self::assertSame('Yr. immigrated', $columns[15]->abbreviation()); 98acded470Sglarwill self::assertSame('Yr. naturalized', $columns[16]->abbreviation()); 99acded470Sglarwill self::assertSame('Nationality', $columns[17]->abbreviation()); 100acded470Sglarwill self::assertSame('Origin', $columns[18]->abbreviation()); 101acded470Sglarwill self::assertSame('English', $columns[19]->abbreviation()); 102acded470Sglarwill self::assertSame('French', $columns[20]->abbreviation()); 103acded470Sglarwill self::assertSame('Language', $columns[21]->abbreviation()); 104acded470Sglarwill self::assertSame('Religion', $columns[22]->abbreviation()); 105acded470Sglarwill self::assertSame('Read', $columns[23]->abbreviation()); 106acded470Sglarwill self::assertSame('Write', $columns[24]->abbreviation()); 107acded470Sglarwill self::assertSame('Ms school', $columns[25]->abbreviation()); 108acded470Sglarwill self::assertSame('Occupation', $columns[26]->abbreviation()); 109acded470Sglarwill self::assertSame('E/W/OA', $columns[27]->abbreviation()); 110acded470Sglarwill self::assertSame('Where employed', $columns[28]->abbreviation()); 111acded470Sglarwill self::assertSame('Unemployed', $columns[29]->abbreviation()); 112acded470Sglarwill self::assertSame('Earnings', $columns[30]->abbreviation()); 113acded470Sglarwill self::assertSame('Weeks unemployed', $columns[31]->abbreviation()); 114acded470Sglarwill 115acded470Sglarwill self::assertSame('Name of each person in family, household or institution', $columns[0]->title()); 116acded470Sglarwill self::assertSame('Place of Abode (Section or Township)', $columns[1]->title()); 117acded470Sglarwill self::assertSame('Place of Abode (Municipality)', $columns[2]->title()); 118acded470Sglarwill self::assertSame('Home owned or rented', $columns[3]->title()); 119acded470Sglarwill self::assertSame('If rented, give rent paid per month', $columns[4]->title()); 120acded470Sglarwill self::assertSame('Class of houses: Apartment, row or Terrace, Single house, semi-Detached', $columns[5]->title()); 121acded470Sglarwill self::assertSame('Materials of Construction. Stone, Brick, Wood, Brick Veneered, Plastered with Lime morar, Plastered with Cement mortar, cement blocks or CONcrete', $columns[6]->title()); 122acded470Sglarwill self::assertSame('Rooms occupied by this family', $columns[7]->title()); 123acded470Sglarwill self::assertSame('Relationship to Head of Family or household', $columns[8]->title()); 124acded470Sglarwill self::assertSame('Sex', $columns[9]->title()); 125acded470Sglarwill self::assertSame('Single, Married, Widowed, Divorced or Legally Separated', $columns[10]->title()); 126acded470Sglarwill self::assertSame('Age at last birthday - on June 1, 1921', $columns[11]->title()); 127acded470Sglarwill self::assertSame('Place of birth of person', $columns[12]->title()); 128acded470Sglarwill self::assertSame('Place of birth of father', $columns[13]->title()); 129acded470Sglarwill self::assertSame('Place of birth of mother', $columns[14]->title()); 130acded470Sglarwill self::assertSame('Year of immigration to Canada', $columns[15]->title()); 131acded470Sglarwill self::assertSame('Year of naturalization', $columns[16]->title()); 132acded470Sglarwill self::assertSame('Nationality', $columns[17]->title()); 133acded470Sglarwill self::assertSame('Racial or tribal origin', $columns[18]->title()); 134acded470Sglarwill self::assertSame('Can speak English', $columns[19]->title()); 135acded470Sglarwill self::assertSame('Can speak French', $columns[20]->title()); 136acded470Sglarwill self::assertSame('Language other than English or French spoken as mother tongue', $columns[21]->title()); 137acded470Sglarwill self::assertSame('Religious body, Denomination or Community to which this person adheres or belongs 138acded470SglarwillThe religion to which an individual claimed to belong written in full', $columns[22]->title()); 139acded470Sglarwill self::assertSame('Can read', $columns[23]->title()); 140acded470Sglarwill self::assertSame('Can write', $columns[24]->title()); 141acded470Sglarwill self::assertSame('Months at school since Sept. 1, 1920', $columns[25]->title()); 142acded470Sglarwill self::assertSame('Chief occupation or trade', $columns[26]->title()); 143acded470Sglarwill self::assertSame('Employer or employee or Worker, working on Own Account', $columns[27]->title()); 144acded470Sglarwill self::assertSame('"a" if "Employer" state principal product, "b" if "Employee" state where employed as "Farm", "Cotton Mill", "Foundry", "Grocery", etc. "c" if on "Own account" state nature of work', $columns[28]->title()); 145acded470Sglarwill self::assertSame('If an employee, where you out of work June 1st , 1920', $columns[29]->title()); 146acded470Sglarwill self::assertSame('Total earnings past 12 months since June 1, 1920', $columns[30]->title()); 147acded470Sglarwill self::assertSame('Weeks unemployed in the past 12 months since June 1st, 1920', $columns[31]->title()); 148acded470Sglarwill } 149acded470Sglarwill} 150