itrace.c

一个可以替代windows ODBC驱动程序管理器的通用ODBC数据库引擎

/*
 *  itrace.c
 *
 *  $Id: itrace.c,v 1.9 2001/06/04 14:01:25 source Exp $
 *
 *  Trace functions
 *
 *  The iODBC driver manager.
 *  
 *  Copyright (C) 1995 by Ke Jin <[e-mail]> 
 *
 *  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 <iodbc.h>

#include <sql.h>
#include <sqlext.h>

#include <dlproc.h>

#include <itrace.h>

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

#include <stdio.h>

extern char *odbcapi_symtab[];

static int
printreturn (void FAR * istm, int ret)
{
  FILE FAR *stm = (FILE FAR *) istm;
  char FAR *ptr = "Invalid return value";

  switch (ret)
    {
    case SQL_SUCCESS:
      ptr = "SQL_SUCCESS";
      break;

    case SQL_SUCCESS_WITH_INFO:
      ptr = "SQL_SUCCESS_WITH_INFO";
      break;

    case SQL_NO_DATA_FOUND:
      ptr = "SQL_NO_DATA_FOUND";
      break;

    case SQL_NEED_DATA:
      ptr = "SQL_NEED_DATA";
      break;

    case SQL_INVALID_HANDLE:
      ptr = "SQL_INVALID_HANDLE";
      break;

    case SQL_ERROR:
      ptr = "SQL_ERROR";
      break;

    case SQL_STILL_EXECUTING:
      ptr = "SQL_STILL_EXECUTING";
      break;

    default:
      break;
    }

  fprintf (stm, "%s\n", ptr);
  fflush (stm);

  return 0;
}


HPROC
_iodbcdm_gettrproc (void FAR * istm, int procid, int type)
{
  FILE FAR *stm = (FILE FAR *) istm;

  if (type == TRACE_TYPE_DM2DRV)
    {
#if defined (THREAD_IDENT)
      fprintf (stm, "\n[%08lX]: %s ( ... )\n", 
	THREAD_IDENT, odbcapi_symtab[procid]);
#else
      fprintf (stm, "\n%s ( ... )\n", odbcapi_symtab[procid]);
#endif

      fflush (stm);
    }

  if (type == TRACE_TYPE_RETURN)
    {
      return (HPROC) printreturn;
    }

  return SQL_NULL_HPROC;
}