//
// ********************************************************************
// * License and Disclaimer                                           *
// *                                                                  *
// * The  Geant4 software  is  copyright of the Copyright Holders  of *
// * the Geant4 Collaboration.  It is provided  under  the terms  and *
// * conditions of the Geant4 Software License,  included in the file *
// * LICENSE and available at  http://cern.ch/geant4/license .  These *
// * include a list of copyright holders.                             *
// *                                                                  *
// * Neither the authors of this software system, nor their employing *
// * institutes,nor the agencies providing financial support for this *
// * work  make  any representation or  warranty, express or implied, *
// * regarding  this  software system or assume any liability for its *
// * use.  Please see the license in the file  LICENSE  and URL above *
// * for the full disclaimer and the limitation of liability.         *
// *                                                                  *
// * This  code  implementation is the result of  the  scientific and *
// * technical work of the GEANT4 collaboration.                      *
// * By using,  copying,  modifying or  distributing the software (or *
// * any work based  on the software)  you  agree  to acknowledge its *
// * use  in  resulting  scientific  publications,  and indicate your *
// * acceptance of all terms of the Geant4 Software license.          *
// ********************************************************************
//
//
/// \file optical/LXe/src/LXeWLSFiber.cc
/// \brief Implementation of the LXeWLSFiber class
//
//
#include "LXeWLSFiber.hh"

#include "globals.hh"
#include "G4Box.hh"
#include "G4LogicalVolume.hh"
#include "G4Material.hh"
#include "G4SystemOfUnits.hh"
#include "G4Tubs.hh"

G4LogicalVolume* LXeWLSFiber::fClad2_log = nullptr;

//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......

LXeWLSFiber::LXeWLSFiber(G4RotationMatrix* pRot, const G4ThreeVector& tlate,
                         G4LogicalVolume* pMotherLogical, G4bool pMany,
                         G4int pCopyNo, LXeDetectorConstruction* c)
  : G4PVPlacement(pRot, tlate,
                  new G4LogicalVolume(new G4Box("temp", 1., 1., 1.),
                                    G4Material::GetMaterial("Vacuum"), "temp"),
                  "Cladding2", pMotherLogical, pMany, pCopyNo)
  , fConstructor(c)
{
  CopyValues();

  // The Fiber
  //
  auto fiber_tube = new G4Tubs("Fiber", fFiber_rmin, fFiber_rmax, fFiber_z,
                               fFiber_sphi, fFiber_ephi);

  auto fiber_log = new G4LogicalVolume(
    fiber_tube, G4Material::GetMaterial("PMMA"), "Fiber");

  // Cladding (first layer)
  //
  auto clad1_tube = new G4Tubs("Cladding1", fClad1_rmin, fClad1_rmax,
                               fClad1_z, fClad1_sphi, fClad1_ephi);

  auto clad1_log = new G4LogicalVolume(
    clad1_tube, G4Material::GetMaterial("Pethylene1"), "Cladding1");

  // Cladding (second layer)
  //
  auto clad2_tube = new G4Tubs("Cladding2", fClad2_rmin, fClad2_rmax,
                               fClad2_z, fClad2_sphi, fClad2_ephi);

  fClad2_log = new G4LogicalVolume(
    clad2_tube, G4Material::GetMaterial("Pethylene2"), "Cladding2");

  new G4PVPlacement(nullptr, G4ThreeVector(0., 0., 0.), fiber_log, "Fiber",
                    clad1_log, false, 0);
  new G4PVPlacement(nullptr, G4ThreeVector(0., 0., 0.), clad1_log, "Cladding1",
                    fClad2_log, false, 0);

  SetLogicalVolume(fClad2_log);
}

//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......

void LXeWLSFiber::CopyValues()
{
  fFiber_rmin = 0.0 * cm;
  fFiber_rmax = 0.1 * cm;
  fFiber_z    = fConstructor->GetScintX() / 2.;
  fFiber_sphi = 0.0 * deg;
  fFiber_ephi = 360. * deg;

  fClad1_rmin = 0.;  // fFiber_rmax;
  fClad1_rmax = fFiber_rmax + 0.015 * fFiber_rmax;

  fClad1_z    = fFiber_z;
  fClad1_sphi = fFiber_sphi;
  fClad1_ephi = fFiber_ephi;

  fClad2_rmin = 0.;  // fClad1_rmax;
  fClad2_rmax = fClad1_rmax + 0.015 * fFiber_rmax;

  fClad2_z    = fFiber_z;
  fClad2_sphi = fFiber_sphi;
  fClad2_ephi = fFiber_ephi;
}
