From 7104c7b4823ebd08bcee058e37f396a060bf4780 Mon Sep 17 00:00:00 2001
From: Eileen McNaughton <emcnaughton@wikimedia.org>
Date: Tue, 28 Nov 2023 15:27:48 +1300
Subject: [PATCH] Add system check for if people disabled default location type

---
 CRM/Utils/Check/Component/LocationTypes.php | 47 +++++++++++++++++++++
 1 file changed, 47 insertions(+)
 create mode 100644 CRM/Utils/Check/Component/LocationTypes.php

diff --git a/CRM/Utils/Check/Component/LocationTypes.php b/CRM/Utils/Check/Component/LocationTypes.php
new file mode 100644
index 0000000000..1a6cf3460b
--- /dev/null
+++ b/CRM/Utils/Check/Component/LocationTypes.php
@@ -0,0 +1,47 @@
+<?php
+
+/*
+ +--------------------------------------------------------------------+
+ | Copyright CiviCRM LLC. All rights reserved.                        |
+ |                                                                    |
+ | This work is published under the GNU AGPLv3 license with some      |
+ | permitted exceptions and without any warranty. For full license    |
+ | and copyright information, see https://civicrm.org/licensing       |
+ +--------------------------------------------------------------------+
+ */
+
+use Psr\Log\LogLevel;
+
+/**
+ *
+ * @package CRM
+ * @copyright CiviCRM LLC https://civicrm.org/licensing
+ */
+class CRM_Utils_Check_Component_LocationTypes extends CRM_Utils_Check_Component {
+
+  /**
+   * Display warning about invalid priceFields
+   *
+   * @return CRM_Utils_Check_Message[]
+   * @throws \CRM_Core_Exception
+   */
+  public function checkPriceFields(): array {
+    $messages = [];
+    if (!CRM_Core_DAO::singleValueQuery('SELECT id FROM civicrm_location_type WHERE is_active = 1 AND is_default = 1')) {
+      $url = CRM_Utils_System::url('civicrm/admin/locationType', [
+        'reset' => 1,
+      ]);
+      $msg = ts('Your site default location type does not exist or is disabled.')
+        . " <a href='$url'>" . ts('Configure location types') . '</a>';
+      $messages[] = new CRM_Utils_Check_Message(
+        __FUNCTION__,
+        $msg,
+        ts('Location Type Misconfiguration'),
+        LogLevel::ERROR,
+        'fa-lock'
+      );
+    }
+    return $messages;
+  }
+
+}
-- 
2.25.1