bulk_rna_edit.cpp

Go to the documentation of this file.

Go to the SVN repository for this file.

/*  $Id: bulk_rna_edit.cpp 47479 2023-05-02 13:24:02Z ucko $
 * ===========================================================================
 *
 *                            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.
 *
 * ===========================================================================
 *
 * Authors:  Igor Filippov
 */
#include <ncbi_pch.hpp>
#include <objects/general/Object_id.hpp>
#include <objmgr/feat_ci.hpp>
#include <objmgr/util/sequence.hpp>
#include <objects/seqtable/seq_table_exception.hpp>
#include <objects/seqfeat/RNA_ref.hpp>
#include <objects/seqfeat/RNA_gen.hpp>
#include <gui/objutils/cmd_change_seq_feat.hpp>
#include <gui/widgets/edit/field_type_constants.hpp>
#include <gui/packages/pkg_sequence_edit/tbl_edit_dlg.hpp>
#include <gui/packages/pkg_sequence_edit/featedit_util.hpp>
#include <gui/packages/pkg_sequence_edit/string_constraint_select.hpp>
#include <gui/packages/pkg_sequence_edit/apply_edit_convert_panel.hpp>
#include <gui/packages/pkg_sequence_edit/bulk_rna_edit.hpp>
#include <wx/msgdlg.h>
 
BEGIN_NCBI_SCOPE
USING_SCOPE(ncbi::objects);
 
 
IMPLEMENT_DYNAMIC_CLASS( CBulkRna, wxDialog )
 
BEGIN_EVENT_TABLE( CBulkRna, wxDialog )
 
    EVT_BUTTON( wxID_OK, CBulkRna::OnClickOk )
 
    EVT_BUTTON( wxID_CANCEL, CBulkRna::OnClickCancel )
 
 
END_EVENT_TABLE()
 
CBulkRna::CBulkRna()
{
    Init();
}
 
CBulkRna::CBulkRna( wxWindow* parent, objects::CSeq_entry_Handle seh, IWorkbench* workbench, CConstRef<objects::CSeq_submit> seqSubmit,
                    wxWindowID id, const wxString& caption, const wxPoint& pos, const wxSize& size, long style )
{
    this->m_Workbench = workbench;
    this->m_SeqSubmit = seqSubmit;
 
    CFeat_CI fi(seh, CSeqFeatData::e_Rna);       
    for ( ; fi ; ++fi ) 
    {
        m_FeatHandles.push_back(fi->GetSeq_feat_Handle());
    }
    Init();
    Create(parent, id, caption, pos, size, style);
}
 
CBulkRna::CBulkRna( wxWindow* parent, const vector<CSeq_feat_Handle> &feat_handles, IWorkbench* workbench,
                    wxWindowID id, const wxString& caption, const wxPoint& pos, const wxSize& size, long style )
    : m_FeatHandles(feat_handles)
{
    this->m_Workbench = workbench;
    Init();
    Create(parent, id, caption, pos, size, style);
}
 
 
bool CBulkRna::Create( wxWindow* parent, wxWindowID id, const wxString& caption, const wxPoint& pos, const wxSize& size, long style )
{
    SetExtraStyle(wxWS_EX_BLOCK_EVENTS);
    SetLayoutAdaptationMode(wxDIALOG_ADAPTATION_MODE_ENABLED);
    wxDialog::Create( parent, id, caption, pos, size, style );
 
    CreateControls();
    if (GetSizer())
    {
        GetSizer()->SetSizeHints(this);
    }
    Centre();
    return true;
}
 
 
CBulkRna::~CBulkRna()
{
}
 
 
/*!
 * Member initialisation
 */
 
