src/iodbc/henv.c

/** Environment object managment functions

    Copyright (C) 1995 by Ke Jin <kejin@empress.com>

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program 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 General Public License for more details.
**/

#include	<../iodbc/iodbc.h>

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

#include	<../iodbc/dlproc.h>

#include	<../iodbc/herr.h>
#include	<../iodbc/henv.h>

#include	<../iodbc/itrace.h>

RETCODE SQL_API	SQLAllocEnv( HENV FAR* phenv )
{
	GENV_t FAR*	genv;

	genv = (GENV_t*)MEM_ALLOC( sizeof(GENV_t) );

	if( genv == NULL )
	{
		*phenv = SQL_NULL_HENV;

		return SQL_ERROR;
	}

#if (ODBCVER >= 0x0300 )
	genv->type = SQL_HANDLE_ENV;
#endif

	genv->henv = SQL_NULL_HENV;	/* driver's env list */
	genv->hdbc = SQL_NULL_HDBC;	/* driver's dbc list */
	genv->herr = SQL_NULL_HERR;	/* err list	     */

	*phenv = (HENV)genv;

	return SQL_SUCCESS;
}

RETCODE SQL_API	SQLFreeEnv ( HENV henv )
{
	GENV_t FAR*	genv = (GENV_t*)henv;

	if( henv == SQL_NULL_HENV )
	{
		return SQL_INVALID_HANDLE;
	}

	if( genv->hdbc != SQL_NULL_HDBC )
	{
		PUSHSQLERR ( genv->herr, en_S1010 );

		return SQL_ERROR;
	}

	_iodbcdm_freesqlerrlist( genv->herr );

	MEM_FREE( henv );

	return SQL_SUCCESS;
}
Commit	Line	Data
	1	/** Environment object managment functions
	2
	3	Copyright (C) 1995 by Ke Jin <kejin@empress.com>
	4
	5	This program is free software; you can redistribute it and/or modify
	6	it under the terms of the GNU General Public License as published by
	7	the Free Software Foundation; either version 2 of the License, or
	8	(at your option) any later version.
	9
	10	This program is distributed in the hope that it will be useful,
	11	but WITHOUT ANY WARRANTY; without even the implied warranty of
	12	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	13	GNU General Public License for more details.
	14	**/
	15
	16	#include <../iodbc/iodbc.h>
	17
	18	#include <../iodbc/isql.h>
	19	#include <../iodbc/isqlext.h>
	20
	21	#include <../iodbc/dlproc.h>
	22
	23	#include <../iodbc/herr.h>
	24	#include <../iodbc/henv.h>
	25
	26	#include <../iodbc/itrace.h>
	27
	28	RETCODE SQL_API SQLAllocEnv( HENV FAR* phenv )
	29	{
	30	GENV_t FAR* genv;
	31
	32	genv = (GENV_t*)MEM_ALLOC( sizeof(GENV_t) );
	33
	34	if( genv == NULL )
	35	{
	36	*phenv = SQL_NULL_HENV;
	37
	38	return SQL_ERROR;
	39	}
	40
	41	#if (ODBCVER >= 0x0300 )
	42	genv->type = SQL_HANDLE_ENV;
	43	#endif
	44
	45	genv->henv = SQL_NULL_HENV; /* driver's env list */
	46	genv->hdbc = SQL_NULL_HDBC; /* driver's dbc list */
	47	genv->herr = SQL_NULL_HERR; /* err list */
	48
	49	*phenv = (HENV)genv;
	50
	51	return SQL_SUCCESS;
	52	}
	53
	54	RETCODE SQL_API SQLFreeEnv ( HENV henv )
	55	{
	56	GENV_t FAR* genv = (GENV_t*)henv;
	57
	58	if( henv == SQL_NULL_HENV )
	59	{
	60	return SQL_INVALID_HANDLE;
	61	}
	62
	63	if( genv->hdbc != SQL_NULL_HDBC )
	64	{
	65	PUSHSQLERR ( genv->herr, en_S1010 );
	66
	67	return SQL_ERROR;
	68	}
	69
	70	_iodbcdm_freesqlerrlist( genv->herr );
	71
	72	MEM_FREE( henv );
	73
	74	return SQL_SUCCESS;
	75	}