ruby-oci8 1.0.7 → 2.0.0

data/ext/oci8/server.c

@@ -1,182 +0,0 @@
-/*
-  server.c - part of ruby-oci8
-
-  Copyright (C) 2002 KUBO Takehiro <kubo@jiubao.org>
-
-=begin
-== OCIServer
-If you use ((<OCIEnv#logon>)), you have no need to use this handle directly.
-Because ((<OCIEnv#logon>)) create this handle implicitly and set it to ((<OCISvcCtx>)).
-
-super class: ((<OCIHandle>))
-
-correspond native OCI datatype: ((|OCIServer|))
-=end
-*/
-#include "oci8.h"
-
-/*
-=begin
---- OCIServer#attach(dbname [, mode])
-     attach to the database.
-     :dbname
-        the name of database.
-     :mode
-        ((|OCI_DEFAULT|)) or ((|OCI_CPOOL|))(Oracle 9i). Default value is ((|OCI_DEFAULT|)).
-
-        This ruby module doesn't support the connection pooling provided by OCI,
-        so ((|OCI_CPOOL|)) is invalid value for now.
-
-     correspond native OCI function: ((|OCIServerAttach|))
-=end
-*/
-static VALUE oci8_server_attach(int argc, VALUE *argv, VALUE self)
-{
-  VALUE vdbname, vmode;
-  oci8_handle_t *h;
-  oci8_string_t d;
-  ub4 mode;
-  sword rv;
-
-  rb_scan_args(argc, argv, "11", &vdbname, &vmode);
-  Get_Handle(self, h); /* 0 */
-  Get_String(vdbname, d); /* 1 */
-  Get_Int_With_Default(argc, 2, vmode, mode, OCI_DEFAULT); /* 2 */
-
-  rv = OCIServerAttach(h->hp, h->errhp, d.ptr, d.len, mode);
-  if (rv != OCI_SUCCESS)
-    oci8_raise(h->errhp, rv, NULL);
-  return self;
-}
-
-/*
-=begin
---- OCIServer#detach([mode])
-     detach from the database.
-
-     :mode
-        ((|OCI_DEFAULT|)) only valid. Default value is ((|OCI_DEFAULT|)).
-
-     correspond native OCI function: ((|OCIServerDetach|))
-=end
-*/
-static VALUE oci8_server_detach(int argc, VALUE *argv, VALUE self)
-{
-  VALUE vmode;
-  oci8_handle_t *h;
-  ub4 mode;
-  sword rv;
-
-
-  rb_scan_args(argc, argv, "01", &vmode);
-  Get_Handle(self, h); /* 0 */
-  Get_Int_With_Default(argc, 1, vmode, mode, OCI_DEFAULT); /* 1 */
-
-  rv = OCIServerDetach(h->hp, h->errhp, mode);
-  if (rv != OCI_SUCCESS)
-    oci8_raise(h->errhp, rv, NULL);
-  return self;
-}
-
-
-
-void Init_oci8_server(void)
-{
-  rb_define_method(cOCIServer, "attach", oci8_server_attach, -1);
-  rb_define_method(cOCIServer, "detach", oci8_server_detach, -1);
-  rb_define_method(cOCIServer, "version", oci8_server_version, 0);
-#ifdef HAVE_OCISERVERRELEASE
-  rb_define_method(cOCIServer, "release", oci8_server_release, 0);
-#endif
-  rb_define_method(cOCIServer, "break", oci8_break, 0);
-#ifdef HAVE_OCIRESET
-  rb_define_method(cOCIServer, "reset", oci8_reset, 0);
-#endif
-}
-
-/*
-=begin
---- OCIServer#version()
-     get server version.
-
-     :return value
-        string of server version. For example
-          Oracle8 Release 8.0.5.0.0 - Production
-          PL/SQL Release 8.0.5.0.0 - Production
-
-     correspond native OCI function: ((|OCIServerVersion|))
-=end
-*/
-VALUE oci8_server_version(VALUE self)
-{
-  oci8_handle_t *h;
-  OraText buf[1024];
-  sword rv;
-
-  Get_Handle(self, h); /* 0 */
-  rv = OCIServerVersion(h->hp, h->errhp, buf, sizeof(buf), h->type);
-  if (rv != OCI_SUCCESS)
-    oci8_raise(h->errhp, rv, NULL);
-  return rb_str_new2(TO_CHARPTR(buf));
-}
-
-/*
-=begin
---- OCIServer#release()
-     get server version number and string
-
-     :return value
-        array of number and string. For example
-
-          version_number, version_str = srv.release()
-          version_number is 0x8005000.
-          version_str is
-            Oracle8 Release 8.0.5.0.0 - Production
-            PL/SQL Release 8.0.5.0.0 - Production
-
-     correspond native OCI function: ((|OCIServerVersion|))
-
-     Oracle 9i or later?
-=end
-*/
-#ifdef HAVE_OCISERVERRELEASE
-VALUE oci8_server_release(VALUE self)
-{
-  oci8_handle_t *h;
-  OraText buf[1024];
-  ub4 version = 0;
-  sword rv;
-
-  Get_Handle(self, h); /* 0 */
-  rv = OCIServerRelease(h->hp, h->errhp, buf, sizeof(buf), h->type, &version);
-  if (rv != OCI_SUCCESS)
-    oci8_raise(h->errhp, rv, NULL);
-  return rb_ary_new3(2, INT2FIX(version), rb_str_new2(buf));
-}
-#endif
-
-VALUE oci8_break(VALUE self)
-{
-  oci8_handle_t *h;
-  sword rv;
-
-  Get_Handle(self, h); /* 0 */
-  rv = OCIBreak(h->hp, h->errhp);
-  if (rv != OCI_SUCCESS)
-    oci8_raise(h->errhp, rv, NULL);
-  return self;
-}
-
-#ifdef HAVE_OCIRESET
-VALUE oci8_reset(VALUE self)
-{
-  oci8_handle_t *h;
-  sword rv;
-
-  Get_Handle(self, h); /* 0 */
-  rv = OCIReset(h->hp, h->errhp);
-  if (rv != OCI_SUCCESS)
-    oci8_raise(h->errhp, rv, NULL);
-  return self;
-}
-#endif