void CBulkRna::Init()
{
    m_Grid=NULL;
}
 
 
void CBulkRna::CreateControls()
{    
    CBulkRna* itemDialog1 = this;
 
    wxBoxSizer* itemBoxSizer2 = new wxBoxSizer(wxVERTICAL);
    itemDialog1->SetSizer(itemBoxSizer2);
 
    wxBoxSizer* itemBoxSizer3 = new wxBoxSizer(wxHORIZONTAL);
    itemBoxSizer2->Add(itemBoxSizer3, 0, wxALIGN_CENTER_HORIZONTAL|wxALL, 5);
    
    wxArrayString itemChoiceStrings, itemChoiceStringsWritable;
 
    if (m_FeatHandles.empty())  
    {
        wxMessageBox(wxT("No RNA records found"), wxT("Error"), wxOK | wxICON_ERROR);
        NCBI_THROW( CException, eUnknown, "No RNA records found" );
    }
 
    CRef<objects::CSeq_table> values_table = GetValuesTableFromSeqEntry();
    if (values_table->GetNum_rows() < 1)
    {
        wxMessageBox(wxT("No RNA records found"), wxT("Error"), wxOK | wxICON_ERROR);
        NCBI_THROW( CException, eUnknown, "No RNA records found" );
    }
    CRef<CSeq_table> choices = GetChoices(values_table);
    int glyph_col =   GetCollapsible();
    m_GridPanel = new CSeqTableGridPanel(this, values_table, choices, glyph_col);
    itemBoxSizer3->Add(m_GridPanel, 0, wxALIGN_TOP|wxALL, 5);
    m_Grid = m_GridPanel->GetGrid();
    CSeqTableGrid *gridAdapter = new CSeqTableGrid(values_table);
    m_Grid->SetTable(gridAdapter, true);
    m_Grid->AutoSizeColumns();
    int l_height = m_Grid->GetColLabelSize();
    m_Grid->SetColLabelSize( 2 * l_height );
    m_GridPanel->SetColumnSizesAndChoices();
    
    int pos = 0;
    ITERATE (CSeq_table::TColumns, it, values_table->GetColumns()) 
    {
        if (pos > 0) 
        {
            if ((*it)->IsSetHeader() && (*it)->GetHeader().IsSetTitle() )
            {
                string title = (*it)->GetHeader().GetTitle();
                if (!title.empty())
                {
                    itemChoiceStrings.Add(wxString(title));
                    if (!IsReadOnlyColumn(title)) 
                        itemChoiceStringsWritable.Add(wxString(title));
                }
                if (IsReadOnlyColumn(title)) 
                    m_GridPanel->MakeColumnReadOnly(pos - 1, true);
            } 
        }
        pos++;
    }
    
    if (glyph_col >= 0 && glyph_col+1 < m_Grid->GetNumberCols())
    {
        m_GridPanel->InitColumnCollapse(glyph_col+1);  
    }
    
 
    
    CStringConstraintSelect *itemStringConstraintPanel = new CStringConstraintSelect( itemDialog1, m_GridPanel, itemChoiceStrings, wxID_ANY, wxDefaultPosition, wxDefaultSize, 0 );
    itemBoxSizer2->Add(itemStringConstraintPanel, 0, wxALIGN_CENTER_HORIZONTAL|wxALL|wxFIXED_MINSIZE, 0);
    
    m_AecrPanel = new CApplyEditconvertPanel( itemDialog1, m_GridPanel, itemChoiceStringsWritable, 0, true, wxID_ANY, wxDefaultPosition, wxSize(1032, 187));
    itemBoxSizer2->Add(m_AecrPanel, 0, wxALIGN_CENTER_HORIZONTAL|wxALL|wxFIXED_MINSIZE, 1);
 
    wxBoxSizer* itemBoxSizer13 = new wxBoxSizer(wxHORIZONTAL);
    itemBoxSizer2->Add(itemBoxSizer13, 0, wxALIGN_CENTER_HORIZONTAL|wxALL, 5);
 
    wxButton* itemButton14 = new wxButton( itemDialog1, wxID_OK, _("Accept"), wxDefaultPosition, wxDefaultSize, 0 );
    itemBoxSizer13->Add(itemButton14, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5);
 
    wxButton* itemButton15 = new wxButton( itemDialog1, wxID_CANCEL, _("Cancel"), wxDefaultPosition, wxDefaultSize, 0 );
    itemBoxSizer13->Add(itemButton15, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5);
}
 
 
CRef<objects::CSeq_table> CBulkRna::GetValuesTableFromSeqEntry() 
{
    CRef<objects::CSeqTable_column> id_col(new objects::CSeqTable_column());
    id_col->SetHeader().SetField_id(objects::CSeqTable_column_info::eField_id_location_id);
    id_col->SetHeader().SetTitle(kSequenceIdColLabel);
 
    CRef<objects::CSeqTable_column> expand_col(new objects::CSeqTable_column());
    expand_col->SetHeader().SetTitle("");
    expand_col->SetHeader().SetField_name("expand");
    expand_col->SetData().SetString();
 
    CRef<objects::CSeqTable_column> product_col(new objects::CSeqTable_column());
    product_col->SetHeader().SetTitle("product");
    product_col->SetHeader().SetField_name("product");
    product_col->SetData().SetString();
 
    CRef<objects::CSeqTable_column> loc_col(new objects::CSeqTable_column());
    loc_col->SetHeader().SetTitle("location");
    loc_col->SetHeader().SetField_name("location");
    loc_col->SetData().SetString();
 
    CRef<objects::CSeqTable_column> comment_col(new objects::CSeqTable_column());
    comment_col->SetHeader().SetTitle("comment");
    comment_col->SetHeader().SetField_name("comment");
    comment_col->SetData().SetString();
 
    // bogus column to include last, otherwise deletion of the previous column will not work
    CRef<objects::CSeqTable_column> bogus_col(new objects::CSeqTable_column());
    bogus_col->SetHeader().SetTitle("");
    bogus_col->SetHeader().SetField_name("");
    bogus_col->SetData().SetString();
 
    CRef<objects::CSeq_table> table(new objects::CSeq_table());  
    table->SetColumns().push_back(id_col);
    table->SetColumns().push_back(expand_col);
    table->SetColumns().push_back(product_col);
    table->SetColumns().push_back(loc_col);
 
    CRef<CFeatureSeqTableColumnBase> partial_start_feat_col = CFeatureSeqTableColumnBaseFactory::Create(kPartialStart);
    CRef<CSeqTable_column> partial_start_col = AddStringColumnToTable(table, kPartialStart);
    partial_start_col->SetHeader().SetField_name(kPartialStart);
 
    CRef<CFeatureSeqTableColumnBase> partial_stop_feat_col = CFeatureSeqTableColumnBaseFactory::Create(kPartialStop);
    CRef<CSeqTable_column> partial_stop_col = AddStringColumnToTable(table, kPartialStop);
    partial_stop_col->SetHeader().SetField_name(kPartialStop);
 
    table->SetColumns().push_back(comment_col);
    table->SetColumns().push_back(bogus_col);
 
    size_t row = 0;
 
    for ( vector<CSeq_feat_Handle>::iterator fi = m_FeatHandles.begin(); fi != m_FeatHandles.end() ; ++fi )  
    {
        string product,loc,comment;
        
        const CSeq_feat &feat =  *fi->GetOriginalSeq_feat();
        const CRNA_ref &rna = feat.GetData().GetRna();
    product = rna.GetRnaProductName();
 
        if (feat.IsSetLocation())
            feat.GetLocation().GetLabel(&loc);
        if (feat.IsSetComment())
            comment = feat.GetComment();
        CRef<objects::CSeq_id> id(new objects::CSeq_id());
        id->SetLocal().SetId(static_cast<CObject_id::TId>(row));
        id_col->SetData().SetId().push_back(id);
        expand_col->SetData().SetString().push_back("");
        product_col->SetData().SetString().push_back(product);
        loc_col->SetData().SetString().push_back(loc);
        AddValueToColumn(partial_start_col, partial_start_feat_col->GetFromFeat(feat), row);
        AddValueToColumn(partial_stop_col, partial_stop_feat_col->GetFromFeat(feat), row);
        comment_col->SetData().SetString().push_back(comment);
        bogus_col->SetData().SetString().push_back("");
        row++;
    }
    
    table->SetNum_rows(static_cast<CSeq_table::TNum_rows>(row));
    return table;
}
 
 
CRef<CCmdComposite> CBulkRna::GetCommandFromValuesTable(CRef<CSeq_table> values_table) 
{
 CRef<CCmdComposite> cmd(new CCmdComposite("Bulk Rna Edit"));
 CRef<CFeatureSeqTableColumnBase> partial_start_feat_col = CFeatureSeqTableColumnBaseFactory::Create(kPartialStart);
 CRef<CFeatureSeqTableColumnBase> partial_stop_feat_col = CFeatureSeqTableColumnBaseFactory::Create(kPartialStop);
 m_Modified = false;
 size_t row = 0;
 
 for ( vector<CSeq_feat_Handle>::iterator fi = m_FeatHandles.begin(); fi != m_FeatHandles.end() ; ++fi )  
 {
     const CSeq_feat &feat = *fi->GetOriginalSeq_feat();
     CRef<CSeq_feat> new_feat(new CSeq_feat());
     new_feat->Assign(feat);
     string product,loc,comment;
     bool modified = false;
     const CRNA_ref &rna = feat.GetData().GetRna();
     product = rna.GetRnaProductName();
 
     if (feat.IsSetLocation())
         feat.GetLocation().GetLabel(&loc);
     if (feat.IsSetComment())
         comment = feat.GetComment();        
     
     string new_product;
     try
     {
         if (row < values_table->GetColumn("product").GetData().GetString().size())
             new_product = values_table->GetColumn("product").GetData().GetString()[row];
     } catch(CSeqTableException&) {}
     
     if (new_product != product)
     {
     string remainder;
     new_feat->SetData().SetRna().SetRnaProductName(new_product, remainder);
         modified = true;
     }
        
     string new_comment;
     try
     {
         if (row <  values_table->GetColumn("comment").GetData().GetString().size())
             new_comment = values_table->GetColumn("comment").GetData().GetString()[row];
     } catch(CSeqTableException&) {}
     
     if (new_comment != comment)
     {
         if (new_comment.empty())
             new_feat->ResetComment();
         else
             new_feat->SetComment() = new_comment;
         modified = true;
     }
 
     string partial_start_val = partial_start_feat_col->GetFromFeat(feat);
     string new_partial_start_val;
     try
     {
         if (row <  values_table->GetColumn(kPartialStart).GetData().GetString().size())
             new_partial_start_val = values_table->GetColumn(kPartialStart).GetData().GetString()[row];
     } catch(CSeqTableException&) {}
     
     if (new_partial_start_val != partial_start_val)
     {
         if (new_partial_start_val.empty())
             partial_start_feat_col->ClearInFeature(*new_feat);
         else
             partial_start_feat_col->AddToFeature(*new_feat, new_partial_start_val, edit::eExistingText_replace_old);
         modified = true;
     }
         
     string partial_stop_val = partial_stop_feat_col->GetFromFeat(feat);
     string new_partial_stop_val;
     try
     {
         if (row <  values_table->GetColumn(kPartialStop).GetData().GetString().size())
             new_partial_stop_val = values_table->GetColumn(kPartialStop).GetData().GetString()[row];
     } catch(CSeqTableException& ) {}
     
     if (new_partial_stop_val != partial_stop_val)
     {
         if (new_partial_stop_val.empty())
             partial_stop_feat_col->ClearInFeature(*new_feat);
         else
             partial_stop_feat_col->AddToFeature(*new_feat, new_partial_stop_val, edit::eExistingText_replace_old);
         modified = true;
     }
     
     if (modified)
         cmd->AddCommand(*CRef<CCmdChangeSeq_feat>(new CCmdChangeSeq_feat(*fi,*new_feat)));
     m_Modified |= modified;
     row++;
 }            
 
 return cmd;  
}
 
 
CRef<CCmdComposite> CBulkRna::GetCommand()
{
    CRef<CSeq_table> values_table = m_GridPanel->GetValuesTable();
    CRef<CCmdComposite> cmd = GetCommandFromValuesTable(values_table);
    return cmd;
}
 
