Read PEM files
commit397f3536e1bb44ee6a058fc9dbd5c7a54dc05d39
authorEdsko de Vries <edsko@well-typed.com>
dateTue 17 Jul 2012, 12:35 (14 years ago)
parent9c6cf0d
azure-service-api/azure-service-api.cabal+9−2
@@ -16,6 +16,13 @@ Build-Type: Simple
1616Cabal-Version: >=1.8
1717
1818Library
19− exposed-modules: Network.Azure.ServiceManagement
20− Build-Depends: base ==4.5.*
19+ Exposed-Modules: Network.Azure.ServiceManagement
20+ Build-Depends: base ==4.5.*,
21+ tls,
22+ tls-extra
2123 HS-Source-Dirs: src
24+
25+Executable hs-azure-service-api
26+ Main-Is: src/Network/Azure/ServiceManagement/CommandLine.hs
27+ Build-Depends: base ==4.5.*,
28+ azure-service-api
azure-service-api/src/Network/Azure/ServiceManagement.hs+6−2
@@ -1,3 +1,7 @@
1−module Network.Azure.ServiceManagement where
2−
1+module Network.Azure.ServiceManagement
2+ (
3+ -- * Re-export functionality from TLS
4+ fileReadCertificate
5+ ) where
36
7+import Network.TLS.Extra
azure-service-api/src/Network/Azure/ServiceManagement/CommandLine.hsnew file+10
@@ -0,0 +1,10 @@
1+import Network.Azure.ServiceManagement
2+ ( fileReadCertificate
3+ )
4+import System.Environment (getArgs)
5+
6+main :: IO ()
7+main = do
8+ [cert] <- getArgs
9+ x509 <- fileReadCertificate cert
10+ print x509