/******************************************************************************* * ALMA - Atacama Large Millimiter Array * (c) Associated Universities Inc., 2002 * * (c) European Southern Observatory, 2002 * Copyright by ESO (in the framework of the ALMA collaboration) * and Cosylab 2002, All rights reserved * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library 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 * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * * * "@(#) $Id: acscourseMount3Impl.cpp,v 1.7 2008/10/02 08:58:19 cparedes Exp $" * */ #include #include using namespace std; /* ----------------------------------------------------------------*/ Mount3Impl::Mount3Impl(const ACE_CString &_name, maci::ContainerServices *containerServices) : CharacteristicComponentImpl(_name, containerServices), m_cmdAz_sp(new baci::ROdouble(_name+":cmdAz", getComponent()),this), m_cmdEl_sp(new baci::ROdouble(_name+":cmdEl", getComponent()),this), m_actAz_sp(new baci::ROdouble(_name+":actAz", getComponent()),this), m_actEl_sp(new baci::ROdouble(_name+":actEl", getComponent()),this) { // ACS_TRACE is used for debugging purposes ACS_TRACE("::Mount3Impl::Mount3Impl"); } /* ----------------------------------------------------------------*/ Mount3Impl::~Mount3Impl() { // ACS_TRACE is used for debugging purposes ACS_TRACE("::Mount3Impl::~Mount3Impl"); ACS_DEBUG_PARAM("::Mount3Impl::~Mount3Impl", "Destroying %s...", name()); } /* --------------------- [ CORBA interface ] ----------------------*/ void Mount3Impl::objfix (CORBA::Double az, CORBA::Double elev) { ACS_TRACE("::Mount3Impl::objfix"); ACS::Time timestamp; try { m_cmdAz_sp->getDevIO()->write(az, timestamp); m_cmdEl_sp->getDevIO()->write(elev, timestamp); } catch (...) { // Here we have to better handle errors! ACS_SHORT_LOG((LM_ERROR,"Error accessing devIO")); } ACS_SHORT_LOG((LM_INFO,"Received objfix command. Az: %f El: %f", az, elev)); } ACS::ROdouble_ptr Mount3Impl::cmdAz () { if (m_cmdAz_sp == 0) { return ACS::ROdouble::_nil(); } ACS::ROdouble_var prop = ACS::ROdouble::_narrow(m_cmdAz_sp->getCORBAReference()); return prop._retn(); } ACS::ROdouble_ptr Mount3Impl::cmdEl () { if (m_cmdEl_sp == 0) { return ACS::ROdouble::_nil(); } ACS::ROdouble_var prop = ACS::ROdouble::_narrow(m_cmdEl_sp->getCORBAReference()); return prop._retn(); } ACS::ROdouble_ptr Mount3Impl::actAz () { if (m_actAz_sp == 0) { return ACS::ROdouble::_nil(); } ACS::ROdouble_var prop = ACS::ROdouble::_narrow(m_actAz_sp->getCORBAReference()); return prop._retn(); } ACS::ROdouble_ptr Mount3Impl::actEl () { if (m_actEl_sp == 0) { return ACS::ROdouble::_nil(); } ACS::ROdouble_var prop = ACS::ROdouble::_narrow(m_actEl_sp->getCORBAReference()); return prop._retn(); } /* --------------- [ MACI DLL support functions ] -----------------*/ #include MACI_DLL_SUPPORT_FUNCTIONS(Mount3Impl) /* ----------------------------------------------------------------*/ /*___oOo___*/