lang_cmd.cpp

ncbi源码

/*
 * ===========================================================================
 * PRODUCTION $Log: lang_cmd.cpp,v $
 * PRODUCTION Revision 1000.1  2004/06/01 19:19:44  gouriano
 * PRODUCTION PRODUCTION: UPGRADED [GCC34_MSVC7] Dev-tree R1.9
 * PRODUCTION
 * ===========================================================================
 */

/* $Id: lang_cmd.cpp,v 1000.1 2004/06/01 19:19:44 gouriano Exp $
 * ===========================================================================
 *
 *                            PUBLIC DOMAIN NOTICE
 *               National Center for Biotechnology Information
 *
 *  This software/database is a "United States Government Work" under the
 *  terms of the United States Copyright Act.  It was written as part of
 *  the author's official duties as a United States Government employee and
 *  thus cannot be copyrighted.  This software/database is freely available
 *  to the public for use. The National Library of Medicine and the U.S.
 *  Government have not placed any restriction on its use or reproduction.
 *
 *  Although all reasonable efforts have been taken to ensure the accuracy
 *  and reliability of the software and data, the NLM and the U.S.
 *  Government do not and cannot warrant the performance or results that
 *  may be obtained by using this software or data. The NLM and the U.S.
 *  Government disclaim all warranties, express or implied, including
 *  warranties of performance, merchantability or fitness for any particular
 *  purpose.
 *
 *  Please cite the author in any work or product based on this material.
 *
 * ===========================================================================
 *
 * Author:  Vladimir Soussov
 *
 * File Description:  CTLib language command
 *
 */

#include <ncbi_pch.hpp>
#include <dbapi/driver/ctlib/interfaces.hpp>


BEGIN_NCBI_SCOPE


/////////////////////////////////////////////////////////////////////////////
//
//  CTL_LangCmd::
//

CTL_LangCmd::CTL_LangCmd(CTL_Connection* conn, CS_COMMAND* cmd,
                         const string& lang_query, unsigned int nof_params)
    : m_Connect(conn),
      m_Cmd(cmd),
      m_Query(lang_query),
      m_Params(nof_params)
{
    m_WasSent     = false;
    m_HasFailed   = false;
    m_Res         = 0;
    m_RowCount    = -1;
}


bool CTL_LangCmd::More(const string& query_text)
{
    m_Query.append(query_text);
    return true;
}


bool CTL_LangCmd::BindParam(const string& param_name, CDB_Object* param_ptr)
{
    return
        m_Params.BindParam(CDB_Params::kNoParamNumber, param_name, param_ptr);
}


bool CTL_LangCmd::SetParam(const string& param_name, CDB_Object* param_ptr)
{
    return
        m_Params.SetParam(CDB_Params::kNoParamNumber, param_name, param_ptr);
}


bool CTL_LangCmd::Send()
{
    if ( m_WasSent ) {
        Cancel();
    }

    m_HasFailed = false;
    switch ( ct_command(m_Cmd, CS_LANG_CMD,
                        const_cast<char*> (m_Query.c_str()), CS_NULLTERM,
                        CS_END) ) {
    case CS_SUCCEED:
        break;
    case CS_FAIL:
        m_HasFailed = true;
        throw CDB_ClientEx(eDB_Fatal, 120001, "CTL_LangCmd::Send",
                           "ct_command failed");
    case CS_BUSY:
        throw CDB_ClientEx(eDB_Error, 120002, "CTL_LangCmd::Send",
                           "the connection is busy");
    }

    if ( !x_AssignParams() ) {
        m_HasFailed = true;
        throw CDB_ClientEx(eDB_Error, 120003, "CTL_LangCmd::Send",
                           "cannot assign the params");
    }

    switch ( ct_send(m_Cmd) ) {
    case CS_SUCCEED:
        break;
    case CS_FAIL:
        m_HasFailed = true;
        if (ct_cancel(0, m_Cmd, CS_CANCEL_ALL) != CS_SUCCEED) {
            // we need to close this connection
            throw CDB_ClientEx(eDB_Fatal, 120004, "CTL_LangCmd::Send",
                               "Unrecoverable crash of ct_send. "
                               "Connection must be closed");
        }
        throw CDB_ClientEx(eDB_Error, 120005, "CTL_LangCmd::Send",
                           "ct_send failed");
    case CS_CANCELED:
        throw CDB_ClientEx(eDB_Error, 120006, "CTL_LangCmd::Send",
                           "command was canceled");
    case CS_BUSY:
        throw CDB_ClientEx(eDB_Error, 120007, "CTL_LangCmd::Send",
                           "connection has another request pending");
    case CS_PENDING:
    default:
        m_WasSent = true;
        return false;
    }

    m_WasSent = true;
    return true;
}


