// Copyright (C) 2018 Storj Labs, Inc.
// See LICENSE for copying information.

package main

import (
	"bufio"
	"fmt"
	"log"
	"net"
	"sync"
	"time"
)

// GraphiteDest is a MetricDest that sends data with the Graphite TCP wire
// protocol
type GraphiteDest struct {
	mtx     sync.Mutex
	address string
	conn    net.Conn
	buf     *bufio.Writer
	stopped bool
}

// NewGraphiteDest creates a GraphiteDest with TCP address address. Because
// this function is called in a Lua pipeline domain-specific language, the DSL
// wants a graphite destination to be flushing every few seconds, so this
// constructor will start that process. Use Close to stop it.
func NewGraphiteDest(address string) *GraphiteDest {
	rv := &GraphiteDest{address: address}
	go rv.flush()
	return rv
}

// Metric implements MetricDest
func (d *GraphiteDest) Metric(application, instance string,
	key []byte, val float64, ts time.Time) error {

	d.mtx.Lock()
	defer d.mtx.Unlock()

	if d.conn == nil {
		conn, err := net.Dial("tcp", d.address)
		if err != nil {
			return err
		}
		d.conn = conn
		d.buf = bufio.NewWriter(conn)
	}

	_, err := fmt.Fprintf(d.buf, "%s.%s.%s %v %d\n", application, string(key),
		instance, val, ts.Unix())
	return err
}

// Close stops the flushing goroutine
func (d *GraphiteDest) Close() error {
	d.mtx.Lock()
	d.stopped = true
	d.mtx.Unlock()
	return nil
}

func (d *GraphiteDest) flush() {
	for {
		time.Sleep(5 * time.Second)
		d.mtx.Lock()
		if d.stopped {
			d.mtx.Unlock()
			return
		}
		var err error
		if d.buf != nil {
			err = d.buf.Flush()
		}
		d.mtx.Unlock()
		if err != nil {
			log.Printf("failed flushing: %v", err)
		}
	}
}