oracle proc的makefile

转自传智播客

.SUFFIXES: .c .o

CC=gcc
PROC=proc

PROCSRCS=oracle.pc
SRCS=$(PROCSRCS:.pc=.c)
OBJS=$(SRCS:.c=.o)

ORACLE_HOME=/opt/oracle/product/11.2.0
ORAFLAGS1=/usr/include/linux
ORAFLAGS2=/usr/lib/gcc/i686-redhat-linux/4.4.4/include

EXE=abc

all: $(OBJS)

$(CC) -o $(EXE) $(OBJS) -L$(ORACLE_HOME)/lib -lclntsh

.c.o: $(SRCS)
$(CC) -Wall -g -o $@ -c $<

$(SRCS):
$(PROC) INAME=$(PROCSRCS) INCLUDE=$(ORAFLAGS1) INCLUDE=$(ORAFLAGS2) CPOOL=YES MODE=ANSI CODE=ANSI_C PARSE=PARTIAL THREADS=YES  ONAME=$(SRCS)

clean:
-rm -f $(OBJS)
-rm -f $(SRCS)

-rm -f core*

proc程序编写

/*
 ============================================================================
 Name        : oracle.c
 Author      : zhujy
 Version     :
 Copyright   : Your copyright notice
 Description : Hello World in C, Ansi-style
 ============================================================================
 */

#include 
   
   
    
    
#include 
    
    
     
     
#include 
     
     
      
      
#include 
      
      
       
       
#include 
       
       
         //在pc文件当中，如果是嵌入式的SQL语句需要用到的变量，并且proc PARSE=PARTIAL,那么变量必须再BEGIN和END之间定义。 EXEC SQL BEGIN DECLARE SECTION; sql_context pContext; long SQLCODE;//变量类型和名称都不可以改变 EXEC SQL END DECLARE SECTION; extern void sqlglmt(void*, char*, size_t*, size_t* ); //安装错误处理函数 void sql_error() { char sErrorString[512];//自定义一个数组，数组的名字可以自定义 size_t tMessageSize = 0; size_t tErrorSize = sizeof(sErrorString); memset(sErrorString, 0, sizeof(sErrorString)); sqlglmt(pContext, sErrorString, &tErrorSize, &tMessageSize);//调用sqlglmt这个函数得到具体错误描述 sErrorString[tMessageSize] = 0;//设置错误描述字符串最后以0结尾 printf("%s\n", sErrorString);//打印错误描述 } //初始化数据库 void sql_init() { SQLCODE = 0; pContext = NULL; EXEC SQL ENABLE THREADS;//可以在代码当中生成线程相关代码 EXEC SQL CONTEXT ALLOCATE :pContext;//为pContext分配内存 EXEC SQL CONTEXT USE :pContext;//使用pContext } int sql_connect(const char *user, const char *passwd, const char *dbname) { EXEC SQL BEGIN DECLARE SECTION; const char *sUser; const char *sPasswd; const char *sDBname; EXEC SQL END DECLARE SECTION; SQLCODE = 0; sUser = user; sPasswd = passwd; sDBname = dbname; //在嵌入式SQL语句里面 冒号代表要用输入变量 EXEC SQL CONNECT :sUser IDENTIFIED BY :sPasswd USING :sDBname; if (SQLCODE != 0) { sql_error(); return 1; }else { return 0; } } int sql_disconnect() { SQLCODE = 0; EXEC SQL ROLLBACK WORK RELEASE; if (SQLCODE != 0) { sql_error(); return 1; }else { return 0; } } int sql_free() { SQLCODE = 0; EXEC SQL CONTEXT FREE :pContext; if (SQLCODE != 0) { sql_error(); return 1; }else { return 0; } } int sql_exec1(const char *s) { EXEC SQL BEGIN DECLARE SECTION; char SQL[1024]; EXEC SQL END DECLARE SECTION; SQLCODE = 0; memset(SQL, 0, sizeof(SQL)); strcpy(SQL, s); EXEC SQL EXECUTE IMMEDIATE :SQL; if (SQLCODE != 0) { sql_error(); return 1; }else { return 0; } } int sql_exec2() { EXEC SQL BEGIN DECLARE SECTION; char SQL[1024]; int id; char name[30]; EXEC SQL END DECLARE SECTION; id = 1; memset(SQL, 0, sizeof(SQL)); memset(name, 0, sizeof(name)); strcpy(name, "张学友"); strcpy(SQL, "insert into table1 (id, name) values (:id, :name)"); SQLCODE = 0; EXEC SQL PREPARE stat FROM :SQL;//准备执行一条SQL语句， EXEC SQL EXECUTE stat USING :id, :name;//根据输入宿主变量的值，执行SQL //insert into table1 (id, name) values (1, '张学友') if (SQLCODE != 0) { sql_error(); return 1; }else { return 0; } } int sql_exec3() { EXEC SQL BEGIN DECLARE SECTION; char SQL[1024]; int n; int id; char name[32]; EXEC SQL END DECLARE SECTION; memset(SQL, 0, sizeof(SQL)); memset(name, 0, sizeof(name)); n = 1; strcpy(SQL, "select id, name from table1 where id = :n"); SQLCODE = 0; EXEC SQL PREPARE stat FROM :SQL;//要准备执行动态SQL。 EXEC SQL DECLARE C1 CURSOR FOR stat;//定义一个光标表，名字叫C1 EXEC SQL OPEN C1 USING :n;//在光标C1中使用输入宿主变量 EXEC SQL OPEN C1;//打开光标C1 EXEC SQL WHENEVER NOT FOUND DO break;//循环读取光标C1，读取表中每一行，直到最后没有数据,循环break while(1) { EXEC SQL FETCH C1 INTO :id, :name;//将查询结果放入到输出变量id,name printf("id = %d, name = %s\n", id, name); } return 0; } int sql_exec4(const char *DySQL) { EXEC SQL BEGIN DECLARE SECTION; int i, iOutput_count, iOccurs, iType , iLen; short iInd; char sData[1024];//存放select查询数据的返回buffer char sOutput[64]; char sInput[64]; const char *SQL; EXEC SQL END DECLARE SECTION; SQLCODE = 0; iLen = sizeof(sData);//指示buffer大小 iType = 12;//所有select返回的数据集，都按照varchar2类型来处理 SQL = DySQL; sprintf(sOutput, "output%p", pContext);//只是为了动态生成一个系统当中不重复的字符串 sprintf(sInput, "input%p", pContext);//只是为了动态生成一个系统当中不重复的字符串 EXEC SQL ALLOCATE DESCRIPTOR :sOutput;//分配SELECT语句查询输出结果缓冲区 EXEC SQL ALLOCATE DESCRIPTOR :sInput; EXEC SQL PREPARE S FROM :SQL;//准备执行相应的SQL语句 if (SQLCODE != 0) { sql_error(); EXEC SQL DEALLOCATE DESCRIPTOR :sOutput;//释放SELECT语句查询输出结果缓冲区 EXEC SQL DEALLOCATE DESCRIPTOR :sInput; return 1; } EXEC SQL DECLARE C CURSOR FOR S; EXEC SQL OPEN C USING DESCRIPTOR :sInput;//使用输入缓冲区打开一个光标 //选择输出缓冲区 EXEC SQL DESCRIBE OUTPUT S USING DESCRIPTOR :sOutput; //得到SELECt语句返回多少列 EXEC SQL GET DESCRIPTOR :sOutput :iOutput_count = COUNT; for(i=0;i