mhrwtasks.h

Go to the documentation of this file.

/* This file is part of the Tomographer project, which is distributed under the
 * terms of the MIT license.
 *
 * The MIT License (MIT)
 *
 * Copyright (c) 2016 ETH Zurich, Institute for Theoretical Physics, Philippe Faist
 * Copyright (c) 2017 Caltech, Institute for Quantum Information and Matter, Philippe Faist
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 * SOFTWARE.
 */

#ifndef TOMOGRAPHER_MHWALKER_TASKS_H
#define TOMOGRAPHER_MHWALKER_TASKS_H

#include <climits>

#include <string>
#include <limits>
#include <random>
#include <sstream>

#include <tomographer/tools/fmt.h>
#include <tomographer/tools/needownoperatornew.h>
#include <tomographer/mhrw.h>
#include <tomographer/mhrwstatscollectors.h>
#include <tomographer/multiproc.h> // StatusReport Base


namespace Tomographer {
namespace MHRWTasks {


namespace tomo_internal {
// template<typename UIntType>
// struct bits_interleaved {
//   // interleaves the first (lowest weight) HalfNBits of x and of y to yield a
//   // (2*HalfNBits)-bit number
//   template<int HalfNBits, int I = 0,
//            TOMOGRAPHER_ENABLED_IF_TMPL(I < HalfNBits)>
//   static inline constexpr UIntType interleave(const UIntType x, const UIntType y) {
//     return ((x>>I)&0x1) | (((y>>I)&0x1)<<1) | interleave<HalfNBits, I+1>(x, y) << 2;
//   }
//   template<int HalfNBits, int I = 0,
//            TOMOGRAPHER_ENABLED_IF_TMPL(I == HalfNBits)>
//   static inline constexpr UIntType interleave(const UIntType , const UIntType ) {
//     return 0;
//   }
// };
// // generate a permutation of the bits of UIntType which maps integers 0...k to slightly
// // better seeds for each task's rng (spanning more of the seed bits)
// //
// // Despite the name, the permutation is always the same.
// template<typename UIntType, int NBits = sizeof(UIntType)*CHAR_BIT, typename = void>
// struct kinda_random_bits_perm {
//   TOMO_STATIC_ASSERT_EXPR(!std::is_signed<UIntType>::value) ;
//   // take the NBits least significant digits and apply the permutation to them
//   static inline constexpr UIntType apply(UIntType x);
// };
// // implementation for NBits=4
// template<typename UIntType>
// struct kinda_random_bits_perm<UIntType,4,void> {
//   TOMO_STATIC_ASSERT_EXPR(!std::is_signed<UIntType>::value) ;
//   static inline constexpr UIntType apply(UIntType x)
//   {
//     // take the NBits least significant digits and apply the permutation to them
//     return  ( (x&0x1)<<2 | ((x>>1)&0x1)<<0 | ((x>>2)&0x1)<<3 | ((x>>3)&0x1)<<1 ) ;
//   }
// };
// // implementation for NBits divisible by 8: apply the permutation to each halves of the
// // number and interleave them
// template<typename UIntType, int NBits>
// struct kinda_random_bits_perm<UIntType, NBits, // NBits can be divided by 8:
//                               typename std::enable_if<(NBits&(0x7))==0, void>::type>
// {
//   TOMO_STATIC_ASSERT_EXPR(!std::is_signed<UIntType>::value) ;
//   // take the NBits least significant digits and apply the permutation to them
//   static inline constexpr UIntType apply(UIntType x)
//   {
//     // // left block of bits of the number is given by x>>(NBits/2)  with NBits/2==NBits>>1
//     // // right block of bits fo the number is given by x & MASK with MASK =  ((1<<HalfNBits)-1)
//     // constexpr int HalfNBits = (NBits>>1);
//     // constexpr UIntType x1 = kinda_random_bits_perm<UIntType,HalfNBits>::apply(x >> HalfNBits) ;
//     // constexpr UIntType x2 = kinda_random_bits_perm<UIntType,HalfNBits>::apply(x & ((1<<HalfNBits)-1)) ;
//     // // now, interleave the HalfNBits of x1 and of x2
//     // return bits_interleaved<UIntType>::interleave<HalfNBits>(x1,x2);
//     return bits_interleaved<UIntType>::template interleave<(NBits>>1)>(
//         kinda_random_bits_perm<UIntType,(NBits>>1)>::apply(x >> (NBits>>1)) ,
//         kinda_random_bits_perm<UIntType,(NBits>>1)>::apply(x & ((UIntType(1)<<(NBits>>1))-1))
//         );
//   }
// };

} // namespace tomo_internal





template<typename MHWalkerParams_, typename IterCountIntType_ = int,
         typename RngSeedType_ = std::mt19937::result_type>
struct TOMOGRAPHER_EXPORT CDataBase
{
  typedef IterCountIntType_ IterCountIntType;
  typedef MHWalkerParams_ MHWalkerParams;

