package ants

import (
	"runtime"
	"sync/atomic"
	"sync"
)

type sig struct{}

type f func()

type Pool struct {
	capacity   int32
	running    int32
	freeSignal chan sig
	workers    []*Worker
	workerPool sync.Pool
	destroy    chan sig
	m          sync.Mutex
	wg         *sync.WaitGroup
}

func NewPool(size int) *Pool {
	p := &Pool{
		capacity:   int32(size),
		freeSignal: make(chan sig, size),
		destroy:    make(chan sig, runtime.GOMAXPROCS(-1)),
		wg:         &sync.WaitGroup{},
	}
	return p
}

//-------------------------------------------------------------------------

func (p *Pool) Push(task f) error {
	if len(p.destroy) > 0 {
		return nil
	}
	p.wg.Add(1)
	w := p.getWorker()
	w.sendTask(task)
	//p.launchSignal <- sig{}
	return nil
}

func (p *Pool) Running() int {
	return int(atomic.LoadInt32(&p.running))
}

func (p *Pool) Free() int {
	return int(atomic.LoadInt32(&p.capacity) - atomic.LoadInt32(&p.running))
}

func (p *Pool) Cap() int {
	return int(atomic.LoadInt32(&p.capacity))
}

func (p *Pool) Wait() {
	p.wg.Wait()
}

func (p *Pool) Destroy() error {
	p.m.Lock()
	defer p.m.Unlock()
	for i := 0; i < runtime.GOMAXPROCS(-1)+1; i++ {
		p.destroy <- sig{}
	}
	return nil
}

//-------------------------------------------------------------------------

func (p *Pool) reachLimit() bool {
	return p.Running() >= p.Cap()
}

func (p *Pool) newWorker() *Worker {
	if p.reachLimit() {
		<-p.freeSignal
		return p.getWorker()
	}
	worker := &Worker{
		pool: p,
		task: make(chan f),
	}
	worker.run()
	atomic.AddInt32(&p.running, 1)
	return worker
}

func (p *Pool) getWorker() *Worker {
	if w := p.workerPool.Get(); w != nil {
		return w.(*Worker)
	}
	return p.newWorker()
}

func (p *Pool) putWorker(worker *Worker) {
	p.workerPool.Put(worker)
	p.m.Lock()
	p.workers = append(p.workers, worker)
	if p.reachLimit() {
		p.freeSignal <- sig{}
	}
	p.m.Unlock()
}