/*
 * CDE - Common Desktop Environment
 *
 * Copyright (c) 1993-2012, The Open Group. All rights reserved.
 *
 * These libraries and programs are free software; you can
 * redistribute them and/or modify them under the terms of the GNU
 * Lesser General Public License as published by the Free Software
 * Foundation; either version 2 of the License, or (at your option)
 * any later version.
 *
 * These libraries and programs are distributed in the hope that
 * they will be useful, but WITHOUT ANY WARRANTY; without even the
 * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
 * PURPOSE. See the GNU Lesser General Public License for more
 * details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with these librararies and programs; if not, write
 * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
 * Floor, Boston, MA 02110-1301 USA
 */
/* $XConsortium: c_api_infolib.cc /main/5 1996/07/18 16:01:28 drk $ */

#include "oliasdb/c_api_common.h"

//extern void_ptr_array* infolib_array;
extern void_ptr_array* bookcase_array;
extern OLIAS_DB* mmdb_ptr;

//extern olias_server* oserver_ptr;
      
void _assign_bookcase_index_id(info_lib* x)
{
  long ind = x -> first();
  info_base* base;
  while (ind) {
    base = (*x)(ind);

// no duplication check yet
    int i = bookcase_array -> no_elmts();
    bookcase_array -> insert(base, i);
    bookcase_array -> reset_elmts(i+1);

    base -> set_index_id(i);
    x -> next(ind);
  }
}

int 
DtMmdbOpenInfoLib(
	const char* infolib_path,
	const char* selected_base_name,
	DtMmdbBool delayed_infolib_init
               )
{
   mtry {

      mmdb_ptr = new OLIAS_DB;
      info_lib* x = mmdb_ptr -> openInfoLib(infolib_path, selected_base_name);
   

      int i = x -> descriptor();
/*
      int i = infolib_array -> no_elmts();
      infolib_array -> insert(x, i);
      infolib_array -> reset_elmts(i+1);
*/

      _assign_bookcase_index_id(x);
   
      return i;
   }

   mcatch (mmdbException &,e)
   {
      return -1;
   } end_try;

   return -1;
}

void DtMmdbCloseInfoLib(int infolib_descriptor)
{
   delete mmdb_ptr;
   mmdb_ptr = 0;

   //infolib_array -> reset_vptr(0);
}


DtMmdbInfoLibInfo* 
DtMmdbInfoLibGetInfo(int infolib_descriptor)
{
   mtry {
        info_lib* x = mmdb_ptr -> getInfoLib(infolib_descriptor);
   
        if ( x == 0 ) return 0;
   
        DtMmdbInfoLibInfo *y = 
            (DtMmdbInfoLibInfo*)malloc(sizeof(DtMmdbInfoLibInfo)); 
   
        if ( y == 0 ) return 0;
   
        y -> path = x -> get_info_lib_path();
        y -> name = x -> get_info_lib_name();
        y -> num_bookcases = x -> num_of_bases();
   
        return y;
   
   }
   mcatch (mmdbException &,e)
   {
      return 0;
   } end_try;

   return 0;
}

void DtMmdbInfoLibFreeInfo(DtMmdbInfoLibInfo* x)
{
   free((void*)x);
}