xref: /webtrees/tests/app/Census/CensusOfUnitedStates1940Test.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 CensusOfUnitedStates1940
26 */
27class CensusOfUnitedStates1940Test extends TestCase
28{
29    /**
30     * Test the census place and date
31     *
32     * @covers \Fisharebest\Webtrees\Census\CensusOfUnitedStates1940
33     *
34     * @return void
35     */
36    public function testPlaceAndDate(): void
37    {
38        $census = new CensusOfUnitedStates1940();
39
40        self::assertSame('United States', $census->censusPlace());
41        self::assertSame('APR 1940', $census->censusDate());
42    }
43
44    /**
45     * Test the census columns
46     *
47     * @covers \Fisharebest\Webtrees\Census\CensusOfUnitedStates1940
48     * @covers \Fisharebest\Webtrees\Census\AbstractCensusColumn
49     *
50     * @return void
51     */
52    public function testColumns(): void
53    {
54        $census  = new CensusOfUnitedStates1940();
55        $columns = $census->columns();
56
57        self::assertCount(31, $columns);
58        self::assertInstanceOf(CensusColumnNull::class, $columns[0]);
59        self::assertInstanceOf(CensusColumnNull::class, $columns[1]);
60        self::assertInstanceOf(CensusColumnNull::class, $columns[2]);
61        self::assertInstanceOf(CensusColumnNull::class, $columns[3]);
62        self::assertInstanceOf(CensusColumnNull::class, $columns[4]);
63        self::assertInstanceOf(CensusColumnFullName::class, $columns[5]);
64        self::assertInstanceOf(CensusColumnRelationToHeadEnglish::class, $columns[6]);
65        self::assertInstanceOf(CensusColumnSexMF::class, $columns[7]);
66        self::assertInstanceOf(CensusColumnNull::class, $columns[8]);
67        self::assertInstanceOf(CensusColumnAge::class, $columns[9]);
68        self::assertInstanceOf(CensusColumnConditionUs::class, $columns[10]);
69        self::assertInstanceOf(CensusColumnNull::class, $columns[11]);
70        self::assertInstanceOf(CensusColumnNull::class, $columns[12]);
71        self::assertInstanceOf(CensusColumnBirthPlaceSimple::class, $columns[13]);
72        self::assertInstanceOf(CensusColumnNull::class, $columns[14]);
73        self::assertInstanceOf(CensusColumnNull::class, $columns[15]);
74        self::assertInstanceOf(CensusColumnNull::class, $columns[16]);
75        self::assertInstanceOf(CensusColumnNull::class, $columns[17]);
76        self::assertInstanceOf(CensusColumnNull::class, $columns[18]);
77        self::assertInstanceOf(CensusColumnNull::class, $columns[19]);
78        self::assertInstanceOf(CensusColumnNull::class, $columns[20]);
79        self::assertInstanceOf(CensusColumnNull::class, $columns[21]);
80        self::assertInstanceOf(CensusColumnNull::class, $columns[22]);
81        self::assertInstanceOf(CensusColumnNull::class, $columns[23]);
82        self::assertInstanceOf(CensusColumnNull::class, $columns[24]);
83        self::assertInstanceOf(CensusColumnNull::class, $columns[25]);
84        self::assertInstanceOf(CensusColumnOccupation::class, $columns[26]);
85        self::assertInstanceOf(CensusColumnNull::class, $columns[27]);
86        self::assertInstanceOf(CensusColumnNull::class, $columns[28]);
87        self::assertInstanceOf(CensusColumnNull::class, $columns[29]);
88        self::assertInstanceOf(CensusColumnNull::class, $columns[30]);
89
90        self::assertSame('Street', $columns[0]->abbreviation());
91        self::assertSame('Number', $columns[1]->abbreviation());
92        self::assertSame('Home', $columns[2]->abbreviation());
93        self::assertSame('Value', $columns[3]->abbreviation());
94        self::assertSame('Farm', $columns[4]->abbreviation());
95        self::assertSame('Name', $columns[5]->abbreviation());
96        self::assertSame('Relation', $columns[6]->abbreviation());
97        self::assertSame('Sex', $columns[7]->abbreviation());
98        self::assertSame('Race', $columns[8]->abbreviation());
99        self::assertSame('Age', $columns[9]->abbreviation());
100        self::assertSame('Cond', $columns[10]->abbreviation());
101        self::assertSame('School', $columns[11]->abbreviation());
102        self::assertSame('Grade', $columns[12]->abbreviation());
103        self::assertSame('BP', $columns[13]->abbreviation());
104        self::assertSame('Citizen', $columns[14]->abbreviation());
105        self::assertSame('City', $columns[15]->abbreviation());
106        self::assertSame('County', $columns[16]->abbreviation());
107        self::assertSame('State', $columns[17]->abbreviation());
108        self::assertSame('OnFarm', $columns[18]->abbreviation());
109        self::assertSame('Work', $columns[19]->abbreviation());
110        self::assertSame('Emerg', $columns[20]->abbreviation());
111        self::assertSame('Seeking', $columns[21]->abbreviation());
112        self::assertSame('Job', $columns[22]->abbreviation());
113        self::assertSame('Type', $columns[23]->abbreviation());
114        self::assertSame('Hours', $columns[24]->abbreviation());
115        self::assertSame('Unemp', $columns[25]->abbreviation());
116        self::assertSame('Occupation', $columns[26]->abbreviation());
117        self::assertSame('Industry', $columns[27]->abbreviation());
118        self::assertSame('Weeks', $columns[28]->abbreviation());
119        self::assertSame('Salary', $columns[29]->abbreviation());
120        self::assertSame('Extra', $columns[30]->abbreviation());
121
122        self::assertSame('Street,avenue,road,etc', $columns[0]->title());
123        self::assertSame('House number (in cities and towns)', $columns[1]->title());
124        self::assertSame('Home owned (O) or rented (R)', $columns[2]->title());
125        self::assertSame('Value of home, if owned, or monthly rental if rented', $columns[3]->title());
126        self::assertSame('Does this household live on a farm?', $columns[4]->title());
127        self::assertSame('Name of each person whose usual place of residence on April 1, 1940, was in this household', $columns[5]->title());
128        self::assertSame('Relationship of this person to the head of the household', $columns[6]->title());
129        self::assertSame('Sex-Male (M),Female (F)', $columns[7]->title());
130        self::assertSame('Color or race', $columns[8]->title());
131        self::assertSame('Age at last birthday', $columns[9]->title());
132        self::assertSame('Marital Status-Single (S), Married (M), Widowed (W), Divorced (D)', $columns[10]->title());
133        self::assertSame('Attended school or college any time since March 1, 1940?', $columns[11]->title());
134        self::assertSame('Highest grade of school completed', $columns[12]->title());
135        self::assertSame('Place of birth', $columns[13]->title());
136        self::assertSame('Citizenship of the foreign born', $columns[14]->title());
137        self::assertSame('City, town, or village having 2,500 or more inhabitants. Enter "R" for all other places.', $columns[15]->title());
138        self::assertSame('County', $columns[16]->title());
139        self::assertSame('State (or Territory or foreign country)', $columns[17]->title());
140        self::assertSame('On a farm?', $columns[18]->title());
141        self::assertSame('Was this person AT WORK for pay or profit in private or nonemergency Govt. work during week of March 24-30?', $columns[19]->title());
142        self::assertSame('If not, was he at work on, or assigned to, public EMERGENCY WORK (WPA,NYA,CCC,etc.) during week of March 24-30?', $columns[20]->title());
143        self::assertSame('Was this person SEEKING WORK?', $columns[21]->title());
144        self::assertSame('If not seeking work, did he HAVE A JOB, business, etc.?', $columns[22]->title());
145        self::assertSame('Indicate whether engaged in home housework (H), in school (S), unable to work (U), or other (Ot)', $columns[23]->title());
146        self::assertSame('Numbers of hours worked during week of March 24-30, 1940', $columns[24]->title());
147        self::assertSame('Duration of unemployment up to March 30, 1940-in weeks', $columns[25]->title());
148        self::assertSame('Trade, profession, or particular kind of work', $columns[26]->title());
149        self::assertSame('Industry or business', $columns[27]->title());
150        self::assertSame('Number of weeks worked in 1939 (Equivalent full-time weeks)', $columns[28]->title());
151        self::assertSame('Amount of money wages or salary received (including commissions)', $columns[29]->title());
152        self::assertSame('Did this person receive income of $50 or more from sources other than money wages or salary?', $columns[30]->title());
153    }
154}
155