import sys,odbc
from Tooly import ExtractFilePath
from datetime import date
FBProv="Driver=Firebird/InterBase(r) driver;UID=sysdba;PWD=masterkey;DBNAME="
DBFProv='Provider=MSDASQL.1;Password="";Persist Security Info=True;Extended Properties="DSN=База;DBQ={dir};DefaultDir={dir};DriverId=21;FIL=dBase III;MaxBufferSize=2048;PageTimeout=5;"'
ifx='DRIVER=IBM INFORMIX 3.82 32 BIT;UID=Юзер;PWD=Пасс;DLOC=ru_RU.1251;CLOC=ru_RU.1251;PRO=olsoctcp;SERV=1526;SRVR=май_informix;HOST={aHost};DATABASE={aBase}'

#*******************************************************************************************
#  Главный модуль Tooly для программ Питона
#*******************************************************************************************
ErrorStr=''
class ado():
    """
         Главный класс
         Connection     Объект связи с базой
         Cursor         Курсор набора
         Para           Справочник параметров их файла параметров
         Error          Переменная принима.щая текст ошибок
    """
    #*******************************************************************************************
    def __init__(me,h=True):
        me.Connection=None
        me.Cursor=None
        me.Error='';
        me.ConnectionString=''
        me.RecordCount=0
        me.Record=[]
    #*******************************************************************************************
    def Connect(me):
                "Функция подкл.чения к базе"
                me.Error=''
                try:
                    me.Connection=odbc.odbc(me.ConnectionString)
                except Exception as e:
                    me.Error='Error~Ошибка подкл.чения '+str(e);
                    print(me.Error,me.ConnectionString)
                    return False

                if me.Connection!=None:
                    me.Cursor=me.Connection.cursor();
                    me.Error='';
                    return True
                else:
                  me.Error='Error~Коннект не создан';
                  return False

    #*******************************************************************************************
    def Close(me):
        if me.Connection!=None:
            me.Connection.close()
    #*******************************************************************************************
    def Open(me,SQL):
        "Функция выполнения запроса"
        if me.Cursor!=None:
            try:
                me.Cursor.execute(SQL)

                me.Error='';
                return True
            except odbc.progError as e:
                me.Error='Error~Ошибка в запросе: '+str(e);
                return False
        else:
            me.Error='Error~Коннект не установлен.';
            return False

    #*******************************************************************************************
    def FetchAll(me):
        "Выбирает весь набор в список"
        return me.Cursor.fetchall()
    #*******************************************************************************************
    def Next(me):
        "Возвращает следу.щу. запись"
        me.Record=me.Cursor.fetchone()
        return me.Record

    def Field(me,FieldID):
        if type(FieldID) is str:
            for i,d in enumerate(me.Cursor.description):
                if d[0]==FieldID:
                    if me.Record[i]==None: return ''
                    else: return me.Record[i]

            return ''
        else:
            if FieldID<len(me.Record):
                if me.Record[FieldID]==None: return ''
                else: return me.Record[FieldID]
            else: return ''



def FireBird(Host,Path):
    a=ado()
    if Path=='':
        d=date.today()
        Path='d:\база.GDB'
    if Host=='': Host='127.0.0.1'
    a.ConnectionString=FBProv+Host+':'+Path
    a.Connect()
    return a
def dbf(Path,odbcName):
    a=ado()
    a.ConnectionString='DSN='+odbcName+';DBQ='+Path+';DefaultDir='+Path+';DriverId=533;MaxBufferSize=2048;PageTimeout=5;'
    a.Connect()
    return a
def informix(host,base):
    a=ado()
    a.ConnectionString=ifx.format(aHost=host,aBase=base)
    a.Connect()
    return a

def myodbc(cs):
    global ErrorStr
    a=ado()
    a.ConnectionString=cs
    ErrorStr=''
    try: a.Connect()
    except Exception as e:
        ErrorStr=str(e)
        return None
    return a

#o=FireBird('localhost','d:\\База.GDB')
#o.Open('select * from Юзери')
#while o.Next()!=None:
#    print(o.Record)
#o.Close()