{-# LANGUAGE CPP #-}
module Amazon.SNS.Verify.ValidURI
( validScheme
, validRegPattern
, devRegPattern
, prodRegPattern
) where
import Amazon.SNS.Verify.Prelude
_devScheme :: String
_devScheme :: String
_devScheme = String
"http:"
_prodScheme :: String
_prodScheme :: String
_prodScheme = String
"https:"
validScheme :: String
validScheme :: String
validScheme =
#ifdef DEVELOPMENT
_devScheme
#else
String
_prodScheme
#endif
validRegPattern :: String
validRegPattern :: String
validRegPattern =
#ifdef DEVELOPMENT
devRegPattern
#else
String
prodRegPattern
#endif
devRegPattern :: String
devRegPattern :: String
devRegPattern = String
"^localhost$"
prodRegPattern :: String
prodRegPattern :: String
prodRegPattern = String
"^sns\\.[a-zA-Z0-9\\-]{3,}\\.amazonaws\\.com(\\.cn)?$"