string CBulkRna::GetErrorMessage()
{
    return "Invalid operation in Bulk Rna Edit";
}
 
 
/*!
 * Should we show tooltips?
 */
 
bool CBulkRna::ShowToolTips()
{
    return true;
}
 
/*!
 * Get bitmap resources
 */
 
wxBitmap CBulkRna::GetBitmapResource( const wxString& name )
{
    // Bitmap retrieval
////@begin CBulkRna bitmap retrieval
    wxUnusedVar(name);
    return wxNullBitmap;
////@end CBulkRna bitmap retrieval
}
 
/*!
 * Get icon resources
 */
 
wxIcon CBulkRna::GetIconResource( const wxString& name )
{
    // Icon retrieval
////@begin CBulkRna icon retrieval
    wxUnusedVar(name);
    return wxNullIcon;
////@end CBulkRna icon retrieval
}
 
/*!
 * wxEVT_COMMAND_BUTTON_CLICKED event handler for ID_BUTTON
 */
 
void CBulkRna::OnClickOk( wxCommandEvent& event )
{
////@begin wxEVT_COMMAND_BUTTON_CLICKED event handler for ID_BUTTON in CBulkRna.
    // Before editing this code, remove the block markers.
    event.Skip();
////@end wxEVT_COMMAND_BUTTON_CLICKED event handler for ID_BUTTON in CBulkRna. 
}
 
