110448Snilay@cs.wisc.edu/* Copyright (c) 2012 Massachusetts Institute of Technology
210448Snilay@cs.wisc.edu *
310448Snilay@cs.wisc.edu * Permission is hereby granted, free of charge, to any person obtaining a copy
410448Snilay@cs.wisc.edu * of this software and associated documentation files (the "Software"), to deal
510448Snilay@cs.wisc.edu * in the Software without restriction, including without limitation the rights
610448Snilay@cs.wisc.edu * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
710448Snilay@cs.wisc.edu * copies of the Software, and to permit persons to whom the Software is
810448Snilay@cs.wisc.edu * furnished to do so, subject to the following conditions:
910448Snilay@cs.wisc.edu *
1010448Snilay@cs.wisc.edu * The above copyright notice and this permission notice shall be included in
1110448Snilay@cs.wisc.edu * all copies or substantial portions of the Software.
1210448Snilay@cs.wisc.edu *
1310448Snilay@cs.wisc.edu * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
1410448Snilay@cs.wisc.edu * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
1510448Snilay@cs.wisc.edu * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
1610448Snilay@cs.wisc.edu * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
1710448Snilay@cs.wisc.edu * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
1810448Snilay@cs.wisc.edu * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
1910448Snilay@cs.wisc.edu * THE SOFTWARE.
2010448Snilay@cs.wisc.edu */
2110448Snilay@cs.wisc.edu
2210447Snilay@cs.wisc.edu#include "model/optical/ThrottledLaserSource.h"
2310447Snilay@cs.wisc.edu
2410447Snilay@cs.wisc.edu#include "model/PortInfo.h"
2510447Snilay@cs.wisc.edu#include "model/TransitionInfo.h"
2610447Snilay@cs.wisc.edu#include "model/EventInfo.h"
2710447Snilay@cs.wisc.edu#include "model/optical_graph/OpticalWaveguide.h"
2810447Snilay@cs.wisc.edu#include "model/optical_graph/OpticalWavelength.h"
2910447Snilay@cs.wisc.edu#include "model/optical_graph/OpticalLaser.h"
3010447Snilay@cs.wisc.edu#include "model/optical_graph/OpticalGraph.h"
3110447Snilay@cs.wisc.edu
3210447Snilay@cs.wisc.edunamespace DSENT
3310447Snilay@cs.wisc.edu{
3410447Snilay@cs.wisc.edu    ThrottledLaserSource::ThrottledLaserSource(const String& instance_name_, const TechModel* tech_model_)
3510447Snilay@cs.wisc.edu        : OpticalModel(instance_name_, tech_model_), m_wavelength_(NULL)
3610447Snilay@cs.wisc.edu    {
3710447Snilay@cs.wisc.edu        initParameters();
3810447Snilay@cs.wisc.edu        initProperties();
3910447Snilay@cs.wisc.edu    }
4010447Snilay@cs.wisc.edu
4110447Snilay@cs.wisc.edu    ThrottledLaserSource::~ThrottledLaserSource()
4210447Snilay@cs.wisc.edu    {
4310447Snilay@cs.wisc.edu        if (m_wavelength_ != NULL) delete m_wavelength_;
4410447Snilay@cs.wisc.edu    }
4510447Snilay@cs.wisc.edu
4610447Snilay@cs.wisc.edu    void ThrottledLaserSource::initParameters()
4710447Snilay@cs.wisc.edu    {
4810447Snilay@cs.wisc.edu        addParameterName("OutStart");
4910447Snilay@cs.wisc.edu        addParameterName("OutEnd");
5010447Snilay@cs.wisc.edu        addParameterName("MaxDetectors");
5110447Snilay@cs.wisc.edu        addParameterName("MinDetectors");
5210447Snilay@cs.wisc.edu        return;
5310447Snilay@cs.wisc.edu    }
5410447Snilay@cs.wisc.edu
5510447Snilay@cs.wisc.edu    void ThrottledLaserSource::initProperties()
5610447Snilay@cs.wisc.edu    {
5710447Snilay@cs.wisc.edu		addPropertyName("OptUtil", 1.0);
5810447Snilay@cs.wisc.edu        addPropertyName("LaserEventTime");
5910447Snilay@cs.wisc.edu        return;
6010447Snilay@cs.wisc.edu    }
6110447Snilay@cs.wisc.edu
6210447Snilay@cs.wisc.edu    void ThrottledLaserSource::constructModel()
6310447Snilay@cs.wisc.edu    {
6410447Snilay@cs.wisc.edu        // Get parameters
6510447Snilay@cs.wisc.edu        WavelengthGroup laser_wavelengths = makeWavelengthGroup(getParameter("OutStart"), getParameter("OutEnd"));
6610447Snilay@cs.wisc.edu        unsigned int max_detectors = getParameter("MaxDetectors").toUInt();
6710447Snilay@cs.wisc.edu        unsigned int min_detectors = getParameter("MinDetectors").toUInt();
6810447Snilay@cs.wisc.edu
6910447Snilay@cs.wisc.edu        // Create electrical input port for laser control
7010447Snilay@cs.wisc.edu        createInputPort(    "LaserEnable");
7110447Snilay@cs.wisc.edu
7210447Snilay@cs.wisc.edu        // Create Area result
7310447Snilay@cs.wisc.edu        addAreaResult(new AtomicResult("Photonic"));
7410447Snilay@cs.wisc.edu        // Create event result for each detector number possibility
7510447Snilay@cs.wisc.edu        for (unsigned int i = min_detectors; i <= max_detectors; ++i)
7610447Snilay@cs.wisc.edu        {
7710447Snilay@cs.wisc.edu            createElectricalEventAtomicResult("Laser" + (String) i);
7810447Snilay@cs.wisc.edu            getEventInfo("Laser" + (String) i)->setTransitionInfo("LaserEnable", TransitionInfo(0.0, 1.0, 0.0));
7910447Snilay@cs.wisc.edu        }
8010447Snilay@cs.wisc.edu
8110447Snilay@cs.wisc.edu        // Create optical ports
8210447Snilay@cs.wisc.edu        createOpticalOutputPort(    "Out",      laser_wavelengths);
8310447Snilay@cs.wisc.edu        // Create the filter
8410447Snilay@cs.wisc.edu        createLaser(                "Laser",    laser_wavelengths);
8510447Snilay@cs.wisc.edu        OpticalLaser* laser = getLaser("Laser");
8610447Snilay@cs.wisc.edu        // Connect the laser to the output
8710447Snilay@cs.wisc.edu        laser->addDownstreamNode(getWaveguide("Out"));
8810447Snilay@cs.wisc.edu    }
8910447Snilay@cs.wisc.edu
9010447Snilay@cs.wisc.edu    void ThrottledLaserSource::updateModel()
9110447Snilay@cs.wisc.edu    {
9210447Snilay@cs.wisc.edu        // Get properties
9310447Snilay@cs.wisc.edu        double laser_efficiency = getTechModel()->get("Laser->CW->Efficiency").toDouble();
9410447Snilay@cs.wisc.edu        double laser_area = getTechModel()->get("Laser->CW->Area").toDouble();
9510447Snilay@cs.wisc.edu        double laser_diode_loss = getTechModel()->get("Laser->CW->LaserDiodeLoss");
9610447Snilay@cs.wisc.edu
9710447Snilay@cs.wisc.edu        // Get parameters
9810447Snilay@cs.wisc.edu        WavelengthGroup laser_wavelengths = makeWavelengthGroup(getParameter("OutStart"), getParameter("OutEnd"));
9910447Snilay@cs.wisc.edu        unsigned int number_wavelengths = laser_wavelengths.second - laser_wavelengths.first + 1;
10010447Snilay@cs.wisc.edu        // Update losses
10110447Snilay@cs.wisc.edu        OpticalLaser* laser = getLaser("Laser");
10210447Snilay@cs.wisc.edu        laser->setLoss(laser_diode_loss);
10310447Snilay@cs.wisc.edu        laser->setEfficiency(laser_efficiency);
10410447Snilay@cs.wisc.edu        // Update area
10510447Snilay@cs.wisc.edu        getAreaResult("Photonic")->setValue(laser_area * number_wavelengths);
10610447Snilay@cs.wisc.edu    }
10710447Snilay@cs.wisc.edu
10810447Snilay@cs.wisc.edu    void ThrottledLaserSource::evaluateModel()
10910447Snilay@cs.wisc.edu    {
11010447Snilay@cs.wisc.edu        // Get parameters
11110447Snilay@cs.wisc.edu        unsigned int max_detectors = getParameter("MaxDetectors");
11210447Snilay@cs.wisc.edu        WavelengthGroup laser_wavelengths = makeWavelengthGroup(getParameter("OutStart"), getParameter("OutEnd"));
11310447Snilay@cs.wisc.edu
11410447Snilay@cs.wisc.edu		// Get properties
11510447Snilay@cs.wisc.edu		double opt_util = getProperty("OptUtil");
11610447Snilay@cs.wisc.edu
11710447Snilay@cs.wisc.edu        // Create optical graph object
11810447Snilay@cs.wisc.edu        OpticalGraph* optical_graph = new OpticalGraph("LaserTrace", this);
11910447Snilay@cs.wisc.edu        // Ask optical graph object to perform power optimization
12010447Snilay@cs.wisc.edu        bool success = optical_graph->performPowerOpt(getLaser("Laser"), laser_wavelengths, max_detectors, opt_util);
12110447Snilay@cs.wisc.edu        if (!success)
12210447Snilay@cs.wisc.edu        {
12310447Snilay@cs.wisc.edu            Log::printLine(std::cerr, "[Warning] " + getInstanceName() +
12410447Snilay@cs.wisc.edu                " -> Wavelengths contains data paths with no possible modulator configurations!");
12510447Snilay@cs.wisc.edu        }
12610447Snilay@cs.wisc.edu
12710447Snilay@cs.wisc.edu        // Trace the wavelengths the laser is outputting to find the output
12810447Snilay@cs.wisc.edu        // power needed by the laser
12910447Snilay@cs.wisc.edu        if (m_wavelength_ != NULL) delete m_wavelength_;
13010447Snilay@cs.wisc.edu        m_wavelength_ = optical_graph->traceWavelength(laser_wavelengths, getLaser("Laser"));
13110447Snilay@cs.wisc.edu
13210447Snilay@cs.wisc.edu        delete optical_graph;
13310447Snilay@cs.wisc.edu    }
13410447Snilay@cs.wisc.edu
13510447Snilay@cs.wisc.edu    void ThrottledLaserSource::useModel()
13610447Snilay@cs.wisc.edu    {
13710447Snilay@cs.wisc.edu        // Get parameters
13810447Snilay@cs.wisc.edu        unsigned int max_detectors = getParameter("MaxDetectors");
13910447Snilay@cs.wisc.edu        unsigned int min_detectors = getParameter("MinDetectors");
14010447Snilay@cs.wisc.edu
14110447Snilay@cs.wisc.edu        // Get properties
14210447Snilay@cs.wisc.edu        double laser_event_time = getProperty("LaserEventTime");
14310447Snilay@cs.wisc.edu        // Get laser enable information
14410447Snilay@cs.wisc.edu        const TransitionInfo& enable_info = getInputPort("LaserEnable")->getTransitionInfo();
14510447Snilay@cs.wisc.edu
14610447Snilay@cs.wisc.edu        for (unsigned int i = min_detectors; i <= max_detectors; ++i)
14710447Snilay@cs.wisc.edu        {
14810447Snilay@cs.wisc.edu            // Calculate the power needed by the wavelength
14910447Snilay@cs.wisc.edu            double laser_power = m_wavelength_->getLaserPower(i);
15010447Snilay@cs.wisc.edu            // Calculate the laser event power by calculating the amount
15110447Snilay@cs.wisc.edu            // of time the laser is on
15210447Snilay@cs.wisc.edu            getEventResult("Laser" + (String) i)->setValue(laser_power * laser_event_time *
15310447Snilay@cs.wisc.edu                enable_info.getFrequencyMultiplier() * enable_info.getProbability1());
15410447Snilay@cs.wisc.edu        }
15510447Snilay@cs.wisc.edu    }
15610447Snilay@cs.wisc.edu
15710447Snilay@cs.wisc.edu} // namespace DSENT
15810447Snilay@cs.wisc.edu
159