//
// ********************************************************************
// * DISCLAIMER                                                       *
// *                                                                  *
// * The following disclaimer summarizes all the specific disclaimers *
// * of contributors to this software. The specific disclaimers,which *
// * govern, are listed with their locations in:                      *
// *   http://cern.ch/geant4/license                                  *
// *                                                                  *
// * 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.                                                             *
// *                                                                  *
// * This  code  implementation is the  intellectual property  of the *
// * GEANT4 collaboration.                                            *
// * By copying,  distributing  or modifying the Program (or any work *
// * based  on  the Program)  you indicate  your  acceptance of  this *
// * statement, and all its terms.                                    *
// ********************************************************************
//
// $Id: CadDetectorConstruction.cc,v 1.1 2002/06/20 10:00:55 gcosmo Exp $
// GEANT4 tag $Name: geant4-04-01 $
// ------------------------------------------------------------

#include "G4AssemblyCreator.hh"
#include "G4Assembly.hh"
#include "CadDetectorConstruction.hh"
#include "CadDetectorMessenger.hh"

#include "G4PVPlacement.hh"
#include "G4LogicalVolume.hh"
#include "G4Box.hh"
#include "G4Tubs.hh"
#include "G4Material.hh"
#include "G4Element.hh"

#include "G4VisAttributes.hh"
#include "G4Colour.hh"

CadDetectorConstruction::CadDetectorConstruction()
  : detectorChoice(0)
{
  expHall_x = 1111600.*cm;
  expHall_y = 1111600.*cm;
  expHall_z = 1111600.*cm;

  calBox_x = 50.*cm;
  calBox_y = 50.*cm;
  calBox_z = 50.*cm;
  rotAngle = 30.*deg;
  calPos = 200.*cm;

  trackerRadius = 50.*cm;
  trackerHight = 100.*cm;
  trackerPos = -200.*cm;

  detectorMessenger = new CadDetectorMessenger(this);
}

CadDetectorConstruction::~CadDetectorConstruction()
{;}

G4VPhysicalVolume* CadDetectorConstruction::Construct()
{

  //------------------------------------------------------ materials

  G4double a, iz, z, density;
  G4String name, symbol;
  G4int nel;

  a = 14.01*g/mole;
  G4Element* elN = new G4Element(name="Nitrogen", symbol="N", iz=7., a);
  a = 16.00*g/mole;
  G4Element* elO = new G4Element(name="Oxygen", symbol="O", iz=8., a);

  density = 1.29e-03*g/cm3;
  G4Material* Air = new G4Material(name="Air", density, nel=2);
  Air->AddElement(elN, .7);
  Air->AddElement(elO, .3);

  a = 207.19*g/mole;
  density = 11.35*g/cm3;
  G4Material* Lead = new G4Material(name="Lead", z=82., a, density);

  a = 39.95*g/mole;
  density = 1.782e-03*g/cm3;
  G4Material* Ar = new G4Material(name="ArgonGas", z=18., a, density);

  //------------------------------------------------------ volumes

  //------------------------------ experimental hall

  G4Box * experimentalHall_box
    = new G4Box("expHall_b",expHall_x,expHall_y,expHall_z);
  G4LogicalVolume * experimentalHall_log
    = new G4LogicalVolume(experimentalHall_box,Air,"expHall_L",0,0,0);
  G4VPhysicalVolume * experimentalHall_phys
    = new G4PVPlacement(0,G4ThreeVector(),"expHall_P",
                        experimentalHall_log,0,false,0);

  experimentalHall_log->SetVisAttributes (G4VisAttributes::Invisible);
  
  //------------------------------ STEP assembly creation

  const char * stepfile;

  switch(detectorChoice)
  {
    default:
      stepfile = "stepfiles/G4rod_place_asm.stp";
      break;

    case 1:
      stepfile = "stepfiles/G4rod_solid.stp";
      break;  
  } 

  G4AssemblyCreator MyAC(stepfile);
  MyAC.ReadStepFile();
  STEPentity* ent=0;
  MyAC.CreateG4Geometry(*ent);

  void *tmp =  MyAC.GetCreatedObject();
  G4Assembly* assembly = new G4Assembly();
  assembly->SetPlacedVector(*(G4PlacedVector*)tmp);

  // Set vis attribute to "transparent" blue
  G4VisAttributes * visAttr = new G4VisAttributes(G4Colour(0.,0.,1.,.5));
  visAttr->SetVisibility(true);

  G4PlacedSolid* ps=0;
  G4int solids = assembly->GetNumberOfSolids();
  G4cout << "Now placing " << solids << " logical volumes... ";
  
  for(G4int c=0;c<solids;c++)
    {
      ps = assembly->GetPlacedSolid(c);
      G4LogicalVolume* lv = new G4LogicalVolume(ps->GetSolid(),Lead,"STEPlog");
      HepRotation* hr = ps->GetRotation();
      G4ThreeVector* tr = ps->GetTranslation();
      new G4PVPlacement(hr,
                        *tr,
                        "STEPphys",  // ps->GetSolid()->GetName(),
                                     // no name assigned in sample STEP files
                        lv,
                        experimentalHall_phys,
                        false,
                        c);
      lv->SetVisAttributes(visAttr);
    }
  G4cout << "Done !" << G4endl;

  return experimentalHall_phys;
}


void CadDetectorConstruction::SelectDetector(G4String val)
{
  if(val=="rod_solid") 
  { detectorChoice = 1; }
  else
  { detectorChoice = 0; }
  G4cout << "Now Detector is " << val << G4endl;
}