import time
import lib.settings as settings
import lib.logger
log = lib.logger.get_logger('DB_Sqlite')

import sqlite3
               
class DB_Sqlite():
    def __init__(self):
	log.debug("Connecting to DB")
	self.dbh = sqlite3.connect(settings.DB_SQLITE_FILE)
	self.dbc = self.dbh.cursor()

    def updateStats(self,averageOverTime):
	log.debug("Updating Stats")
	# Note: we are using transactions... so we can set the speed = 0 and it doesn't take affect until we are commited.
	self.dbc.execute("update pool_worker set speed = 0, alive = 0");
	stime = '%.2f' % ( time.time() - averageOverTime );
	self.dbc.execute("select username,SUM(difficulty) from shares where time > :time group by username", {'time':stime})
	total_speed = 0
	sqldata = []
	for name,shares in self.dbc.fetchall():
	    speed = int(int(shares) * pow(2,32)) / ( int(averageOverTime) * 1000 * 1000)
	    total_speed += speed
	    sqldata.append({'speed':speed,'user':name})
	self.dbc.executemany("update pool_worker set speed = :speed, alive = 1 where username = :user",sqldata)
	self.dbc.execute("update pool set value = :val where parameter = 'pool_speed'",{'val':total_speed})
	self.dbh.commit()

    def archive_check(self):
	# Check for found shares to archive
	self.dbc.execute("select time from shares where upstream_result = 1 order by time limit 1")
	data = self.dbc.fetchone()
	if data is None or (data[0] + settings.ARCHIVE_DELAY) > time.time() :
	    return False
	return data[0]

    def archive_found(self,found_time):
	self.dbc.execute("insert into shares_archive_found select * from shares where upstream_result = 1 and time <= :time",{'time':found_time})
	self.dbh.commit()

    def archive_to_db(self,found_time):
	self.dbc.execute("insert into shares_archive select * from shares where time <= :time",{'time':found_time})	
	self.dbh.commit()

    def archive_cleanup(self,found_time):
	self.dbc.execute("delete from shares where time <= :time",{'time':found_time})
	self.dbc.execute("vacuum")
	self.dbh.commit()

    def archive_get_shares(self,found_time):
	self.dbc.execute("select * from shares where time <= :time",{'time':found_time})
	return self.dbc
		
    def import_shares(self,data):
	log.debug("Importing Shares")
