// Package json provides a json codec
package json // import "go.unistack.org/micro-codec-segmentio/v3/json"

import (
	"github.com/segmentio/encoding/json"
	pb "go.unistack.org/micro-proto/v3/codec"
	"go.unistack.org/micro/v3/codec"
	rutil "go.unistack.org/micro/v3/util/reflect"
)

var (
	DefaultMarshalOptions = JsonMarshalOptions{
		EscapeHTML:  true,
		SortMapKeys: true,
	}

	DefaultUnmarshalOptions = JsonUnmarshalOptions{
		ZeroCopy: true,
	}
)

var (
	_ codec.Codec   = (*jsonCodec)(nil)
	_ codec.CodecV2 = (*jsonCodecV2)(nil)
)

type JsonMarshalOptions struct {
	EscapeHTML      bool
	SortMapKeys     bool
	TrustRawMessage bool
}

type JsonUnmarshalOptions struct {
	DisallowUnknownFields                bool
	DontCopyNumber                       bool
	DontCopyRawMessage                   bool
	DontCopyString                       bool
	DontMatchCaseInsensitiveStructFields bool
	UseNumber                            bool
	ZeroCopy                             bool
}

type jsonCodec struct {
	opts        codec.Options
	encodeFlags json.AppendFlags
	decodeFlags json.ParseFlags
}

type jsonCodecV2 struct {
	opts        codec.Options
	encodeFlags json.AppendFlags
	decodeFlags json.ParseFlags
}

func getMarshalFlags(o JsonMarshalOptions) json.AppendFlags {
	var encodeFlags json.AppendFlags

	if o.EscapeHTML {
		encodeFlags |= json.EscapeHTML
	}

	if o.SortMapKeys {
		encodeFlags |= json.SortMapKeys
	}

	if o.TrustRawMessage {
		encodeFlags |= json.TrustRawMessage
	}

	return encodeFlags
}

func getUnmarshalFlags(o JsonUnmarshalOptions) json.ParseFlags {
	var decodeFlags json.ParseFlags

	if o.DisallowUnknownFields {
		decodeFlags |= json.DisallowUnknownFields
	}

	if o.DontCopyNumber {
		decodeFlags |= json.DontCopyNumber
	}

	if o.DontCopyRawMessage {
		decodeFlags |= json.DontCopyRawMessage
	}

	if o.DontCopyString {
		decodeFlags |= json.DontCopyString
	}

	if o.DontMatchCaseInsensitiveStructFields {
		decodeFlags |= json.DontMatchCaseInsensitiveStructFields
	}

	if o.UseNumber {
		decodeFlags |= json.UseNumber
	}

	if o.ZeroCopy {
		decodeFlags |= json.ZeroCopy
	}

	return decodeFlags
}

func (c *jsonCodec) Marshal(v interface{}, opts ...codec.Option) ([]byte, error) {
	if v == nil {
		return nil, nil
	}

	options := c.opts
	for _, o := range opts {
		o(&options)
	}

	if options.Flatten {
		if nv, err := rutil.StructFieldByTag(v, options.TagName, "flatten"); err == nil {
			v = nv
		}
	}

	switch m := v.(type) {
	case *codec.Frame:
		return m.Data, nil
	case *pb.Frame:
		return m.Data, nil
	case codec.RawMessage:
		return []byte(m), nil
	case *codec.RawMessage:
		return []byte(*m), nil
	}

	marshalOptions := DefaultMarshalOptions
	if options.Context != nil {
		if f, ok := options.Context.Value(marshalOptionsKey{}).(JsonMarshalOptions); ok {
			marshalOptions = f
		}
	}

	var err error
	var buf []byte
	buf, err = json.Append(buf, v, getMarshalFlags(marshalOptions))
	return buf, err
}

func (c *jsonCodec) Unmarshal(b []byte, v interface{}, opts ...codec.Option) error {
	if len(b) == 0 || v == nil {
		return nil
	}

	options := c.opts
	for _, o := range opts {
		o(&options)
	}

	if options.Flatten {
		if nv, err := rutil.StructFieldByTag(v, options.TagName, "flatten"); err == nil {
			v = nv
		}
	}

	switch m := v.(type) {
	case *codec.Frame:
		m.Data = b
		return nil
	case *pb.Frame:
		m.Data = b
		return nil
	case *codec.RawMessage:
		*m = append((*m)[0:0], b...)
		return nil
	case codec.RawMessage:
		copy(m, b)
		return nil
	}

	unmarshalOptions := DefaultUnmarshalOptions
	if options.Context != nil {
		if f, ok := options.Context.Value(unmarshalOptionsKey{}).(JsonUnmarshalOptions); ok {
			unmarshalOptions = f
		}
	}

	_, err := json.Parse(b, v, getUnmarshalFlags(unmarshalOptions))
	return err
}

func (c *jsonCodec) String() string {
	return "json"
}

func (c *jsonCodecV2) Marshal(b []byte, v interface{}, opts ...codec.Option) ([]byte, error) {
	if v == nil {
		return nil, nil
	}

	options := c.opts
	for _, o := range opts {
		o(&options)
	}

	if options.Flatten {
		if nv, err := rutil.StructFieldByTag(v, options.TagName, "flatten"); err == nil {
			v = nv
		}
	}

	switch m := v.(type) {
	case *codec.Frame:
		return m.Data, nil
	case *pb.Frame:
		return m.Data, nil
	}

	marshalOptions := DefaultMarshalOptions
	if options.Context != nil {
		if f, ok := options.Context.Value(marshalOptionsKey{}).(JsonMarshalOptions); ok {
			marshalOptions = f
		}
	}

	var err error
	b, err = json.Append(b[:0], v, getMarshalFlags(marshalOptions))
	return b, err
}

func (c *jsonCodecV2) Unmarshal(b []byte, v interface{}, opts ...codec.Option) error {
	if len(b) == 0 || v == nil {
		return nil
	}

	options := c.opts
	for _, o := range opts {
		o(&options)
	}

	if options.Flatten {
		if nv, err := rutil.StructFieldByTag(v, options.TagName, "flatten"); err == nil {
			v = nv
		}
	}

	switch m := v.(type) {
	case *codec.Frame:
		m.Data = b
		return nil
	case *pb.Frame:
		m.Data = b
		return nil
	}

	unmarshalOptions := DefaultUnmarshalOptions
	if options.Context != nil {
		if f, ok := options.Context.Value(unmarshalOptionsKey{}).(JsonUnmarshalOptions); ok {
			unmarshalOptions = f
		}
	}

	_, err := json.Parse(b, v, getUnmarshalFlags(unmarshalOptions))
	return err
}

func (c *jsonCodecV2) String() string {
	return "json"
}

func NewCodec(opts ...codec.Option) *jsonCodec {
	return &jsonCodec{opts: codec.NewOptions(opts...)}
}

func NewCodecV2(opts ...codec.Option) *jsonCodecV2 {
	return &jsonCodecV2{opts: codec.NewOptions(opts...)}
}