Insertion.cpp

Go to the documentation of this file.

/*
 * This file is a part of the Biology project by eons LLC.
 * Biology (aka Develop Biology) is a framework for approaching software
 * development from a natural sciences perspective.
 *
 * Copyright (C) 2022 Séon O'Shannon & eons LLC
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Affero General Public License as
 * published by the Free Software Foundation, either version 3 of the
 * License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 * GNU Affero General Public License for more details.
 *
 * You should have received a copy of the GNU Affero General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */
 
#include "bio/genetic/localization/Insertion.h"
#include "bio/genetic/macros/Macros.h"
#include "bio/chemical/Substance.h"
#include "bio/common/ByteStream.h"
 
namespace bio {
namespace genetic {
 
Insertion::Insertion(
 chemical::Substance* toInsert,
 Site site,
 Name name
)
 :
 physical::Class< Insertion >(this),
 Localization(
 0,
 name
 ),
 m_toInsert(toInsert)
{
 SetSite(site); //virtual means nothing to ctors; do it again.
}
 
Insertion::~Insertion()
{
 
}
 
chemical::Substance* Insertion::Seek(chemical::Substance* insertIn) const
{
 insertIn = ResolvePrevious(insertIn);
 
 BIO_SANITIZE(insertIn && m_toInsert, ,
 return insertIn);
 
 if (m_site == InsertionSitePerspective::InvalidId())
 {
 return insertIn;
 }
 
 BIO_SANITIZE(mc_method, ,
 return NULL)
 ByteStream insertion(m_toInsert);
 (const_cast< chemical::ExcitationBase* >(mc_method))->EditArg(
 0,
 insertion
 );
 ByteStream result;
 mc_method->CallDown(
 insertIn->AsWave(),
 result
 );
 chemical::Substance* insert = ChemicalCast< chemical::Substance* >(Cast< physical::Wave* >(result.IKnowWhatImDoing())); //This is about as safe as we can get right now.
 BIO_SANITIZE(insert, ,
 return NULL)
 return insert;
}
 
void Insertion::SetSite(Site site)
{
 //Assume Sites & Sites always match exactly.
 m_site = site;
 mc_method = InsertionSitePerspective::Instance().GetNewObjectFromIdAs< chemical::ExcitationBase* >(m_site);
}
 
void Insertion::InsertThis(chemical::Substance* toInsert)
{
 m_toInsert = toInsert;
}
 
chemical::Substance* Insertion::GetWhatWillBeInserted()
{
 return m_toInsert;
}
 
} //genetic namespace
} //bio namespace