statement_8c-source.html

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

<a name="l00270"></a>00270 <span class="keywordtype">boolean</span> OCI_BindData(<a class="code" href="struct_o_c_i___statement.html" title="Oracle SQL or PL/SQL statement.">OCI_Statement</a> *stmt, <span class="keywordtype">void</span> *data, ub4 size,
<a name="l00271"></a>00271                      <span class="keyword">const</span> mtext *name, ub1 type, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> code,
<a name="l00272"></a>00272                      <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> mode, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> subtype,
<a name="l00273"></a>00273                      <a class="code" href="struct_o_c_i___type_info.html" title="Type info metadata handle.">OCI_TypeInfo</a> *typinf, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> nbelem)
<a name="l00274"></a>00274 {
<a name="l00275"></a>00275     <span class="keywordtype">boolean</span> res      = TRUE;
<a name="l00276"></a>00276     <a class="code" href="struct_o_c_i___bind.html" title="Internal bind representation.">OCI_Bind</a> *bnd    = NULL;
<a name="l00277"></a>00277     ub4 exec_mode    = OCI_DEFAULT;
<a name="l00278"></a>00278     <span class="keywordtype">boolean</span> is_pltbl = FALSE;
<a name="l00279"></a>00279     <span class="keywordtype">boolean</span> reused   = FALSE;
<a name="l00280"></a>00280     ub4 *pnbelem     = NULL;
<a name="l00281"></a>00281     <span class="keywordtype">int</span> index        = 0;
<a name="l00282"></a>00282     ub4 i;
<a name="l00283"></a>00283 
<a name="l00284"></a>00284     <span class="comment">/* check index if necessary */</span>
<a name="l00285"></a>00285 
<a name="l00286"></a>00286     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00287"></a>00287     {
<a name="l00288"></a>00288         <span class="keywordflow">if</span> (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#5824dd74344da1512bc07b20fcfc75e8">bind_mode</a> == OCI_BIND_BY_POS)
<a name="l00289"></a>00289         {
<a name="l00290"></a>00290             index = (int) mtstol(&amp;name[1], NULL, 10);
<a name="l00291"></a>00291 
<a name="l00292"></a>00292             <span class="keywordflow">if</span> (index &lt;= 0 || index &gt; OCI_BIND_MAX)
<a name="l00293"></a>00293             {
<a name="l00294"></a>00294                 OCI_ExceptionOutOfBounds(stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#338ddf58debd7de6ab9355f1e75d78f6">con</a>, index);
<a name="l00295"></a>00295                 res = FALSE;
<a name="l00296"></a>00296             }
<a name="l00297"></a>00297         }
<a name="l00298"></a>00298     }
<a name="l00299"></a>00299 
<a name="l00300"></a>00300     <span class="comment">/* check if the bind name has already been used */</span>
<a name="l00301"></a>00301 
<a name="l00302"></a>00302     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00303"></a>00303     {
<a name="l00304"></a>00304         <span class="keywordflow">if</span> (mode == OCI_BIND_INPUT)
<a name="l00305"></a>00305         {
<a name="l00306"></a>00306             <span class="keywordtype">int</span> test_index = OCI_BindGetIndex(stmt, name);
<a name="l00307"></a>00307 
<a name="l00308"></a>00308             <span class="keywordflow">if</span> (test_index &gt; 0) 
<a name="l00309"></a>00309             {
<a name="l00310"></a>00310                 <span class="keywordflow">if</span> (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#6572ce19a9be0bac03601354fe4aefc8">bind_reuse</a> == FALSE)
<a name="l00311"></a>00311                 {
<a name="l00312"></a>00312                     OCI_ExceptionBindAlreadyUsed(stmt, name);
<a name="l00313"></a>00313                     res = FALSE;
<a name="l00314"></a>00314                 }
<a name="l00315"></a>00315                 <span class="keywordflow">else</span>
<a name="l00316"></a>00316                 {
<a name="l00317"></a>00317                     bnd = stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#43abc63779df098420ee93c6fca0cf27">ubinds</a>[test_index-1];
<a name="l00318"></a>00318                     reused = TRUE;
<a name="l00319"></a>00319                 }
<a name="l00320"></a>00320 
<a name="l00321"></a>00321                 index = test_index;
<a name="l00322"></a>00322             }
<a name="l00323"></a>00323         }
<a name="l00324"></a>00324     }
<a name="l00325"></a>00325 
<a name="l00326"></a>00326     <span class="comment">/* check if we can handle another bind */</span>
<a name="l00327"></a>00327 
<a name="l00328"></a>00328     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00329"></a>00329     {
<a name="l00330"></a>00330         <span class="keywordflow">if</span> (mode == OCI_BIND_INPUT)
<a name="l00331"></a>00331         {
<a name="l00332"></a>00332             <span class="keywordflow">if</span> (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#33d51f51a0deeb11551dea71586bdc3d">nb_ubinds</a> &gt;= OCI_BIND_MAX)
<a name="l00333"></a>00333             {
<a name="l00334"></a>00334                 OCI_ExceptionMaxBind(stmt);
<a name="l00335"></a>00335                 res = FALSE;
<a name="l00336"></a>00336             }
<a name="l00337"></a>00337 
<a name="l00338"></a>00338             <span class="comment">/* allocate user bind array if necessary */</span>
<a name="l00339"></a>00339 
<a name="l00340"></a>00340             <span class="keywordflow">if</span> (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#43abc63779df098420ee93c6fca0cf27">ubinds</a> == NULL)
<a name="l00341"></a>00341             {
<a name="l00342"></a>00342                 stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#43abc63779df098420ee93c6fca0cf27">ubinds</a> = (<a class="code" href="struct_o_c_i___bind.html" title="Internal bind representation.">OCI_Bind</a> **) OCI_MemAlloc(OCI_IPC_BIND_ARRAY,
<a name="l00343"></a>00343                                                           <span class="keyword">sizeof</span>(*stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#43abc63779df098420ee93c6fca0cf27">ubinds</a>),
<a name="l00344"></a>00344                                                           OCI_BIND_MAX, TRUE);
<a name="l00345"></a>00345             }
<a name="l00346"></a>00346 
<a name="l00347"></a>00347             res = (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#43abc63779df098420ee93c6fca0cf27">ubinds</a> != NULL);
<a name="l00348"></a>00348         }
<a name="l00349"></a>00349         <span class="keywordflow">else</span>
<a name="l00350"></a>00350         {
<a name="l00351"></a>00351             <span class="keywordflow">if</span> (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#13605ddb96fc31bc8408c38880ec8447">nb_rbinds</a> &gt;= OCI_BIND_MAX)
<a name="l00352"></a>00352             {
<a name="l00353"></a>00353                 OCI_ExceptionMaxBind(stmt);
<a name="l00354"></a>00354                 res = FALSE;
<a name="l00355"></a>00355             }
<a name="l00356"></a>00356 
<a name="l00357"></a>00357             <span class="comment">/* allocate register bind array if necessary */</span>
<a name="l00358"></a>00358 
<a name="l00359"></a>00359             <span class="keywordflow">if</span> (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#19eb8e85ee77ae645f6c1f1e7eaa3eb5">rbinds</a> == NULL)
<a name="l00360"></a>00360             {
<a name="l00361"></a>00361                 stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#19eb8e85ee77ae645f6c1f1e7eaa3eb5">rbinds</a> = (<a class="code" href="struct_o_c_i___bind.html" title="Internal bind representation.">OCI_Bind</a> **) OCI_MemAlloc(OCI_IPC_BIND_ARRAY,
<a name="l00362"></a>00362                                                           <span class="keyword">sizeof</span>(*stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#19eb8e85ee77ae645f6c1f1e7eaa3eb5">rbinds</a>),
<a name="l00363"></a>00363                                                           OCI_BIND_MAX, TRUE);
<a name="l00364"></a>00364             }
<a name="l00365"></a>00365 
<a name="l00366"></a>00366             res = (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#19eb8e85ee77ae645f6c1f1e7eaa3eb5">rbinds</a> != NULL);
<a name="l00367"></a>00367         }
<a name="l00368"></a>00368     }
<a name="l00369"></a>00369 
<a name="l00370"></a>00370     <span class="comment">/* checks done */</span>
<a name="l00371"></a>00371 
<a name="l00372"></a>00372     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00373"></a>00373     {
<a name="l00374"></a>00374         <span class="comment">/* check out the number of elements that the bind variable will hold */</span>
<a name="l00375"></a>00375 
<a name="l00376"></a>00376         <span class="keywordflow">if</span> (nbelem &gt; 0)
<a name="l00377"></a>00377         {
<a name="l00378"></a>00378             <span class="comment">/* is it a pl/sql table bind ? */</span>
<a name="l00379"></a>00379 
<a name="l00380"></a>00380             <span class="keywordflow">if</span> (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#9cf69f367c58d7d808cdb799704f684c">type</a> == OCI_CST_BEGIN || stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#9cf69f367c58d7d808cdb799704f684c">type</a> == OCI_CST_DECLARE)
<a name="l00381"></a>00381                 is_pltbl = TRUE;
<a name="l00382"></a>00382         }
<a name="l00383"></a>00383         <span class="keywordflow">else</span>
<a name="l00384"></a>00384             nbelem = stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#aa532ff3069ec7aaf47fa63a23ece8d0">nb_iters</a>;
<a name="l00385"></a>00385     }
<a name="l00386"></a>00386 
<a name="l00387"></a>00387     <span class="comment">/* create hash table for mapping bind names / index */</span>
<a name="l00388"></a>00388 
<a name="l00389"></a>00389     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00390"></a>00390     {
<a name="l00391"></a>00391         <span class="keywordflow">if</span> (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#9b697adc1d6fcabdb433d7279505bb97">map</a> == NULL)
<a name="l00392"></a>00392         {
<a name="l00393"></a>00393             stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#9b697adc1d6fcabdb433d7279505bb97">map</a> = <a class="code" href="group__g__hash.html#ga4375677fb934961a73a1f5d0de6eadd" title="Create a hash table.">OCI_HashCreate</a>(OCI_HASH_DEFAULT_SIZE, OCI_HASH_INTEGER);
<a name="l00394"></a>00394 
<a name="l00395"></a>00395             res = (stmt-&gt;<a class="code" href="struct_o_c_i___statement.html#9b697adc1d6fcabdb433d7279505bb97">map</a> != NULL);
<a name="l00396"></a>00396 
<a name="l00397"></a>00397         }
<a name="l00398"></a>00398     }
<a name="l00399"></a>00399 
<a name="l00400"></a>00400     <span class="comment">/* allocate bind object */</span>
<a name="l00401"></a>00401 
<a name="l00402"></a>00402     <span class="keywordflow">if</span> (res == TRUE)
<a name="l00403"></a>00403     {
<a name="l00404"></a>00404         <span class="keywordflow">if</span> (bnd == NULL)
<a name="l00405"></a>00405         {
<a name="l00406"></a>00406             bnd = (<a class="code" href="struct_o_c_i___bind.html" title="Internal bind representation.">OCI_Bind</a> *) OCI_MemAlloc(OCI_IPC_BIND, <span class="keyword">sizeof</span>(*bnd),  1, TRUE);
<a name="l00407"></a>00407         }
<a name="l00408"></a>00408 
<a name="l00409"></a>00409         res = (bnd != NULL);
<a name="l00410"></a>00410     }
<a name="l00411"></a>00411