Oracle Call Interface: как написать клиентское приложение на Си

//подкллючаем библиотеку в Windows
hOCIDll = LoadLibraryW(L"oci.dll");
//или в Линукс
ocimodule = dlopen("libclntsh.so", RTLD_LAZY);

//Определяем тип для указателя функции
typedef sword(*pOCIEnvCreate)(OCIEnv **hOraEnvp,
	ub4           mode,
	const void    *ctxp,
	const void    *(*malocfp)
	(void  *ctxp,
		size_t size),
	const void    *(*ralocfp)
	(void  *ctxp,
		void  *memptr,
		size_t newsize),
	const void(*mfreefp)
	(void  *ctxp,
		void  *memptr),
	size_t         xtramemsz,
	void           **usrmempp);

//выделяем переменную для адреса функции
pOCIEnvCreate OCIEnvCreate;

//Получаем адрес функции на Windows
OCIEnvCreate = (pOCIEnvCreate)GetProcAddress(hOCIDll,
		"OCIEnvCreate");
// Или на Linux
OCIEnvCreate = (pOCIEnvCreate)dlsym(ocilib,"OCIEnvCreate");

OCIEnv *hOraEnv = NULL;
OCIError *hOraErr = NULL;

	
OCIEnvCreate((OCIEnv **)&hOraEnv,
		(ub4)OCI_DEFAULT | OCI_OBJECT,
		(const void  *)0,
		(const void  * (*)(void  *, size_t))0,
		(const void  * (*)(void  *, void  *, size_t))0,
		(const void(*)(void  *, void  *))0,
		(size_t)0, (void  **)0));

	
OCIHandleAlloc((const void *)hOraEnv,
		(void **)&hOraErr,
		OCI_HTYPE_ERROR,
		(size_t)0,
		(void **)0));

OCIServer *hOraServer = NULL;
OCISvcCtx *hOraSvcCtxOCI = NULL;
OCISession *hOraSession = NULL;


//Аллоцируем хендл OCIServer
OCIHandleAlloc((const void *)hOraEnv, (void **)&hOraServer,
        OCI_HTYPE_SERVER, (size_t)0, (dvoid **)0);

char *dbconnectstring = "servername:1521/ORCL";
//Подключаемся к серверу
OCIServerAttach(hOraServer, hOraErr, (const OraText *)dbconnectstring, 
                (sb4)strlen(dbconnectstring), (ub4)OCI_DEFAULT);

//Аллоцируем хендл сервисного контекста
OCIHandleAlloc((const void *)hOraEnv, (void **)&hOraSvcCtx,
        OCI_HTYPE_SVCCTX, (size_t)0, (dvoid **)0);

//Помещаем хендл сервера в сервисного контекста
OCIAttrSet((void *)hOraSvcCtx, OCI_HTYPE_SVCCTX, (void *)hOraServer, 
           (ub4)0, OCI_ATTR_SERVER, (OCIError *)hOraErr));
    
    
//Аллоцируем хендл для сессии
OCIHandleAlloc((const void *)hOraEnv, (void **)&hOraSession, 
               (ub4)OCI_HTYPE_SESSION, (size_t)0, (void **)0);

char * username = "SCOTT";    
//Помещаем имя пользователя в хендл сессии
OCIAttrSet((void *)hOraSession, (ub4)OCI_HTYPE_SESSION, 
           (void *)username, (ub4)strlen(username), 
           (ub4)OCI_ATTR_USERNAME, hOraErr);

char *password = "tiger";
//Помещаем пароль в хендл сессии    
OCIAttrSet((void *)hOraSession, (ub4)OCI_HTYPE_SESSION, 
           (void *)password, (ub4)strlen(password), 
           (ub4)OCI_ATTR_PASSWORD, hOraErr);

//флаг для указания, является ли пользователь sysdba
bool assysdba = 1;
//Начинаем сессию
OCISessionBegin(hOraSvcCtx, hOraErr, 
                hOraSession, OCI_CRED_RDBMS, 
                (ub4)(OCI_DEFAULT | (assysdba ? OCI_SYSDBA : 0)));
    
//Помещаем сессию в сервисный контекст
OCIAttrSet((void *)hOraSvcCtx, (ub4)OCI_HTYPE_SVCCTX, 
           (void *)hOraSession, (ub4)0, (ub4)OCI_ATTR_SESSION, 
           hOraErr);

char * insert_statement = "INSERT INTO simple_table\
	(id, textfield)\
	VALUES\
	(:id, :string)";

	sword status;

	int id;
	char stringBuffer[100];

OCIStmt *hOraPlsqlStatement = NULL;
//Аллоцируем хендл для sql-выражения
OCIHandleAlloc((const void *)hOraEnv, 
               (void **)&hOraPlsqlStatement, OCI_HTYPE_STMT, 
               (size_t)0, (void **)0);

