Geant4 Cross Reference

Cross-Referencing   Geant4
Geant4/externals/g4tools/include/tools/wroot/mpi_send_basket

Version: [ ReleaseNotes ] [ 1.0 ] [ 1.1 ] [ 2.0 ] [ 3.0 ] [ 3.1 ] [ 3.2 ] [ 4.0 ] [ 4.0.p1 ] [ 4.0.p2 ] [ 4.1 ] [ 4.1.p1 ] [ 5.0 ] [ 5.0.p1 ] [ 5.1 ] [ 5.1.p1 ] [ 5.2 ] [ 5.2.p1 ] [ 5.2.p2 ] [ 6.0 ] [ 6.0.p1 ] [ 6.1 ] [ 6.2 ] [ 6.2.p1 ] [ 6.2.p2 ] [ 7.0 ] [ 7.0.p1 ] [ 7.1 ] [ 7.1.p1 ] [ 8.0 ] [ 8.0.p1 ] [ 8.1 ] [ 8.1.p1 ] [ 8.1.p2 ] [ 8.2 ] [ 8.2.p1 ] [ 8.3 ] [ 8.3.p1 ] [ 8.3.p2 ] [ 9.0 ] [ 9.0.p1 ] [ 9.0.p2 ] [ 9.1 ] [ 9.1.p1 ] [ 9.1.p2 ] [ 9.1.p3 ] [ 9.2 ] [ 9.2.p1 ] [ 9.2.p2 ] [ 9.2.p3 ] [ 9.2.p4 ] [ 9.3 ] [ 9.3.p1 ] [ 9.3.p2 ] [ 9.4 ] [ 9.4.p1 ] [ 9.4.p2 ] [ 9.4.p3 ] [ 9.4.p4 ] [ 9.5 ] [ 9.5.p1 ] [ 9.5.p2 ] [ 9.6 ] [ 9.6.p1 ] [ 9.6.p2 ] [ 9.6.p3 ] [ 9.6.p4 ] [ 10.0 ] [ 10.0.p1 ] [ 10.0.p2 ] [ 10.0.p3 ] [ 10.0.p4 ] [ 10.1 ] [ 10.1.p1 ] [ 10.1.p2 ] [ 10.1.p3 ] [ 10.2 ] [ 10.2.p1 ] [ 10.2.p2 ] [ 10.2.p3 ] [ 10.3 ] [ 10.3.p1 ] [ 10.3.p2 ] [ 10.3.p3 ] [ 10.4 ] [ 10.4.p1 ] [ 10.4.p2 ] [ 10.4.p3 ] [ 10.5 ] [ 10.5.p1 ] [ 10.6 ] [ 10.6.p1 ] [ 10.6.p2 ] [ 10.6.p3 ] [ 10.7 ] [ 10.7.p1 ] [ 10.7.p2 ] [ 10.7.p3 ] [ 10.7.p4 ] [ 11.0 ] [ 11.0.p1 ] [ 11.0.p2 ] [ 11.0.p3, ] [ 11.0.p4 ] [ 11.1 ] [ 11.1.1 ] [ 11.1.2 ] [ 11.1.3 ] [ 11.2 ] [ 11.2.1 ] [ 11.2.2 ] [ 11.3.0 ] 

  1 // Copyright (C) 2010, Guy Barrand. All rights reserved.
  2 // See the file tools.license for terms.
  3 
  4 #ifndef tools_wroot_mpi_send_basket
  5 #define tools_wroot_mpi_send_basket
  6 
  7 #include "mpi_protocol"
  8 #include "../impi"
  9 #include "basket"
 10 
 11 namespace tools {
 12 namespace wroot {
 13 
 14 inline bool mpi_pack_basket(impi& a_mpi,uint32 a_icol,const basket& a_basket) {
 15   if(!a_mpi.pack(a_icol)) return false;
 16 
 17   if(!a_mpi.spack(a_basket.object_name())) return false;
 18   if(!a_mpi.spack(a_basket.object_title())) return false;
 19 
 20   if(!a_mpi.pack(a_basket.last())) return false;
 21   if(!a_mpi.pack(a_basket.nev_buf_size())) return false;
 22   if(!a_mpi.pack(a_basket.nev())) return false;
 23 
 24   if(a_basket.entry_offset()) {
 25     if(!a_mpi.bpack(true)) return false;
 26     if(!a_mpi.pack(a_basket.nev_buf_size(),a_basket.entry_offset())) return false;
 27   } else {
 28     if(!a_mpi.bpack(false)) return false;
 29   }
 30 
 31   if(a_basket.displacement()) {
 32     if(!a_mpi.bpack(true)) return false;
 33     if(!a_mpi.pack(a_basket.nev_buf_size(),a_basket.displacement())) return false;
 34   } else {
 35     if(!a_mpi.bpack(false)) return false;
 36   }
 37 
 38   if(!a_mpi.pack(a_basket.datbuf().length(),a_basket.datbuf().buf())) return false;
 39   return true;
 40 }
 41 
 42 inline bool mpi_send_basket(impi& a_mpi,int a_dest,int a_tag,uint32 a_id,uint32 a_icol,const basket& a_basket) {
 43   a_mpi.pack_reset();
 44   if(!a_mpi.pack(mpi_protocol_basket())) return false;
 45   if(!a_mpi.pack(a_id)) return false;
 46   if(!mpi_pack_basket(a_mpi,a_icol,a_basket)) return false;
 47   return a_mpi.send_buffer(a_dest,a_tag);
 48 }
 49 
 50 }}
 51 
 52 #endif