Fix loop in extension

package.json

@@ -0,0 +1,5 @@
+{
+  "dependencies": {
+    "kill-process-by-name": "^1.0.5"
+  }
+}

vs-code-extension/Cobol-check/scripts/windows_gnucobol_run_tests.cmd

@@ -4,7 +4,4 @@ rem
 rem  Assumptions:
 rem
 rem GnuCOBOL 3.+ is installed and on the path. Its executable or alias or symlink is named "cobc".
-%~d1
-cd %~p1
-cobc -xj %* 
-%~n1
+cobc -xj %* 

vs-code-extension/client/src/services/CobolCheckLauncher.ts

@@ -3,6 +3,9 @@ import { integer } from 'vscode-languageclient';
 import * as LOGGER from '../utils/Logger'
 import * as CobParser from './CobolCheckOutputParser'
 import { getConfigurationValueFor } from './CobolCheckConfiguration';
+import { subProcess, subProcessSync } from 'subspawn';
+
+
 
 const windowsPlatform = 'Windows';
 const macPlatform = 'MacOS';
@@ -71,7 +74,7 @@ export function getCobolCheckRunArgumentsBasedOnSuiteDirectory(vsCodeInstallPath
 }
 
 export async function runCobolCheck(path : string, commandLineArgs : string) : Promise<CobParser.CobolCheckOutputParser> {
-	return new Promise(async resolve => {
+	return new Promise(async (resolve, reject) => {
 		// Getting the right command based on platform
 		let executeJarCommand = '';
 		if (currentPlatform === windowsPlatform){
@@ -86,15 +89,21 @@ export async function runCobolCheck(path : string, commandLineArgs : string) : P
 
 		LOGGER.log("Running Cobol Check with arguments: " + commandLineArgs, LOGGER.INFO)
 		try{
+			var killProcess = require('kill-process-by-name');
+			let maxWaitMillisec = vscode.workspace.getConfiguration("cut").maxWaitTime;
+			LOGGER.log("MAX WAIT TIME SET TO: " + maxWaitMillisec, LOGGER.INFO);
 			var exec = require('child_process').exec;
 			const testPath = appendPath(externalVsCodeInstallationDir, "Cobol-check");
 			// fix for MacOS
 			const tmpStr = "cd " + testPath + " && "
+
 			//Run Cobol Check jar with arguments
-			var child = exec(tmpStr + executeJarCommand + ' ' + commandLineArgs, (error : string, stdout : string, stderr : string) => {
+			var child = exec(tmpStr + executeJarCommand + ' ' + commandLineArgs, {timeout:maxWaitMillisec}, (error : string, stdout : string, stderr : string) => {
 				if(error !== null){
 					LOGGER.log("*** COBOL CHECK ERROR: " + error, LOGGER.ERROR);
 				}
+				killProcess('cobc');
+				LOGGER.log("child.pid: " + child.pid, LOGGER.INFO);
 				LOGGER.log("Cobol Check out:\n" + stdout, LOGGER.INFO)
 				LOGGER.log("Cobol Check log:\n" + stderr, LOGGER.INFO)
 				resolve(new CobParser.CobolCheckOutputParser(stdout, stderr, error))

vs-code-extension/package.json

@@ -26,7 +26,8 @@
     ],
     "main": "./client/out/extension",
     "contributes": {
-        "languages": [            {
+        "languages": [
+            {
                 "id": "cut",
                 "aliases": [
                     "COBOL unit test",
@@ -55,6 +56,11 @@
             "type": "object",
             "title": "COBOL unit test syntax",
             "properties": {
+                "cut.maxWaitTime": {
+                    "type": "number",
+                    "default": 5000,
+                    "description": "Max wait time before kill the process."
+                },
                 "cut.maxNumberOfProblems": {
                     "scope": "resource",
                     "type": "number",
@@ -186,6 +192,8 @@
         "typescript": "^4.9.5"
     },
     "dependencies": {
-        "@types/vscode-webview": "^1.57.0"
+        "@types/vscode-webview": "^1.57.0",
+        "kill-process-by-name": "^1.0.5",
+        "subspawn": "^1.0.2"
     }
 }