src/iodbc/dlproc.c

/*
 *  dlproc.c
 *
 *  $Id$
 *
 *  Load driver and resolve driver's function entry point
 *
 *  The iODBC driver manager.
 *
 *  Copyright (C) 1995 by Ke Jin <kejin@empress.com>
 *
 *  This library is free software; you can redistribute it and/or
 *  modify it under the terms of the GNU Library General Public
 *  License as published by the Free Software Foundation; either
 *  version 2 of the License, or (at your option) any later version.
 *
 *  This library is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 *  Library General Public License for more details.
 *
 *  You should have received a copy of the GNU Library General Public
 *  License along with this library; if not, write to the Free
 *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

#include	<config.h>

#include	<isql.h>
#include	<isqlext.h>

#include        <dlproc.h>

#include	<herr.h>
#include	<henv.h>
#include	<hdbc.h>

#include	<itrace.h>

#include	"henv.ci"

HPROC
_iodbcdm_getproc (HDBC hdbc, int idx)
{
  DBC_t FAR *pdbc = (DBC_t FAR *) hdbc;
  ENV_t FAR *penv;
  HDLL hdll;
  HPROC FAR *phproc;

  if (idx <= 0 || idx > SQL_EXT_API_LAST)
    /* first entry naver used */
    {
      return SQL_NULL_HPROC;
    }

  penv = (ENV_t FAR *) (pdbc->henv);

  if (penv == NULL)
    {
      return SQL_NULL_HPROC;
    }

  phproc = penv->dllproc_tab + idx;

  if (*phproc == SQL_NULL_HPROC)
    {
      int i, en_idx;

      for (i = 0;; i++)
	{
	  en_idx = odbcapi_symtab[i].en_idx;

	  if (en_idx == en_NullProc)
	    {
	      break;
	    }

	  if (en_idx == idx)
	    {
	      *phproc = _iodbcdm_dllproc (penv->hdll,
		  odbcapi_symtab[i].symbol);

	      break;
	    }
	}
    }

  return *phproc;
}


HDLL
_iodbcdm_dllopen (char FAR * path)
{
  return (HDLL) DLL_OPEN (path);
}


HPROC
_iodbcdm_dllproc (HDLL hdll, char FAR * sym)
{
  return (HPROC) DLL_PROC (hdll, sym);
}


int
_iodbcdm_dllclose (HDLL hdll)
{
  DLL_CLOSE (hdll);

  return 0;
}


char *
_iodbcdm_dllerror ()
{
  return DLL_ERROR ();
}
Commit	Line	Data
	1	/*
	2	* dlproc.c
	3	*
	4	* $Id$
	5	*
	6	* Load driver and resolve driver's function entry point
	7	*
	8	* The iODBC driver manager.
	9	*
	10	* Copyright (C) 1995 by Ke Jin <kejin@empress.com>
	11	*
	12	* This library is free software; you can redistribute it and/or
	13	* modify it under the terms of the GNU Library General Public
	14	* License as published by the Free Software Foundation; either
	15	* version 2 of the License, or (at your option) any later version.
	16	*
	17	* This library is distributed in the hope that it will be useful,
	18	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	19	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	20	* Library General Public License for more details.
	21	*
	22	* You should have received a copy of the GNU Library General Public
	23	* License along with this library; if not, write to the Free
	24	* Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
	25	*/
	26
	27	#include <config.h>
	28
	29	#include <isql.h>
	30	#include <isqlext.h>
	31
	32	#include <dlproc.h>
	33
	34	#include <herr.h>
	35	#include <henv.h>
	36	#include <hdbc.h>
	37
	38	#include <itrace.h>
	39
	40	#include "henv.ci"
	41
	42	HPROC
	43	_iodbcdm_getproc (HDBC hdbc, int idx)
	44	{
	45	DBC_t FAR pdbc = (DBC_t FAR ) hdbc;
	46	ENV_t FAR *penv;
	47	HDLL hdll;
	48	HPROC FAR *phproc;
	49
	50	if (idx <= 0 \|\| idx > SQL_EXT_API_LAST)
	51	/* first entry naver used */
	52	{
	53	return SQL_NULL_HPROC;
	54	}
	55
	56	penv = (ENV_t FAR *) (pdbc->henv);
	57
	58	if (penv == NULL)
	59	{
	60	return SQL_NULL_HPROC;
	61	}
	62
	63	phproc = penv->dllproc_tab + idx;
	64
	65	if (*phproc == SQL_NULL_HPROC)
	66	{
	67	int i, en_idx;
	68
	69	for (i = 0;; i++)
	70	{
	71	en_idx = odbcapi_symtab[i].en_idx;
	72
	73	if (en_idx == en_NullProc)
	74	{
	75	break;
	76	}
	77
	78	if (en_idx == idx)
	79	{
	80	*phproc = _iodbcdm_dllproc (penv->hdll,
	81	odbcapi_symtab[i].symbol);
	82
	83	break;
	84	}
	85	}
	86	}
	87
	88	return *phproc;
	89	}
	90
	91
	92	HDLL
	93	_iodbcdm_dllopen (char FAR * path)
	94	{
	95	return (HDLL) DLL_OPEN (path);
	96	}
	97
	98
	99	HPROC
	100	_iodbcdm_dllproc (HDLL hdll, char FAR * sym)
	101	{
	102	return (HPROC) DLL_PROC (hdll, sym);
	103	}
	104
	105
	106	int
	107	_iodbcdm_dllclose (HDLL hdll)
	108	{
	109	DLL_CLOSE (hdll);
	110
	111	return 0;
	112	}
	113
	114
	115	char *
	116	_iodbcdm_dllerror ()
	117	{
	118	return DLL_ERROR ();
	119	}
	120