package requestid // import "go.unistack.org/micro-wrapper-requestid/v3"

import (
	"context"
	"net/textproto"

	"go.unistack.org/micro/v3/client"
	"go.unistack.org/micro/v3/logger"
	"go.unistack.org/micro/v3/metadata"
	"go.unistack.org/micro/v3/server"
	"go.unistack.org/micro/v3/util/id"
)

func init() {
	logger.DefaultContextAttrFuncs = append(logger.DefaultContextAttrFuncs, func(ctx context.Context) []interface{} {
		if v, ok := ctx.Value(XRequestIDKey{}).(string); ok {
			return []interface{}{DefaultMetadataKey, v}
		}
		return nil
	})
}

type XRequestIDKey struct{}

// DefaultMetadataKey contains metadata key
var DefaultMetadataKey = textproto.CanonicalMIMEHeaderKey("x-request-id")

// DefaultMetadataFunc wil be used if user not provide own func to fill metadata
var DefaultMetadataFunc = func(ctx context.Context) (context.Context, error) {
	var xid string
	var err error

	if _, ok := ctx.Value(XRequestIDKey{}).(string); !ok {
		xid, err = id.New()
		if err != nil {
			return ctx, err
		}
		ctx = context.WithValue(ctx, XRequestIDKey{}, xid)
	}

	imd, ok := metadata.FromIncomingContext(ctx)
	if !ok {
		imd = metadata.New(1)
		imd.Set(DefaultMetadataKey, xid)
		ctx = metadata.NewIncomingContext(ctx, imd)
	} else if _, ok = imd.Get(DefaultMetadataKey); !ok {
		imd.Set(DefaultMetadataKey, xid)
	}

	omd, ok := metadata.FromOutgoingContext(ctx)
	if !ok {
		omd = metadata.New(1)
		omd.Set(DefaultMetadataKey, xid)
		ctx = metadata.NewOutgoingContext(ctx, imd)
	} else if _, ok = omd.Get(DefaultMetadataKey); !ok {
		omd.Set(DefaultMetadataKey, xid)
	}

	return ctx, nil
}

type wrapper struct {
	client.Client
}

func NewClientWrapper() client.Wrapper {
	return func(c client.Client) client.Client {
		handler := &wrapper{
			Client: c,
		}
		return handler
	}
}

func NewClientCallWrapper() client.CallWrapper {
	return func(fn client.CallFunc) client.CallFunc {
		return func(ctx context.Context, addr string, req client.Request, rsp interface{}, opts client.CallOptions) error {
			var err error
			if ctx, err = DefaultMetadataFunc(ctx); err != nil {
				return err
			}
			return fn(ctx, addr, req, rsp, opts)
		}
	}
}

func (w *wrapper) Call(ctx context.Context, req client.Request, rsp interface{}, opts ...client.CallOption) error {
	var err error
	if ctx, err = DefaultMetadataFunc(ctx); err != nil {
		return err
	}
	return w.Client.Call(ctx, req, rsp, opts...)
}

func (w *wrapper) Stream(ctx context.Context, req client.Request, opts ...client.CallOption) (client.Stream, error) {
	var err error
	if ctx, err = DefaultMetadataFunc(ctx); err != nil {
		return nil, err
	}
	return w.Client.Stream(ctx, req, opts...)
}

func (w *wrapper) Publish(ctx context.Context, msg client.Message, opts ...client.PublishOption) error {
	var err error
	if ctx, err = DefaultMetadataFunc(ctx); err != nil {
		return err
	}
	return w.Client.Publish(ctx, msg, opts...)
}

func NewServerHandlerWrapper() server.HandlerWrapper {
	return func(fn server.HandlerFunc) server.HandlerFunc {
		return func(ctx context.Context, req server.Request, rsp interface{}) error {
			var err error
			if ctx, err = DefaultMetadataFunc(ctx); err != nil {
				return err
			}
			return fn(ctx, req, rsp)
		}
	}
}

func NewServerSubscriberWrapper() server.SubscriberWrapper {
	return func(fn server.SubscriberFunc) server.SubscriberFunc {
		return func(ctx context.Context, msg server.Message) error {
			var err error
			if xid, ok := msg.Header()[DefaultMetadataKey]; ok {
				ctx = context.WithValue(ctx, XRequestIDKey{}, xid)
			}
			if ctx, err = DefaultMetadataFunc(ctx); err != nil {
				return err
			}
			return fn(ctx, msg)
		}
	}
}