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;
  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	HPROC FAR *phproc;
	48
	49	if (idx <= 0 \|\| idx > SQL_EXT_API_LAST)
	50	/* first entry naver used */
	51	{
	52	return SQL_NULL_HPROC;
	53	}
	54
	55	penv = (ENV_t FAR *) (pdbc->henv);
	56
	57	if (penv == NULL)
	58	{
	59	return SQL_NULL_HPROC;
	60	}
	61
	62	phproc = penv->dllproc_tab + idx;
	63
	64	if (*phproc == SQL_NULL_HPROC)
	65	{
	66	int i, en_idx;
	67
	68	for (i = 0;; i++)
	69	{
	70	en_idx = odbcapi_symtab[i].en_idx;
	71
	72	if (en_idx == en_NullProc)
	73	{
	74	break;
	75	}
	76
	77	if (en_idx == idx)
	78	{
	79	*phproc = _iodbcdm_dllproc (penv->hdll,
	80	odbcapi_symtab[i].symbol);
	81
	82	break;
	83	}
	84	}
	85	}
	86
	87	return *phproc;
	88	}
	89
	90
	91	HDLL
	92	_iodbcdm_dllopen (char FAR * path)
	93	{
	94	return (HDLL) DLL_OPEN (path);
	95	}
	96
	97
	98	HPROC
	99	_iodbcdm_dllproc (HDLL hdll, char FAR * sym)
	100	{
	101	return (HPROC) DLL_PROC (hdll, sym);
	102	}
	103
	104
	105	int
	106	_iodbcdm_dllclose (HDLL hdll)
	107	{
	108	DLL_CLOSE (hdll);
	109
	110	return 0;
	111	}
	112
	113
	114	char *
	115	_iodbcdm_dllerror ()
	116	{
	117	return DLL_ERROR ();
	118	}
	119