#include "FB/ibase.h"
#include <ctime>

#define SQL_VARCHAR(len) struct {short vary_length; char vary_string[(len)+1];}

void info(ISC_STATUS status_vector[20])
{
    if (status_vector[0] == 1 && status_vector[1]){
        char msg[512];
        isc_interprete(msg,&status_vector);
        QMessageBox::information(NULL,"Тынц",msg);
    }
}

void MainWindow::on_pushButton_clicked()
{

    // Константы, необходимые для работы с базой данных – инициализируйте их в
    // соответствии с реальным путем к базе, пользователем и паролем
    char *dbname = "localhost:D:\\Projects\\Test.fdb";
    char *uname = "sysdba";
    char *upass = "123";
    char *query = "select b_id+0 as t, b_index, b_name, b_author, b_added, b_theme from books";
    // Переменные для работы с базой данных
    isc_db_handle db_handle = NULL;
    isc_tr_handle transaction_handle = NULL;
    isc_stmt_handle statement_handle=NULL;
    char dpb_buffer[256], *dpb, *p;
    short dpb_length;
    ISC_STATUS status_vector[20];
    XSQLDA *isqlda, *osqlda;
    long fetch_code;
    short o_ind[20]={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
    // Остальные переменные
    int i=0;
    long b_id;
    char b_index[17];
    SQL_VARCHAR(100) b_name;
    SQL_VARCHAR(100) b_author;
    SQL_VARCHAR(100) b_theme;
    ISC_TIMESTAMP b_added;
    struct tm added_time;
    char decodedTime[100];

    // создаем так называемый database parameter buffer, необходимый
    // для подключения к базе данных
    dpb=dpb_buffer;
    *dpb++ = isc_dpb_version1;
    *dpb++ = isc_dpb_user_name;
    *dpb++ = strlen(uname);
    for(p = uname; *p;) {
        *dpb++ = *p++;
    }
    *dpb++ = isc_dpb_password;
    *dpb++ = strlen(upass);
    for (p=upass; *p;) {
        *dpb++ = *p++;
    }
    dpb_length = dpb-dpb_buffer;

//    // Подключаемся к базе
    isc_attach_database(
                status_vector,
                strlen(dbname),
                dbname,
                &db_handle,
                dpb_length,
                dpb_buffer);

    info(status_vector);

    //транзакция
    if (db_handle){
        isc_start_transaction(
                    status_vector,
                    &transaction_handle,
                    1,
                    &db_handle,
                    0,
                    NULL);
        info(status_vector);
    }

    //готовим результат запроса
    osqlda = (XSQLDA *)malloc(XSQLDA_LENGTH(6));
    osqlda -> version = SQLDA_VERSION1;
    osqlda -> sqln = 6;
    osqlda->sqlvar[0].sqldata = (char *)&b_id;
    osqlda->sqlvar[0].sqltype = SQL_LONG+1;
    osqlda->sqlvar[0].sqlind = &o_ind[0];
    osqlda->sqlvar[1].sqldata = (char *)&b_index;
    osqlda->sqlvar[1].sqltype = SQL_TEXT+1;
    osqlda->sqlvar[1].sqlind = &o_ind[1];
    osqlda->sqlvar[2].sqldata = (char *)&b_name;
    osqlda->sqlvar[2].sqltype = SQL_VARYING+1;
    osqlda->sqlvar[2].sqlind = &o_ind[2];
    osqlda->sqlvar[3].sqldata = (char *)&b_author;
    osqlda->sqlvar[3].sqltype = SQL_VARYING+1;
    osqlda->sqlvar[3].sqlind = &o_ind[3];
    osqlda->sqlvar[4].sqldata = (char *)&b_added;
    osqlda->sqlvar[4].sqltype = SQL_TIMESTAMP+1;
    osqlda->sqlvar[4].sqlind = &o_ind[4];
    osqlda->sqlvar[5].sqldata = (char *)&b_theme;
    osqlda->sqlvar[5].sqltype = SQL_VARYING+1;
    osqlda->sqlvar[5].sqlind = &o_ind[5];

    isc_dsql_allocate_statement(
                status_vector,
                &db_handle,
                &statement_handle);
    info(status_vector);
    isc_dsql_prepare(
                status_vector,
                &transaction_handle,
                &statement_handle,
                0,
                query,
                SQL_DIALECT_V6,
                osqlda);
    info(status_vector);
    isc_dsql_execute2(
                status_vector,
                &transaction_handle,
                &statement_handle,
                1,
                NULL,
                NULL);
    info(status_vector);

    QString result="";


    while((fetch_code = isc_dsql_fetch(
               status_vector,
               &statement_handle,
               1,
               osqlda))==0){
        b_index[osqlda->sqlvar[1].sqllen]='\0';
        b_name.vary_string[b_name.vary_length]='\0';
        b_author.vary_string[b_author.vary_length]='\0';
        b_theme.vary_string[b_theme.vary_length]='\0';
        isc_decode_timestamp(&b_added,&added_time);
        strftime(decodedTime,sizeof(decodedTime),"%d-%b-%Y %H:%M",&added_time);
        result+=QString("%1 %2 %3 %4 %5 %6 \n").arg(b_id).arg(b_index).arg(b_name.vary_string).arg(b_author.vary_string).arg(decodedTime).arg(b_theme.vary_string);
    }

    ui->plainTextEdit->setPlainText(result);

    info(status_vector);

    free(osqlda);
    isc_dsql_free_statement(
                status_vector,
                &statement_handle,
                DSQL_drop);
    info(status_vector);

    if (transaction_handle){
        isc_commit_transaction(status_vector, &transaction_handle);
    }
    info(status_vector);
    if (db_handle){
        isc_detach_database(status_vector, &db_handle);
    }
    info(status_vector);

}