# HG changeset patch
# User wenzelm
# Date 1494352624 -7200
# Node ID 91940684a2676b850548b7737df94486fcee8671
# Parent  fccd7be5fa5579b5377151a8bccf6b8463da8ff9
obsolete;

diff -r fccd7be5fa55 -r 91940684a267 Admin/jenkins/build/ci_build_stats.scala
--- a/Admin/jenkins/build/ci_build_stats.scala	Tue May 09 19:52:39 2017 +0200
+++ b/Admin/jenkins/build/ci_build_stats.scala	Tue May 09 19:57:04 2017 +0200
@@ -1,3 +1,5 @@
+// FIXME obsolete
+
 object stats extends isabelle.Isabelle_Tool.Body {
 
   import isabelle._
@@ -26,7 +28,7 @@
     println(s"=== $job ===")
 
     val dir = target_dir + Path.basic(job)
-    val sessions = Build_Stats_Legacy.present_job(job, dir)
+    val sessions: List[String] = Nil
 
     val sections =
       cat_lines(
diff -r fccd7be5fa55 -r 91940684a267 src/Pure/Admin/build_stats_legacy.scala
--- a/src/Pure/Admin/build_stats_legacy.scala	Tue May 09 19:52:39 2017 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,111 +0,0 @@
-/*  Title:      Pure/Admin/build_stats_legacy.scala
-    Author:     Makarius
-
-Statistics from session build output.
-*/
-
-package isabelle
-
-
-object Build_Stats_Legacy
-{
-  /* presentation */
-
-  private val default_history_length = 100
-  private val default_size = (800, 600)
-  private val default_only_sessions = Set.empty[String]
-  private val default_elapsed_threshold = Time.zero
-  private val default_ml_timing: Option[Boolean] = None
-
-  def present_job(job: String, dir: Path,
-    history_length: Int = default_history_length,
-    size: (Int, Int) = default_size,
-    only_sessions: Set[String] = default_only_sessions,
-    elapsed_threshold: Time = default_elapsed_threshold,
-    ml_timing: Option[Boolean] = default_ml_timing): List[String] =
-  {
-    val job_infos = Jenkins.build_job_infos(job).take(history_length)
-    if (job_infos.isEmpty) error("No build infos for job " + quote(job))
-
-    val all_infos =
-      Par_List.map((info: Jenkins.Job_Info) =>
-        {
-          val log_file = Build_Log.Log_File(info.log_filename.implode, Url.read(info.main_log))
-          (info.date, log_file.parse_build_info())
-        }, job_infos)
-    val all_sessions =
-      (Set.empty[String] /: all_infos)(
-        { case (s, (_, info)) => s ++ info.sessions.keySet })
-
-    def check_threshold(info: Build_Log.Build_Info, session: String): Boolean =
-    {
-      val t = info.timing(session)
-      !t.is_zero && t.elapsed >= elapsed_threshold
-    }
-
-    val sessions =
-      for {
-        session <- (if (only_sessions.isEmpty) all_sessions else all_sessions & only_sessions)
-        if all_infos.filter({ case (_, info) => check_threshold(info, session) }).length >= 3
-      } yield session
-
-    Isabelle_System.mkdirs(dir)
-    for (session <- sessions) {
-      Isabelle_System.with_tmp_file(session, "png") { data_file =>
-        Isabelle_System.with_tmp_file(session, "gnuplot") { plot_file =>
-          val data =
-            for { (date, info) <- all_infos if info.finished(session) }
-            yield {
-              val timing1 = info.timing(session)
-              val timing2 = info.ml_timing(session)
-              List(date.unix_epoch.toString,
-                timing1.elapsed.minutes,
-                timing1.cpu.minutes,
-                timing2.elapsed.minutes,
-                timing2.cpu.minutes,
-                timing2.gc.minutes).mkString(" ")
-            }
-          File.write(data_file, cat_lines(data))
-
-          val plots1 =
-            List(
-              """ using 1:3 smooth sbezier title "cpu time (smooth)" """,
-              """ using 1:3 smooth csplines title "cpu time" """,
-              """ using 1:2 smooth sbezier title "elapsed time (smooth)" """,
-              """ using 1:2 smooth csplines title "elapsed time" """)
-          val plots2 =
-            List(
-              """ using 1:5 smooth sbezier title "ML cpu time (smooth)" """,
-              """ using 1:5 smooth csplines title "ML cpu time" """,
-              """ using 1:4 smooth sbezier title "ML elapsed time (smooth)" """,
-              """ using 1:4 smooth csplines title "ML elapsed time" """,
-              """ using 1:6 smooth sbezier title "ML gc time (smooth)" """,
-              """ using 1:6 smooth csplines title "ML gc time" """)
-          val plots =
-            ml_timing match {
-              case None => plots1
-              case Some(false) => plots1 ::: plots2
-              case Some(true) => plots2
-            }
-
-          File.write(plot_file, """
-set terminal png size """ + size._1 + "," + size._2 + """
-set output """ + quote(File.standard_path(dir + Path.basic(session + ".png"))) + """
-set xdata time
-set timefmt "%s"
-set format x "%d-%b"
-set xlabel """ + quote(session) + """ noenhanced
-set key left top
-plot [] [0:] """ + plots.map(s => quote(data_file.implode) + " " + s).mkString(", ") + "\n")
-          val result = Isabelle_System.bash("\"$ISABELLE_GNUPLOT\" " + File.bash_path(plot_file))
-          if (result.rc != 0) {
-            Output.error_message("Session " + session + ": gnuplot error")
-            result.print
-          }
-        }
-      }
-    }
-
-    sessions.toList.sorted
-  }
-}
diff -r fccd7be5fa55 -r 91940684a267 src/Pure/build-jars
--- a/src/Pure/build-jars	Tue May 09 19:52:39 2017 +0200
+++ b/src/Pure/build-jars	Tue May 09 19:57:04 2017 +0200
@@ -17,7 +17,6 @@
   Admin/build_log.scala
   Admin/build_polyml.scala
   Admin/build_release.scala
-  Admin/build_stats_legacy.scala
   Admin/build_status.scala
   Admin/check_sources.scala
   Admin/ci_profile.scala