Various fixes to work on Windows

Author: eliericha

Makefile

@@ -10,12 +10,21 @@ BUILD_DATE ?=
 # Location of home dir for tests
 export ALS_HOME=$(ROOTDIR)/testsuite
 
+# Exectuable extension
+ifeq ($(OS),)
+  # Not Windows
+  EXE=""
+else
+  # Windows
+  EXE=.exe
+endif
+
 # Command to run for tests
-export ALS=$(ROOTDIR)/.obj/server/ada_language_server
+export ALS=$(ROOTDIR)/.obj/server/ada_language_server$(EXE)
 
 # Tester files
-TESTER=$(ROOTDIR)/.obj/tester/tester-run
-CODEC_TEST=.obj/codec_test/codec_test
+TESTER=$(ROOTDIR)/.obj/tester/tester-run$(EXE)
+CODEC_TEST=.obj/codec_test/codec_test$(EXE)
 
 # Env variable to set for update VS Code test references
 MOCHA_ALS_UPDATE=
@@ -156,7 +165,6 @@ endif
 
 vscode-test:
 	# Run the VS Code integration testsuite.
-	echo $(GPR_PROJECT_PATH)
 	MOCHA_ALS_UPDATE=$(MOCHA_ALS_UPDATE) cd integration/vscode/ada; LD_LIBRARY_PATH= npm run test
 
 vscode-package:

integration/vscode/ada/package.json

