package world

import "path/filepath"
import "gitlab.com/beoran/woe/sitef"
import "gitlab.com/beoran/woe/monolog"
import "fmt"
import "errors"

type Privilege int

const (
	PRIVILEGE_ZERO = Privilege(iota * 100)
	PRIVILEGE_NORMAL
	PRIVILEGE_MASTER
	PRIVILEGE_LORD
	PRIVILEGE_IMPLEMENTOR
)

type Named struct {
	Name string
}

type Account struct {
	Name           string
	Hash           string
	Algo           string
	Email          string
	Points         int
	Privilege      Privilege
	CharacterNames []string
	characters     []*Character
}

func SavePathForXML(dirname string, typename string, name string) string {
	return filepath.Join(dirname, typename, name+".xml")
}

func SavePathFor(dirname string, typename string, name string) string {
	return filepath.Join(dirname, typename, name+".sitef")
}

func NewAccount(name string, pass string, email string, points int) *Account {
	hash := WoeCryptPassword(pass, "")
	return &Account{name, hash, "woe", email, points, PRIVILEGE_NORMAL, nil, nil}
	// return &Account{name, pass, "plain", email, points, PRIVILEGE_NORMAL, nil, nil}
}

// Export an account to a "universal" map
func (me *Account) ToUniMap() map[string]interface{} {
	res := make(map[string]interface{})
	return res
}

// Password Challenge for an account.
func (me *Account) Challenge(challenge string) bool {
	if me.Algo == "plain" {
		return me.Hash == challenge
	} else if me.Algo == "woe" {
		return WoeCryptChallenge(me.Hash, challenge)
	}
	// implement beter passwd encryption later
	return false
}

// Add a character to an account.
func (me *Account) AddCharacter(chara *Character) {
	me.characters = append(me.characters, chara)
}

// Save an account as a sitef file.
func (me *Account) Save(dirname string) (err error) {
	path := SavePathFor(dirname, "account", me.Name)

	rec := sitef.NewRecord()
	rec.Put("name", me.Name)
	rec.Put("hash", me.Hash)
	rec.Put("algo", me.Algo)
	rec.Put("email", me.Email)
	rec.PutInt("points", me.Points)
	rec.PutInt("privilege", int(me.Privilege))
	rec.PutInt("characters", len(me.characters))
	for i, chara := range me.characters {
		key := fmt.Sprintf("characters[%d]", i)
		rec.Put(key, chara.ID)

	}
	monolog.Debug("Saving Acccount record: %s %v", path, rec)
	return sitef.SaveRecord(path, *rec)
}

// Load an account from a sitef file.
func LoadAccount(dirname string, name string) (account *Account, err error) {

	path := SavePathFor(dirname, "account", name)

	records, err := sitef.ParseFilename(path)
	if err != nil {
		return nil, err
	}

	if len(records) < 1 {
		return nil, errors.New("No record found!")
	}

	record := records[0]
	monolog.Info("Loading Account record: %s %v", path, record)

	account = new(Account)
	account.Name = record.Get("name")
	account.Hash = record.Get("hash")
	account.Algo = record.Get("algo")
	account.Email = record.Get("email")
	account.Points = record.GetIntDefault("points", 0)
	account.Privilege = Privilege(record.GetIntDefault("privilege",
		int(PRIVILEGE_NORMAL)))

	nchars := record.GetIntDefault("characters", 0)
	account.characters = make([]*Character, 0, nchars)
	monolog.Info("Try to load %d characters:\n", nchars)
	for index := 0; index < nchars; index++ {

		chid := record.GetArrayIndex("characters", index)
		monolog.Info("Loading character: %d %s\n", index, chid)

		ch, err := account.LoadCharacter(dirname, chid)
		if err != nil {
			monolog.Error("Could not load character %s: %s", chid, err.Error())
			// return nil, err
		} else {
			account.characters = append(account.characters, ch)
		}
	}

	/* Todo: load characters here... */
	monolog.Info("Loaded Account: %s %v", path, account)
	return account, nil
}

func (me *Account) NumCharacters() int {
	return len(me.characters)
}

func (me *Account) GetCharacter(index int) *Character {
	return me.characters[index]
}

func (me *Account) FindCharacter(character *Character) (index int) {
	for k, c := range me.characters {
		if c == character {
			return k
		}
	}
	return -1
}

// Delete a character from this account.
func (me *Account) DeleteCharacter(dirname string, character *Character) bool {

	if i := me.FindCharacter(character); i < 0 {
		monolog.Warning("Could not find character: %v %d", character, i)
		return false
	} else {
		copy(me.characters[i:], me.characters[i+1:])
		newlen := len(me.characters) - 1
		me.characters[newlen] = nil
		me.characters = me.characters[:newlen]
	}
	/// Save self so the deletion is correctly recorded.
	me.Save(dirname)

	return character.Delete(dirname)
}

func (me *Account) CharacterEntitylikeSlice() EntitylikeSlice {
	els := make(EntitylikeSlice, 0, 16)
	for i := 0; i < me.NumCharacters(); i++ {
		chara := me.GetCharacter(i)
		els = append(els, chara)
	}
	return els
}