  typedef RngSeedType_ RngSeedType;

  typedef MHRWParams<MHWalkerParams, IterCountIntType> MHRWParamsType;


  template<typename MHRWParamsType>
  CDataBase(MHRWParamsType&& p, RngSeedType base_seed_)
    : mhrw_params(std::forward<MHRWParamsType>(p)),
      base_seed(base_seed_)
  {
  }

  const MHRWParamsType mhrw_params;

  const RngSeedType base_seed;

  template<typename TaskNoCountIntType>
  inline RngSeedType getTaskInput(TaskNoCountIntType k) const
  {
    // empirically it's noticeably better to feed the RNG sequential numbers rather than
    // try to shuffle bits around (!!)
    return (RngSeedType)k;
  }


  inline void printBasicCDataMHRWInfo(std::ostream & str) const
  {
    str << "\tstep            : " << std::setprecision(4) << mhrw_params.mhwalker_params << "\n"
        << "\t# iter. / sweep = " << mhrw_params.n_sweep << "\n"
        << "\t# therm. sweeps = " << mhrw_params.n_therm << "\n"
        << "\t# run sweeps    = " << mhrw_params.n_run << "\n";
  }

  inline std::string getBasicCDataMHRWInfo() const
  {
    std::ostringstream ss;
    printBasicCDataMHRWInfo(ss);
    return ss.str();
  }
};








template<typename MHRWStatsResultsType_, typename IterCountIntType, typename MHWalkerParams>
struct TOMOGRAPHER_EXPORT MHRandomWalkTaskResult
  : public virtual Tools::NeedOwnOperatorNew<MHRWStatsResultsType_>::ProviderType
{
  typedef MHRWStatsResultsType_ MHRWStatsResultsType;
    
  typedef MHRWParams<MHWalkerParams, IterCountIntType> MHRWParamsType;
    
  // /** \brief Construct an empty task result
  //  *
  //  */
  // MHRandomWalkTaskResult()
  //   : stats_results(), mhrw_params(),
  //     acceptance_ratio(std::numeric_limits<double>::quiet_NaN())
  // {
  // }

  template<typename MHRWStatsResultsTypeInit,
           typename MHRWParamsTypeInit>
  MHRandomWalkTaskResult(MHRWStatsResultsTypeInit && stats_results_,
                         MHRWParamsTypeInit && mhrw_params_,
                         double acceptance_ratio_)
    : stats_results(std::forward<MHRWStatsResultsTypeInit>(stats_results_)),
      mhrw_params(std::forward<MHRWParamsTypeInit>(mhrw_params_)),
      acceptance_ratio(acceptance_ratio_)
  {
  }

  template<typename MHRWStatsResultsTypeInit, typename MHRandomWalkType>
  MHRandomWalkTaskResult(MHRWStatsResultsTypeInit && stats_results_,
                         const MHRandomWalkType & mhrandomwalk)
    : stats_results(std::forward<MHRWStatsResultsTypeInit>(stats_results_)),
      mhrw_params(mhrandomwalk.mhrwParams()),
      acceptance_ratio(mhrandomwalk.hasAcceptanceRatio() ?
                       mhrandomwalk.acceptanceRatio() :
                       std::numeric_limits<double>::quiet_NaN())
  {
  }
    
  MHRWStatsResultsType stats_results;
    
  MHRWParamsType mhrw_params;

  double acceptance_ratio;


  MHRandomWalkTaskResult(MHRandomWalkTaskResult && ) = default;
  MHRandomWalkTaskResult(const MHRandomWalkTaskResult & ) = default;
};




template<typename MHRandomWalkTaskCData,
         typename Rng = std::mt19937>
struct TOMOGRAPHER_EXPORT MHRandomWalkTask
{
  typedef typename MHRandomWalkTaskCData::IterCountIntType IterCountIntType;
  typedef typename MHRandomWalkTaskCData::MHWalkerParams MHWalkerParams;

  typedef MHRWParams<MHWalkerParams, IterCountIntType> MHRWParamsType;

