package mojangtextures

import (
	"strings"
	"sync"
	"time"

	"github.com/elyby/chrly/api/mojang"
)

type jobResult struct {
	profile *mojang.ProfileInfo
	error   error
}

type jobItem struct {
	username    string
	respondChan chan *jobResult
}

type jobsQueue struct {
	lock  sync.Mutex
	items []*jobItem
}

func (s *jobsQueue) New() *jobsQueue {
	s.items = []*jobItem{}
	return s
}

func (s *jobsQueue) Enqueue(t *jobItem) {
	s.lock.Lock()
	defer s.lock.Unlock()

	s.items = append(s.items, t)
}

func (s *jobsQueue) Dequeue(n int) []*jobItem {
	s.lock.Lock()
	defer s.lock.Unlock()

	if n > s.size() {
		n = s.size()
	}

	items := s.items[0:n]
	s.items = s.items[n:len(s.items)]

	return items
}

func (s *jobsQueue) Size() int {
	s.lock.Lock()
	defer s.lock.Unlock()

	return s.size()
}

func (s *jobsQueue) size() int {
	return len(s.items)
}

var usernamesToUuids = mojang.UsernamesToUuids
var forever = func() bool {
	return true
}

type BatchUuidsProvider struct {
	Emitter

	IterationDelay time.Duration
	IterationSize  int

	onFirstCall sync.Once
	queue       jobsQueue
}

func (ctx *BatchUuidsProvider) GetUuid(username string) (*mojang.ProfileInfo, error) {
	ctx.onFirstCall.Do(func() {
		ctx.queue.New()
		ctx.startQueue()
	})

	resultChan := make(chan *jobResult)
	ctx.queue.Enqueue(&jobItem{username, resultChan})
	ctx.Emit("mojang_textures:batch_uuids_provider:queued", username)

	result := <-resultChan

	return result.profile, result.error
}

func (ctx *BatchUuidsProvider) startQueue() {
	go func() {
		time.Sleep(ctx.IterationDelay)
		for forever() {
			ctx.Emit("mojang_textures:batch_uuids_provider:before_round")
			ctx.queueRound()
			ctx.Emit("mojang_textures:batch_uuids_provider:after_round")
			time.Sleep(ctx.IterationDelay)
		}
	}()
}

func (ctx *BatchUuidsProvider) queueRound() {
	queueSize := ctx.queue.Size()
	jobs := ctx.queue.Dequeue(ctx.IterationSize)

	var usernames []string
	for _, job := range jobs {
		usernames = append(usernames, job.username)
	}

	ctx.Emit("mojang_textures:batch_uuids_provider:round", usernames, queueSize - len(jobs))
	if len(usernames) == 0 {
		return
	}

	profiles, err := usernamesToUuids(usernames)
	for _, job := range jobs {
		go func(job *jobItem) {
			response := &jobResult{}
			if err != nil {
				response.error = err
			} else {
				// The profiles in the response aren't ordered, so we must search each username over full array
				for _, profile := range profiles {
					if strings.EqualFold(job.username, profile.Name) {
						response.profile = profile
						break
					}
				}
			}

			job.respondChan <- response
		}(job)
	}
}