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/OpticalTestModel.h"
2310447Snilay@cs.wisc.edu#include "model/optical_graph/OpticalGraph.h"
2410447Snilay@cs.wisc.edu#include "model/optical_graph/OpticalWaveguide.h"
2510447Snilay@cs.wisc.edu#include "model/optical/RingModulator.h"
2610447Snilay@cs.wisc.edu#include "model/optical/RingFilter.h"
2710447Snilay@cs.wisc.edu#include "model/optical/RingDetector.h"
2810447Snilay@cs.wisc.edu#include "model/optical/LaserSource.h"
2910447Snilay@cs.wisc.edu
3010447Snilay@cs.wisc.edunamespace DSENT
3110447Snilay@cs.wisc.edu{
3210447Snilay@cs.wisc.edu    OpticalTestModel::OpticalTestModel(const String& instance_name_, const TechModel* tech_model_)
3310447Snilay@cs.wisc.edu        : OpticalModel(instance_name_, tech_model_)
3410447Snilay@cs.wisc.edu    {
3510447Snilay@cs.wisc.edu        initParameters();
3610447Snilay@cs.wisc.edu        initProperties();
3710447Snilay@cs.wisc.edu    }
3810447Snilay@cs.wisc.edu
3910447Snilay@cs.wisc.edu    OpticalTestModel::~OpticalTestModel()
4010447Snilay@cs.wisc.edu    {}
4110447Snilay@cs.wisc.edu
4210447Snilay@cs.wisc.edu    void OpticalTestModel::initParameters()
4310447Snilay@cs.wisc.edu    {
4410447Snilay@cs.wisc.edu        return;
4510447Snilay@cs.wisc.edu    }
4610447Snilay@cs.wisc.edu
4710447Snilay@cs.wisc.edu    void OpticalTestModel::initProperties()
4810447Snilay@cs.wisc.edu    {
4910447Snilay@cs.wisc.edu        return;
5010447Snilay@cs.wisc.edu    }
5110447Snilay@cs.wisc.edu
5210447Snilay@cs.wisc.edu    void OpticalTestModel::constructModel()
5310447Snilay@cs.wisc.edu    {
5410447Snilay@cs.wisc.edu        unsigned int wavelengths = 64;
5510447Snilay@cs.wisc.edu        unsigned int number_readers = 1;
5610447Snilay@cs.wisc.edu
5710447Snilay@cs.wisc.edu        createWaveguide("LaserToMod", makeWavelengthGroup(0, wavelengths-1));
5810447Snilay@cs.wisc.edu
5910447Snilay@cs.wisc.edu        // Create laser
6010447Snilay@cs.wisc.edu        LaserSource* laser = new LaserSource("Laser", getTechModel());
6110447Snilay@cs.wisc.edu        laser->setParameter("OutStart", 0);
6210447Snilay@cs.wisc.edu        laser->setParameter("OutEnd", wavelengths-1);
6310447Snilay@cs.wisc.edu        laser->construct();
6410447Snilay@cs.wisc.edu
6510447Snilay@cs.wisc.edu        // Create modulator
6610447Snilay@cs.wisc.edu        RingModulator* modulator = new RingModulator("Modulator", getTechModel());
6710447Snilay@cs.wisc.edu        modulator->setParameter("InStart", 0);
6810447Snilay@cs.wisc.edu        modulator->setParameter("InEnd", wavelengths-1);
6910447Snilay@cs.wisc.edu        modulator->setParameter("ModStart", 0);
7010447Snilay@cs.wisc.edu        modulator->setParameter("ModEnd", wavelengths-1);
7110447Snilay@cs.wisc.edu        modulator->construct();
7210447Snilay@cs.wisc.edu
7310447Snilay@cs.wisc.edu        for (unsigned int i = 0; i <= number_readers; ++i)
7410447Snilay@cs.wisc.edu        {
7510447Snilay@cs.wisc.edu            String n = (String) i;
7610447Snilay@cs.wisc.edu            createWaveguide("WaveguideDet-" + n, makeWavelengthGroup(0, wavelengths-1));
7710447Snilay@cs.wisc.edu        }
7810447Snilay@cs.wisc.edu
7910447Snilay@cs.wisc.edu        // Create a SWMR Configuration
8010447Snilay@cs.wisc.edu        for (unsigned int i = 0; i < number_readers; ++i)
8110447Snilay@cs.wisc.edu        {
8210447Snilay@cs.wisc.edu            String n = (String) i;
8310447Snilay@cs.wisc.edu
8410447Snilay@cs.wisc.edu            // Create resonant ring detector
8510447Snilay@cs.wisc.edu            RingDetector* detector = new RingDetector("Detector-" + n, getTechModel());
8610447Snilay@cs.wisc.edu            detector->setParameter("InStart", 0);
8710447Snilay@cs.wisc.edu            detector->setParameter("InEnd", wavelengths-1);
8810447Snilay@cs.wisc.edu            detector->setParameter("DetStart", 0);
8910447Snilay@cs.wisc.edu            detector->setParameter("DetEnd", wavelengths-1);
9010447Snilay@cs.wisc.edu            detector->setParameter("DropAll", "FALSE");
9110447Snilay@cs.wisc.edu            detector->setParameter("SenseAmp", "TRUE");
9210447Snilay@cs.wisc.edu            detector->construct();
9310447Snilay@cs.wisc.edu
9410447Snilay@cs.wisc.edu            opticalPortConnect(detector, "In", "WaveguideDet-" + n);
9510447Snilay@cs.wisc.edu            opticalPortConnect(detector, "Out", "WaveguideDet-" + (String) (i + 1));
9610447Snilay@cs.wisc.edu
9710447Snilay@cs.wisc.edu            addSubInstances(detector, 1.0);
9810447Snilay@cs.wisc.edu        }
9910447Snilay@cs.wisc.edu
10010447Snilay@cs.wisc.edu        opticalPortConnect(laser, "Out", "LaserToMod");
10110447Snilay@cs.wisc.edu        opticalPortConnect(modulator, "In", "LaserToMod");
10210447Snilay@cs.wisc.edu        opticalPortConnect(modulator, "Out", "WaveguideDet-0");
10310447Snilay@cs.wisc.edu
10410447Snilay@cs.wisc.edu        addSubInstances(laser, 1.0);
10510447Snilay@cs.wisc.edu        addSubInstances(modulator, 1.0);
10610447Snilay@cs.wisc.edu    }
10710447Snilay@cs.wisc.edu
10810447Snilay@cs.wisc.edu    void OpticalTestModel::updateModel()
10910447Snilay@cs.wisc.edu    {
11010447Snilay@cs.wisc.edu        double data_rate = 8e9;
11110447Snilay@cs.wisc.edu        double extinction_ratio = 5;
11210447Snilay@cs.wisc.edu        double insertion_loss = 3;
11310447Snilay@cs.wisc.edu
11410447Snilay@cs.wisc.edu        Model* laser = getSubInstance("Laser");
11510447Snilay@cs.wisc.edu        laser->update();
11610447Snilay@cs.wisc.edu
11710447Snilay@cs.wisc.edu        getWaveguide("LaserToMod")->setLoss(10);
11810447Snilay@cs.wisc.edu
11910447Snilay@cs.wisc.edu        Model* modulator = getSubInstance("Modulator");
12010447Snilay@cs.wisc.edu        modulator->setProperty("ExtinctionRatio", extinction_ratio);
12110447Snilay@cs.wisc.edu        modulator->setProperty("InsertionLoss", insertion_loss);
12210447Snilay@cs.wisc.edu        modulator->setProperty("DataRate", data_rate);
12310447Snilay@cs.wisc.edu        modulator->setProperty("P(In)", 0.5);
12410447Snilay@cs.wisc.edu        modulator->setProperty("Act(In)", 1.0);
12510447Snilay@cs.wisc.edu        modulator->update();
12610447Snilay@cs.wisc.edu
12710447Snilay@cs.wisc.edu        unsigned int number_readers = 1;
12810447Snilay@cs.wisc.edu        for (unsigned int i = 0; i < number_readers; ++i)
12910447Snilay@cs.wisc.edu        {
13010447Snilay@cs.wisc.edu            Model* detector = getSubInstance("Detector-" + (String) i);
13110447Snilay@cs.wisc.edu            detector->setProperty("ExtinctionRatio", extinction_ratio);
13210447Snilay@cs.wisc.edu            detector->setProperty("DataRate", data_rate);
13310447Snilay@cs.wisc.edu            detector->setProperty("P(In)", 0.5);
13410447Snilay@cs.wisc.edu            detector->setProperty("Act(In)", 1.0);
13510447Snilay@cs.wisc.edu            detector->update();
13610447Snilay@cs.wisc.edu        }
13710447Snilay@cs.wisc.edu
13810447Snilay@cs.wisc.edu
13910447Snilay@cs.wisc.edu    }
14010447Snilay@cs.wisc.edu
14110447Snilay@cs.wisc.edu} // namespace DSENT
14210447Snilay@cs.wisc.edu
143