@@ -635,14 +635,14 @@
         "vscode-tmgrammar-test": "0.1.1"
     },
     "scripts": {
-        "check-licenses": "npx license-checker-rseidelsohn --summary --onlyAllow '0BSD;Apache-2.0;BSD-2-Clause;BSD-3-Clause;BlueOak-1.0.0;CC0-1.0;GPL-3.0;GPL-3.0-or-later;ISC;MIT;Python-2.0;Zlib'",
+        "check-licenses": "npx license-checker-rseidelsohn --summary --onlyAllow \"0BSD;Apache-2.0;BSD-2-Clause;BSD-3-Clause;BlueOak-1.0.0;CC0-1.0;GPL-3.0;GPL-3.0-or-later;ISC;MIT;Python-2.0;Zlib\"",
         "vscode:prepublish": "npm run esbuild-base -- --minify",
         "esbuild-base": "esbuild ./src/extension.ts --bundle --outfile=out/src/extension.js --external:vscode --format=cjs --platform=node",
         "compile": "node ./node_modules/typescript/bin/tsc",
         "watch": "node ./node_modules/typescript/bin/tsc -watch",
         "pretest": "npm run compile",
-        "lint": "eslint './src/**/*.{js,ts,tsx}' --quiet --fix",
-        "cilint": "eslint './src/**/*.{js,ts,tsx}'",
+        "lint": "eslint \"./src/**/*.{js,ts,tsx}\" --quiet --fix",
+        "cilint": "eslint \"./src/**/*.{js,ts,tsx}\"",
         "test": "node ./out/test/runTest.js"
     },
     "dependencies": {

integration/vscode/ada/src/helpers.ts

@@ -205,15 +205,8 @@ type ExecutablesResponse = {
  * @returns a string contains the path of the project file
  */
 export async function getProjectFile(client: LanguageClient): Promise<string> {
-    const configValue: string | undefined = vscode.workspace
-        .getConfiguration('ada')
-        .get('projectFile');
-    if (configValue != undefined && configValue != '') {
-        return configValue;
-    } else {
-        const result: ProjectFileResponse = await client.sendRequest('$/glsProjectFile');
-        return result.projectFile;
-    }
+    const result: ProjectFileResponse = await client.sendRequest('$/glsProjectFile');
+    return result.projectFile;
 }
 
 /**

integration/vscode/ada/test/suite/general/tasks.test.ts

@@ -1,5 +1,6 @@
 import * as vscode from 'vscode';
 import * as assert from 'assert';
+import * as path from 'path';
 import { suite, test } from 'mocha';
 import { contextClients } from '../../../src/extension';
 import { activate } from '../utils';
@@ -43,15 +44,19 @@ suite('GPR Tasks Provider', function () {
     test('Tasks resolving', async () => {
         const prov = new GprTaskProvider(contextClients.adaClient);
         const task = new vscode.Task(
-            { type: 'gpr', main: 'src/program.adb' },
+            { type: 'gpr', main: path.join('src', 'program.adb') },
             'build main',
             'tasks'
         );
         const workspace = vscode.workspace.workspaceFolders?.at(0)?.uri.fsPath;
         if (workspace == undefined) {
             throw new Error('No workspace found');
         }
-        const expectedCmd = `gprbuild -d -P ${workspace}/default.gpr src/program.adb `;
+        const expectedCmd =
+            'gprbuild -d -P ' +
+            path.join(workspace, 'default.gpr') +
+            ' ' +
+            path.join('src', 'program.adb ');
         const resolved = await prov.resolveTask(task);
         assert.notStrictEqual(resolved, undefined);
         if (resolved != undefined && resolved.execution) {

integration/vscode/ada/test/suite/gnattest/gnattest.test.ts

@@ -14,20 +14,14 @@ suite('GNATtest Integration Tests', function () {
     });
     test('Generate Tests', async () => {
         await contextClients.adaClient.onReady();
-        const projectFile = vscode.workspace.asRelativePath(
-            await getProjectFile(contextClients.adaClient)
-        );
-        if (vscode.workspace.workspaceFolders) {
-            const fpath = path.join(vscode.workspace.workspaceFolders[0].uri.path, projectFile);
-            cp.execSync('gnattest -P ' + fpath, { timeout: 60000 });
-        } else {
-            throw new Error('No workspace folder found for the specified URI');
-        }
+        const projectFile = await getProjectFile(contextClients.adaClient);
+        // Generate tests and redirect the stderr to stdout if command failed
+        cp.execSync('gnattest -P ' + projectFile + ' 2>&1', { timeout: 60000 });
     });
     test('Build & Run the tests', () => {
         if (vscode.workspace.workspaceFolders) {
             const ext: string = process.platform == 'win32' ? '.exe' : '';
-            const cwd = vscode.workspace.workspaceFolders[0].uri.path;
+            const cwd = vscode.workspace.workspaceFolders[0].uri.fsPath;
 
             cp.execSync(
                 'gprbuild -P ' + path.join(cwd, 'obj', 'gnattest', 'harness', 'test_driver.gpr'),
@@ -57,7 +51,7 @@ suite('GNATtest Integration Tests', function () {
     });
     test('Read & Parse & compare the results', async () => {
         if (vscode.workspace.workspaceFolders) {
-            const cwd = vscode.workspace.workspaceFolders[0].uri.path;
+            const cwd = vscode.workspace.workspaceFolders[0].uri.fsPath;
             const resultPath = path.join(cwd, 'obj', 'gnattest', 'result.txt');
             const result = await gnattest.readResultFile(resultPath);
             assert.notStrictEqual(

integration/vscode/ada/test/suite/utils.ts

@@ -17,6 +17,9 @@ import { existsSync, readFileSync, writeFileSync } from 'fs';
  * @param expectedUri - path to the file containing the expected output
  */
 export function assertEqualToFileContent(actual: string, expectedUri: vscode.Uri) {
+    // Normalize the actual string
+    actual = normalizeLineEndings(actual);
+
     if (update()) {
         writeFileSync(expectedUri.fsPath, actual);
     } else {
@@ -25,10 +28,15 @@ export function assertEqualToFileContent(actual: string, expectedUri: vscode.Uri
         }
 
         const expected: string = readFileSync(expectedUri.fsPath, 'utf-8');
+
         assert.strictEqual(actual, expected);
     }
 }
 
+export function normalizeLineEndings(str: string, lineEnding = '\n'): string {
+    return str.replace(/\r?\n/g, lineEnding);
+}
+
 /**
  *
  * @returns true if the testsuite is running in update mode, i.e. the