#include <creaImageIOSQLiteTreeHandler.h>
#include <creaImageIOSystem.h>

#include "CppSQLite3.h"

#include <sys/stat.h>

//#include <creaImageIOSQLiteTreeHandlerStructure.h>

//#include <creaImageIOUtilities.h>

//#include <icons/database.xpm>

#include <deque>

#include "wx/wx.h"
#include <wx/dir.h>
#include <wx/filename.h>


//#include <icons/close.xpm>

#include <creaWx.h>
#include <creaMessageManager.h>
using namespace crea;

#include <boost/filesystem.hpp>
#include <boost/algorithm/string/replace.hpp>

namespace creaImageIO
{
  using namespace tree;


  //=============================================================
  SQLiteTreeHandler::SQLiteTreeHandler(const std::string& filename)
    : mFileName(filename)
  {
    mDB = new CppSQLite3DB;
    GimmickMessage(1,"SQLite version : "
		   <<std::string(mDB->SQLiteVersion())<< std::endl);
  }
  //=============================================================

  //=============================================================
  SQLiteTreeHandler::~SQLiteTreeHandler()
  {
    delete mDB;
  }
  //=============================================================
  

  //=============================================================
  void SQLiteTreeHandler::BuildDefaultTreeDescription()
  {
    /*
    for (int i = Node::Patient;
	 i <= Node::Image; 
	 ++i)
      {
	mNodeTypeDescription[i].BuildDefault(i);
      }
    */

    // TODO : GetTree().GetDescription().LoadXML(FILE);
  }
  //=============================================================

  //=============================================================
  //  void SQLiteTreeHandler::Print() const 
  //  {
    /*
    std::cout << "-> '"<<GetName()<< "' - '"
	      << GetFileName()<<"'"<<std::endl;
    ChildrenListType::const_iterator i;
    for (i=GetChildrenList().begin(); i!=GetChildrenList().end(); i++)
      {
	(*i)->Print();
      }
    */
  //  }
  //=============================================================
  
  //=====================================================================
  /*
  bool SQLiteTreeHandler::LocationIsValid()
  {
    // TO DO 
    return true;
  }
  */
  //=====================================================================

  //=====================================================================
  char* format_sql(const std::string& s)
  { 
    return sqlite3_mprintf("%q",s.c_str());
  }
  //=====================================================================

  //  sqlite3_exec(db, zSQL, 0, 0, 0);
  //  sqlite3_free(zSQL);
  //	char* CHAIN = format_sql(QUER);		\
//  sqlite3_free(CHAIN);				\

  //=====================================================================
#define QUERYDB(QUER,RES)						\
    try									\
      {									\
	GimmickMessage(2,"SQL: '"<<QUER<<"'"<<std::endl);		\
	RES = mDB->execQuery(QUER.c_str());				\
      }									\
    catch (CppSQLite3Exception& e)					\
      {									\
	std::cout << "SQLite query '"<<QUER<<"' : "			\
		  << e.errorCode() << ":"				\
		  << e.errorMessage()<<std::endl;			\
	creaError("SQLite query '"<<QUER<<"' : "			\
		  << e.errorCode() << ":"				\
		  << e.errorMessage() );				\
      }									\
    
  //=====================================================================
  
  //=====================================================================
#define UPDATEDB(UP)							\
  try									\
    {									\
      GimmickMessage(2,"SQL: '"<<UP<<"'"<<std::endl);			\
      mDB->execDML(UP.c_str());						\
    }									\
  catch (CppSQLite3Exception& e)					\
    {									\
      std::cout << "SQLite update '"<<UP<<"' Error : "			\
		<< e.errorCode() << ":"					\
		<< e.errorMessage()<<std::endl;				\
      creaError("SQLite update '"<<UP<<"' Error : "			\
		<< e.errorCode() << ":"					\
		<< e.errorMessage() );					\
    }									
  //=====================================================================

  //=====================================================================
  bool SQLiteTreeHandler::Open(bool writable)
  {
    //    std::cout << "***> SQLiteTreeHandler::Open('"<<GetFileName()<<"')"<<std::endl;
    SetWritable(writable);
    return DBOpen();
  }

