created quests for lgbtq people

app/src/main/java/de/westnordost/streetcomplete/quests/QuestsModule.kt

@@ -118,6 +118,9 @@ import de.westnordost.streetcomplete.quests.lanes.AddLanes
 import de.westnordost.streetcomplete.quests.leaf_detail.AddForestLeafType
 import de.westnordost.streetcomplete.quests.leaf_detail.AddTreeLeafType
 import de.westnordost.streetcomplete.quests.level.AddLevel
+import de.westnordost.streetcomplete.quests.lgbtq.LGBTQAccessQuest
+import de.westnordost.streetcomplete.quests.lgbtq.LGBTQGenderSpecializationQuest
+import de.westnordost.streetcomplete.quests.lgbtq.LGBTQTransgenderSpecializationQuest
 import de.westnordost.streetcomplete.quests.map.AddMapSize
 import de.westnordost.streetcomplete.quests.map.AddMapType
 import de.westnordost.streetcomplete.quests.max_height.AddMaxHeight
@@ -637,6 +640,9 @@ fun getQuestTypeList(
     EE_QUEST_OFFSET + 50 to AddCaravanSiteType(),
     EE_QUEST_OFFSET + 52 to AddSaunaAvailability(),
     EE_QUEST_OFFSET + 53 to AddSwimmingPoolAvailability(),
+    EE_QUEST_OFFSET + 54 to LGBTQAccessQuest(),
+    EE_QUEST_OFFSET + 55 to LGBTQGenderSpecializationQuest(),
+    EE_QUEST_OFFSET + 56 to LGBTQTransgenderSpecializationQuest(),
     EE_QUEST_OFFSET + 10 to OsmoseQuest(osmoseDao),
     EE_QUEST_OFFSET + 11 to CustomQuest(customQuestList),
     // POI quests

app/src/main/java/de/westnordost/streetcomplete/quests/lgbtq/ExcludedCountries.kt

@@ -0,0 +1,160 @@
+package de.westnordost.streetcomplete.quests.lgbtq
+
+import de.westnordost.streetcomplete.data.quest.AllCountriesExcept
+
+// countries with a LGBT propaganda law, and not in the list of country
+// where homosexuality is illegal
+val LGBTPropagandaCountries =
+    listOf(
+	// Belarus, see https://www.reuters.com/world/europe/belarus-prepares-law-against-lgbt-propaganda-state-media-says-2024-02-19/
+	// "BY",
+	// Georgia, see https://oc-media.org/georgian-dream-announces-draft-law-against-pseudo-liberal-ideology/
+	// "GE",
+	// Kyrgyzstan, see https://en.wikipedia.org/wiki/Kyrgyz_anti-LGBT_propaganda_law
+	"KY",
+	// Russia, since 2013 and worst since 2023
+	"RU",
+)
+
+// countries where homosexuality is illegal
+// even if unenforced or just for male
+val LGBTHomosexualityIllegalCountries =
+    listOf(
+        // United Arab Emirates
+        "AE",
+        // Afghanistan
+        "AF",
+        // Bangladesh
+        "BD",
+        // Burundi
+        "BI",
+        // Brunei Darussalam
+        "BN",
+        // Cameroon
+        "CM",
+        // Dominica
+        "DM",
+        // Algeria
+        "DZ",
+        // Egypt
+        "EG",
+        // Eritrea
+        "ER",
+        // Ethiopia
+        "ET",
+        // Grenada
+        "GD",
+        // Ghana
+        "GH",
+        // Gambia
+        "GM",
+        // Guinea
+        "GN",
+        // Guyana
+        "GY",
+        // Indonesia
+        // not illegal, except in one province where it is enforced
+        "ID",
+        // Iraq
+        "IQ",
+        // Iran
+        "IR",
+        // Jamaica
+        "JM",
+        // Kenya
+        "KE",
+        // Kiribati, just for male, but not enforced
+        "KI",
+        // Comoros
+        "KM",
+        // Kuwait, just for male
+        "KW",
+        // Lebanon, unsure in 2024, cf wikipedia
+        "LB",
+        // Sri Lanka
+        "LK",
+        // Liberia
+        "LR",
+        // Libya
+        "LY",
+        // Morocco
+        "MA",
+        // Myanmar
+        "MM",
+        // Mauritania
+        "MR",
+        // Maldives, not enforced
+        "MV",
+        // Malawi
+        "MW",
+        // Malaysia
+        "MY",
+        // Namibia, not enforced
+        "NA",
+        // Nigeria
+        "NG",
+        // Niue
+        "NU",
+        // Oman
+        "OM",
+        // Papua New Guinea , illegal for male only
+        "PG",
+        // Pakistan
+        "PK",
+        // Qatar
+        "QA",
+        // Saudi Arabia
+        "SA",
+        // Solomon Islands
+        "SB",
+        // Sudan
+        "SD",
+        // Sierra Leone, illegal for male only
+        "SL",
+        // Senegal
+        "SN",
+        // Somalia
+        "SO",
+        // South Sudan
+        "SS",
+        // Eswatini
+        "SZ",
+        // Chad
+        "TD",
+        // Togo
+        "TG",
+        // Turkmenistan, illegal for male only
+        "TM",
+        // Tunisia
+        "TN",
+        // Tonga, illegal for male only
+        "TO",
+        // Tuvalu,illegal for male only, not enforced
+        "TV",
+        // Tanzania
+        "TZ",
+        // Uganda
+        "UG",
+        // Uzbekistan, illegal for male only
+        "UZ",
+        // Saint Lucia
+        "WL",
+        // Samoa, illegal for male only, not enforced
+        "WS",
+        // Saint Vincent and the Grenadines
+        "WV",
+        // Yemen
+        "YE",
+        // Zambia
+        "ZM",
+        // Zimbabwe
+        "ZW"
+    )
+
+// country where mapping would be fruitless and/or dangerous
+val LGBTExcludedCountries = AllCountriesExcept(
+	listOf(
+		LGBTHomosexualityIllegalCountries,
+		LGBTPropagandaCountries
+	).flatten()
+)

app/src/main/java/de/westnordost/streetcomplete/quests/lgbtq/LGBTQAccessForm.kt

@@ -0,0 +1,25 @@
+package de.westnordost.streetcomplete.quests.lgbtq
+
+import de.westnordost.streetcomplete.R
+import de.westnordost.streetcomplete.quests.AListQuestForm
+import de.westnordost.streetcomplete.quests.AnswerItem
+import de.westnordost.streetcomplete.quests.TextItem
+
+class LGBTQAccessForm : AListQuestForm<String?>() {
+
+    override val items get() = listOf<TextItem<String?>>(
+        TextItem("no", R.string.quest_lgbtq_access_no),
+        TextItem("welcome", R.string.quest_lgbtq_access_welcome),
+        TextItem("primary", R.string.quest_lgbtq_access_primary),
+        TextItem("only", R.string.quest_lgbtq_access_only),
+    )
+
+    override val otherAnswers get() = listOfNotNull(
+        AnswerItem(R.string.quest_lgbtq_access_not_marked) {
+            tempHideQuest()
+        },
+        AnswerItem(R.string.quest_lgbtq_access_hide_forever) {
+            hideQuest()
+        },
+    )
+}

app/src/main/java/de/westnordost/streetcomplete/quests/lgbtq/LGBTQAccessQuest.kt

@@ -0,0 +1,45 @@
+package de.westnordost.streetcomplete.quests.lgbtq
+
+import de.westnordost.streetcomplete.R
+import de.westnordost.streetcomplete.data.osm.geometry.ElementGeometry
+import de.westnordost.streetcomplete.data.osm.mapdata.Element
+import de.westnordost.streetcomplete.data.osm.mapdata.MapDataWithGeometry
+import de.westnordost.streetcomplete.data.osm.osmquests.OsmFilterQuestType
+import de.westnordost.streetcomplete.data.user.achievements.EditTypeAchievement
+import de.westnordost.streetcomplete.osm.Tags
+
+class LGBTQAccessQuest : OsmFilterQuestType<String?>() {
+    override val elementFilter = """
+        nodes, ways with (
+          amenity ~ swingerclub|nightclub|bar|pub|cafe|restaurant|place_of_worship|community_centre|library|doctors|social_facility
+          or shop ~ erotic|books
+          or leisure ~ sauna|nightclub|nightlife
+        )
+        and (!seasonal or seasonal = no)
+        and !brand and !wikipedia:brand and !wikidata:brand
+        and !memorial and !historic
+        and !lgbtq
+    """
+
+    // countries that are listed here ban lgbtq people
+    override val enabledInCountries = LGBTExcludedCountries
+
+    override val changesetComment = "Survey lgbtq access"
+    override val wikiLink = "Key:lgbtq"
+    override val icon = R.drawable.ic_quest_lgbtq
+    override val achievements = listOf(EditTypeAchievement.CITIZEN)
+
+    override fun getTitle(tags: Map<String, String>) = R.string.quest_lgbtq_access
+
+    override fun getApplicableElements(mapData: MapDataWithGeometry): Iterable<Element> =
+        mapData.filter { isApplicableTo(it) }
+
+    override fun isApplicableTo(element: Element): Boolean = filter.matches(element)
+    override fun createForm() = LGBTQAccessForm()
+
+    override fun applyAnswerTo(answer: String?, tags: Tags, geometry: ElementGeometry, timestampEdited: Long) {
+        answer?.let {
+            tags["lgbtq"] = it
+        }
+    }
+}

app/src/main/java/de/westnordost/streetcomplete/quests/lgbtq/LGBTQGenderSpecialization.kt

@@ -0,0 +1,8 @@
+package de.westnordost.streetcomplete.quests.lgbtq
+
+enum class LGBTQGenderSpecialization {
+    NONE,
+    MEN,
+    WOMAN,
+    NON_BINARY,
+}

app/src/main/java/de/westnordost/streetcomplete/quests/lgbtq/LGBTQGenderSpecializationForm.kt

@@ -0,0 +1,14 @@
+package de.westnordost.streetcomplete.quests.lgbtq
+
+import de.westnordost.streetcomplete.R
+import de.westnordost.streetcomplete.quests.AbstractOsmQuestForm
+import de.westnordost.streetcomplete.quests.AnswerItem
+
+class LGBTQGenderSpecializationForm : AbstractOsmQuestForm<LGBTQGenderSpecialization>() {
+    override val buttonPanelAnswers = listOf(
+        AnswerItem(R.string.quest_lgbtq_gender_specialization_men) { applyAnswer(LGBTQGenderSpecialization.MEN) },
+        AnswerItem(R.string.quest_lgbtq_gender_specialization_woman) { applyAnswer(LGBTQGenderSpecialization.WOMAN) },
+        AnswerItem(R.string.quest_lgbtq_gender_specialization_non_binary) { applyAnswer(LGBTQGenderSpecialization.NON_BINARY) },
+        AnswerItem(R.string.quest_lgbtq_gender_specialization_none) { applyAnswer(LGBTQGenderSpecialization.NONE) },
+    )
+}

app/src/main/java/de/westnordost/streetcomplete/quests/lgbtq/LGBTQGenderSpecializationQuest.kt

@@ -0,0 +1,44 @@
+package de.westnordost.streetcomplete.quests.lgbtq
+
+import de.westnordost.streetcomplete.R
+import de.westnordost.streetcomplete.data.osm.geometry.ElementGeometry
+import de.westnordost.streetcomplete.data.osm.osmquests.OsmFilterQuestType
+import de.westnordost.streetcomplete.data.user.achievements.EditTypeAchievement
+import de.westnordost.streetcomplete.osm.Tags
+
+class LGBTQGenderSpecializationQuest : OsmFilterQuestType<LGBTQGenderSpecialization>() {
+    override val elementFilter = """
+        nodes with lgbtq ~ primary|only and !(lgbtq:men or lgbtq:woman or lgbtq:non_binary)
+        and !memorial and !historic
+    """
+
+    // countries that are listed here ban lgbtq people
+    override val enabledInCountries = LGBTExcludedCountries
+
+    override val changesetComment = "Survey lgbtq specificity"
+    override val wikiLink = "Key:lgbtq"
+    override val icon = R.drawable.ic_quest_gender
+    override val achievements = listOf(EditTypeAchievement.CITIZEN)
+
+    override fun getTitle(tags: Map<String, String>) = R.string.quest_lgbtq_gender_specialization
+
+    override fun createForm() = LGBTQGenderSpecializationForm()
+
+    override fun applyAnswerTo(answer: LGBTQGenderSpecialization, tags: Tags, geometry: ElementGeometry, timestampEdited: Long) =
+        when (answer) {
+            LGBTQGenderSpecialization.NONE -> {
+                tags["lgbtq:men"] = "welcome"
+                tags["lgbtq:woman"] = "welcome"
+                tags["lgbtq:non_binary"] = "welcome"
+            }
+            LGBTQGenderSpecialization.MEN -> {
+                tags["lgbtq:men"] = tags["lgbtq"] ?: "primary"
+            }
+            LGBTQGenderSpecialization.WOMAN -> {
+                tags["lgbtq:woman"] = tags["lgbtq"] ?: "primary"
+            }
+            LGBTQGenderSpecialization.NON_BINARY -> {
+                tags["lgbtq:non_binary"] = tags["lgbtq"] ?: "primary"
+            }
+        }
+}

app/src/main/java/de/westnordost/streetcomplete/quests/lgbtq/LGBTQTransgenderSpecialization.kt

@@ -0,0 +1,7 @@
+package de.westnordost.streetcomplete.quests.lgbtq
+
+enum class LGBTQTransgenderSpecialization {
+    YES,
+    NO,
+    BANNED,
+}

app/src/main/java/de/westnordost/streetcomplete/quests/lgbtq/LGBTQTransgenderSpecializationForm.kt

@@ -0,0 +1,25 @@
+package de.westnordost.streetcomplete.quests.lgbtq
+
+import de.westnordost.streetcomplete.R
+import de.westnordost.streetcomplete.quests.AbstractOsmQuestForm
+import de.westnordost.streetcomplete.quests.AnswerItem
+
+class LGBTQTransgenderSpecializationForm : AbstractOsmQuestForm<LGBTQTransgenderSpecialization>() {
+    override val buttonPanelAnswers = listOf(
+        AnswerItem(R.string.quest_generic_hasFeature_no) {
+            applyAnswer(
+                LGBTQTransgenderSpecialization.NO
+            )
+        },
+        AnswerItem(R.string.quest_generic_hasFeature_yes) {
+            applyAnswer(
+                LGBTQTransgenderSpecialization.YES
+            )
+        },
+        AnswerItem(R.string.quest_lgbtq_transgender_specialization_banned) {
+            applyAnswer(
+                LGBTQTransgenderSpecialization.BANNED
+            )
+        },
+    )
+}

app/src/main/java/de/westnordost/streetcomplete/quests/lgbtq/LGBTQTransgenderSpecializationQuest.kt

@@ -0,0 +1,41 @@
+package de.westnordost.streetcomplete.quests.lgbtq
+
+import de.westnordost.streetcomplete.R
+import de.westnordost.streetcomplete.data.osm.geometry.ElementGeometry
+import de.westnordost.streetcomplete.data.osm.mapdata.Element
+import de.westnordost.streetcomplete.data.osm.mapdata.MapDataWithGeometry
+import de.westnordost.streetcomplete.data.osm.osmquests.OsmFilterQuestType
+import de.westnordost.streetcomplete.data.user.achievements.EditTypeAchievement
+import de.westnordost.streetcomplete.osm.Tags
+
+class LGBTQTransgenderSpecializationQuest : OsmFilterQuestType<LGBTQTransgenderSpecialization>() {
+    override val elementFilter = """
+        nodes, ways with lgbtq ~ primary|only and !lgbtq:trans
+        and !memorial and !historic
+    """
+
+    // countries that are listed here ban lgbtq people
+    override val enabledInCountries = LGBTExcludedCountries
+
+    override val changesetComment = "Survey lgbtq transgender specialization"
+    override val wikiLink = "Key:lgbtq"
+    override val icon = R.drawable.ic_quest_trans
+    override val achievements = listOf(EditTypeAchievement.CITIZEN)
+
+    override fun getTitle(tags: Map<String, String>) = R.string.quest_lgbtq_transgender_specialization
+
+    override fun getApplicableElements(mapData: MapDataWithGeometry): Iterable<Element> =
+        mapData.filter { isApplicableTo(it) }
+
+    override fun isApplicableTo(element: Element): Boolean = filter.matches(element)
+
+    override fun applyAnswerTo(answer: LGBTQTransgenderSpecialization, tags: Tags, geometry: ElementGeometry, timestampEdited: Long) {
+        when (answer) {
+            LGBTQTransgenderSpecialization.YES -> tags["lgbtq:trans"] = "primary"
+            LGBTQTransgenderSpecialization.NO -> tags["lgbtq:trans"] = "welcome"
+            LGBTQTransgenderSpecialization.BANNED -> tags["lgbtq:trans"] = "no"
+        }
+    }
+
+    override fun createForm() = LGBTQTransgenderSpecializationForm()
+}