int main(int argc, char *argv[])
{
OCI_Connection *con;
OCI_Enqueue *enq;
OCI_Dequeue *deq;
OCI_Msg *msg;
OCI_TypeInfo *inf;
OCI_Object *obj;
OCI_Initialize(NULL, NULL, OCI_ENV_DEFAULT);
con = OCI_ConnectionCreate("db", "usr", "pwd", OCI_SESSION_DEFAULT);
inf = OCI_TypeInfoGet(con, "MY_MESSAGE", OCI_TIF_TYPE);
enq = OCI_EnqueueCreate(inf, "my_queue");
deq = OCI_DequeueCreate(inf, "my_queue");
msg = OCI_MsgCreate(inf);
obj = OCI_ObjectCreate(con, inf);
OCI_ObjectSetString(obj, "TITLE", "NEXT MEETING");
OCI_ObjectSetString(obj, "CONTENT", "12:00 PM IN STARBUCKS");
OCI_MsgSetObject(msg, obj);
OCI_EnqueuePut(enq, msg);
OCI_MsgFree(msg);
OCI_ObjectFree(obj);
OCI_Commit(con);
msg = OCI_DequeueGet(deq);
obj = OCI_MsgGetObject(msg);
printf("MSG '%s' => %s\n", OCI_ObjectGetString(obj, "TITLE"),
OCI_ObjectGetString(obj, "CONTENT"));
OCI_EnqueueFree(enq);
OCI_DequeueFree(deq);
OCI_ConnectionFree(con);
OCI_Cleanup();
return EXIT_SUCCESS;
}
int main(void)
{
OCI_Connection *cn;
OCI_Statement *st;
OCI_Object *racing_car;
OCI_TypeInfo *vehicule_type_inf;
OCI_TypeInfo *car_type_inf;
OCI_TypeInfo *racing_car_type_inf;
char buffer[512];
unsigned int size = sizeof(buffer) - 1;
if (!OCI_Initialize(err_handler, NULL, OCI_ENV_DEFAULT))
{
return EXIT_FAILURE;
}
cn = OCI_ConnectionCreate("db", "usr", "pwd", OCI_SESSION_DEFAULT);
st = OCI_StatementCreate(cn);
racing_car = OCI_ObjectCreate(cn, OCI_TypeInfoGet(cn, "racing_car_type", OCI_TIF_TYPE));
OCI_Prepare(st, "begin :obj := racing_car_type(1,'Formula1', 123456789, 300); end;");
OCI_BindObject(st, "obj", racing_car);
OCI_Execute(st);
OCI_ObjectToText(racing_car, &size, buffer);
printf("Object => %s\n", buffer);
racing_car_type_inf = OCI_ObjectGetTypeInfo(racing_car);
car_type_inf = OCI_TypeInfoGetSuperType(racing_car_type_inf);
vehicule_type_inf = OCI_TypeInfoGetSuperType(car_type_inf);
printf("Is type '%s' final => %d\n", OCI_TypeInfoGetName(racing_car_type_inf), OCI_TypeInfoIsFinalType(racing_car_type_inf));
printf("Is type '%s' final => %d\n", OCI_TypeInfoGetName(car_type_inf), OCI_TypeInfoIsFinalType(car_type_inf));
printf("Is type '%s' final => %d\n", OCI_TypeInfoGetName(vehicule_type_inf), OCI_TypeInfoIsFinalType(vehicule_type_inf));
OCI_ObjectFree(racing_car);
OCI_StatementFree(st);
OCI_ConnectionFree(cn);
OCI_Cleanup();
return EXIT_SUCCESS;
}
int main(int argc, char **argv)
{
OCI_Connection *cn;
OCI_Statement *st;
OCI_Object *obj_sdo;
OCI_Coll *coll_inf, *coll_ord;
OCI_Elem *elem_inf, *elem_ord;
OCI_TypeInfo *tif_inf, *tif_ord, *tif_sdo;
int i;
/* check command line */
if (argc < 3)
{
fprintf(stderr, "Usage: %s user password\n", argv[0]);
return EXIT_FAILURE;
}
/* init OCILIB */
if (OCI_Initialize(error, NULL, OCI_ENV_DEFAULT))
{
/* connect to oracle */
if (cn = OCI_ConnectionCreate(NULL, argv[1], argv[2], OCI_SESSION_DEFAULT))
{
printf ("\nConnected to Oracle.\n");
/* retreive type info */
tif_sdo = OCI_TypeInfoGet(cn, "MDSYS.SDO_GEOMETRY", OCI_TIF_TYPE);
tif_inf = OCI_TypeInfoGet(cn, "MDSYS.SDO_ELEM_INFO_ARRAY", OCI_TIF_TYPE);
tif_ord = OCI_TypeInfoGet(cn, "MDSYS.SDO_ORDINATE_ARRAY", OCI_TIF_TYPE);
/* create sdo object */
obj_sdo = OCI_ObjectCreate(cn, tif_sdo);
/* create sub arrays */
coll_inf = OCI_CollCreate(tif_inf);
coll_ord = OCI_CollCreate(tif_ord);
/* create sub array element accessors */
elem_inf = OCI_ElemCreate(tif_inf);
elem_ord = OCI_ElemCreate(tif_ord);
/* build ordinates collection with test values */
for (i = 0; i < NB_ELEM; i++)
{
OCI_ElemSetDouble(elem_ord, (double) i);
OCI_CollAppend(coll_ord, elem_ord);
OCI_CollAppend(coll_ord, elem_ord);
}
/* setup information collection attribute 'starting_offset' */
OCI_ElemSetUnsignedInt(elem_inf, 1);
OCI_CollAppend(coll_inf, elem_inf);
/* setup information collection attribute 'element_type' */
OCI_ElemSetUnsignedInt(elem_inf, 1);
OCI_CollAppend(coll_inf, elem_inf);
/* setup information collection attribute 'interpretation' */
OCI_ElemSetUnsignedInt(elem_inf, 1);
OCI_CollAppend(coll_inf, elem_inf);
/* set sdo object member attributes */
OCI_ObjectSetInt(obj_sdo, "SDO_GTYPE", 4);
OCI_ObjectSetNull(obj_sdo, "SDO_SRID");
OCI_ObjectSetNull(obj_sdo, "SDO_POINT");
OCI_ObjectSetColl(obj_sdo, "SDO_ELEM_INFO", coll_inf);
OCI_ObjectSetColl(obj_sdo, "SDO_ORDINATES", coll_ord);
/*create statement object */
st = OCI_StatementCreate(cn);
/* prepare, bind and excute statement then commit*/
OCI_Prepare(st, "INSERT INTO test_insert (gid, geometry) VALUES (1, :sdo)");
OCI_BindObject(st, "sdo", obj_sdo);
OCI_Execute(st);
OCI_Commit(cn);
/* free local objects */
OCI_ObjectFree(obj_sdo);
OCI_CollFree(coll_inf);
OCI_CollFree(coll_ord);
OCI_ElemFree(elem_inf);
OCI_ElemFree(elem_ord);
}
}
/* disconnect from oracle and cleanup OCILIB */
OCI_Cleanup();
printf ("\nDisconnected from Oracle.\n");
return EXIT_SUCCESS;
}
int main(int argc, char *argv[])
{
OCI_Connection *con;
OCI_Enqueue *enq;
OCI_Dequeue *deq1;
OCI_Dequeue *deq2;
OCI_Msg *msg;
OCI_TypeInfo *inf;
OCI_Object *obj;
OCI_Agent *agents[2];
OCI_Initialize(err_handler, NULL, OCI_ENV_DEFAULT | OCI_ENV_THREADED |OCI_ENV_EVENTS);
con = OCI_ConnectionCreate("db", "usr", "pwd", OCI_SESSION_DEFAULT);
OCI_Immediate(con, "create type my_message as object (title varchar2(50), content varchar2(50)) ");
OCI_QueueTableCreate(con, "my_queue_table", "my_message", NULL, NULL, TRUE, FALSE, NULL, 0,0,NULL);
OCI_QueueCreate(con, "my_queue", "my_queue_table", OCIT_NORMAL, 0, 0, 0, 0, NULL);
OCI_QueueStart(con, "my_queue", TRUE, TRUE);
agents[0] = OCI_AgentCreate(con, "C1", NULL);
agents[1] = OCI_AgentCreate(con, "C2", NULL);
inf = OCI_TypeInfoGet(con, "MY_MESSAGE", OCI_TIF_TYPE);
enq = OCI_EnqueueCreate(inf, "my_queue");
deq1 = OCI_DequeueCreate(inf, "my_queue");
deq2 = OCI_DequeueCreate(inf, "my_queue");
OCI_DequeueSetConsumer(deq1, "C1");
OCI_DequeueSetNavigation(deq1, OCI_ADN_FIRST_MSG);
OCI_DequeueSetConsumer(deq2, "C2");
OCI_DequeueSetNavigation(deq2, OCI_ADN_FIRST_MSG);
OCI_DequeueSubscribe(deq1, 9998, 0, on_message);
OCI_DequeueSubscribe(deq2, 9999, 0, on_message);
msg = OCI_MsgCreate(inf);
obj = OCI_ObjectCreate(con, inf);
OCI_ObjectSetString(obj, "TITLE", "NEXT MEETING");
OCI_ObjectSetString(obj, "CONTENT", "12:00 PM IN STARBUCKS");
OCI_MsgSetObject(msg, obj);
OCI_MsgSetConsumers(msg, agents, 2);
OCI_EnqueuePut(enq, msg);
OCI_MsgFree(msg);
OCI_ObjectFree(obj);
OCI_Commit(con);
getchar();
OCI_DequeueUnsubscribe(deq1);
OCI_DequeueUnsubscribe(deq2);
OCI_AgentFree(agents[0]);
OCI_AgentFree(agents[1]);
OCI_EnqueueFree(enq);
OCI_DequeueFree(deq1);
OCI_DequeueFree(deq2);
OCI_QueueStop(con, "my_queue", TRUE, TRUE, 0);
OCI_QueueDrop(con, "my_queue");
OCI_QueueTableDrop(con, "my_queue_table", TRUE);
OCI_Immediate(con, "drop type my_message");
OCI_ConnectionFree(con);
OCI_Cleanup();
return EXIT_SUCCESS;
}
boolean OCI_API OCI_MsgFree
(
OCI_Msg *msg
)
{
boolean res = TRUE;
OCI_CHECK_PTR(OCI_IPC_MSG, msg, FALSE);
/* free local OCI_Agent object */
if (msg->sender != NULL)
{
OCI_AgentFree(msg->sender);
}
/* free internal OCI_Object handle if payload is not RAW */
if (msg->obj != NULL)
{
msg->obj->hstate = OCI_OBJECT_ALLOCATED;
OCI_ObjectFree(msg->obj);
msg->obj = NULL;
}
/* free message RAW payload if necessary */
if ((msg->typinf->tcode == OCI_UNKNOWN)&& ( msg->id != NULL))
{
OCI_CALL2
(
res, msg->typinf->con,
OCIRawResize(msg->typinf->con->env, msg->typinf->con->err, 0, (OCIRaw **) &msg->payload)
)
}
/* free message ID */
if (msg->id != NULL)
{
OCI_CALL2
(
res, msg->typinf->con,
OCIRawResize(msg->typinf->con->env, msg->typinf->con->err, 0, (OCIRaw **) &msg->id)
)
}
msg->id = NULL;
/* free OCI descriptor */
OCI_DescriptorFree((dvoid *) msg->proph, OCI_DTYPE_AQMSG_PROPERTIES);
OCI_FREE(msg);
return res;
}
