define_8c-source.html

oci的源码,可以在任何平台上编译,相当方便实用

<a name="l00123"></a>00123 
<a name="l00124"></a>00124             <span class="comment">/* handle based types */</span>
<a name="l00125"></a>00125 
<a name="l00126"></a>00126             <span class="keywordflow">return</span> def-&gt;buf.data[def-&gt;rs-&gt;row_cur-1];
<a name="l00127"></a>00127 
<a name="l00128"></a>00128         <span class="keywordflow">default</span>:
<a name="l00129"></a>00129 
<a name="l00130"></a>00130             <span class="comment">/* scalar types */</span>
<a name="l00131"></a>00131 
<a name="l00132"></a>00132             <span class="keywordflow">return</span> (((ub1*)def-&gt;buf.data) + (def-&gt;col.bufsize  * (def-&gt;rs-&gt;row_cur-1)));
<a name="l00133"></a>00133     }
<a name="l00134"></a>00134 }
<a name="l00135"></a>00135 
<a name="l00136"></a>00136 <span class="comment">/* ------------------------------------------------------------------------ *</span>
<a name="l00137"></a>00137 <span class="comment"> * OCI_DefineGetNumber</span>
<a name="l00138"></a>00138 <span class="comment"> * ------------------------------------------------------------------------ */</span>
<a name="l00139"></a>00139 
<a name="l00140"></a>00140 <span class="keywordtype">boolean</span> OCI_DefineGetNumber(<a class="code" href="struct_o_c_i___resultset.html" title="Collection of output columns from a select statement.">OCI_Resultset</a> *rs, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> index, <span class="keywordtype">void</span> *value,
<a name="l00141"></a>00141                             uword type, uword size)
<a name="l00142"></a>00142 {
<a name="l00143"></a>00143     OCI_Define *def = OCI_GetDefine(rs, index);
<a name="l00144"></a>00144     <span class="keywordtype">boolean</span> res     = FALSE;
<a name="l00145"></a>00145 
<a name="l00146"></a>00146     <span class="keywordflow">if</span> (OCI_NOT_NULL(def) == TRUE)
<a name="l00147"></a>00147     {
<a name="l00148"></a>00148         <span class="keywordtype">void</span> *data = OCI_DefineGetData(def);
<a name="l00149"></a>00149 
<a name="l00150"></a>00150         <span class="keywordflow">switch</span> (def-&gt;col.type)
<a name="l00151"></a>00151         {
<a name="l00152"></a>00152             <span class="keywordflow">case</span> OCI_CDT_NUMERIC:
<a name="l00153"></a>00153             {
<a name="l00154"></a>00154                 res = OCI_NumberGet(rs-&gt;<a class="code" href="struct_o_c_i___resultset.html#c12ae7da6f8d20f00c6ad69cdb31373a">stmt</a>-&gt;<a class="code" href="struct_o_c_i___statement.html#338ddf58debd7de6ab9355f1e75d78f6">con</a>, (OCINumber *) data, value,
<a name="l00155"></a>00155                                     size, type);
<a name="l00156"></a>00156                 <span class="keywordflow">break</span>;
<a name="l00157"></a>00157             }
<a name="l00158"></a>00158             <span class="keywordflow">case</span> OCI_CDT_TEXT:
<a name="l00159"></a>00159             {
<a name="l00160"></a>00160                 <span class="keyword">const</span> mtext *fmt = <a class="code" href="group__g__connect.html#g57c1be56edaf86588dfb7a1245bf5908" title="Return the current numeric format for implicit string / numeric conversions.">OCI_GetDefaultFormatNumeric</a>(rs-&gt;<a class="code" href="struct_o_c_i___resultset.html#c12ae7da6f8d20f00c6ad69cdb31373a">stmt</a>-&gt;<a class="code" href="struct_o_c_i___statement.html#338ddf58debd7de6ab9355f1e75d78f6">con</a>);
<a name="l00161"></a>00161                 ub4 fmt_size     = (ub4) mtslen(fmt);
<a name="l00162"></a>00162 
<a name="l00163"></a>00163                 res = OCI_NumberGetFromStr(rs-&gt;<a class="code" href="struct_o_c_i___resultset.html#c12ae7da6f8d20f00c6ad69cdb31373a">stmt</a>-&gt;<a class="code" href="struct_o_c_i___statement.html#338ddf58debd7de6ab9355f1e75d78f6">con</a>, value, size, type,
<a name="l00164"></a>00164                                            (dtext *) data,
<a name="l00165"></a>00165                                            (<span class="keywordtype">int</span>) dtslen((dtext *) data),
<a name="l00166"></a>00166                                            fmt, fmt_size);
<a name="l00167"></a>00167                 <span class="keywordflow">break</span>;
<a name="l00168"></a>00168             }
<a name="l00169"></a>00169         }
<a name="l00170"></a>00170     }
<a name="l00171"></a>00171 
<a name="l00172"></a>00172     OCI_RESULT(res);
<a name="l00173"></a>00173 
<a name="l00174"></a>00174     <span class="keywordflow">return</span> res;
<a name="l00175"></a>00175 }
<a name="l00176"></a>00176 
<a name="l00177"></a>00177 <span class="comment">/* ------------------------------------------------------------------------ *</span>
<a name="l00178"></a>00178 <span class="comment"> * OCI_DefineAlloc</span>
<a name="l00179"></a>00179 <span class="comment"> * ------------------------------------------------------------------------ */</span>
<a name="l00180"></a>00180 
<a name="l00181"></a>00181 <span class="keywordtype">boolean</span> OCI_DefineAlloc(OCI_Define *def)
<a name="l00182"></a>00182 {
<a name="l00183"></a>00183     <span class="keywordtype">boolean</span> res = TRUE;
<a name="l00184"></a>00184     ub4 bufsize = 0;
<a name="l00185"></a>00185     ub4 indsize = 0;
<a name="l00186"></a>00186     ub4 i;
<a name="l00187"></a>00187 
<a name="l00188"></a>00188     <span class="comment">/* this function allocates internal buffers, handles, indicators, arrays, ...</span>
<a name="l00189"></a>00189 <span class="comment">       for the given output define handle */</span>
<a name="l00190"></a>00190 
<a name="l00191"></a>00191     OCI_CHECK(def == NULL, FALSE);
<a name="l00192"></a>00192 
<a name="l00193"></a>00193     <span class="comment">/* Allocate null indicators array */</span>
<a name="l00194"></a>00194 
<a name="l00195"></a>00195     <span class="keywordflow">if</span> (def-&gt;col.ocode == SQLT_NTY || def-&gt;col.ocode == SQLT_REF)
<a name="l00196"></a>00196         indsize = (ub4) <span class="keyword">sizeof</span>(<span class="keywordtype">void</span>*);
<a name="l00197"></a>00197     <span class="keywordflow">else</span>
<a name="l00198"></a>00198         indsize = (ub4) <span class="keyword">sizeof</span>(sb2);
<a name="l00199"></a>00199 
<a name="l00200"></a>00200     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00201"></a>00201     {
<a name="l00202"></a>00202         def-&gt;buf.inds = (<span class="keywordtype">void</span> *) OCI_MemAlloc(OCI_IPC_INDICATOR_ARRAY,
<a name="l00203"></a>00203                                               (<span class="keywordtype">int</span>) indsize, def-&gt;buf.count, TRUE);
<a name="l00204"></a>00204         res = (def-&gt;buf.inds != NULL);
<a name="l00205"></a>00205     }
<a name="l00206"></a>00206 
<a name="l00207"></a>00207     <span class="comment">/* Allocate row data sizes array */</span>
<a name="l00208"></a>00208 
<a name="l00209"></a>00209     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00210"></a>00210     {
<a name="l00211"></a>00211         def-&gt;buf.lens = (<span class="keywordtype">void</span> *) OCI_MemAlloc(OCI_IPC_LEN_ARRAY, def-&gt;buf.sizelen,
<a name="l00212"></a>00212                                               def-&gt;buf.count, TRUE);
<a name="l00213"></a>00213 
<a name="l00214"></a>00214         res = (def-&gt;buf.lens != NULL);
<a name="l00215"></a>00215     }
<a name="l00216"></a>00216 
<a name="l00217"></a>00217     <span class="comment">/* initialize length array with buffer default size.</span>
<a name="l00218"></a>00218 <span class="comment">       But, Oracle uses different sizes for static fetch and callback fetch....*/</span>
<a name="l00219"></a>00219 
<a name="l00220"></a>00220     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00221"></a>00221     {
<a name="l00222"></a>00222         <span class="keywordflow">for</span> (i=0; i &lt; def-&gt;buf.count; i++)
<a name="l00223"></a>00223         {
<a name="l00224"></a>00224             <span class="keywordflow">if</span> (def-&gt;buf.sizelen == <span class="keyword">sizeof</span>(ub2))
<a name="l00225"></a>00225                 *(ub2*)(((ub1 *)def-&gt;buf.lens) + def-&gt;buf.sizelen*(i)) = (ub2) def-&gt;col.bufsize;
<a name="l00226"></a>00226             <span class="keywordflow">else</span> if (def-&gt;buf.sizelen == <span class="keyword">sizeof</span>(ub4))
<a name="l00227"></a>00227                 *(ub4*)(((ub1 *)def-&gt;buf.lens) + def-&gt;buf.sizelen*(i)) = (ub4) def-&gt;col.bufsize;
<a name="l00228"></a>00228        }
<a name="l00229"></a>00229     }
<a name="l00230"></a>00230 
<a name="l00231"></a>00231     <span class="comment">/* Allocate buffer array */</span>
<a name="l00232"></a>00232 
<a name="l00233"></a>00233     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00234"></a>00234     {
<a name="l00235"></a>00235         <span class="keywordflow">if</span> (def-&gt;col.type == OCI_CDT_LONG)
<a name="l00236"></a>00236             bufsize = (ub4) <span class="keyword">sizeof</span>(<a class="code" href="struct_o_c_i___long.html" title="Oracle Long datatype.">OCI_Long</a> *);
<a name="l00237"></a>00237         <span class="keywordflow">else</span>
<a name="l00238"></a>00238             bufsize = def-&gt;col.bufsize;
<a name="l00239"></a>00239 
<a name="l00240"></a>00240         def-&gt;buf.data = (<span class="keywordtype">void</span> *) OCI_MemAlloc(OCI_IPC_BUFF_ARRAY, (<span class="keywordtype">int</span>) bufsize,
<a name="l00241"></a>00241                                               def-&gt;buf.count, TRUE);
<a name="l00242"></a>00242 
<a name="l00243"></a>00243         res = (def-&gt;buf.data != NULL);
<a name="l00244"></a>00244     }
<a name="l00245"></a>00245 
<a name="l00246"></a>00246     <span class="comment">/* Allocate descriptor for cursor, lob and file, interval and timestamp */</span>
<a name="l00247"></a>00247 
<a name="l00248"></a>00248     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00249"></a>00249     {
<a name="l00250"></a>00250         <span class="keywordflow">if</span> (def-&gt;col.dtype != 0)
<a name="l00251"></a>00251         {
<a name="l00252"></a>00252             <span class="keywordflow">for</span> (i = 0; i &lt; def-&gt;buf.count; i++)
<a name="l00253"></a>00253             {
<a name="l00254"></a>00254                 <span class="keywordflow">if</span> (def-&gt;col.type == OCI_CDT_CURSOR)
<a name="l00255"></a>00255                 {
<a name="l00256"></a>00256                     res = (OCI_SUCCESS == OCI_HandleAlloc((dvoid  *) OCILib.env,
<a name="l00257"></a>00257                                                           (dvoid **) &amp;(def-&gt;buf.data[i]),
<a name="l00258"></a>00258                                                           (ub4) def-&gt;col.dtype,
<a name="l00259"></a>00259                                                           (<span class="keywordtype">size_t</span>) 0, (dvoid **) NULL));