1 // $Id: geom_acorde.C 23412 2008-01-18 21:04:54Z mtadel $
2 // Main authors: Matevz Tadel & Alja Mrak-Tadel: 2006, 2007
4 /**************************************************************************
5 * Copyright(c) 1998-2008, ALICE Experiment at CERN, all rights reserved. *
6 * See http://aliceinfo.cern.ch/Offline/AliRoot/License.html for *
7 * full copyright notice. *
8 **************************************************************************/
10 TString acorde_module_path(Int_t module);
15 AliEveEventManager::AssertGeometry();
17 AliRawReader * reader = AliEveEventManager::AssertRawReader();
18 AliACORDERawStream * stream = new AliACORDERawStream(reader);
24 dy[0] = stream->GetWord(0);
25 dy[1] = stream->GetWord(1);
26 dy[2] = stream->GetWord(2);
27 dy[3] = stream->GetWord(3);
29 printf ("ACORDE event 0x%08x 0x%08x 0x%08x 0x%08x\n", dy[0], dy[1], dy[2], dy[3]);
31 TEveElementList* acorde = new TEveElementList("ACORDE Raw");
33 gEve->AddElement(acorde);
35 Int_t shape_offset = TEveGeoShape::Class()->GetDataMemberOffset("fShape");
37 for (Int_t module=0; module < 60; ++module)
39 TString path = acorde_module_path(module);
40 // printf("%2d - %s\n", i, path.Data());
42 if ( ! gGeoManager->cd(path))
44 Warning("acorde_raw", "Module id=%d, path='%s' not found.\n", module, path.Data());
48 TEveGeoShape* eg_shape = new TEveGeoShape(Form("Module %d", module));
50 eg_shape->RefMainTrans().SetFrom(* gGeoManager->GetCurrentMatrix());
52 // @@NEWROOT@@ Temporary hack.
53 // Hack to set shape pointer, no interface available in TEveGeoShape.
54 * (TGeoShape**) (((char*)eg_shape) + shape_offset) = gGeoManager->GetCurrentVolume()->GetShape();
57 // Here check ctate and assign color, I do it partially for now.
58 Int_t word_idx = module / 30;
59 Int_t bit_idx = module % 30;
60 Bool_t val = (dy[word_idx] & (1 << bit_idx)) != 0;
61 //printf("Module %2d: word_idx = %d, bit_idx = %2d => val = %d\n",
62 // module, word_idx, bit_idx, val);
64 eg_shape->SetMainColor((Color_t) 2);
66 eg_shape->SetMainColor((Color_t) 4);
67 eg_shape->StampColorSelection();
69 acorde->AddElement(eg_shape);
75 //==============================================================================
76 //==============================================================================
78 TString acorde_module_path(Int_t module)
80 if (module < 0 || module > 59)
82 Error("acorde_module_path", "module %d out of range.", module);
86 TGeoPNEntry* pne = gGeoManager->GetAlignableEntry(Form("ACORDE/Array%d", module + 1));
87 if(!pne) return "missing_pne";
89 return Form("%s/ACORDE2_5", pne->GetTitle());