//Подготавливаем его
OCIStmtPrepare(hOraPlsqlStatement, hOraErr, 
               (const OraText *)insert_statement, 
               (ub4)strlen(insert_statement), 
               (ub4)OCI_NTV_SYNTAX, (ub4)OCI_DEFAULT);

//Биндим наши переменные id и stringBuffer в sql-выражение
OCIBind  *bnd1p = NULL;
OCIBind  *bnd2p = NULL;
OCIBindByName(hOraPlsqlStatement, &bnd1p, 
              hOraErr, (text *)":id", -1, (void *)&id, 
              (sb4)sizeof(id), SQLT_INT, (void *)0, 
              (ub2 *)0, (ub2 *)0, (ub4)0, (ub4 *)0, OCI_DEFAULT);
OCIBindByName(hOraPlsqlStatement, &bnd2p, 
              hOraErr, (text *)":string", -1, 
              (void *)stringBuffer, (sb4)(sizeof(stringBuffer)), 
              SQLT_STR, (void *)0, (ub2 *)0, (ub2 *)0, 
              (ub4)0, (ub4 *)0, OCI_DEFAULT);
	
//вставляем данные в цикле
	for (id = 1; id < 10; id++)
	{
		sprintf(stringBuffer, "This is the %d string", id);
		
		status = OCIStmtExecute(hOraSvcCtx, hOraPlsqlStatement, hOraErr, (ub4)1, (ub4)0, (CONST OCISnapshot *) NULL, (OCISnapshot *)NULL, OCI_DEFAULT);
		if (status != OCI_SUCCESS && status != OCI_SUCCESS_WITH_INFO)
		{
			checkerr(hOraErr, status);
			OCIHandleFree(hOraPlsqlStatement, OCI_HTYPE_STMT);
			return FALSE;
		}
	}

//освобождаем хендл
OCIHandleFree(hOraPlsqlStatement, OCI_HTYPE_STMT);

char * select_statement = "select id, textfield from simple_table order by id";

sword status;

int id;
char stringBuffer[100];

OCIStmt *hOraPlsqlStatement = NULL;
OCIHandleAlloc((const void *)hOraEnv, 
               (void **)&hOraPlsqlStatement, OCI_HTYPE_STMT, 
               (size_t)0, (void **)0);


OCIStmtPrepare(hOraPlsqlStatement, hOraErr, 
               (const OraText *)select_statement, 
               (ub4)strlen(select_statement), 
               (ub4)OCI_NTV_SYNTAX, (ub4)OCI_DEFAULT);


OCIDefine *OraIdDefine = NULL;
//Привязываем переменную id к первому полю в запросе
OCIDefineByPos(hOraPlsqlStatement, &OraIdDefine, 
               hOraErr, 1, (void *)&id, (sword)sizeof(id), 
               SQLT_INT, (void *)0, (ub2 *)0, (ub2 *)0, 
               OCI_DEFAULT);


OCIDefine *OraStringDefine = NULL;
//Привязываем stringBuffer ко второму полю в запросе
OCIDefineByPos(hOraPlsqlStatement, &OraStringDefine, 
               hOraErr, 2, (void *)stringBuffer, 
               (sword)sizeof(stringBuffer), 
               SQLT_STR, (void *)0, (ub2 *)0, 
               (ub2 *)0, OCI_DEFAULT);

//Выполняем запрос, не получая никаких данных
status = OCIStmtExecute(hOraSvcCtx, hOraPlsqlStatement, hOraErr, (ub4)0, (ub4)0, (CONST OCISnapshot *) NULL, (OCISnapshot *)NULL, OCI_DEFAULT);
if (status != OCI_SUCCESS && status != OCI_SUCCESS_WITH_INFO)
{
		checkerr(hOraErr, status);
		OCIHandleFree(hOraPlsqlStatement, OCI_HTYPE_STMT);
		return FALSE;
}

printf("id | textfield\n");
//Получаем данные в цикле
while ((status = OCIStmtFetch2(hOraPlsqlStatement, hOraErr, 1, OCI_DEFAULT, 0, OCI_DEFAULT)) == OCI_SUCCESS || status == OCI_SUCCESS_WITH_INFO)
	{
		printf("%d | %s\n", id, stringBuffer);
	}

OCIHandleFree(hOraPlsqlStatement, OCI_HTYPE_STMT);
	

OCISessionEnd(hOraSvcCtx, hOraErr, hOraSession, OCI_DEFAULT);

OCIHandleFree(hOraSession, OCI_HTYPE_SESSION);

OCIHandleFree(hOraSvcCtx, OCI_HTYPE_SVCCTX);

OCIServerDetach(hOraServer, hOraErr, (ub4)OCI_DEFAULT);

OCIHandleFree(hOraServer, OCI_HTYPE_SERVER);

OCIHandleFree(hOraErr, OCI_HTYPE_ERROR);

OCIHandleFree(hOraEnv, OCI_HTYPE_ENV);

OCITerminate(OCI_DEFAULT);