backend/fix :#38 added sos not found error

nammayatri · Mar 9, 2023 · 765be18 · 765be18
1 parent 671e764
commit 765be18
Show file tree

Hide file tree

Showing 2 changed files with 20 additions and 4 deletions.
diff --git a/lib/mobility-core/mobility-core.cabal b/lib/mobility-core/mobility-core.cabal
@@ -276,7 +276,7 @@ library
     , cryptonite
     , data-default-class
     , deriving-aeson
-    , dhall
+    , dhall <=1.35.0
     , double-conversion
     , either
     , esqueleto
@@ -339,7 +339,7 @@ library
     , time
     , tinylog
     , transformers
-    , universum
+    , universum <1.8
     , unix
     , unliftio
     , unliftio-core
@@ -417,7 +417,7 @@ test-suite mobility-core-tests
     , cryptonite
     , data-default-class
     , deriving-aeson
-    , dhall
+    , dhall <=1.35.0
     , double-conversion
     , either
     , esqueleto
@@ -481,7 +481,7 @@ test-suite mobility-core-tests
     , time
     , tinylog
     , transformers
-    , universum
+    , universum <1.8
     , unix
     , unliftio
     , unliftio-core

diff --git a/lib/mobility-core/src/Kernel/Types/Error.hs b/lib/mobility-core/src/Kernel/Types/Error.hs
@@ -868,6 +868,7 @@ instance IsHTTPError MMIError where
 
 instance IsAPIError MMIError
 
+
 data MerchantMessageError
   = MerchantMessageNotFound Text Text
   deriving (Eq, Show, IsBecknAPIError)
@@ -885,3 +886,18 @@ instance IsHTTPError MerchantMessageError where
     MerchantMessageNotFound _ _ -> E500
 
 instance IsAPIError MerchantMessageError
+
+newtype SosError = SosIdDoesNotExist Text
+  deriving (Eq, Show, IsBecknAPIError)
+
+instanceExceptionWithParent 'HTTPException ''SosError
+
+instance IsBaseError SosError where
+  toMessage (SosIdDoesNotExist sosId) = Just $ "Sos with sosId \"" <> show sosId <> "\" not found. "
+
+instance IsHTTPError SosError where
+  toErrorCode _ = "SOS_ID_DOES_NOT_EXITS"
+  toHttpCode _ = E400
+
+instance IsAPIError SosError
+