package block

import (
	"time"

	"github.com/df-mc/dragonfly/server/block/cube"
	"github.com/df-mc/dragonfly/server/internal/nbtconv"
	"github.com/df-mc/dragonfly/server/item"
	"github.com/df-mc/dragonfly/server/world"
	"github.com/df-mc/dragonfly/server/world/particle"
	"github.com/df-mc/dragonfly/server/world/sound"
)

// Note is a musical block that emits sounds when powered with redstone.
type Note struct {
	solid
	bass

	// Pitch is the current pitch the note block is set to. Value ranges from 0-24.
	Pitch int
	// Powered is whether the note block was powered during its last redstone update.
	Powered bool
}

// playNote ...
func (n Note) playNote(pos cube.Pos, tx *world.Tx) {
	tx.PlaySound(pos.Vec3(), sound.Note{Instrument: n.instrument(pos, tx), Pitch: n.Pitch})
	tx.AddParticle(pos.Vec3(), particle.Note{Instrument: n.Instrument(), Pitch: n.Pitch})
}

// updateInstrument ...
func (n Note) instrument(pos cube.Pos, tx *world.Tx) sound.Instrument {
	if instrumentBlock, ok := tx.Block(pos.Side(cube.FaceDown)).(interface {
		Instrument() sound.Instrument
	}); ok {
		return instrumentBlock.Instrument()
	}
	return sound.Piano()
}

// DecodeNBT ...
func (n Note) DecodeNBT(data map[string]any) any {
	n.Pitch = int(nbtconv.Uint8(data, "note"))
	n.Powered = nbtconv.Bool(data, "powered")
	return n
}

// EncodeNBT ...
func (n Note) EncodeNBT() map[string]any {
	return map[string]any{"note": byte(n.Pitch), "powered": boolByte(n.Powered)}
}

// Activate tunes and plays the note block when there is room above it.
func (n Note) Activate(pos cube.Pos, _ cube.Face, tx *world.Tx, _ item.User, _ *item.UseContext) bool {
	if !n.canPlay(pos, tx) {
		return false
	}
	n.Pitch = (n.Pitch + 1) % 25
	n.playNote(pos, tx)
	tx.SetBlock(pos, n, &world.SetOpts{DisableBlockUpdates: true})
	return true
}

// RedstoneUpdate updates the note block's powered state and plays the note when it first becomes powered.
func (n Note) RedstoneUpdate(pos cube.Pos, tx *world.Tx) {
	poweredFaces := n.poweredFaces(pos, tx)
	powered := len(poweredFaces) > 0
	if powered == n.Powered {
		return
	}
	n.Powered = powered
	if powered && n.canPlay(pos, tx) {
		n.playNote(pos, tx)
	}
	tx.SetBlock(pos, n, &world.SetOpts{DisableBlockUpdates: true})
	updateAroundRedstone(pos, tx, poweredFaces...)
}

// canPlay reports whether the block above the note block is air.
func (n Note) canPlay(pos cube.Pos, tx *world.Tx) bool {
	_, ok := tx.Block(pos.Side(cube.FaceUp)).(Air)
	return ok
}

func (n Note) poweredFaces(pos cube.Pos, tx *world.Tx) []cube.Face {
	var faces []cube.Face
	for _, face := range cube.Faces() {
		adjacentPos := pos.Side(face)
		if power := tx.RedstonePower(adjacentPos, face, true); power > 0 {
			faces = append(faces, face)
		}
	}
	return faces
}

// BreakInfo ...
func (n Note) BreakInfo() BreakInfo {
	return newBreakInfo(0.8, alwaysHarvestable, axeEffective, oneOf(Note{}))
}

// FuelInfo ...
func (Note) FuelInfo() item.FuelInfo {
	return newFuelInfo(time.Second * 15)
}

// EncodeItem ...
func (n Note) EncodeItem() (name string, meta int16) {
	return "minecraft:noteblock", 0
}

// EncodeBlock ...
func (n Note) EncodeBlock() (name string, properties map[string]any) {
	return "minecraft:noteblock", nil
}