data/ext/oci8/session.c

@@ -1,99 +0,0 @@
-/*
-  session.c - part of ruby-oci8
-
-  Copyright (C) 2002 KUBO Takehiro <kubo@jiubao.org>
-
-=begin
-== OCISession
-If you use ((<OCIEnv#logon>)), you have no need to use this handle directly.
-Because ((<OCIEnv#logon>)) create this handle implicitly and set it to ((<OCISvcCtx>)).
-
-super class: ((<OCIHandle>))
-
-correspond native OCI datatype: ((|OCISession|))
-=end
-*/
-#include "oci8.h"
-
-/*
-=begin
---- OCISession#begin(svc [, credt [, mode]])
-     start user session under the specified server context.
-     :svc
-        ((<OCISvcCtx>)).
-     :credt
-        ((|OCI_CRED_RDBMS|)) or ((|OCI_CRED_EXT|)).
-        Default value is ((|OCI_CRED_RDBMS|)).
-
-        If you use ((|OCI_CRED_RDBMS|)), set ((<OCI_ATTR_USERNAME>))
-        and ((<OCI_ATTR_PASSWORD>)) in advance.
-
-     :mode
-        ((|OCI_DEFAULT|)), ((|OCI_MIGRATE|)), ((|OCI_SYSDBA|)), ((|OCI_SYSOPER|)), 
-        (((|OCI_SYSDBA|)) | ((|OCI_PRELIM_AUTH|))), or (((|OCI_SYSOPER|)) | ((|OCI_PRELIM_AUTH|))).
-        Default value is ((|OCI_DEFAULT|)).
-
-        If you need SYSDBA or SYSOPER privilege, use 
-        ((|OCI_SYSDBA|)) or ((|OCI_SYSOPER|)) respectively.
-
-     correspond native OCI function: ((|OCISessionBegin|))
-=end
-*/
-static VALUE oci8_session_begin(int argc, VALUE *argv, VALUE self)
-{
-  VALUE vsvc, vcredt, vmode;
-  oci8_handle_t *h;
-  oci8_handle_t *svch;
-  ub4 credt;
-  ub4 mode;
-  sword rv;
-
-  rb_scan_args(argc, argv, "12", &vsvc, &vcredt, &vmode);
-  Get_Handle(self, h); /* 0 */
-  Check_Handle(vsvc, OCISvcCtx, svch); /* 1 */
-  Get_Int_With_Default(argc, 2, vcredt, credt, OCI_NTV_SYNTAX); /* 2 */
-  Get_Int_With_Default(argc, 3, vmode, mode, OCI_DEFAULT); /* 3 */
-
-  rv = OCISessionBegin(svch->hp, h->errhp, h->hp, credt, mode);
-  if (rv != OCI_SUCCESS)
-    oci8_raise(h->errhp, rv, NULL);
-  return self;
-}
-
-/*
-=begin
---- OCISession#end(svc [, vmode])
-     terminate user Authentication Context
-
-     :svc
-        ((<OCISvcCtx>)).
-     :mode
-        ((|OCI_DEFAULT|)) only valid. Defalt value is ((|OCI_DEFAULT|)).
-
-     correspond native OCI function: ((|OCISessionEnd|))
-=end
-*/
-static VALUE oci8_session_end(int argc, VALUE *argv, VALUE self)
-{
-  VALUE vsvc, vmode;
-  oci8_handle_t *h;
-  oci8_handle_t *svch;
-  ub4 mode;
-  sword rv;
-
-  rb_scan_args(argc, argv, "11", &vsvc, &vmode);
-  Get_Handle(self, h); /* 0 */
-  Check_Handle(vsvc, OCISvcCtx, svch); /* 1 */
-  Get_Int_With_Default(argc, 2, vmode, mode, OCI_DEFAULT); /* 2 */
-
-  rv = OCISessionEnd(svch->hp, h->errhp, h->hp, mode);
-  if (rv != OCI_SUCCESS)
-    oci8_raise(h->errhp, rv, NULL);
-  return self;
-}
-
-void Init_oci8_session(void)
-{
-  rb_define_method(cOCISession, "begin", oci8_session_begin, -1);
-  rb_define_method(cOCISession, "end", oci8_session_end, -1);
-}

