QString SqliteDriver::sqlCreateTable(FLTableMetaData *tmd)
{
#ifndef FL_QUICK_CLIENT
if (!tmd)
return QString::null;
QString primaryKey(QString::null);
QString sql = "CREATE TABLE " + tmd->name() + " (";
FLFieldMetaData *field;
FLTableMetaData::FLFieldMetaDataList *fieldList = tmd->fieldList();
unsigned int unlocks = 0;
QDictIterator<FLFieldMetaData> it(*fieldList);
while ((field = it.current()) != 0) {
++it;
if (field->type() == FLFieldMetaData::Unlock)
unlocks++;
}
if (unlocks > 1) {
#ifdef FL_DEBUG
qWarning("FLManager : " + QApplication::tr("No se ha podido crear la tabla ") + tmd->name());
qWarning("FLManager : " + QApplication::tr("Hay más de un campo tipo unlock. Solo puede haber uno."));
#endif
return QString::null;
}
QDictIterator<FLFieldMetaData> it2(*fieldList);
while ((field = it2.current()) != 0) {
++it2;
sql += field->name();
switch (field->type()) {
case QVariant::Int:
sql += " INTEGER";
break;
case QVariant::UInt:
sql += " INTEGER";
break;
case QVariant::Bool:
case FLFieldMetaData::Unlock:
sql += " BOOLEAN";
break;
case QVariant::Double:
sql += " FLOAT";
break;
case QVariant::Time:
sql += " VARCHAR(20)";
break;
case QVariant::Date:
sql += " VARCHAR(20)";
break;
case QVariant::Pixmap:
sql += " TEXT";
break;
case QVariant::String:
sql += " VARCHAR";
break;
case QVariant::StringList:
sql += " TEXT";
break;
case QVariant::ByteArray:
sql += " CLOB";
break;
case FLFieldMetaData::Serial:
sql += " INTEGER";
if (!field->isPrimaryKey())
sql += " PRIMARY KEY";
break;
}
int longitud = field->length();
if (longitud > 0)
sql += "(" + QString::number(longitud) + ")";
if (field->isPrimaryKey()) {
if (primaryKey.isEmpty()) {
sql += " PRIMARY KEY";
primaryKey = field->name();
} else {
#ifdef FL_DEBUG
qWarning(QApplication::tr("FLManager : Tabla -> ") +
tmd->name() + QApplication::tr(" . Se ha intentado poner una segunda clave primaria para el campo ") +
field->name() + QApplication::tr(" , pero el campo ") + primaryKey +
QApplication::tr(" ya es clave primaria. Sólo puede existir una clave primaria en FLTableMetaData, use FLCompoundKey para crear claves compuestas."));
#endif
return QString::null;
}
} else {
if (field->isUnique())
sql += " UNIQUE";
if (!field->allowNull())
sql += " NOT NULL";
else
sql += " NULL";
}
if (it2.current())
sql += ",";
}
sql += ");";
QString createIndex = "CREATE INDEX " + tmd->name() + "_pkey ON " + tmd->name() + " (" + tmd->primaryKey() + ");";
sql += createIndex;
return sql;
#endif //FL_QUICK_CLIENT
return QString::null;
}
bool SqliteDriver::alterTable(const QString &mtd1, const QString &mtd2, const QString &key)
{
#ifndef FL_QUICK_CLIENT
FLTableMetaData *oldMTD = 0;
FLTableMetaData *newMTD = 0;
QDomDocument doc("doc");
QDomElement docElem;
if (!FLUtil::domDocumentSetContent(doc, mtd1)) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " + QApplication::tr("Error al cargar los metadatos."));
#endif
} else {
docElem = doc.documentElement();
oldMTD = db_->manager()->metadata(&docElem, true);
}
if (oldMTD && oldMTD->isQuery())
return true;
if (!FLUtil::domDocumentSetContent(doc, mtd2)) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " + QApplication::tr("Error al cargar los metadatos."));
#endif
return false;
} else {
docElem = doc.documentElement();
newMTD = db_->manager()->metadata(&docElem, true);
}
if (!oldMTD)
oldMTD = newMTD;
if (oldMTD->name() != newMTD->name()) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " + QApplication::tr("Los nombres de las tablas nueva y vieja difieren."));
#endif
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return false;
}
QString oldPK = oldMTD->primaryKey(), newPK = newMTD->primaryKey();
if (oldPK != newPK) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " + QApplication::tr("Los nombres de las claves primarias difieren."));
#endif
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return false;
}
if (oldMTD->fieldType(oldPK) != newMTD->fieldType(newPK)) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " + QApplication::tr("Los tipos de las claves primarias difieren."));
#endif
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return false;
}
if (db_->manager()->checkMetaData(oldMTD, newMTD)) {
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return true;
}
if (!db_->manager()->existsTable(oldMTD->name())) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " + QApplication::tr("La tabla %1 antigua de donde importar los registros no existe.").arg(oldMTD->name()));
#endif
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return false;
}
FLTableMetaData::FLFieldMetaDataList *fieldList = oldMTD->fieldList();
FLFieldMetaData *oldField = 0;
if (!fieldList) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " + QApplication::tr("Los antiguos metadatos no tienen campos."));
#endif
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return false;
}
QString renameOld = oldMTD->name().left(6) + "alteredtable" + QDateTime::currentDateTime().toString("ddhhssz");
if (!db_->dbAux()) {
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return false;
}
db_->dbAux() ->transaction();
if (!key.isEmpty() && key.length() == 40) {
QSqlCursor c("flfiles", true, db_->dbAux());
c.setForwardOnly(true);
QSqlRecord *buffer;
c.setFilter("nombre='" + renameOld + ".mtd'");
c.select();
if (!c.next()) {
buffer = c.primeInsert();
buffer->setValue("nombre", renameOld + ".mtd");
buffer->setValue("contenido", mtd1);
buffer->setValue("sha", key);
c.insert();
}
}
QSqlQuery q(QString::null, db_->dbAux());
if (!q.exec("CREATE TABLE " + renameOld + " AS SELECT * FROM " + oldMTD->name() + ";") || !q.exec("DROP TABLE " + oldMTD->name() + ";")) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " + QApplication::tr("No se ha podido renombrar la tabla antigua."));
#endif
db_->dbAux() ->rollback();
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return false;
}
if (!db_->manager()->createTable(newMTD)) {
db_->dbAux() ->rollback();
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return false;
}
QSqlCursor oldCursor(renameOld, true, db_->dbAux());
oldCursor.setMode(QSqlCursor::ReadOnly);
QSqlCursor newCursor(newMTD->name(), true, db_->dbAux());
newCursor.setMode(QSqlCursor::Insert);
oldCursor.select();
int totalSteps = oldCursor.size();
QProgressDialog progress(QApplication::tr("Reestructurando registros para %1...").arg(newMTD->alias()), 0, totalSteps, qApp->focusWidget(), 0, true);
progress.setCaption(QApplication::tr("Tabla modificada"));
int step = 0;
QSqlRecord *newBuffer;
QString sequence;
fieldList = newMTD->fieldList();
FLFieldMetaData *newField = 0;
if (!fieldList) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " + QApplication::tr("Los nuevos metadatos no tienen campos."));
#endif
db_->dbAux() ->rollback();
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return false;
}
if (fieldList->isEmpty()) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " + QApplication::tr("Los nuevos metadatos no tienen campos."));
#endif
db_->dbAux() ->rollback();
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
return false;
}
QVariant v;
bool ok = true;
while (oldCursor.next()) {
newBuffer = newCursor.primeInsert();
QDictIterator<FLFieldMetaData> it(*fieldList);
while ((newField = it.current()) != 0) {
++it;
oldField = oldMTD->field(newField->name());
if (!oldField || !oldCursor.field(oldField->name())) {
if (!oldField)
oldField = newField;
v = newField->defaultValue();
v.cast(FLFieldMetaData::flDecodeType(newField->type()));
} else {
v = oldCursor.value(newField->name());
if ((!oldField->allowNull() || !newField->allowNull()) &&
(v.isNull() || !v.isValid())) {
QVariant defVal(newField->defaultValue());
if (!defVal.isNull() && defVal.isValid())
v = defVal;
}
if (!v.cast(newBuffer->value(newField->name()).type())) {
#ifdef FL_DEBUG
qWarning("FLManager::alterTable : " +
QApplication::tr("Los tipos del campo %1 no son compatibles. Se introducirá un valor nulo.")
.arg(newField->name()));
#endif
}
}
if ((!oldField->allowNull() || !newField->allowNull()) && (v.isNull() || !v.isValid())) {
switch (oldField->type()) {
case QVariant::Int:
case FLFieldMetaData::Serial:
case QVariant::UInt:
case QVariant::Bool:
case FLFieldMetaData::Unlock:
v = int(0);
break;
case QVariant::Double:
v = double(0.0);
break;
case QVariant::Time:
v = QTime::currentTime();
break;
case QVariant::Date:
v = QDate::currentDate();
break;
default:
v = QString("NULL").left(newField->length());
break;
}
}
newBuffer->setValue(newField->name(), v);
}
if (!newCursor.insert()) {
ok = false;
break;
}
progress.setProgress(++step);
}
progress.setProgress(totalSteps);
if ((oldMTD != newMTD) && oldMTD)
delete oldMTD;
if (newMTD)
delete newMTD;
if (ok)
db_->dbAux() ->commit();
else {
db_->dbAux() ->rollback();
return false;
}
#else
return true;
#endif //FL_QUICK_CLIENT
}