  //=====================================================================
  bool SQLiteTreeHandler::Create(bool writable)
  {
    //    std::cout << "***> SQLiteTreeHandler::New('"<<GetFileName()<<"')"<<std::endl;
    SetWritable(writable);
    return DBCreate();
  }
  //=====================================================================


  //=====================================================================
  bool SQLiteTreeHandler::Close()
  {
    return false;
  }
  //=====================================================================


  //=====================================================================
  bool SQLiteTreeHandler::Destroy()
  {
    return false;
  }
  //=====================================================================

  //===================================================================== 
  unsigned int SQLiteTreeHandler::GetNumberOfChildren(tree::Node* n) 
  { 
    return 0; 
  }
  //===================================================================== 

  //===================================================================== 
  int SQLiteTreeHandler::LoadChildren(tree::Node* parent, int maxlevel)
  {
    return 0;
  }
  //===================================================================== 




  //===================================================================== 
  void SQLiteTreeHandler::UnLoad(tree::Node* n)
  {
  }
  //===================================================================== 


  //===================================================================== 
  int SQLiteTreeHandler::AddBranch( const std::map<std::string,std::string>& attr )
  {
    return -1;
  }
  //===================================================================== 
 

  //===================================================================== 
   bool SQLiteTreeHandler::Remove(tree::Node*)
   {
     return false;
   }
  //===================================================================== 







  //=====================================================================
  bool SQLiteTreeHandler::DBOpen()
  {
    GimmickMessage(2,"Opening SQLite database '"<<GetFileName()<<std::endl);
    // OPENING FILE
    if (!boost::filesystem::exists(GetFileName())) 
      {
	return false;
      }

    try
      {
	mDB->open(GetFileName().c_str());
      }
    catch (CppSQLite3Exception& e)
      {
	std::cerr << "Opening '"<<GetFileName()<<"' : "
		  << e.errorCode() << ":" 
		  << e.errorMessage() << std::endl;
	return false;
      }
    // TESTING STRUCTURE VALIDITY
    if (!DBStructureIsValid())
      {
 	std::cerr << "Opening '"<<GetFileName()<<"' : "
		  << " invalid database structure" << std::endl;
	return false;
      }
    // IMPORTING NODE TYPE DESCRIPTIONS
    DBImportTreeDescription();
    return true;
  }
  //=====================================================================

  //=====================================================================
  bool SQLiteTreeHandler::DBCreate()
  {
    //    std::cout << "### Creating SQLite database '"<<GetFileName()<<std::endl;

    if (boost::filesystem::exists(GetFileName())) 
      {
	creaMessage("Gimmick!",1,
		    "[Gimmick!] !! ERROR '"<<GetFileName()<<"' : "
		    << "file already exists"<<std::endl);
	return false;
      }
    
    // OPENING
    try
      {
	mDB->open(GetFileName().c_str());
      }
    catch (CppSQLite3Exception& e)
      {
	creaMessage("Gimmick!",1,
		    "[Gimmick!] !! ERROR '"
		    << e.errorCode() << ":" 
		    << e.errorMessage() <<std::endl);
	return false;
      }
    
    // CREATING TABLES
    try
      {
	std::string command;
	// Create LEVELS table
	command = "create table LEVELS\n";
	command += "( Name text )\n";
	UPDATEDB(command);

	// Level 0
	command = "INSERT INTO Levels (Name) VALUES ('";
	command += GetTree().GetLevelDescriptor(0).GetName();
	command += "')";
	UPDATEDB(command);

	command = "CREATE TABLE ";
	command += GetTree().GetLevelDescriptor(0).GetName();
	command += "\n(\nID INTEGER PRIMARY KEY";
	AppendAttributesSQLDefinition(0,command);
	command += "\n)";
	UPDATEDB(command);
	
	// Iterate the other Levels
	for (int l=1; l<GetTree().GetNumberOfLevels(); ++l)
	  {
	    command = "INSERT INTO LEVELS (Name) VALUES ('";
	    command += GetTree().GetLevelDescriptor(l).GetName();
	    command += "')";
	    UPDATEDB(command);
	    
	    command = "CREATE TABLE ";
	    command += GetTree().GetLevelDescriptor(l).GetName();
	    command += "\n(\nID INTEGER PRIMARY KEY,\nPARENT_ID int not null";	
	    AppendAttributesSQLDefinition(l,command);
	    command +=",\n";
	    command +="constraint FK_PARENT foreign key (PARENT_ID) references PATIENT(ID) on delete restrict on update restrict\n)";
	    UPDATEDB(command);
	  }
	
	// Create tables *_ATTRIBUTES
	// and fill the tables *_ATTRIBUTES
	DBExportTreeDescription();
	
      }
    catch (std::exception)
      {
	return false;
      }
    // LG : TEST
    if (DBStructureIsValid())
      {
	//	std::cout << "*** DONE ***"<<std::endl;
	//	mDBLoaded = true;
	GetTree().SetChildrenLoaded(true);
	return true;
	
      }
    else 
      {
	//	std::cout << "*** AAAARRRRGGG ***"<<std::endl;
	
	return false;
      }
  }
  //=====================================================================
  
