Vyššie na [Platon] / tucniak / lib

Initial import

// Copyright (c) 2003 Juraj Kolesár (koli) <koli@koli.sk>               
#include "lt.h"
/* data init {{{ **************************************************************/
int lt_c_person_data_init(T_PERSON *person) {
    register int i;
    SET_CELL(person->pk,         "", "pk_c_person",     0);
    SET_CELL(person->name,         "", "name",         10);
    SET_CELL(person->surname,    "", "surname",         20);
    SET_CELL(person->nickname,    "", "nickname",        15);
    person->company.table = NULL;
    person->address.table = NULL;
    person->phone.table = NULL;
    person->email.table = NULL;
    person->account.table = NULL;
    person->notes.table = NULL;
    for (i=0;i<__LT_C_PERSON_PARAM_COUNT;i++) person->status[i] = false;
    return(__LT_OK);
}
/* }}} */
/* data get {{{ ***************************************************************/
int lt_c_person_data_get(T_DB *tdb, T_PERSON *person) {
    if (!(person->status[__LT_C_PERSON_NAME])) {
        tdb_query_cell(tdb, person->name.value, g_strdup_printf(
            "SELECT name FROM c_person WHERE pk_c_person='%s'", person->pk.value));
        person->status[__LT_C_PERSON_NAME] = true;
    }
    if (!(person->status[__LT_C_PERSON_SURNAME])) {
        tdb_query_cell(tdb, person->surname.value, g_strdup_printf(
            "SELECT surname FROM c_person WHERE pk_c_person='%s'", person->pk.value));
        person->status[__LT_C_PERSON_SURNAME] = true;
    }
    if (!(person->status[__LT_C_PERSON_NICKNAME])) {
        tdb_query_cell(tdb, person->nickname.value, g_strdup_printf(
            "SELECT nickname FROM c_person WHERE pk_c_person='%s'", person->pk.value));
        person->status[__LT_C_PERSON_NICKNAME] = true;
    }
    if (!(person->status[__LT_C_PERSON_COMPANY])) {
        tdb_table_fill(tdb, &(person->company), g_strdup_printf(
            "SELECT pk_c_company, name, note "
            "FROM c_company "
            "INNER JOIN lists_c "
            "ON fk_contact=pk_c_company "
            "WHERE fk_table='%s' "
            "AND c_contact='COMPANY' "
            "AND c_table='PERSON'",
            person->pk.value));
        person->status[__LT_C_PERSON_COMPANY] = true;
    }
    if (!(person->status[__LT_C_PERSON_PHONE])) {
        tdb_table_fill(tdb, &(person->phone), g_strdup_printf(
            "SELECT pk_c_phone, number, note "
            "FROM c_phone "
            "INNER JOIN lists_c "
            "ON fk_contact=pk_c_phone "
            "WHERE fk_table='%s' "
            "AND c_table='PERSON' "
            "AND c_contact='PHONE'",
            person->pk.value));
        person->status[__LT_C_PERSON_PHONE] = true;
    }
    if (!(person->status[__LT_C_PERSON_EMAIL])) {
        tdb_table_fill(tdb, &(person->email), g_strdup_printf(
            "SELECT pk_c_email, url, note "
            "FROM c_email "
            "INNER JOIN lists_c "
            "ON fk_contact=pk_c_email "
            "WHERE fk_table='%s' "
            "AND c_table='PERSON' "
            "AND c_contact='EMAIL'",
            person->pk.value));
        person->status[__LT_C_PERSON_EMAIL] = true;
    }
    if (!(person->status[__LT_C_PERSON_ADDRESS])) {
        tdb_table_fill(tdb, &(person->address), g_strdup_printf(
            "SELECT pk_c_email, url, note "
            "FROM c_address "
            "INNER JOIN lists_c "
            "ON fk_contact=pk_c_address "
            "WHERE fk_table='%s' "
            "AND c_table='PERSON' "
            "AND    c_contact='ADDRESS'",
            person->pk.value));
        person->status[__LT_C_PERSON_EMAIL] = true;
    }
    return(__LT_OK);
}
/* }}} */
/* data set {{{ ***************************************************************/
int lt_c_person_data_set(T_DB *tdb, T_PERSON *person) {
    if (!(person->status[__LT_C_PERSON_PK])) {
        tdb_query(tdb, g_strdup_printf(
            "INSERT INTO c_person (name, surname, nickname) " 
            "VALUES ('%s', '%s', '%s')",
            person->name.value, 
            person->surname.value, 
            person->nickname.value));
        tdb_query_lastid(tdb, person->pk.value);
        log("pk je: %s",person->pk.value);
        person->status[__LT_C_PERSON_PK] = true;
        person->status[__LT_C_PERSON_NAME] = true;
        person->status[__LT_C_PERSON_SURNAME] = true;
        person->status[__LT_C_PERSON_NICKNAME] = true;
    }
    if (!(person->status[__LT_C_PERSON_NAME])) {
        tdb_query(tdb, g_strdup_printf(
            "UPDATE c_person SET name='%s' WHERE pk_c_person='%s'",
            person->name.value, person->pk.value));
        person->status[__LT_C_PERSON_NAME] = true;
    }
    if (!(person->status[__LT_C_PERSON_SURNAME])) {
        tdb_query(tdb, g_strdup_printf(
            "UPDATE c_person SET surname='%s' WHERE pk_c_person='%s'",
            person->surname.value, person->pk.value));
        person->status[__LT_C_PERSON_SURNAME] = true;
    }
    if (!(person->status[__LT_C_PERSON_NICKNAME])) {
        tdb_query(tdb, g_strdup_printf(
            "UPDATE c_person SET nickname='%s' WHERE pk_c_person='%s'",
            person->nickname.value, person->pk.value));
        person->status[__LT_C_PERSON_NICKNAME] = true;
    }
//    if (!(person->status[__LT_C_PERSON_EMAIL])) {}
//    if (!(person->status[__LT_C_PERSON_ADDRESS])) {}
    return(__LT_OK);
}
/* }}} */
/* data remove {{{ ************************************************************/
int lt_c_person_data_remove(T_DB *tdb, T_PERSON *person) {
    tdb_query(tdb, g_strdup_printf(
        "DELETE FROM c_person WHERE pk_c_person='%s'", person->pk.value)
    );
    return(__LT_OK);
}
/* }}} */
/* data clear {{{ *************************************************************/
int lt_c_person_data_clear(T_PERSON * person) {
    register int i;
    person->pk.value[0] = '\0';
    person->name.value[0] = '\0';
    person->surname.value[0] = '\0';
    person->nickname.value[0] = '\0';
    if (person->company.table != NULL) tdb_table_free(&(person->company));
    if (person->address.table != NULL) tdb_table_free(&(person->address));
    if (person->phone.table != NULL) tdb_table_free(&(person->phone));
    if (person->email.table != NULL) tdb_table_free(&(person->email));
    if (person->account.table != NULL) tdb_table_free(&(person->account));
    if (person->notes.table != NULL) tdb_table_free(&(person->notes));
    for (i=0;i<__LT_C_PERSON_PARAM_COUNT;i++) person->status[i] = false;
    return(__LT_OK);
}
/* }}} */
/* tables clear {{{ ***********************************************************/
int lt_c_person_tables_clear(T_PERSON * person) {
    register int i;
    if (person->company.table != NULL) tdb_table_free(&(person->company));
    if (person->address.table != NULL) tdb_table_free(&(person->address));
    if (person->phone.table != NULL) tdb_table_free(&(person->phone));
    if (person->email.table != NULL) tdb_table_free(&(person->email));
    if (person->account.table != NULL) tdb_table_free(&(person->account));
    if (person->notes.table != NULL) tdb_table_free(&(person->notes));
    for (i=__LT_C_PERSON_COMPANY;i<__LT_C_PERSON_PARAM_COUNT;i++) 
        person->status[i] = false;
    return(__LT_OK);
}
/* }}} */
/* qs init {{{ ****************************************************************/
int lt_c_person_qs_init(T_PERSON *person, T_COLS **cols, T_QS *qs) {
    *cols = g_slist_append(*cols, &(person->pk));    
    *cols = g_slist_append(*cols, &(person->name));    
    *cols = g_slist_append(*cols, &(person->surname));    
    *cols = g_slist_append(*cols, &(person->nickname));    
    if (strlen(qs->columns) == 0) tdb_qs_set_columns(qs, *cols);
    if (strlen(qs->from) == 0) strcpy(qs->from, "c_person");
    return(__LT_OK);
}
/* }}} */