package stream

import (
	"bytes"
	"errors"
	"fmt"
	"net"
	"time"

	"github.com/9seconds/mtg/conntypes"
	"github.com/9seconds/mtg/tlstypes"
	"go.uber.org/zap"
)

type wrapperFakeTLS struct {
	bufferedReader

	parent conntypes.StreamReadWriteCloser
}

func (w *wrapperFakeTLS) Write(p []byte) (int, error) {
	return w.write(p, func(b []byte) (int, error) {
		return w.parent.Write(b) // nolint: wrapcheck
	})
}

func (w *wrapperFakeTLS) WriteTimeout(p []byte, timeout time.Duration) (int, error) {
	startTime := time.Now()

	return w.write(p, func(b []byte) (int, error) {
		elapsed := time.Since(startTime)
		if elapsed > timeout {
			return w.parent.WriteTimeout(b, timeout-elapsed) // nolint: wrapcheck
		}

		return 0, errors.New("timeout")
	})
}

func (w *wrapperFakeTLS) write(p []byte, writeFunc func([]byte) (int, error)) (int, error) {
	sum := 0
	buf := bytes.Buffer{}

	for _, v := range tlstypes.MakeRecords(p) {
		buf.Reset()
		v.WriteBytes(&buf)

		_, err := writeFunc(buf.Bytes())
		if err != nil {
			return sum, err
		}

		sum += v.Data.Len()
	}

	return sum, nil
}

func (w *wrapperFakeTLS) Conn() net.Conn {
	return w.parent.Conn()
}

func (w *wrapperFakeTLS) Logger() *zap.SugaredLogger {
	return w.parent.Logger().Named("faketls")
}

func (w *wrapperFakeTLS) LocalAddr() *net.TCPAddr {
	return w.parent.LocalAddr()
}

func (w *wrapperFakeTLS) RemoteAddr() *net.TCPAddr {
	return w.parent.RemoteAddr()
}

func (w *wrapperFakeTLS) Close() error {
	return w.parent.Close() // nolint: wrapcheck
}

func NewFakeTLS(socket conntypes.StreamReadWriteCloser) conntypes.StreamReadWriteCloser {
	faketls := &wrapperFakeTLS{
		parent: socket,
	}

	faketls.readFunc = func() ([]byte, error) {
		for {
			rec, err := tlstypes.ReadRecord(faketls.parent)
			if err != nil {
				return nil, err // nolint: wrapcheck
			}

			switch rec.Type {
			case tlstypes.RecordTypeChangeCipherSpec:
			case tlstypes.RecordTypeApplicationData:
				buf := &bytes.Buffer{}
				rec.Data.WriteBytes(buf)

				return buf.Bytes(), nil
			case tlstypes.RecordTypeHandshake:
				return nil, errors.New("unsupported record type handshake")
			default:
				return nil, fmt.Errorf("unsupported record type %v", rec.Type)
			}
		}
	}

	return faketls
}