__ __ __ __ _____ _ _ _____ _ _ _ | \/ | \ \ / / | __ \ (_) | | / ____| | | | | | \ / |_ __\ V / | |__) | __ ___ ____ _| |_ ___ | (___ | |__ ___| | | | |\/| | '__|> < | ___/ '__| \ \ / / _` | __/ _ \ \___ \| '_ \ / _ \ | | | | | | |_ / . \ | | | | | |\ V / (_| | || __/ ____) | | | | __/ | | |_| |_|_(_)_/ \_\ |_| |_| |_| \_/ \__,_|\__\___| |_____/|_| |_|\___V 2.1 if you need WebShell for Seo everyday contact me on Telegram Telegram Address : @jackleetFor_More_Tools:
/*
* Program type: API Interface
*
* Description:
* This program selects a blob data type.
* A set of project descriptions is printed.
* The contents of this file are subject to the Interbase Public
* License Version 1.0 (the "License"); you may not use this file
* except in compliance with the License. You may obtain a copy
* of the License at http://www.Inprise.com/IPL.html
*
* Software distributed under the License is distributed on an
* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express
* or implied. See the License for the specific language governing
* rights and limitations under the License.
*
* The Original Code was created by Inprise Corporation
* and its predecessors. Portions created by Inprise Corporation are
* Copyright (C) Inprise Corporation.
*
* All Rights Reserved.
* Contributor(s): ______________________________________.
*/
#include <stdlib.h>
#include <string.h>
#include <ibase.h>
#include <stdio.h>
#include "example.h"
#define TYPELEN 12
#define PROJLEN 20
#define BUFLEN 512
/* This macro is used to declare structures representing SQL VARCHAR types */
#define SQL_VARCHAR(len) struct {short vary_length; char vary_string[(len)+1];}
int main (int argc, char** argv)
{
SQL_VARCHAR(PROJLEN + 2) proj_name;
char prod_type[TYPELEN + 2];
char sel_str[BUFLEN + 1];
ISC_QUAD blob_id;
isc_blob_handle blob_handle = NULL;
short blob_seg_len;
char blob_segment[11];
isc_db_handle DB = NULL; /* database handle */
isc_tr_handle trans = NULL; /* transaction handle */
ISC_STATUS_ARRAY status; /* status vector */
isc_stmt_handle stmt = NULL; /* statement handle */
XSQLDA * sqlda;
long fetch_stat, blob_stat;
short flag0 = 0,
flag1 = 0,
flag2 = 0;
char empdb[128];
if (argc > 1)
strcpy(empdb, argv[1]);
else
strcpy(empdb, "employee.fdb");
strcpy(sel_str, "SELECT proj_name, proj_desc, product FROM project WHERE \
product IN ('software', 'hardware', 'other') ORDER BY proj_name");
if (isc_attach_database(status, 0, empdb, &DB, 0, NULL))
{
ERREXIT(status, 1)
}
if (isc_start_transaction(status, &trans, 1, &DB, 0, NULL))
{
ERREXIT(status, 1)
}
/*
* Allocate and prepare the select statement.
*/
if (isc_dsql_allocate_statement(status, &DB, &stmt))
{
ERREXIT(status, 1)
}
sqlda = (XSQLDA *) malloc(XSQLDA_LENGTH(3));
sqlda->sqln = 3;
sqlda->version = 1;
if (isc_dsql_prepare(status, &trans, &stmt, 0, sel_str, 1, sqlda))
{
ERREXIT(status, 1)
}
sqlda->sqlvar[0].sqldata = (char *)&proj_name;
sqlda->sqlvar[0].sqltype = SQL_VARYING + 1;
sqlda->sqlvar[0].sqlind = &flag0;
sqlda->sqlvar[1].sqldata = (char *) &blob_id;
sqlda->sqlvar[1].sqltype = SQL_BLOB + 1;
sqlda->sqlvar[1].sqlind = &flag1;
sqlda->sqlvar[2].sqldata = prod_type;
sqlda->sqlvar[2].sqltype = SQL_TEXT + 1;
sqlda->sqlvar[2].sqlind = &flag2;
if (isc_dsql_execute(status, &trans, &stmt, 1, NULL))
{
ERREXIT(status, 1)
}
/*
* For each project in the select statement, get and display
* project descriptions.
*/
while ((fetch_stat = isc_dsql_fetch(status, &stmt, 1, sqlda)) == 0)
{
prod_type[TYPELEN] = '\0';
printf("\nPROJECT: %-20.*s TYPE: %-15s\n\n",
proj_name.vary_length, proj_name.vary_string, prod_type);
/* Open the blob with the fetched blob_id. Notice that the
* segment length is shorter than the average segment fetched.
* Each partial fetch should return isc_segment.
*/
if (isc_open_blob(status, &DB, &trans, &blob_handle, &blob_id))
{
ERREXIT(status, 1)
}
/* Get blob segments and their lengths and print each segment. */
blob_stat = isc_get_segment(status, &blob_handle,
(unsigned short *) &blob_seg_len,
sizeof(blob_segment), blob_segment);
while (blob_stat == 0 || status[1] == isc_segment)
{
printf("%*.*s", blob_seg_len, blob_seg_len, blob_segment);
blob_stat = isc_get_segment(status, &blob_handle,
(unsigned short *)&blob_seg_len,
sizeof(blob_segment), blob_segment);
}
/* Close the blob. Should be blob_stat to check */
if (status[1] == isc_segstr_eof)
{
if (isc_close_blob(status, &blob_handle))
{
ERREXIT(status, 1)
}
}
else
isc_print_status(status);
printf("\n");
}
if (fetch_stat != 100L)
{
ERREXIT(status, 1)
}
if (isc_dsql_free_statement(status, &stmt, DSQL_close))
{
ERREXIT(status, 1)
}
if (isc_commit_transaction (status, &trans))
{
ERREXIT(status, 1)
}
if (isc_detach_database(status, &DB))
{
ERREXIT(status, 1)
}
free(sqlda);
return 0;
}
| Name | Type | Size | Permission | Actions |
|---|---|---|---|---|
| api1.c | File | 4.18 KB | 0644 |
|
| api10.c | File | 5.88 KB | 0644 |
|
| api11.c | File | 5.63 KB | 0644 |
|
| api12.c | File | 10.63 KB | 0644 |
|
| api13.c | File | 5.65 KB | 0644 |
|
| api14.e | File | 6.14 KB | 0644 |
|
| api15.c | File | 6.6 KB | 0644 |
|
| api16.c | File | 6.36 KB | 0644 |
|
| api16t.c | File | 5.04 KB | 0644 |
|
| api2.c | File | 4.67 KB | 0644 |
|
| api3.c | File | 4.52 KB | 0644 |
|
| api4.c | File | 4.46 KB | 0644 |
|
| api5.c | File | 3.74 KB | 0644 |
|
| api6.c | File | 7.19 KB | 0644 |
|
| api7.c | File | 5.4 KB | 0644 |
|
| api8.c | File | 4.74 KB | 0644 |
|
| api9.c | File | 4.87 KB | 0644 |
|
| api9f.c | File | 7.08 KB | 0644 |
|
| api9f.def | File | 819 B | 0644 |
|
| api9f.sql | File | 1.02 KB | 0644 |
|
| api9fdrop.sql | File | 964 B | 0644 |
|
| apifull.c | File | 13.2 KB | 0644 |
|
| example.def | File | 975 B | 0644 |
|
| winevent.c | File | 12.53 KB | 0644 |
|
| winevent.def | File | 1.15 KB | 0644 |
|
| winevent.rc | File | 965 B | 0644 |
|