#	       0           1            2          3          4         5        6  7            8         9              10
#	data: [worker_name,block_header,block_hash,difficulty,timestamp,is_valid,ip,block_height,prev_hash,invalid_reason,share_diff]
	checkin_times = {}
	total_shares = 0
	best_diff = 0
	sqldata = []
	for k,v in enumerate(data):
	    if settings.DATABASE_EXTEND :
		total_shares += v[3]
		if v[0] in checkin_times:
		    if v[4] > checkin_times[v[0]] :
			checkin_times[v[0]]["time"] = v[4]
		else:
		    checkin_times[v[0]] = {"time": v[4], "shares": 0, "rejects": 0 }

		if v[5] == True :
		    checkin_times[v[0]]["shares"] += v[3]
		else :
		    checkin_times[v[0]]["rejects"] += v[3]

		if v[10] > best_diff:
		    best_diff = v[10]

		sqldata.append({'time':v[4],'rem_host':v[6],'username':v[0],'our_result':v[5],'upstream_result':0,'reason':v[9],'solution':'',
			'block_num':v[7],'prev_block_hash':v[8],'ua':'','diff':v[3]} )
	    else :
		sqldata.append({'time':v[4],'rem_host':v[6],'username':v[0],'our_result':v[5],'upstream_result':0,'reason':v[9],'solution':''} )

	if settings.DATABASE_EXTEND :
	    self.dbc.executemany("insert into shares " +\
		"(time,rem_host,username,our_result,upstream_result,reason,solution,block_num,prev_block_hash,useragent,difficulty) " +\
		"VALUES (:time,:rem_host,:username,:our_result,:upstream_result,:reason,:solution,:block_num,:prev_block_hash,:ua,:diff)",sqldata)


	    self.dbc.execute("select value from pool where parameter = 'round_shares'")
	    round_shares = int(self.dbc.fetchone()[0]) + total_shares
	    self.dbc.execute("update pool set value = :val where parameter = 'round_shares'",{'val':round_shares})

	    self.dbc.execute("select value from pool where parameter = 'round_best_share'")
	    round_best_share = int(self.dbc.fetchone()[0])
	    if best_diff > round_best_share:
		self.dbc.execute("update pool set value = :val where parameter = 'round_best_share'",{'val':best_diff})

	    self.dbc.execute("select value from pool where parameter = 'bitcoin_difficulty'")
	    difficulty = float(self.dbc.fetchone()[0])

	    if difficulty == 0:
		progress = 0
	    else:
	    	progress = (round_shares/difficulty)*100
	    self.dbc.execute("update pool set value = :val where parameter = 'round_progress'",{'val':progress})

	    sqldata = []
	    for k,v in checkin_times.items():
		sqldata.append({'last_checkin':v["time"],'addshares':v["shares"],'addrejects':v["rejects"],'user':k})
	    self.dbc.executemany("update pool_worker set last_checkin = :last_checkin, total_shares = total_shares + :addshares, " +\
			"total_rejects = total_rejects + :addrejects where username = :user",sqldata)
	else:
	    self.dbc.executemany("insert into shares (time,rem_host,username,our_result,upstream_result,reason,solution) " +\
		"VALUES (:time,:rem_host,:username,:our_result,:upstream_result,:reason,:solution)",sqldata)

	self.dbh.commit()

    def found_block(self,data):
	# Note: difficulty = -1 here
	self.dbc.execute("update shares set upstream_result = :usr, solution = :sol where time = :time and username = :user",
		{'usr':data[5],'sol':data[2],'time':data[4],'user':data[0]})
	if settings.DATABASE_EXTEND and data[5] == True :
	    self.dbc.execute("update pool_worker set total_found = total_found + 1 where username = :user",{'user':data[0]})
	    self.dbc.execute("select value from pool where parameter = 'pool_total_found'")
	    total_found = int(self.dbc.fetchone()[0]) + 1
	    self.dbc.executemany("update pool set value = :val where parameter = :parm", [{'val':0,'parm':'round_shares'},
		{'val':0,'parm':'round_progress'},
		{'val':0,'parm':'round_best_share'},
		{'val':time.time(),'parm':'round_start'},
		{'val':total_found,'parm':'pool_total_found'}
		])
	self.dbh.commit()
                
    def get_user(self, id_or_username):
        raise NotImplementedError('Not implemented for SQLite')
        
    def list_users(self):
        raise NotImplementedError('Not implemented for SQLite')

    def delete_user(self,id_or_username):
        raise NotImplementedError('Not implemented for SQLite')

    def insert_user(self,username,password):
	log.debug("Adding Username/Password")
	self.dbc.execute("insert into pool_worker (username,password) VALUES (:user,:pass)", {'user':username,'pass':password})	
	self.dbh.commit()

    def update_user(self,username,password):
        raise NotImplementedError('Not implemented for SQLite')

    def check_password(self,username,password):
	log.debug("Checking Username/Password")
	self.dbc.execute("select COUNT(*) from pool_worker where username = :user and password = :pass", {'user':username,'pass':password})
	data = self.dbc.fetchone()
	if data[0] > 0 :
	    return True
	return False

    def update_worker_diff(self,username,diff):
	self.dbc.execute("update pool_worker set difficulty = :diff where username = :user",{'diff':diff,'user':username})
	self.dbh.commit()
    
    def clear_worker_diff(self):
	if settings.DATABASE_EXTEND == True :
	    self.dbc.execute("update pool_worker set difficulty = 0")
	    self.dbh.commit()

    def update_pool_info(self,pi):
	self.dbc.executemany("update pool set value = :val where parameter = :parm",[{'val':pi['blocks'],'parm':"bitcoin_blocks"},
		{'val':pi['balance'],'parm':"bitcoin_balance"},
		{'val':pi['connections'],'parm':"bitcoin_connections"},
		{'val':pi['difficulty'],'parm':"bitcoin_difficulty"},
		{'val':time.time(),'parm':"bitcoin_infotime"}
		])
	self.dbh.commit()

    def get_pool_stats(self):
	self.dbc.execute("select * from pool")
	ret = {}
	for data in self.dbc.fetchall():
	    ret[data[0]] = data[1]
	return ret

    def get_workers_stats(self):
	self.dbc.execute("select username,speed,last_checkin,total_shares,total_rejects,total_found,alive,difficulty from pool_worker")
	ret = {}
	for data in self.dbc.fetchall():
	    ret[data[0]] = { "username" : data[0],
		"speed" : data[1],
		"last_checkin" : data[2],
		"total_shares" : data[3],
		"total_rejects" : data[4],
		"total_found" : data[5],
		"alive" : data[6],
		"difficulty" : data[7] }
	return ret

    def close(self):
	self.dbh.close()

    def check_tables(self):
	log.debug("Checking Tables")
	if settings.DATABASE_EXTEND == True :
		self.dbc.execute("create table if not exists shares" +\
			"(time DATETIME,rem_host TEXT, username TEXT, our_result INTEGER, upstream_result INTEGER, reason TEXT, solution TEXT, " +\
			"block_num INTEGER, prev_block_hash TEXT, useragent TEXT, difficulty INTEGER)")
		self.dbc.execute("create table if not exists pool_worker" +\
			"(username TEXT, password TEXT, speed INTEGER, last_checkin DATETIME)")
		self.dbc.execute("create table if not exists pool(parameter TEXT, value TEXT)")

		self.dbc.execute("select COUNT(*) from pool where parameter = 'DB Version'")
		data = self.dbc.fetchone()
		if data[0] <= 0:
		    self.dbc.execute("alter table pool_worker add total_shares INTEGER default 0")
		    self.dbc.execute("alter table pool_worker add total_rejects INTEGER default 0")
		    self.dbc.execute("alter table pool_worker add total_found INTEGER default 0")
		    self.dbc.execute("insert into pool (parameter,value) VALUES ('DB Version',2)")
		self.update_tables()
	else :
		self.dbc.execute("create table if not exists shares" + \
			"(time DATETIME,rem_host TEXT, username TEXT, our_result INTEGER, upstream_result INTEGER, reason TEXT, solution TEXT)")
		self.dbc.execute("create table if not exists pool_worker(username TEXT, password TEXT)")
		self.dbc.execute("create index if not exists pool_worker_username ON pool_worker(username)")

    def update_tables(self):
	version = 0
	current_version = 6
	while version < current_version :
	    self.dbc.execute("select value from pool where parameter = 'DB Version'")
	    data = self.dbc.fetchone()
	    version = int(data[0])
	    if version < current_version :
		log.info("Updating Database from %i to %i" % (version, version +1))
		getattr(self, 'update_version_' + str(version) )()
		    

    def update_version_2(self):
	log.info("running update 2")
	self.dbc.executemany("insert into pool (parameter,value) VALUES (?,?)",[('bitcoin_blocks',0),
		('bitcoin_balance',0),
		('bitcoin_connections',0),
		('bitcoin_difficulty',0),
		('pool_speed',0),
		('pool_total_found',0),
		('round_shares',0),
		('round_progress',0),
		('round_start',time.time())
		])
	self.dbc.execute("create index if not exists shares_username ON shares(username)")
	self.dbc.execute("create index if not exists pool_worker_username ON pool_worker(username)")
	self.dbc.execute("update pool set value = 3 where parameter = 'DB Version'")
	self.dbh.commit()
    
    def update_version_3(self):
	log.info("running update 3")
	self.dbc.executemany("insert into pool (parameter,value) VALUES (?,?)",[
		('round_best_share',0),
		('bitcoin_infotime',0),
		])
	self.dbc.execute("alter table pool_worker add alive INTEGER default 0")
	self.dbc.execute("update pool set value = 4 where parameter = 'DB Version'")
	self.dbh.commit()
	
    def update_version_4(self):
	log.info("running update 4")
	self.dbc.execute("alter table pool_worker add difficulty INTEGER default 0")
	self.dbc.execute("create table if not exists shares_archive" +\
		"(time DATETIME,rem_host TEXT, username TEXT, our_result INTEGER, upstream_result INTEGER, reason TEXT, solution TEXT, " +\
		"block_num INTEGER, prev_block_hash TEXT, useragent TEXT, difficulty INTEGER)")
	self.dbc.execute("create table if not exists shares_archive_found" +\
		"(time DATETIME,rem_host TEXT, username TEXT, our_result INTEGER, upstream_result INTEGER, reason TEXT, solution TEXT, " +\
		"block_num INTEGER, prev_block_hash TEXT, useragent TEXT, difficulty INTEGER)")
	self.dbc.execute("update pool set value = 5 where parameter = 'DB Version'")
	self.dbh.commit()
	
    def update_version_5(self):
	log.info("running update 5")
	# Adding Primary key to table: pool
	self.dbc.execute("alter table pool rename to pool_old")
	self.dbc.execute("create table if not exists pool(parameter TEXT, value TEXT, primary key(parameter))")
	self.dbc.execute("insert into pool select * from pool_old")
	self.dbc.execute("drop table pool_old")
	self.dbh.commit()
	# Adding Primary key to table: pool_worker
	self.dbc.execute("alter table pool_worker rename to pool_worker_old")
	self.dbc.execute("CREATE TABLE pool_worker(username TEXT, password TEXT, speed INTEGER, last_checkin DATETIME, total_shares INTEGER default 0, total_rejects INTEGER default 0, total_found INTEGER default 0, alive INTEGER default 0, difficulty INTEGER default 0, primary key(username))")
	self.dbc.execute("insert into pool_worker select * from pool_worker_old")
	self.dbc.execute("drop table pool_worker_old")
	self.dbh.commit()
	# Adjusting indicies on table: shares
	self.dbc.execute("DROP INDEX shares_username")
	self.dbc.execute("CREATE INDEX shares_time_username ON shares(time,username)")
	self.dbc.execute("CREATE INDEX shares_upstreamresult ON shares(upstream_result)")
	self.dbh.commit()
	
	self.dbc.execute("update pool set value = 6 where parameter = 'DB Version'")
	self.dbh.commit()