/*!
 * wxEVT_COMMAND_BUTTON_CLICKED event handler for ID_BUTTON1
 */
 
void CBulkRna::OnClickCancel( wxCommandEvent& event )
{
    bool modified = m_GridPanel->GetModified() | m_AecrPanel->GetModified();
    if (modified)
    {
        wxMessageDialog dlg(this,_("Discard modifications?"), _("Attention"),wxOK|wxCANCEL|wxCENTRE);
        if (dlg.ShowModal() == wxID_OK)
        {
            event.Skip();
        }
    }
    else
        event.Skip();
}
 
const CObject* CBulkRna::RowToScopedObjects(int row, TConstScopedObjects &objects,  CBioseq_Handle &bsh)
{
    objects.clear();
    const CObject* obj = NULL;
 
    if (row < m_FeatHandles.size() )
    {
        if ( m_FeatHandles[row].GetOriginalSeq_feat()->IsSetLocation() )
        {
            bsh = m_FeatHandles[row].GetScope().GetBioseqHandle(m_FeatHandles[row].GetOriginalSeq_feat()->GetLocation());   // CBioseq_Handle GetBioseqHandle(const CSeq_loc& loc);
            if (bsh)
            {
                if (m_SeqSubmit)
                    objects.push_back(SConstScopedObject(m_SeqSubmit,&bsh.GetScope()));
                else
                    objects.push_back(SConstScopedObject(bsh.GetTopLevelEntry().GetCompleteSeq_entry(),&bsh.GetScope()));                
                obj = bsh.GetBioseqCore().GetPointer();
            }
        }
    }
    return obj;
}
 
END_NCBI_SCOPE