Log Apalache distribution-related verify messages only at --verbosi…

…ty >=4

quint/src/cliCommands.ts

@@ -649,8 +649,8 @@ export async function verifySpec(prev: TypecheckedStage): Promise<CLIProcedure<V
 
   const startMs = Date.now()
 
-  return verify(config).then(res => {
-    const verbosityLevel = !prev.args.out && !prev.args.outItf ? prev.args.verbosity : 0
+  const verbosityLevel = !prev.args.out && !prev.args.outItf ? prev.args.verbosity : 0
+  return verify(config, verbosityLevel).then(res => {
     const elapsedMs = Date.now() - startMs
     return res
       .map(_ => {

quint/src/quintVerifier.ts

@@ -31,6 +31,7 @@ import * as protobufDescriptor from 'protobufjs/ext/descriptor'
 import { setTimeout } from 'timers/promises'
 import { promisify } from 'util'
 import { ItfTrace } from './itf'
+import { verbosity } from './verbosity'
 // TODO: used by GitHub api approach: https://github.com/informalsystems/quint/issues/1124
 // import { request as octokitRequest } from '@octokit/request'
 
@@ -273,7 +274,6 @@ async function tryConnect(retry: boolean = false): Promise<VerifyResult<Apalache
 
 function downloadAndUnpackApalache(): Promise<VerifyResult<null>> {
   const url = `https://github.com/informalsystems/apalache/releases/download/v${APALACHE_VERSION_TAG}/apalache.tgz`
-  console.log(`Downloading Apalache distribution from ${url}...`)
   return fetch(url)
     .then(
       // unpack response body
@@ -293,14 +293,15 @@ function downloadAndUnpackApalache(): Promise<VerifyResult<null>> {
  *    - a `right<string>` equal to the path the Apalache dist was unpacked to,
  *    - a `left<VerifyError>` indicating an error.
  */
-async function fetchApalache(): Promise<VerifyResult<string>> {
+async function fetchApalache(verbosityLevel: number): Promise<VerifyResult<string>> {
   const apalacheBinary = path.join(apalacheDistDir(), 'apalache', 'bin', 'apalache-mc')
   if (fs.existsSync(apalacheBinary)) {
     // Use existing download
-    console.log(`Using existing Apalache distribution in ${apalacheBinary}`)
+    debugLog(verbosityLevel, `Using existing Apalache distribution in ${apalacheBinary}`)
     return right(apalacheBinary)
   } else {
     fs.mkdirSync(apalacheDistDir(), { recursive: true })
+    console.log(`Downloading Apalache distribution...`)
     const res = await downloadAndUnpackApalache()
     return res.map(_ => apalacheBinary)
   }
@@ -359,7 +360,7 @@ async function fetchApalache(): Promise<VerifyResult<string>> {
  *    - a `right<Apalache>` equal to the path the Apalache dist was unpacked to,
  *    - a `left<VerifyError>` indicating an error.
  */
-async function connect(): Promise<VerifyResult<Apalache>> {
+async function connect(verbosityLevel: number): Promise<VerifyResult<Apalache>> {
   // Try to connect to Shai, and try to ping it
   const connectionResult = await tryConnect()
   // We managed to connect, simply return this connection
@@ -368,26 +369,26 @@ async function connect(): Promise<VerifyResult<Apalache>> {
   }
 
   // Connection or pinging failed, download Apalache
-  console.log("Couldn't connect to Apalache, checking for latest supported release")
-  const exeResult = await fetchApalache()
+  debugLog(verbosityLevel, 'No running Apalache server found, launching...')
+  const exeResult = await fetchApalache(verbosityLevel)
   // Launch Apalache from download
   return exeResult
     .asyncChain(
       async exe =>
         new Promise<VerifyResult<void>>((resolve, _) => {
-          console.log('Launching Apalache server')
+          debugLog(verbosityLevel, 'Launching Apalache server')
           const apalache = child_process.spawn(exe, ['server'])
 
           // Exit handler that kills Apalache if Quint exists
           function exitHandler() {
-            console.log('Shutting down Apalache server')
+            debugLog(verbosityLevel, 'Shutting down Apalache server')
             try {
               process.kill(apalache.pid!)
             } catch (error: any) {
               // ESRCH is raised if no process with `pid` exists, i.e.,
               // if Apalache server exited on its own
               if (error.code == 'ESRCH') {
-                console.log('Apalache already exited')
+                debugLog(verbosityLevel, 'Apalache already exited')
               } else {
                 throw error
               }
@@ -414,6 +415,18 @@ async function connect(): Promise<VerifyResult<Apalache>> {
     .then(chain(() => tryConnect(true)))
 }
 
+/**
+ * Log `msg` to the console if `verbosityLevel` implies debug output.
+ *
+ * @param verbosityLevel  the current verbosity level (set with --verbosity)
+ * @param msg             the message to log
+ */
+function debugLog(verbosityLevel: number, msg: string) {
+  if (verbosity.hasDebugInfo(verbosityLevel)) {
+    console.log(msg)
+  }
+}
+
 /**
  * Verifies the configuration `config` by model checking it with the Apalache server
  *
@@ -422,7 +435,10 @@ async function connect(): Promise<VerifyResult<Apalache>> {
  *
  * @returns right(void) if verification succeeds, or left(err) explaining the failure
  */
-export async function verify(config: any): Promise<VerifyResult<void>> {
-  const connectionResult = await connect()
-  return connectionResult.asyncChain(conn => conn.check(config))
+export async function verify(config: any, verbosityLevel: number): Promise<VerifyResult<void>> {
+  const connectionResult = await connect(verbosityLevel)
+  return connectionResult.asyncChain(conn => {
+    console.log("Calling Apalache...")
+    return conn.check(config)
+  })
 }

quint/src/verbosity.ts

@@ -76,4 +76,11 @@ export const verbosity = {
   hasUserOpTracking: (level: number): boolean => {
     return level >= 3
   },
+
+  /**
+   * Shall the tool output debug info.
+   */
+  hasDebugInfo: (level: number): boolean => {
+    return level >= 4
+  },
 }