git.iko.soy/distributed-process
on master help sign in
Read PEM files
397f353Edsko de Vries
azure-service-api/azure-service-api.cabal+9−2
@@ -16,6 +16,13 @@ Build-Type: Simple
16Cabal-Version: >=1.8
16Cabal-Version: >=1.8
17
17
18Library
18Library
19− exposed-modules: Network.Azure.ServiceManagement
19+ Exposed-Modules: Network.Azure.ServiceManagement
20− Build-Depends: base ==4.5.*
20+ Build-Depends: base ==4.5.*,
21+ tls,
22+ tls-extra
21 HS-Source-Dirs: src
23 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
1+module Network.Azure.ServiceManagement
2−
2+ (
3+ -- * Re-export functionality from TLS
4+ fileReadCertificate
5+ ) where
3
6
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