From c1efffd4ba11be9438f3174e6ca4d3d9971f8557 Mon Sep 17 00:00:00 2001
From: Henrik Hautakoski <henrik@eossweden.org>
Date: Mon, 5 Jun 2023 11:50:05 +0200
Subject: [PATCH] Adding cmd/bench/main.go

---
 Makefile          |   7 ++-
 cmd/bench/main.go | 122 ++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 128 insertions(+), 1 deletion(-)
 create mode 100644 cmd/bench/main.go

diff --git a/Makefile b/Makefile
index a37fac6..0742c77 100644
--- a/Makefile
+++ b/Makefile
@@ -7,13 +7,18 @@ PREFIX=/usr/local
 BINDIR=$(PREFIX)/bin
 CFGDIR=$(PREFIX)/etc/thalos
 
-.PHONY: build build/$(PROGRAM) test
+.PHONY: build build/$(PROGRAM) build/benchmark test
 
 build: build/$(PROGRAM)
 
 build/$(PROGRAM) :
 	$(GO) build $(GOBUILDFLAGS) -o $@ cmd/thalos/main.go
 
+build-benchmark : build/benchmark
+
+build/benchmark :
+	$(GO) build $(GOBUILDFLAGS) -o $@ cmd/bench/main.go
+
 install: build
 	install -D build/$(PROGRAM) $(DESTDIR)$(BINDIR)/$(PROGRAM)
 	install -m 644 -D config.example.yml $(DESTDIR)$(CFGDIR)/config.yml
diff --git a/cmd/bench/main.go b/cmd/bench/main.go
new file mode 100644
index 0000000..811d107
--- /dev/null
+++ b/cmd/bench/main.go
@@ -0,0 +1,122 @@
+package main
+
+import (
+	"context"
+	"flag"
+	"fmt"
+	"os"
+	"os/signal"
+	"time"
+
+	"github.com/eosswedenorg/thalos/api"
+	"github.com/eosswedenorg/thalos/api/message"
+	_ "github.com/eosswedenorg/thalos/api/message/json"
+	api_redis "github.com/eosswedenorg/thalos/api/redis"
+
+	"github.com/go-redis/redis/v8"
+	log "github.com/sirupsen/logrus"
+)
+
+var (
+	interval time.Duration
+	chain_id string
+
+	redis_prefix string
+	redis_url    string
+	redis_db     int
+)
+
+func init() {
+	flag.DurationVar(&interval, "interval", time.Minute, "How often the benchmark results should be displayed.")
+	flag.StringVar(&chain_id, "chain_id", "1064487b3cd1a897ce03ae5b6a865651747e2e152090f99c1d19d44e01aea5a4", "")
+	flag.StringVar(&redis_prefix, "prefix", "ship", "")
+
+	flag.StringVar(&redis_url, "redis-url", "127.0.0.1:6379", "host:port to the redis server")
+	flag.IntVar(&redis_db, "redis-db", 0, "What redis database we should connect to.")
+}
+
+func main() {
+	var counter int = 0
+
+	flag.Parse()
+
+	log.WithFields(log.Fields{
+		"url":      redis_url,
+		"prefix":   redis_prefix,
+		"chain_id": chain_id,
+		"database": redis_db,
+	}).Info("Connecting to redis")
+
+	// Create redis client
+	rdb := redis.NewClient(&redis.Options{
+		Addr: redis_url,
+		DB:   redis_db,
+	})
+
+	status := rdb.Ping(context.Background())
+
+	if status.Err() != nil {
+		log.Fatal("cant connect to redis: ", status.Err())
+		return
+	}
+
+	log.Println("Connected to redis")
+
+	log.WithFields(log.Fields{
+		"interval": interval,
+	}).Info("Starting benchmark")
+
+	sub := api_redis.NewSubscriber(rdb, api_redis.Namespace{
+		Prefix:  redis_prefix,
+		ChainID: chain_id,
+	})
+
+	codec, err := message.GetCodec("json")
+	if err != nil {
+		log.Fatal(err)
+		return
+	}
+
+	client := api.NewClient(sub, codec.Decoder)
+
+	client.OnAction = func(act message.ActionTrace) {
+		counter++
+	}
+
+	// Subscribe to all actions
+	if err = client.Subscribe(api.ActionChannel{}.Channel()); err != nil {
+		log.Fatal(err)
+		return
+	}
+
+	go func() {
+		t := time.Now()
+		sig := make(chan os.Signal, 1)
+		signal.Notify(sig, os.Interrupt)
+
+		for {
+			select {
+			case <-sig:
+				fmt.Println("Got interrupt")
+				client.Close()
+				return
+			case now := <-time.After(interval):
+				elapsed := now.Sub(t)
+				t = now
+
+				log.WithFields(log.Fields{
+					"num_messages": counter,
+					"elapsed":      elapsed,
+					"msg_per_sec":  float64(counter) / elapsed.Seconds(),
+					"msg_per_ms":   float64(counter) / float64(elapsed.Milliseconds()),
+					"msg_per_min":  float64(counter) / elapsed.Minutes(),
+				}).Info("Benchmark results")
+
+				counter = 0
+			}
+		}
+	}()
+
+	// Read stuff.
+	client.Run()
+}