bool CTL_LangCmd::WasSent() const
{
    return m_WasSent;
}


bool CTL_LangCmd::Cancel()
{
    if ( m_WasSent ) {
        if ( m_Res ) {
            // to prevent ct_cancel(NULL, m_Cmd, CS_CANCEL_CURRENT) call:
            ((CTL_RowResult*)m_Res)->m_EOR= true; 
            delete m_Res;
            m_Res = 0;
        }

        switch ( ct_cancel(0, m_Cmd, CS_CANCEL_ALL) ) {
        case CS_SUCCEED:
            m_WasSent = false;
            return true;
        case CS_FAIL:
            throw CDB_ClientEx(eDB_Error, 120008, "CTL_LangCmd::Cancel",
                               "ct_cancel failed");
        case CS_BUSY:
            throw CDB_ClientEx(eDB_Error, 120009, "CTL_LangCmd::Cancel",
                               "connection has another request pending");
        default:
            return false;
        }
    }

    m_Query.erase();
    return true;
}


bool CTL_LangCmd::WasCanceled() const
{
    return !m_WasSent;
}


CDB_Result* CTL_LangCmd::Result()
{
    if ( m_Res) {
        delete m_Res;
        m_Res = 0;
    }

    if ( !m_WasSent ) {
        throw CDB_ClientEx(eDB_Error, 120010, "CTL_LangCmd::Result",
                           "you need to send a command first");
    }

    for (;;) {
        CS_INT res_type;

        switch ( ct_results(m_Cmd, &res_type) ) {
        case CS_SUCCEED:
            break;
        case CS_END_RESULTS:
            m_WasSent = false;
            return 0;
        case CS_FAIL:
            m_HasFailed = true;
            if (ct_cancel(0, m_Cmd, CS_CANCEL_ALL) != CS_SUCCEED) {
                // we need to close this connection
                throw CDB_ClientEx(eDB_Fatal, 120012, "CTL_LangCmd::Result",
                                   "Unrecoverable crash of ct_result. "
                                   "Connection must be closed");
            }
            m_WasSent = false;
            throw CDB_ClientEx(eDB_Error, 120013, "CTL_LangCmd::Result",
                               "ct_result failed");
        case CS_CANCELED:
            m_WasSent = false;
            throw CDB_ClientEx(eDB_Error, 120011, "CTL_LangCmd::Result",
                               "your command has been canceled");
        case CS_BUSY:
            throw CDB_ClientEx(eDB_Error, 120014, "CTL_LangCmd::Result",
                               "connection has another request pending");
        default:
            throw CDB_ClientEx(eDB_Error, 120015, "CTL_LangCmd::Result",
                               "your request is pending");
        }

        switch ( res_type ) {
        case CS_CMD_SUCCEED:
        case CS_CMD_DONE: // done with this command
            // check the number of affected rows
            g_CTLIB_GetRowCount(m_Cmd, &m_RowCount);
            continue;
        case CS_CMD_FAIL: // the command has failed
            // check the number of affected rows
            g_CTLIB_GetRowCount(m_Cmd, &m_RowCount);
            m_HasFailed = true;
            throw CDB_ClientEx(eDB_Warning, 120016, "CTL_LangCmd::Result",
                               "The server encountered an error while "
                               "executing a command");
        case CS_ROW_RESULT:
            m_Res = new CTL_RowResult(m_Cmd);
            break;
        case CS_PARAM_RESULT:
            m_Res = new CTL_ParamResult(m_Cmd);
            break;
        case CS_COMPUTE_RESULT:
            m_Res = new CTL_ComputeResult(m_Cmd);
            break;
        case CS_STATUS_RESULT:
            m_Res = new CTL_StatusResult(m_Cmd);
            break;
        case CS_COMPUTEFMT_RESULT:
            throw CDB_ClientEx(eDB_Info, 120017, "CTL_LangCmd::Result",
                               "CS_COMPUTEFMT_RESULT has arrived");
        case CS_ROWFMT_RESULT:
            throw CDB_ClientEx(eDB_Info, 120018, "CTL_LangCmd::Result",
                               "CS_ROWFMT_RESULT has arrived");
        case CS_MSG_RESULT:
            throw CDB_ClientEx(eDB_Info, 120019, "CTL_LangCmd::Result",
                               "CS_MSG_RESULT has arrived");
        default:
            throw CDB_ClientEx(eDB_Warning, 120020, "CTL_LangCmd::Result",
                               "Unexpected result type has arrived");
        }

        return Create_Result(*m_Res);
    }
}

