./Mr403Forbidden

:/usr/share/doc/firebird/sample/api/ [ s--------- ]

Information Server

System: Linux myhosting.zubahost.com 4.18.0-553.51.1.lve.1.el8.x86_64 #1 SMP Wed May 14 14:34:57 UTC 2025 x86_64
Software: LiteSpeed
PHP Version: 7.4.33 PHP Os: Linux
Server IP: 194.163.174.55
Your IP: 216.73.216.138
User: business1 (1088) | Group: business1 (1091)
Safe Mode: OFF
MYSQL: OFF | PERL: ON | PYTHON: OFF | WGET: ON | CURL: ON | GCC: ON | PKEXEC: OFF
Disable Function:

mail

Upload Via Link Adminer Mass Auto Root Command Create RDP Config Get Shell/Tools Get Localroot Mass Deface Mass Delete Network Scan Root Upload Website

: api11.c

/*
 *    Program type:  API Interface
 *
 *    Description:
 *        This program executes a stored procedure and selects from
 *        a stored procedure.  First, a list of projects an employee
 *        is involved in is printed.  Then the employee is added to
 *        another project.  The new list of projects is printed again.
 * 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    PROJLEN        5
#define    BUFLEN        128

int select_projects (isc_db_handle db, int emp_no);
int add_emp_proj (isc_db_handle db, int emp_no, char * proj_id);
int get_params (isc_db_handle db, int * emp_no, char * proj_id);

int main (int argc, char** argv)
{
    int             emp_no;
    char            proj_id[PROJLEN + 2];
    isc_db_handle    db = NULL;
    ISC_STATUS_ARRAY    status;
    char            empdb[128];

if (argc > 1)
        strcpy(empdb, argv[1]);
    else
        strcpy(empdb, "employee.fdb");

if (isc_attach_database(status, 0, empdb, &db, 0, NULL))
    {
        ERREXIT(status, 1)
    }

/*
     *  Add employee with id 8 to project 'MAPDB'.
     */
    if (get_params(db, &emp_no, proj_id))
        return 1;

/*
     *  Display employee's current projects.
     */
    printf("\nCurrent projects for employee id: %d\n\n", emp_no);
    if (select_projects(db, emp_no))
        return 1;

/*
     *  Insert a new employee project row.
     */
    printf("\nAdd employee id: %d to project: %s\n", emp_no, proj_id);
    if (add_emp_proj(db, emp_no, proj_id))
        return 1;

/*
     *  Display employee's new current projects.
     */
    printf("\nCurrent projects for employee id: %d\n\n", emp_no);
    if (select_projects(db, emp_no))
        return 1;

if (isc_detach_database(status, &db))
    {
        ERREXIT(status, 1)
    }

return  0 ;
}

/*
 *    Select from a stored procedure.
 *    Procedure 'get_emp_proj' gets employee's projects.
 */
int select_projects (isc_db_handle db, int emp_no)
{
    char            proj_id[PROJLEN + 2];
    char            selstr[BUFLEN];
    short           flag0 = 0;
    isc_tr_handle   trans = NULL;
    ISC_STATUS_ARRAY    status;
    isc_stmt_handle stmt = NULL;
    XSQLDA          *sqlda;
    long            fetch_stat;

sprintf(selstr, "SELECT proj_id FROM get_emp_proj (%d) ORDER BY proj_id",
            emp_no);

sqlda = (XSQLDA *) malloc(XSQLDA_LENGTH(1));
    sqlda->sqln = 1;
    sqlda->version = 1;

if (isc_start_transaction(status, &trans, 1, &db, 0, NULL))
    {
        ERREXIT(status, 1)
    }

if (isc_dsql_allocate_statement(status, &db, &stmt))
    {
        ERREXIT(status, 1)
    }

if (isc_dsql_prepare(status, &trans, &stmt, 0, selstr, 1, sqlda))
    {
        ERREXIT(status, 1)
    }

sqlda->sqlvar[0].sqldata = (char *) proj_id;
    sqlda->sqlvar[0].sqlind  = &flag0;
    sqlda->sqlvar[0].sqltype = SQL_TEXT + 1;

if (isc_dsql_execute(status, &trans, &stmt, 1, NULL))
    {
        ERREXIT(status, 1)
    }

while ((fetch_stat = isc_dsql_fetch(status, &stmt, 1, sqlda)) == 0)
    {
        proj_id[PROJLEN] = '\0';
        printf("\t%s\n", proj_id);
    }

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)
    }

