Check for VBA code with no file extension

.github/workflows/gh.py

@@ -151,21 +151,31 @@ def clone_repo(repo_url, destination_folder):
         raise ValueError("Problem with cloning.")
 
 def count_vba_related_files(repo_path):
-    vba_extensions = ['.bas', '.cls', '.frm', '.vba', '.vbs', '.vb', '.d.vb', '.vbproj']
+    vba_extensions = ['.bas', '.cls', '.frm', '.vba', '.vbs', '.vb', '.d.vb', '.vbproj', 'No ext']
     counts = {ext: 0 for ext in vba_extensions}
 
     for root, dirs, files in os.walk(repo_path):
         for file in files:
             for ext in vba_extensions:
                 if file.endswith(ext):
                     counts[ext] += 1
+                if ext == 'No ext' and '.' not in file:
+                    file_path = os.path.join(root, file)
+                    with open(file_path, 'r', encoding='cp1252') as f:
+                        file_content = f.read()
+                    if has_vba_code(file_content):
+                        counts[ext] += 1
 
     # Print the counts
     for ext, count in counts.items():
         print(f"Number of '{ext}' files: {count}")
 
     return counts
 
+def has_vba_code(file_content):
+    vba_pattern = re.compile(r'^\s*(Public|Private)?\s*(Sub|Function)\s+', re.MULTILINE)
+    return bool(vba_pattern.search(file_content))
+
 # Get the labels for the issue and extract the name of the check (Check A, Check B, etc.)
 def get_check(issue):
     labels = issue['labels']

.github/workflows/scan_and_suggest.py

@@ -99,6 +99,9 @@ def fix_file_extensions_issue(token, repo):
             # VBScript extension used for VBA code
             create_issue_wrapper(token, repo, 'detected as VBScript', 'Check B: Use of vbs extension.md', 'Check B')
 
+        if repo['language'] == 'None' and counts['No ext'] > 0:
+            print(f"🔴 The repo contains VBA files with no file extension")
+
     except Exception as e:
         print(f"🔴 An unexpected error occurred: {e}")