module(..., package.seeall)

game = {
    name = "Run Rabbit Run",
    options = {sound=true, music=true},
    money = 0,
    best_score = 0,
}

module(..., package.seeall)

local db = {}
game = {}

function settings:init()

    local path = system.pathForFile( "rrr_settings.sqlite", system.DocumentsDirectory )
    file = io.open( path, "r" )
    if( file == nil )then
        pathSource     = system.pathForFile( "db/rrr_settings.sqlite", system.ResourceDirectory )
        fileSource     = io.open( pathSource, "r" )
        contentsSource = fileSource:read( "*a" )
        pathDest = system.pathForFile( "rrr_settings.sqlite", system.DocumentsDirectory )
        fileDest = io.open( pathDest, "w" )
        fileDest:write( contentsSource )
        io.close( fileSource )
        io.close( fileDest )
    else
        io.close( file )
    end

    path = system.pathForFile( "rrr_settings.sqlite", system.DocumentsDirectory )
    db = sqlite3.open(path)
--db:exec('DROP TABLE settings')
    local sql = 'CREATE TABLE IF NOT EXISTS settings (id INTEGER PRIMARY KEY, var UNIQUE, val);'
    db:exec(sql)
    game = get()
    if not game or table.count(game)==0 then
        g = require("default_values")
        game=copy(g.game)
    end
    if not game.player_name then
        local offset = nil
        local name = system.getInfo( "name" )
        if not offset then offset = string.find(name, "’s iPhone") end
        if not offset then offset = string.find(name, "’s iPad") end
        if not offset then offset = string.find(name, "’s iPod") end
        if offset then
            name = string.sub(name, 1, offset-1)
        end
        game.player_name = name
    end
    if not game.player_id then
        game.player_id = crypto.digest( crypto.md4, system.getInfo("deviceID"))
    end
    save()
end

function settings:reset_game()
    g=require("default_values")
    game = copy(g.game)
    save()
end

function settings:close()
       db:close()
end

function settings:get()
    local val = nil
    for result in db:nrows('SELECT val FROM settings WHERE var="game"') do
        val =  Json.Decode(result.val)
        val = val[1]
    end
    return val
end

function settings:save()
    local sql = 'INSERT OR REPLACE INTO settings(var, val) VALUES ("game", \''..Json.Encode({game})..'\')'
    db:exec(sql)
end

-- include all required libraries
require "sqlite3"
require "Json"
crypto = require("crypto")
settings = require 'settings'
settings:init()

-- setting variables
settings.game.lives = 5
settings.game.options.sound = true
settings.game.any_variable = any_value

-- save all data in settings.game table to SQLite DB
settings:save()

-- access saved data
local is_sound_on = settings.game.options.sound
local player_lives = setting.game.lives
 -- get player's name based on device name (eg: if device name - "John's iPhone", player_name will be "John")
local player_name = settings.game.player_name
-- get player ID, based on deviceID code
local player_id = settings.game.player_id

-- reset all saved data, set default values from default_values.lua file
settings:reset_game()