src/Pure/Admin/build_history.scala
changeset 73611 cc36841eeff6
parent 73609 58b17dca57ef
child 73671 7404f2e1d092
equal deleted inserted replaced
73610:6ba5f9d18c56 73611:cc36841eeff6
   530 
   530 
   531   def remote_build_history(
   531   def remote_build_history(
   532     ssh: SSH.Session,
   532     ssh: SSH.Session,
   533     isabelle_repos_self: Path,
   533     isabelle_repos_self: Path,
   534     isabelle_repos_other: Path,
   534     isabelle_repos_other: Path,
   535     isabelle_repository: Mercurial.Address = Isabelle_System.isabelle_repository,
   535     isabelle_repository: Mercurial.Server = Isabelle_System.isabelle_repository,
   536     afp_repository: Mercurial.Address = Isabelle_System.afp_repository,
   536     afp_repository: Mercurial.Server = Isabelle_System.afp_repository,
   537     isabelle_identifier: String = "remote_build_history",
   537     isabelle_identifier: String = "remote_build_history",
   538     self_update: Boolean = false,
   538     self_update: Boolean = false,
   539     progress: Progress = new Progress,
   539     progress: Progress = new Progress,
   540     rev: String = "",
   540     rev: String = "",
   541     afp_rev: Option[String] = None,
   541     afp_rev: Option[String] = None,
   543     args: String = ""): List[(String, Bytes)] =
   543     args: String = ""): List[(String, Bytes)] =
   544   {
   544   {
   545     /* Isabelle self repository */
   545     /* Isabelle self repository */
   546 
   546 
   547     val self_hg =
   547     val self_hg =
   548       Mercurial.setup_repository(isabelle_repository, isabelle_repos_self, ssh = ssh)
   548       Mercurial.setup_repository(isabelle_repository.root, isabelle_repos_self, ssh = ssh)
   549 
   549 
   550     def execute(cmd: String, args: String, echo: Boolean = false, strict: Boolean = true): Unit =
   550     def execute(cmd: String, args: String, echo: Boolean = false, strict: Boolean = true): Unit =
   551       ssh.execute(
   551       ssh.execute(
   552         Isabelle_System.export_isabelle_identifier(isabelle_identifier) +
   552         Isabelle_System.export_isabelle_identifier(isabelle_identifier) +
   553           ssh.bash_path(isabelle_repos_self + Path.explode(cmd)) + " " + args,
   553           ssh.bash_path(isabelle_repos_self + Path.explode(cmd)) + " " + args,
   579 
   579 
   580     val afp_options =
   580     val afp_options =
   581       if (afp_rev.isEmpty) ""
   581       if (afp_rev.isEmpty) ""
   582       else {
   582       else {
   583         val afp_repos = isabelle_repos_other + Path.explode("AFP")
   583         val afp_repos = isabelle_repos_other + Path.explode("AFP")
   584         Mercurial.setup_repository(afp_repository, afp_repos, ssh = ssh)
   584         Mercurial.setup_repository(afp_repository.root, afp_repos, ssh = ssh)
   585         " -A " + Bash.string(afp_rev.get)
   585         " -A " + Bash.string(afp_rev.get)
   586       }
   586       }
   587 
   587 
   588 
   588 
   589     /* Admin/build_history */
   589     /* Admin/build_history */