add tests for backward compatibility of geo_areas

spec/factories/geo_area.rb

@@ -5,7 +5,12 @@ FactoryBot.define do
 
     trait :cadastre do
       source { GeoArea.sources.fetch(:cadastre) }
-      properties { { numero: '42', section: 'A11', commune: '75127' } }
+      properties { { numero: '42', section: 'A11', prefixe: '000', commune: '75127', contenance: '1234', id: '75127000A1142' } }
+    end
+
+    trait :legacy_cadastre do
+      source { GeoArea.sources.fetch(:cadastre) }
+      properties { { numero: '42', section: 'A11', code_com: '127', code_dep: '75', code_arr: '000', surface_parcelle: '1234', surface_intersection: 1234 } }
     end
 
     trait :selection_utilisateur do

spec/models/geo_area_spec.rb

@@ -80,4 +80,24 @@ RSpec.describe GeoArea, type: :model do
       it { expect(geo_area.valid?).to be_falsey }
     end
   end
+
+  describe "cadastre properties" do
+    let(:geo_area) { build(:geo_area, :cadastre) }
+    let(:legacy_geo_area) { build(:geo_area, :legacy_cadastre) }
+
+    it "should be backward compatible" do
+      expect("#{geo_area.code_dep}#{geo_area.code_com}").to eq(geo_area.commune)
+      expect(geo_area.code_arr).to eq(geo_area.prefixe)
+      expect(geo_area.surface_parcelle).to eq(geo_area.surface)
+    end
+
+    context "(legacy)" do
+      it "should be forward compatible" do
+        expect("#{legacy_geo_area.code_dep}#{legacy_geo_area.code_com}").to eq(legacy_geo_area.commune)
+        expect(legacy_geo_area.code_arr).to eq(legacy_geo_area.prefixe)
+        expect(legacy_geo_area.surface_parcelle).to eq(legacy_geo_area.surface)
+        expect(legacy_geo_area.cid).to eq(geo_area.cid)
+      end
+    end
+  end
 end