  typedef MHRandomWalkTaskResult<typename MHRandomWalkTaskCData::MHRWStatsResultsType,
                                 IterCountIntType, MHWalkerParams> ResultType;

  typedef MHRWStatusReport<MHRWParamsType> StatusReportType;

private:
  typename Rng::result_type _seed;

  ResultType * result;


public:

  template<typename LoggerType>
  MHRandomWalkTask(typename Rng::result_type inputseed, const MHRandomWalkTaskCData * /*pcdata*/,
                   LoggerType & logger)
    : _seed(inputseed), result(NULL)
  {
    logger.longdebug("MHRandomWalkTask", [&](std::ostream & stream) { stream << "() inputseed=" << inputseed; });
  }

  ~MHRandomWalkTask()
  {
    if (result != NULL) {
      delete result;
    }
  }

private:

  template<typename LoggerType, typename TaskMgrIface>
  struct RunInnerCallable
  {
    const MHRandomWalkTaskCData * pcdata;
    Rng & rng;
    LoggerType & baselogger;
    TaskMgrIface * tmgriface;

    ResultType ** ppresult;

    RunInnerCallable(const MHRandomWalkTaskCData * pcdata_, Rng & rng_, LoggerType & logger_,
                     TaskMgrIface * tmgriface_, ResultType ** ppresult_)
      : pcdata(pcdata_), rng(rng_), baselogger(logger_), tmgriface(tmgriface_), ppresult(ppresult_)
    {
    }
    ~RunInnerCallable() {
    }

    template<typename MHWalkerType, typename MHRWStatsCollectorType, typename MHRWControllerType>
    inline void operator()(MHWalkerType & mhwalker, MHRWStatsCollectorType & stats,
                           MHRWControllerType & controller)
    {
      // here we actually run the stuff

      auto logger = Logger::makeLocalLogger("Tomographer::MHRWTasks::MHRandomWalkTask::run()/run", baselogger);

      // our own "stats collector" which checks if we need to send a status report back
      typedef PredStatusReportMHRWStatsCollector<MHRWParamsType> OurStatusReportCheck;
      OurStatusReportCheck statreportcheck(
          // predicate
          [&]() { return this->tmgriface->statusReportRequested(); },
          // send-status-function
          [&](StatusReportType report) { this->tmgriface->submitStatusReport(std::move(report)); }
          );

      typedef MultipleMHRWStatsCollectors<MHRWStatsCollectorType, OurStatusReportCheck>
        OurStatsCollectors;
      OurStatsCollectors ourstatscollectors(stats, statreportcheck);

      logger.longdebug("About to creat MHRandomWalk instance");

      typedef MHRandomWalk<Rng,MHWalkerType,OurStatsCollectors,MHRWControllerType,LoggerType,IterCountIntType>
        MHRandomWalkType;

      MHRandomWalkType rwalk(
          // MH random walk parameters
          pcdata->mhrw_params,
          // the MHWalker
          mhwalker,
          // our stats collectors
          ourstatscollectors,
          // the random walk controller
          controller,
          // a random number generator
          rng,
          // and a logger
          baselogger
          );
      
      logger.longdebug("MHRandomWalk object created, running...");

      rwalk.run();

      logger.longdebug("MHRandomWalk run finished.");

      *ppresult = new ResultType(stats.stealResult(), rwalk);
    }

    template<typename MHWalkerType, typename MHRWStatsCollectorType>
    inline void operator()(MHWalkerType & mhwalker, MHRWStatsCollectorType & stats)
    {
      MHRWNoController ctrl;
      operator()<MHWalkerType, MHRWStatsCollectorType, MHRWNoController>(mhwalker, stats, ctrl) ;
    }
  };


public:
  template<typename LoggerType, typename TaskManagerIface>
  inline void run(const MHRandomWalkTaskCData * pcdata, LoggerType & baselogger, TaskManagerIface * tmgriface)
  {
    auto logger = Logger::makeLocalLogger("Tomographer::MHRWTasks::MHRandomWalkTask::run()", baselogger) ;

    Rng rng(_seed); // seeded random number generator

    RunInnerCallable<LoggerType, TaskManagerIface> run_object(pcdata, rng, baselogger, tmgriface, &result);

    pcdata->setupRandomWalkAndRun(rng, baselogger, run_object);
  }

  inline ResultType getResult() const
  {
    return *result;
  }

  inline ResultType stealResult()
  {
    return std::move(*result);
  }
};



} // namespace MHRWTasks



} // namespace Tomographer



#endif