void CTL_LangCmd::DumpResults()
{
    if ( m_Res) {
        delete m_Res;
        m_Res = 0;
    }

    if ( !m_WasSent ) {
        throw CDB_ClientEx(eDB_Error, 120010, "CTL_LangCmd::DumpResults",
                           "you need to send a command first");
    }
    

    for (;;) {
        CS_INT res_type;

        switch ( ct_results(m_Cmd, &res_type) ) {
        case CS_SUCCEED:
            break;
        case CS_END_RESULTS:
            m_WasSent = false;
            return;
        case CS_FAIL:
            m_HasFailed = true;
            if (ct_cancel(0, m_Cmd, CS_CANCEL_ALL) != CS_SUCCEED) {
                // we need to close this connection
                throw CDB_ClientEx(eDB_Fatal, 120012, "CTL_LangCmd::DumpResults",
                                   "Unrecoverable crash of ct_result. "
                                   "Connection must be closed");
            }
            m_WasSent = false;
            throw CDB_ClientEx(eDB_Error, 120013, "CTL_LangCmd::DumpResults",
                               "ct_result failed");
        case CS_CANCELED:
            m_WasSent = false;
            throw CDB_ClientEx(eDB_Error, 120011, "CTL_LangCmd::DumpResults",
                               "your command has been canceled");
        case CS_BUSY:
            throw CDB_ClientEx(eDB_Error, 120014, "CTL_LangCmd::DumpResults",
                               "connection has another request pending");
        default:
            throw CDB_ClientEx(eDB_Error, 120015, "CTL_LangCmd::DumpResults",
                               "your request is pending");
        }

        switch ( res_type ) {
        case CS_CMD_SUCCEED:
        case CS_CMD_DONE: // done with this command
            // check the number of affected rows
            g_CTLIB_GetRowCount(m_Cmd, &m_RowCount);
            continue;
        case CS_CMD_FAIL: // the command has failed
            // check the number of affected rows
            g_CTLIB_GetRowCount(m_Cmd, &m_RowCount);
            m_HasFailed = true;
            throw CDB_ClientEx(eDB_Warning, 120016, "CTL_LangCmd::DumpResults",
                               "The server encountered an error while "
                               "executing a command");
        case CS_ROW_RESULT:
            m_Res = new CTL_RowResult(m_Cmd);
            break;
        case CS_PARAM_RESULT:
            m_Res = new CTL_ParamResult(m_Cmd);
            break;
        case CS_COMPUTE_RESULT:
            m_Res = new CTL_ComputeResult(m_Cmd);
            break;
        case CS_STATUS_RESULT:
            m_Res = new CTL_StatusResult(m_Cmd);
            break;
        case CS_COMPUTEFMT_RESULT:
            throw CDB_ClientEx(eDB_Info, 120017, "CTL_LangCmd::Result",
                               "CS_COMPUTEFMT_RESULT has arrived");
        case CS_ROWFMT_RESULT:
            throw CDB_ClientEx(eDB_Info, 120018, "CTL_LangCmd::Result",
                               "CS_ROWFMT_RESULT has arrived");
        case CS_MSG_RESULT:
            throw CDB_ClientEx(eDB_Info, 120019, "CTL_LangCmd::Result",
                               "CS_MSG_RESULT has arrived");
        default:
            throw CDB_ClientEx(eDB_Warning, 120020, "CTL_LangCmd::Result",
                               "Unexpected result type has arrived");
        }
        if(m_Res) {
            if(m_Connect->m_ResProc) {
                CDB_Result* r= Create_Result(*m_Res);
                m_Connect->m_ResProc->ProcessResult(*r);
                delete r;
            }
            else {
                while(m_Res->Fetch());
            }
            delete m_Res;
            m_Res= 0;
        }
    }
}


