feat: Automatic Cobol Detection

Based on the first line of the source code for:

* `*` in column 7 - comments
* `IDENTIFICATION DIVISION` - cobol programs
* `01 label` - variable definitions in copybooks
* `CBL XOTPS(COBOL2)` - CICS Translator Directives

Author: VitGottwald

clients/cobol-lsp-vscode-extension/package.json

@@ -90,7 +90,8 @@
                 "filenamePatterns": [
                     "**/*copybook*/**"
                 ],
-                "configuration": "./syntaxes/lang-config.json"
+                "configuration": "./syntaxes/lang-config.json",
+                "firstLine": "^[0-9 ]{6}([*].*|[ ] *([Ii][Dd][Ee][Nn][Tt][Ii][Ff][Ii][Cc][Aa][Tt][Ii][Oo][Nn] +[Dd][Ii][Vv][Ii][Ss][Ii][Oo][Nn][. ].*|[0-9][0-9] +[@#$A-Z][-A-Z0-9]*[. ].*|(CBL|PROCESS) +XOPTS\\b.*))$"
             }
         ],
         "grammars": [

clients/cobol-lsp-vscode-extension/src/__tests__/extensionTest.spec.ts

@@ -133,3 +133,29 @@ describe("Check plugin extension for cobol fails.", () => {
         expect(TelemetryService.registerEvent).toHaveBeenCalledWith("log", ["bootstrap", "experiment-tag"], "Extension activation event was triggered");
     });
 });
+
+describe.only("Check recognition of COBOL from first line", () => {
+  const manifest = require('../../package.json')
+  const firstLine = manifest.contributes.languages[0].firstLine;
+  const cobol = expect.stringMatching(firstLine)
+
+  test("Comment Line", () => {
+    const pgm = `000010*REALLY ANYTHING`;      
+    expect(pgm).toEqual(cobol)
+  })
+
+  test("Identification Division", () => {
+    const pgm = `000010 IDENTIFICATION DIVISION.`
+    expect(pgm).toEqual(cobol)
+  })
+
+  test("Data Definition (copybook)", () => {
+    const pgm = `000010 01 ABC-XYZ.`;      
+    expect(pgm).toEqual(cobol)
+  })
+
+  test("CICS Translator Directive", () => {
+    const pgm = `000010 CBL XOPTS(COBOL2)`;
+    expect(pgm).toEqual(cobol)
+  })
+});