  //=====================================================================
  void SQLiteTreeHandler::AppendAttributesSQLDefinition(int level,
							std::string& s)
  {
    LevelDescriptor::AttributeDescriptorListType::const_iterator i;
    for (i  = GetTree().GetAttributeDescriptorList(level).begin();
	 i != GetTree().GetAttributeDescriptorList(level).end();
	 ++i)
      {
	//	if (i->second.flags==1) continue;
	s += ",\n";
	s += i->GetKey();
	s += " text";
      }
  }
  //=====================================================================
  
  //=====================================================================
  void SQLiteTreeHandler::DBExportTreeDescription()
  {
    for (int level=0; level<GetTree().GetNumberOfLevels(); ++level)
      {
	std::string command;
	command = "CREATE TABLE ";
	command += GetTree().GetLevelDescriptor(level).GetName();
	command += "_Attributes\n(\n";
	command += "Key text,\n";
	command += "Name text,\n";	    
	command += "DicomGroup int,\n";
	command += "DicomElement int,\n";	    
	command += "Flags int\n";	    
	command += "\n)";
	UPDATEDB(command);
 
	LevelDescriptor::AttributeDescriptorListType::const_iterator i;
	for (i  = GetTree().GetAttributeDescriptorList(level).begin();
	     i != GetTree().GetAttributeDescriptorList(level).end();
	     ++i)
	  {
	    
	    std::stringstream insert;
	    insert << "INSERT INTO "
		   << GetTree().GetLevelDescriptor(level).GetName()
		   << "_Attributes (Key,Name,DicomGroup,DicomElement,Flags) "
		   << "VALUES ('"
		   << i->GetKey() << "','"
		   << i->GetName() << "',"
		   << i->GetGroup() << ","
		   << i->GetElement() << ","
		   << i->GetFlags() << ");";

	    UPDATEDB(insert.str());
	  }
      }
    
  }
  //=====================================================================
  
  //=====================================================================
  void SQLiteTreeHandler::DBImportTreeDescription()
  {
    GimmickMessage(3,"ImportTreeDescription"<<std::endl);
    
    //    tree::Description& desc = GetTree().GetDescription();
    /*

    for (Node::Type type=Node::Patient; 
	 type<=Node::Image; 
	 type++)
      {
	std::string query = "SELECT * FROM ";
	query += SQLiteTreeHandlerStructure::Table(type);
	query += "_FIELDS";

	//	std::cout << "** SQL = '"<<query<<"'"<<std::endl;
	
	CppSQLite3Query q;
	QUERYDB(query,q);
	

	while (!q.eof())
	  {
	    Field::Description d(q.getStringField(0), // Key
				 q.getIntField(1), // Group
				 q.getIntField(2), // Element 
				 q.getStringField(3), // Name
				 q.getIntField(4) // Flags
				 );
	    GetNodeTypeDescription(type).GetFieldDescriptionMap()[d.key] = d;
	    //	    std::cout << d << std::endl;
	    q.nextRow();
	  }
      }
    */
  }
  //=====================================================================