bool CTL_LangCmd::HasMoreResults() const
{
    return m_WasSent;
}


bool CTL_LangCmd::HasFailed() const
{
    return m_HasFailed;
}


int CTL_LangCmd::RowCount() const
{
    return m_RowCount;
}


void CTL_LangCmd::Release()
{
    m_BR = 0;
    if ( m_WasSent ) {
        try {
            Cancel();
        }catch (CDB_Exception& ) {}
        m_WasSent = false;
    }
    m_Connect->DropCmd(*this);
    delete this;
}


CTL_LangCmd::~CTL_LangCmd()
{
    if ( m_BR ) {
        *m_BR = 0;
    }

    if ( m_WasSent ) {
        try {
            Cancel();
        } catch (CDB_Exception& ) {
        }
    }


    ct_cmd_drop(m_Cmd);
}


bool CTL_LangCmd::x_AssignParams()
{
    CS_DATAFMT param_fmt;
    memset(&param_fmt, 0, sizeof(param_fmt));
    param_fmt.namelen = CS_NULLTERM;
    param_fmt.status  = CS_INPUTVALUE;

    for (unsigned int i = 0;  i < m_Params.NofParams();  i++) {
        if(m_Params.GetParamStatus(i) == 0) continue;

        CDB_Object&   param      = *m_Params.GetParam(i);
        const string& param_name = m_Params.GetParamName(i);
        CS_SMALLINT   indicator  = param.IsNULL() ? -1 : 0;

        if ( !g_CTLIB_AssignCmdParam(m_Cmd, param, param_name, param_fmt,
                                     indicator, false/*!declare_only*/) ) {
            return false;
        }
    }

    return true;
}


END_NCBI_SCOPE



/*
 * ===========================================================================
 * $Log: lang_cmd.cpp,v $
 * Revision 1000.1  2004/06/01 19:19:44  gouriano
 * PRODUCTION: UPGRADED [GCC34_MSVC7] Dev-tree R1.9
 *
 * Revision 1.9  2004/05/17 21:12:03  gorelenk
 * Added include of PCH ncbi_pch.hpp
 *
 * Revision 1.8  2003/10/07 16:09:48  soussov
 * adds code which prevents ct_cancel(NULL, m_Cmd, CS_CANCEL_CURRENT) call if command is canceled while retrieving results
 *
 * Revision 1.7  2003/06/24 18:42:25  soussov
 * removes throwing exception from destructor
 *
 * Revision 1.6  2003/06/05 16:00:31  soussov
 * adds code for DumpResults and for the dumped results processing
 *
 * Revision 1.5  2003/05/16 20:24:24  soussov
 * adds code to skip parameters if it was not set
 *
 * Revision 1.4  2003/01/31 16:49:38  lavr
 * Remove unused variable "e" from catch() clause
 *
 * Revision 1.3  2002/09/16 16:34:16  soussov
 * add try catch when canceling in Release method
 *
 * Revision 1.2  2001/11/06 17:59:55  lavr
 * Formatted uniformly as the rest of the library
 *
 * Revision 1.1  2001/09/21 23:40:02  vakatov
 * -----  Initial (draft) revision.  -----
 * This is a major revamp (by Denis Vakatov, with help from Vladimir Soussov)
 * of the DBAPI "driver" libs originally written by Vladimir Soussov.
 * The revamp involved massive code shuffling and grooming, numerous local
 * API redesigns, adding comments and incorporating DBAPI to the C++ Toolkit.
 *
 * ===========================================================================
 */