initial commit

2026-10-22 09:23:54 +08:00
commit 63f557a39f
4448 changed files with 584487 additions and 0 deletions
@@ -0,0 +1,61 @@
+//=====================================================
+// File   :  bench_static.hh
+// Author :  L. Plagne <laurent.plagne@edf.fr)>
+// Copyright (C) EDF R&D,  lun sep 30 14:23:16 CEST 2002
+//=====================================================
+//
+// This program is free software; you can redistribute it and/or
+// modify it under the terms of the GNU General Public License
+// as published by the Free Software Foundation; either version 2
+// of the License, or (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
+//
+#ifndef BENCH_STATIC_HH
+#define BENCH_STATIC_HH
+
+#include "btl.hh"
+#include "bench_parameter.hh"
+#include <iostream>
+#include "utilities.h"
+#include "xy_file.hh"
+#include "static/static_size_generator.hh"
+#include "timers/portable_perf_analyzer.hh"
+// #include "timers/mixed_perf_analyzer.hh"
+// #include "timers/x86_perf_analyzer.hh"
+
+using namespace std;
+
+template <template <class> class Perf_Analyzer, template <class> class Action, template <class, int> class Interface>
+BTL_DONT_INLINE void bench_static(void) {
+  if (BtlConfig::skipAction(Action<Interface<REAL_TYPE, 10> >::name())) return;
+
+  string filename = "bench_" + Action<Interface<REAL_TYPE, 10> >::name() + ".dat";
+
+  INFOS("starting " << filename);
+
+  const int max_size = TINY_MV_MAX_SIZE;
+
+  std::vector<double> tab_mflops;
+  std::vector<double> tab_sizes;
+
+  static_size_generator<max_size, Perf_Analyzer, Action, Interface>::go(tab_sizes, tab_mflops);
+
+  dump_xy_file(tab_sizes, tab_mflops, filename);
+}
+
+// default Perf Analyzer
+template <template <class> class Action, template <class, int> class Interface>
+BTL_DONT_INLINE void bench_static(void) {
+  bench_static<Portable_Perf_Analyzer, Action, Interface>();
+  // bench_static<Mixed_Perf_Analyzer,Action,Interface>();
+  // bench_static<X86_Perf_Analyzer,Action,Interface>();
+}
+
+#endif
@@ -0,0 +1,60 @@
+//=====================================================
+// File   :  intel_bench_fixed_size.hh
+// Author :  L. Plagne <laurent.plagne@edf.fr)>
+// Copyright (C) EDF R&D,  mar déc 3 18:59:37 CET 2002
+//=====================================================
+//
+// This program is free software; you can redistribute it and/or
+// modify it under the terms of the GNU General Public License
+// as published by the Free Software Foundation; either version 2
+// of the License, or (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
+//
+#ifndef _BENCH_FIXED_SIZE_HH_
+#define _BENCH_FIXED_SIZE_HH_
+
+#include "utilities.h"
+#include "function_time.hh"
+
+template <class Action>
+double bench_fixed_size(int size, unsigned long long& nb_calc, unsigned long long& nb_init) {
+  Action action(size);
+
+  double time_baseline = time_init(nb_init, action);
+
+  while (time_baseline < MIN_TIME) {
+    // INFOS("nb_init="<<nb_init);
+    // INFOS("time_baseline="<<time_baseline);
+    nb_init *= 2;
+    time_baseline = time_init(nb_init, action);
+  }
+
+  time_baseline = time_baseline / (double(nb_init));
+
+  double time_action = time_calculate(nb_calc, action);
+
+  while (time_action < MIN_TIME) {
+    nb_calc *= 2;
+    time_action = time_calculate(nb_calc, action);
+  }
+
+  INFOS("nb_init=" << nb_init);
+  INFOS("nb_calc=" << nb_calc);
+
+  time_action = time_action / (double(nb_calc));
+
+  action.check_result();
+
+  time_action = time_action - time_baseline;
+
+  return action.nb_op_base() / (time_action * 1000000.0);
+}
+
+#endif
@@ -0,0 +1,52 @@
+//=====================================================
+// File   :  static_size_generator.hh
+// Author :  L. Plagne <laurent.plagne@edf.fr)>
+// Copyright (C) EDF R&D,  mar déc 3 18:59:36 CET 2002
+//=====================================================
+//
+// This program is free software; you can redistribute it and/or
+// modify it under the terms of the GNU General Public License
+// as published by the Free Software Foundation; either version 2
+// of the License, or (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
+//
+#ifndef _STATIC_SIZE_GENERATOR_HH
+#define _STATIC_SIZE_GENERATOR_HH
+#include <vector>
+
+using namespace std;
+
+// recursive generation of statically defined matrix and vector sizes
+
+template <int SIZE, template <class> class Perf_Analyzer, template <class> class Action,
+          template <class, int> class Interface>
+struct static_size_generator {
+  static void go(vector<double>& tab_sizes, vector<double>& tab_mflops) {
+    tab_sizes.push_back(SIZE);
+    std::cout << tab_sizes.back() << " \t" << std::flush;
+    Perf_Analyzer<Action<Interface<REAL_TYPE, SIZE> > > perf_action;
+    tab_mflops.push_back(perf_action.eval_mflops(SIZE));
+    std::cout << tab_mflops.back() << " MFlops" << std::endl;
+    static_size_generator<SIZE - 1, Perf_Analyzer, Action, Interface>::go(tab_sizes, tab_mflops);
+  };
+};
+
+// recursion end
+
+template <template <class> class Perf_Analyzer, template <class> class Action, template <class, int> class Interface>
+struct static_size_generator<1, Perf_Analyzer, Action, Interface> {
+  static void go(vector<double>& tab_sizes, vector<double>& tab_mflops) {
+    tab_sizes.push_back(1);
+    Perf_Analyzer<Action<Interface<REAL_TYPE, 1> > > perf_action;
+    tab_mflops.push_back(perf_action.eval_mflops(1));
+  };
+};
+
+#endif