    //=====================================================================
  bool SQLiteTreeHandler::DBStructureIsValid()
  {
    bool success = true;

    // TO DO : TABLE WHICH STORES THE LEVELS
    /*
    
    for (int i = SQLiteTreeHandlerStructure::TableBegin();
	 i    != SQLiteTreeHandlerStructure::TableEnd();++i)
      {
	bool ok = mDB->tableExists(SQLiteTreeHandlerStructure::Table(i));
	if (ok) 
	  {
	    //	    std::cout << "** Table "<<SQLiteTreeHandlerStructure::Table(i)
	    //		      <<" exists"<<std::endl;
	    // TO DO : TEST MANDATORY FIELDS EXIST
	  }
	else 
	  {
	    //	    std::cout << "** Table "<<SQLiteTreeHandlerStructure::Table(i)
	    //		      <<" does *NOT* exist"<<std::endl;
	    success = false;
	  }
      }
    */
    return success;
  }  
  //=====================================================================

  /*
  //=====================================================================
  int SQLiteTreeHandler::DBLoadChildren(Node* parent, 
					int maxlevel)
  {

    //    std::cout << "SQLiteTreeHandler::DBLoadChildren("<<parent<<","<<maxlevel
    //	      << ")"<<std::endl;
    int nbloaded = 0;
    if (parent == GetTree()) { parent = 0; }
    Node* xparent = parent;
    if ( xparent==0 ) xparent = GetTree();
    if ( xparent->ChildrenLoaded() ) 
      {
	//	std::cout << "--> Children already loaded"<<std::endl;
	return nbloaded;
      }
    if ( xparent->GetType() == Node::Image ) 
      {
	return nbloaded;
      }
    if ( xparent->GetType() >= maxlevel ) 
      {
	return nbloaded;
      }
   
    //    msw[2].Pause();
    //    msw[2].Resume();

    Node::Type type = xparent->GetType()+1;

    // Query DB

    std::string query = "SELECT * FROM ";
    query += GetTree().GetDescriptor().GetLevelDescriptor(level).GetName();
      //SQLiteTreeHandlerStructure::Table(type);
    if (parent!=0)
      {
	query += " WHERE PARENT_ID='" + parent->GetFieldValue("ID") + "'";
      }

    //    std::cout << "** SQL = '"<<query<<"'"<<std::endl;

    CppSQLite3Query q;
    QUERYDB(query,q);

    while (!q.eof())
      {
	nbloaded++;
	Node* n = new Node(type,
			   this,xparent);
	for (int fld = 0; fld < q.numFields(); fld++)
	  {
	    n->SetFieldValue(q.fieldName(fld),q.getStringField(fld));	    
	  }
	// Index 
	TypeId ti;
	ti.type = type;
	ti.id = n->GetFieldValue("ID");    
	mTypeIdToNodeMap[ti] = n;
	// recurse 
	if ( type < maxlevel ) 
	  {
	    msw[2].Pause();
	    nbloaded += DBLoadChildren(n,maxlevel);
	    msw[2].Resume();
	  }
	// next entry in db
	q.nextRow();
      }

    xparent->SetChildrenLoaded(true);
    
    //    msw[2].Pause();
    return nbloaded;
  }
  //=====================================================================






  //=====================================================================
  bool SQLiteTreeHandler::DBInsert(Node* alien_node,
				   UpdateSummary& summary)
  {
    //    std::cout << "SQLiteTreeHandler::Insert('"<<alien_node->GetLabel()
    //	      <<"')"<<std::endl;
    
    //    if (!ChildrenLoaded()) DBLoadChildren(this,Node::Database);
    
    // Find parent
    Node* parent;
    std::string parent_id; 
    parent = DBGetOrCreateParent(alien_node,parent_id,summary);
    
    // Insert 
    DBRecursiveGetOrCreateNode(alien_node,parent,parent_id,summary);
   return true;
  }
  //=====================================================================


  //=====================================================================
  Node* SQLiteTreeHandler::DBGetOrCreateParent(Node* alien_node,
						std::string& parent_id,
						UpdateSummary& summary)
  {
    //    std::cout << "DBGetOrCreateParent '" << alien_node->GetLabel()<<"'"
    //	      << std::endl;
    // Load the patients if not already done
    DBLoadChildren(this,Node::Patient);

    parent_id = "";
    Node* parent = this;

    // The chain of ancestors
    std::deque<Node*> chain;
    Node* cur = alien_node->GetParent();
    for (int type=Node::Patient; 
	 type<alien_node->GetType();++type)
      {
	chain.push_front(cur);
	cur = cur->GetParent();
      }

    // create the nodes if do not exist
    std::deque<Node*>::iterator i;
    for (i=chain.begin();i!=chain.end();++i)
      {
	//	std::cout << " cur = '"<<(*i)->GetLabel()<<"'"<<std::endl;
	//	std::string cur_id = DBGetNodeId(*i,parent_id);
	//	if (cur_id.size()==0)
	//	  {
	// Node does not exist : create it
	std::string cur_id;
	parent = DBGetOrCreateNode(*i, 
					parent,
					parent_id,
					cur_id,
					summary
					);
	DBLoadChildren(parent,parent->GetType()+1);

	parent_id = cur_id;
      }
    return parent;
  }
  //=====================================================================



  //=====================================================================
  void SQLiteTreeHandler::DBRecursiveGetOrCreateNode(Node* alien_node, 
						      Node* parent, 
						      const std::string& parent_id,
						      UpdateSummary& summary)
  {
    //    std::cout << "SQLiteTreeHandler::RecursiveGetOrCreateNode('"
    //	      <<alien_node->GetLabel()
    //	      <<"','"<<parent<<"','"<<parent_id<<"')"<<std::endl;
    if (parent != 0) 
      {
	//	std::cout << " -- Parent = '"<<parent->GetLabel()<<"'"<<std::endl;
      }   
    std::string new_id;
    Node* new_node = DBGetOrCreateNode(alien_node, 
						 parent,
						 parent_id,
						 new_id,
						 summary);
    Node::ChildrenListType::iterator i;
    for (i  = alien_node->GetChildrenList().begin();
	 i != alien_node->GetChildrenList().end();
	 i++)
      {
	DBRecursiveGetOrCreateNode((*i),new_node,new_id,summary);
      }
  }
  //=====================================================================


  //=====================================================================
  Node* SQLiteTreeHandler::DBGetOrCreateNode(Node* alien_node, 
						   Node* internal_parent,
						   std::string parent_id,
						   std::string& node_id,
						   UpdateSummary& summary)
  {
    //   std::cout << "DBGetOrCreateNode('"<<alien_node->GetLabel()<<"','"
    //	      << internal_parent << "','"<< parent_id<<"')"<<std::endl;
    if (internal_parent != 0) 
      {
	//	std::cout << " -- Parent = '"<<internal_parent->GetLabel()<<"'"<<std::endl;
      }
    // Node Exists ? return it 
    // First try among children of internal parent 
    Node* node = GetChildrenLike(internal_parent,alien_node);
    if (node>0)
      {
	node_id = node->UnsafeGetFieldValue("ID");
	return node;
      }
    // Second : try in DB 
   
    // Does not exist : Create new one
    node = new Node(alien_node->GetType(),this,internal_parent);
    node->SetChildrenLoaded(true);
    // Copy fields values from alien
    Node::FieldValueMapType::iterator i,j;
    for (i =  node->GetFieldValueMap().begin();
	 i != node->GetFieldValueMap().end();
	 i++)
      {
	j = alien_node->GetFieldValueMap().find(i->first);
	if (j != alien_node->GetFieldValueMap().end() )
	  {
	    i->second = j->second;
	  }
      }

    msw[2].Resume();
    if (node->GetType()!=Node::Patient) 
      node->SetFieldValue("PARENT_ID",parent_id);

    // Insert in DB
    std::string val;
    BuildSQLFieldsValues(node,val);
    std::string insert("INSERT INTO ");
    insert += std::string(SQLiteTreeHandlerStructure::Table(node->GetType())) 
      + " " + val + ";";
    //    std::cout << "** SQL = '"<<insert<<"'"<<std::endl;
    UPDATEDB(insert);
    //    std::cout << "** SQL OK"<<std::endl;

    // Store DB id of newly created node;
    long lastrow = mDB->lastRowId();
    std::stringstream ri;
    ri << mDB->lastRowId();
    node_id = ri.str();
    //    std::cout << "LastRowId='"<<mDB->lastRowId()<<"' vs '"<<created_id<<"'"<<std::endl;

    node->SetFieldValue("ID",node_id);
    // Insert in TypeId map
    TypeId ti;
    ti.type = node->GetType();
    ti.id = node_id;
    mTypeIdToNodeMap[ti] = node;
    //    std::cout << "== Insert TypeId ("<<ti.type<<","<<ti.id<<")"<<std::endl; 
    // 
    msw[2].Pause();

    if (node->GetType()==Node::Patient) summary.added_patients++;
    if (node->GetType()==Node::Study) summary.added_studies++;
    if (node->GetType()==Node::Series) summary.added_series++;
    if (node->GetType()==Node::Image) summary.added_images++;

    return node;
  }
  //=====================================================================

  //=====================================================================
  Node* SQLiteTreeHandler::GetChildrenLike(Node* parent,
					    Node* alien_node)
  {
    Node::ChildrenListType::iterator i;
    for (i  = parent->GetChildrenList().begin();
	 i != parent->GetChildrenList().end();
	 i++)
      {
	Node::Type type = alien_node->GetType();
	bool ok = true;
	for (int j=0;
	     j<SQLiteTreeHandlerStructure::NbQueryFields(type);
	     j++) 
	  {
	    if ( 
		alien_node->GetFieldValue(SQLiteTreeHandlerStructure::
				    QueryField(type,j).key )   !=
		(*i)->GetFieldValue(SQLiteTreeHandlerStructure::
				    QueryField(type,j).key ) )
	      {
		ok = false;
		break;
	      }
	  }
	if (ok) 
	  {
	    return (*i);
	  }
      }
    return 0;    
  }
  //=====================================================================

  //=====================================================================
  std::string SQLiteTreeHandler::DBGetNodeId(Node* node, 
					      const std::string& parent_id)
  {
    //    std::cout << "SQLiteTreeHandler::DBGetNodeId('"<<node->GetLabel()
    //	      <<"','"<<parent_id<<"')"
    //	      <<std::endl;
    msw[2].Resume();
    int type = node->GetType();

    std::string table = SQLiteTreeHandlerStructure::Table(type);
    std::string where = "WHERE ";
    
    if (type!=Node::Patient)
      {
	where += "PARENT_ID='" + parent_id 
	  //node->GetFieldValue("PARENT_ID") 
	  + "' AND ";
      }

    for (int i=0;i<SQLiteTreeHandlerStructure::NbQueryFields(type);i++) 
      {
	where += SQLiteTreeHandlerStructure::QueryField(type,i).key + "='"
	  + node->GetFieldValue(SQLiteTreeHandlerStructure::QueryField(type,i).key) + "' ";
	if (i<SQLiteTreeHandlerStructure::NbQueryFields(type)-1)
	  where += "AND ";
    }

    std::string query = "SELECT ID FROM " + table + " " + where + ";";							  
    //    std::cout << "** SQL = '"<<query<<"'"<<std::endl;
    CppSQLite3Query q;
    QUERYDB(query,q);

    if (!q.eof())
      {
	
	//	std::cout << " - Node exists " << std::endl;
	std::string id = q.getStringField(0);
	//	std::cout << " id = '"<<id<<"'"<<std::endl;
	msw[2].Pause();
	return id;
      }
    msw[2].Pause();
    return "";
  }
  //=====================================================================



  //=====================================================================
  Node* SQLiteTreeHandler::GetNodeFromTypeId(Node::Type type,
				       const std::string& id)
  {
    //    std::cout << "GetNodeFromTypeId("<<type<<","<<id<<")"<<std::endl;

    TypeId ti;
    ti.type = type;
    ti.id = id;
    
    TypeIdToNodeMapType::iterator i = mTypeIdToNodeMap.find(ti);
    if (i == mTypeIdToNodeMap.end())
      {

	    std::cout << "Internal error : mTypeIdToNodeMap does not contain key"
		      << std::endl;
	    creaError("Internal error : mTypeIdToNodeMap does not contain key");
	    // }
      }

    //    std::cout << " ** Node = "<<i->second<<std::endl;
    return i->second;
  }
  //=====================================================================

  //=====================================================================
  bool SQLiteTreeHandler::Remove(Node* node)
  {
    DBRecursiveRemoveNode(node);
 
    //    std::cout << "DELETE"<<std::endl;
    if (node->GetParent())
      {
	node->GetParent()->RemoveChildrenFromList(node);
      }
    delete node;
    //    std::cout << "DELETE OK"<<std::endl;
    return true;
  }
  //========================================================================

  //=====================================================================
  void SQLiteTreeHandler::DBRecursiveRemoveNode(Node* node)
  {
    //    std::cout << "SQLiteTreeHandler::DBRecursiveRemoveNode('"
    //	      <<node->GetLabel()<<"')"<<std::endl;

    std::string query = "DELETE FROM ";
    query += SQLiteTreeHandlerStructure::Table(node->GetType());
    query += " WHERE ID='"+ node->GetFieldValue("ID") + "';";
 
    UPDATEDB(query);

    Node::ChildrenListType::iterator i;
    for (i  = node->GetChildrenList().begin();
	 i != node->GetChildrenList().end();
	 i++)
      {
	DBRecursiveRemoveNode((*i));
      }
  }
  //=====================================================================
  
  //=====================================================================
  int SQLiteTreeHandler::DBQueryNumberOfChildren(Node* node)
  {
    std::string query = "SELECT COUNT (ID) FROM ";
    query += SQLiteTreeHandlerStructure::Table(node->GetType()+1);
    if (node->GetType() != Node::Database) 
      {
	query += " WHERE PARENT_ID='"+ node->GetFieldValue("ID")+"'";
      }
    query  += ";";
    
    //   std::cout << "**SQL = "<< query << std::endl;
    
    CppSQLite3Query q;
    QUERYDB(query,q);
   
     //    std::cout << "**RES = "<< q.getIntField(0) <<std::endl;

    return q.getIntField(0);
  }
  //=====================================================================
 
  //========================================================================
  std::string& format_sql2(std::string& str)
  {
    // quote must be doubled
    //    crea::Utils::Replace( str, "'", "''" );
    boost::algorithm::replace_all(str,"'","''");
    // Found strange strings which contained NULL char INSIDE string 
    int i,size=str.size();
    for (i=0;i<size;++i) 
      {
	if (str[i]==0) 
	  {
	    str = str.substr(0,i);
	    break;
	  }
      }
    //    if (i<str.size())
    return str;
  }
   //========================================================================

  //=====================================================================
  void SQLiteTreeHandler::BuildSQLFieldsValues(Node* n,
					std::string& str)
  {
    //    std::cout << "BuildSQLFieldsValues('"<<n->GetLabel()<<"')"<<std::endl;

    std::string atts="";
    std::string values="";
    Node::FieldValueMapType::iterator i;
    for (i =  n->GetFieldValueMap().begin();
	 i != n->GetFieldValueMap().end();
	 i++)
      {
	if (i->first=="ID") 
	  {
	    continue;
	  }
	//	std::cout << "("<<i->first<<","<<i->second<<")"<<std::endl;
	atts += "'" + i->first + "'";
	values += "'" + format_sql2(i->second) + "'"; 
	atts += ",";
	values += ",";
      }
    atts[atts.size()-1]=' ';
    values[values.size()-1]=' ';

    str = "("+atts+") VALUES ("+values+")";

  }
  //=====================================================================
*/



} // namespace creaImageIO