POC gRPC node

Author: Jimbo4350

cardano-node/Setup.hs

@@ -0,0 +1,3 @@
+import Data.ProtoLens.Setup
+
+main = defaultMainGeneratingProtos "proto"

cardano-node/cardano-node.cabal

@@ -12,8 +12,15 @@ maintainer:             [email protected]
 license:                Apache-2.0
 license-files:          LICENSE
                         NOTICE
-build-type:             Simple
+build-type:             Custom
 extra-doc-files:        ChangeLog.md
+extra-source-files:     proto/*.proto
+
+custom-setup
+  setup-depends:
+     base
+   , Cabal
+   , proto-lens-setup
 
 Flag unexpected_thunks
   Description:          Turn on unexpected thunks checks
@@ -88,6 +95,10 @@ library
                         Cardano.Node.Protocol.Shelley
                         Cardano.Node.Protocol.Types
                         Cardano.Node.Queries
+                        Cardano.Node.Rpc.Client
+                        Cardano.Node.Rpc.Proto.Api.Node
+                        Cardano.Node.Rpc.Proto.Api.NodeMetadata
+                        Cardano.Node.Rpc.Server
                         Cardano.Node.Run
                         Cardano.Node.Startup
                         Cardano.Node.STM
@@ -174,6 +185,8 @@ library
                       , ekg-core
                       , filepath
                       , formatting
+                      , grapesy
+                      , grpc-spec
                       , generic-data
                       , hashable
                       , hostname
@@ -200,6 +213,9 @@ library
                       , ouroboros-network-protocols ^>= 0.14
                       , prettyprinter
                       , prettyprinter-ansi-terminal
+                      , proto-lens-protobuf-types
+                      , proto-lens-runtime
+                      , proto-lens
                       , psqueues
                       , random
                       , resource-registry
@@ -225,6 +241,8 @@ library
                       , typed-protocols-stateful >= 0.3
                       , yaml
 
+  build-tool-depends: proto-lens-protoc:proto-lens-protoc
+
 executable cardano-node
   import:               project-config
   hs-source-dirs:       app

cardano-node/proto/node.proto

@@ -0,0 +1,25 @@
+
+syntax = "proto3";
+
+import "google/protobuf/empty.proto";
+
+service Node {
+
+    rpc GetEra(google.protobuf.Empty) returns (CurrentEra) {}
+
+}
+
+enum Era {
+    byron = 0; 
+    shelley = 1;
+    allegra = 2;
+    mary = 3;
+    alonzo = 4;
+    babbage = 5;
+    conway = 6;
+}
+
+
+message CurrentEra {
+   Era era = 1;
+}

cardano-node/src/Cardano/Node/Rpc/Client.hs

@@ -0,0 +1,15 @@
+{-# LANGUAGE DataKinds #-}
+{-# LANGUAGE TypeApplications #-}
+
+module Cardano.Node.Rpc.Client
+  ( exampleCurrentEra
+
+  )
+  where 
+import qualified Cardano.Node.Rpc.Proto.Api.Node  as ProtoGen
+import Data.ProtoLens (defMessage)
+import Data.ProtoLens.Field (field)
+import Lens.Micro
+
+exampleCurrentEra :: ProtoGen.CurrentEra 
+exampleCurrentEra = defMessage  & field @"era" .~ ProtoGen.Byron