free(sqlda);

return 0;
}

/*
 *    Execute a stored procedure.
 *    Procedure 'add_emp_proj' adds an employee to a project.
 */
int add_emp_proj (isc_db_handle db, int emp_no, char *proj_id)
{
    char            exec_str[BUFLEN];
    isc_tr_handle   trans = NULL;
    ISC_STATUS_ARRAY    status;

sprintf(exec_str, "EXECUTE PROCEDURE add_emp_proj %d, \"%s\"",
            emp_no, proj_id);

if (isc_start_transaction(status, &trans, 1, &db, 0, NULL))
    {
        ERREXIT(status, 1)
    }

if (isc_dsql_execute_immediate(status, &db, &trans, 0, exec_str, 1, NULL))
    {
        ERREXIT(status, 1)
    }
 
    if (isc_commit_transaction(status, &trans))
    {
        ERREXIT (status, 1)
    }

return 0;
}

/*
 *    Set-up procedure parameters and clean-up old data.
 */
int get_params (isc_db_handle db, int *emp_no, char *proj_id)
{
    isc_tr_handle   trans = NULL;
    ISC_STATUS_ARRAY    status;

*emp_no = 8;
    strcpy(proj_id, "MAPDB");
                     
    /* Cleanup:  delete row from the previous run. */

if (isc_start_transaction(status, &trans, 1, &db, 0, NULL))
    {
        ERREXIT(status, 1)
    }

if (isc_dsql_execute_immediate(status, &db, &trans, 0,
                                   "DELETE FROM employee_project \
                                   WHERE emp_no = 8 AND proj_id = 'MAPDB'", 1,
                                   NULL))
    {
        ERREXIT(status, 1)
    }

if (isc_commit_transaction(status, &trans))
    {
        ERREXIT(status, 1)
    }

return 0;
}

Name	Type	Last Edit	Size	Owner/Group	Permission	Action
..
api1.c	file	2025-09-25 19:14	4.18 KB	root/root	s---------
api10.c	file	2025-09-25 19:14	5.88 KB	root/root	s---------
api11.c	file	2025-09-25 19:14	5.63 KB	root/root	s---------
api12.c	file	2025-09-25 19:14	10.63 KB	root/root	s---------
api13.c	file	2025-09-25 19:14	5.65 KB	root/root	s---------
api14.e	file	2025-09-25 19:14	6.14 KB	root/root	s---------
api15.c	file	2025-09-25 19:14	6.6 KB	root/root	s---------
api16.c	file	2025-09-25 19:14	6.36 KB	root/root	s---------
api16t.c	file	2025-09-25 19:14	5.04 KB	root/root	s---------
api2.c	file	2025-09-25 19:14	4.67 KB	root/root	s---------
api3.c	file	2025-09-25 19:14	4.52 KB	root/root	s---------
api4.c	file	2025-09-25 19:14	4.46 KB	root/root	s---------
api5.c	file	2025-09-25 19:14	3.74 KB	root/root	s---------
api6.c	file	2025-09-25 19:14	7.19 KB	root/root	s---------
api7.c	file	2025-09-25 19:14	5.4 KB	root/root	s---------
api8.c	file	2025-09-25 19:14	4.74 KB	root/root	s---------
api9.c	file	2025-09-25 19:14	4.87 KB	root/root	s---------
api9f.c	file	2025-09-25 19:14	7.08 KB	root/root	s---------
api9f.def	file	2025-09-25 19:14	819 B	root/root	s---------
api9f.sql	file	2025-09-25 19:14	1.02 KB	root/root	s---------
api9fdrop.sql	file	2025-09-25 19:14	964 B	root/root	s---------
apifull.c	file	2025-09-25 19:14	13.2 KB	root/root	s---------
example.def	file	2025-09-25 19:14	975 B	root/root	s---------
winevent.c	file	2025-09-25 19:14	12.53 KB	root/root	s---------
winevent.def	file	2025-09-25 19:14	1.15 KB	root/root	s---------
winevent.rc	file	2025-09-25 19:14	965 B	root/root	s---------