data/ext/oci8/svcctx.c

@@ -1,238 +0,0 @@
-/*
-  svcctx.c - part of ruby-oci8
-
-  Copyright (C) 2002 KUBO Takehiro <kubo@jiubao.org>
-
-=begin
-== OCISvcCtx
-The service context handle is correspond to `session' compared
-with other general database interfaces although OCI constains OCISession.
-
-This handle cooperates with a ((<server handle|OCIServer>)), a
-((<user session handle|OCISession>)), and a transaction handle.
-But these three handles work at the back of it. So you don't have to use
-them except when you have special purpose.
-
-super class: ((<OCIHandle>))
-
-correspond native OCI datatype: ((|OCISvcCtx|))
-=end
-*/
-#include "oci8.h"
-
-/*
-=begin
---- OCISvcCtx#logoff()
-     disconnect from Oracle.
-
-     If you use ((<OCIServer#attach>)) and ((<OCISession#begin>)) to logon,
-     use ((<OCIServer#detach>)) and ((<OCISession#end>)) instead.
-     See also ((<Simplified Logon>)) and ((<Explicit Attach and Begin Session>)).
-
-     correspond native OCI function: ((|OCILogoff|))
-=end
-*/
-static VALUE oci8_svcctx_logoff(VALUE self)
-{
-  oci8_handle_t *h;
-  sword rv;
-
-  Get_Handle(self, h); /* 0 */
-
-  rv = OCILogoff(h->hp, h->errhp);
-  if (rv != OCI_SUCCESS)
-    oci8_raise(h->errhp, rv, NULL);
-  return self;
-}
-
-/*
-=begin
---- OCISvcCtx#passwordChange(username, old_password, new_password [, mode])
-     :username
-        the username.
-     :old_password
-        old password of the user.
-     :new_password
-        new password of the user.
-     :mode
-        ((|OCI_DEFAULT|)) or ((|OCI_AUTH|)). Default value is ((|OCI_DEFAULT|)).
-
-        For most cases, use default value. If you want to know detail,
-        see "Oracle Call Interface Programmer's Guide".
-
-     correspond native OCI function: ((|OCIPasswordChange|))
-=end
-*/
-static VALUE oci8_password_change(int argc, VALUE *argv, VALUE self)
-{
-  VALUE vusername, vopasswd, vnpasswd, vmode;
-  oci8_handle_t *h;
-  oci8_string_t username, opasswd, npasswd;
-  ub4 mode;
-  sword rv;
-
-  rb_scan_args(argc, argv, "31", &vusername, &vopasswd, &vnpasswd, &vmode);
-  Get_Handle(self, h); /* 0 */
-  Get_String(vusername, username); /* 1 */
-  Get_String(vopasswd, opasswd); /* 2 */
-  Get_String(vnpasswd, npasswd); /* 3 */
-  Get_Int_With_Default(argc, 4, vmode, mode, OCI_DEFAULT); /* 4 */
-
-  rv = OCIPasswordChange(h->hp, h->errhp, username.ptr, username.len,
-			 opasswd.ptr, opasswd.len, npasswd.ptr, npasswd.len, mode);
-  if (rv != OCI_SUCCESS) {
-    oci8_raise(h->errhp, rv, NULL);
-  }
-  return self;
-}
-
-/*
-=begin
---- OCISvcCtx#commit([flags])
-     commit the transaction.
-
-     :flags
-        ((|OCI_DEFAULT|)) or ((|OCI_TRANS_TWOPHASE|)).
-        Default value is ((|OCI_DEFAULT|)).
-
-     correspond native OCI function: ((|OCITransCommit|))
-=end
-*/
-static VALUE oci8_trans_commit(int argc, VALUE *argv, VALUE self)
-{
-  VALUE vflags;
-  oci8_handle_t *h;
-  ub4 flags;
-  sword rv;
-
-  rb_scan_args(argc, argv, "01", &vflags);
-  Get_Handle(self, h); /* 0 */
-  Get_Int_With_Default(argc, 1, vflags, flags, OCI_DEFAULT); /* 1 */
-
-  rv = OCITransCommit(h->hp, h->errhp, flags);
-  if (rv != OCI_SUCCESS) {
-    oci8_raise(h->errhp, rv, NULL);
-  }
-  return self;
-}
-
-/*
-=begin
-
---- OCISvcCtx#rollback([flags])
-     rollback the transaction.
-
-     :flags
-        ((|OCI_DEFAULT|)) only valid. Default value is ((|OCI_DEFAULT|)).
-
-     correspond native OCI function: ((|OCITransRollback|))
-=end
-*/
-static VALUE oci8_trans_rollback(int argc, VALUE *argv, VALUE self)
-{
-  VALUE vflags;
-  oci8_handle_t *h;
-  ub4 flags;
-  sword rv;
-
-  rb_scan_args(argc, argv, "01", &vflags);
-  Get_Handle(self, h); /* 0 */
-  Get_Int_With_Default(argc, 1, vflags, flags, OCI_DEFAULT); /* 1 */
-
-  rv = OCITransRollback(h->hp, h->errhp, flags);
-  if (rv != OCI_SUCCESS) {
-    oci8_raise(h->errhp, rv, NULL);
-  }
-  return self;
-}
-
-/* THIS WILL BE DELETED IN FUTURE RELEASE. */
-static VALUE oci8_describe_any(VALUE self, VALUE vdsc, VALUE vname, VALUE vtype)
-{
-  oci8_handle_t *h;
-  oci8_handle_t *dsch;
-  oci8_string_t name;
-  ub1 type;
-  sword rv;
-
-  Get_Handle(self, h); /* 0 */
-  Check_Handle(vdsc, OCIDescribe, dsch); /* 1 */
-  Get_String(vname, name); /* 2 */
-  type = FIX2INT(vtype); /* 3 */
-
-  rv = OCIDescribeAny(h->hp, h->errhp, name.ptr, name.len, OCI_OTYPE_NAME, OCI_DEFAULT, type, dsch->hp);
-  if (rv != OCI_SUCCESS) {
-    oci8_raise(h->errhp, rv, NULL);
-  }
-  return self;
-}
-
-static VALUE oci8_close_all_files(VALUE self)
-{
-  oci8_handle_t *h;
-  sword rv;
-
-  Get_Handle(self, h); /* 0 */
-  rv = OCILobFileCloseAll(h->hp, h->errhp);
-  if (rv != OCI_SUCCESS) {
-    oci8_raise(h->errhp, rv, NULL);
-  }
-  return self;
-}
-
-static VALUE oci8_pid(VALUE self)
-{
-  oci8_handle_t *h;
-
-  Get_Handle(self, h); /* 0 */
-  return INT2FIX(h->u.svcctx.pid);
-}
-
-void Init_oci8_svcctx(void)
-{
-  rb_define_method(cOCISvcCtx, "logoff", oci8_svcctx_logoff, 0);
-  rb_define_method(cOCISvcCtx, "passwordChange", oci8_password_change, -1);
-  rb_define_method(cOCISvcCtx, "commit", oci8_trans_commit, -1);
-  rb_define_method(cOCISvcCtx, "rollback", oci8_trans_rollback, -1);
-  rb_define_method(cOCISvcCtx, "describeAny", oci8_describe_any, 3); /* delete later. */
-  rb_define_method(cOCISvcCtx, "version", oci8_server_version, 0);
-#ifdef HAVE_OCISERVERRELEASE
-  rb_define_method(cOCISvcCtx, "release", oci8_server_release, 0);
-#endif
-  rb_define_method(cOCISvcCtx, "break", oci8_break, 0);
-#ifdef HAVE_OCIRESET
-  rb_define_method(cOCISvcCtx, "reset", oci8_reset, 0);
-#endif
-  rb_define_method(cOCISvcCtx, "close_all_files", oci8_close_all_files, 0);
-  rb_define_method(cOCISvcCtx, "pid", oci8_pid, 0);
-}
-
-/*
-=begin
---- OCISvcCtx#version()
-     get server version.
-
-     :return value
-        string of server version. For example
-          Oracle8 Release 8.0.5.0.0 - Production
-          PL/SQL Release 8.0.5.0.0 - Production
-
-     correspond native OCI function: ((|OCIServerVersion|))
-
---- OCISvcCtx#release()
-     get server version number and string
-
-     :return value
-        array of number and string. For example
-
-          version_number, version_str = svc.release()
-          version_number is 0x8005000.
-          version_str is
-            Oracle8 Release 8.0.5.0.0 - Production
-            PL/SQL Release 8.0.5.0.0 - Production
-
-     correspond native OCI function: ((|OCIServerVersion|))
-
-     Oracle 9i or later?
-=end
-*/