]> Creatis software - crea.git/blob - src/creaRTTI.cxx
Feature #1763
[crea.git] / src / creaRTTI.cxx
1 /*
2 # ---------------------------------------------------------------------
3 #
4 # Copyright (c) CREATIS (Centre de Recherche en Acquisition et Traitement de l'Image 
5 #                        pour la Santé)
6 # Authors : Eduardo Davila, Frederic Cervenansky, Claire Mouton
7 #
8 #  This software is governed by the CeCILL-B license under French law and 
9 #  abiding by the rules of distribution of free software. You can  use, 
10 #  modify and/ or redistribute the software under the terms of the CeCILL-B 
11 #  license as circulated by CEA, CNRS and INRIA at the following URL 
12 #  http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html 
13 #  or in the file LICENSE.txt.
14 #
15 #  As a counterpart to the access to the source code and  rights to copy,
16 #  modify and redistribute granted by the license, users are provided only
17 #  with a limited warranty  and the software's author,  the holder of the
18 #  economic rights,  and the successive licensors  have only  limited
19 #  liability. 
20 #
21 #  The fact that you are presently reading this means that you have had
22 #  knowledge of the CeCILL-B license and that you accept its terms.
23 # ------------------------------------------------------------------------ */ 
24
25 #include "creaRTTI.h"
26 #include "creaMessageManager.h"
27
28
29  
30 namespace crea
31 {
32   // Adapted from https://savannah.cern.ch/support/download.php?file_id=1972
33   
34   // Something to which we can cast the void*s, to allow finding the
35   // dynamic typeid.
36   struct Dummy {
37     virtual ~Dummy() {}
38   };
39   
40
41  void*  run_time_up_or_down_cast( const std::type_info& target_type,
42                                const std::type_info& source_type,
43                                const void*  source_pointer
44                                )
45  {
46    return run_time_up_or_down_cast(target_type,
47                                    source_type,
48                                    const_cast<void*>(source_pointer));
49  }
50
51   void*   run_time_up_or_down_cast( const std::type_info& target_type,
52                                const std::type_info& source_type,
53                                void*  source_pointer
54                                )
55   {
56     creaDebugMessage("info",5,
57                      "run_time_up_or_down_cast : Casting pointer to '" 
58                      << TypeName(typeid(*(Dummy*)source_pointer)) 
59                      << "' from " << TypeName(source_type) 
60                      << " to " << TypeName(target_type) << std::endl);
61
62     void* target_pointer = 0;
63 #if __GNUC__ > 3 ||                                     \
64   (__GNUC__ == 3 && (__GNUC_MINOR__ > 1 ||              \
65                      (__GNUC_MINOR__ == 1 &&            \
66                       __GNUC_PATCHLEVEL__ > 0)))
67     
68     const abi::__class_type_info* targetTI = 
69       (const abi::__class_type_info *)( &(target_type));
70     
71     creaDebugMessage("info",7," * source   = "<<source_pointer<<std::endl);
72
73     void* tmp = source_pointer;
74     if (source_type.__do_upcast(targetTI,&tmp)) 
75       {
76         target_pointer = tmp;
77       }
78     else 
79       {
80         creaDebugMessage("info",7,
81                          " * upcast failed : trying dynamic down cast"
82                          <<std::endl);
83         const abi::__class_type_info* sourceTI = 
84           (const abi::__class_type_info *)( &(source_type));
85         
86         
87         target_pointer = abi::__dynamic_cast(source_pointer, 
88                                              sourceTI, 
89                                              targetTI, 
90                                              -1);   
91       }
92     
93     creaDebugMessage("info",7," * target   = "<<target_pointer<<std::endl);
94     
95 #else
96     creaWarning("run_time_up_or_down_cast not impl. on Win : to do");
97     // target_pointer = __RTDynamicCast(source_pointer, 0, source_type, target_type, 0);
98 #endif
99     return target_pointer;
100     
101   }
102
103 }
104