Make sketch filename matching rule case-sensitive

The primary sketch file name must match the sketch folder exactly. Previously, the rule did not check for file name case
matching on case-insensitive file systems.

Author: per1234

internal/rule/rulefunction/sketch.go

@@ -28,15 +28,20 @@ import (
 
 // SketchNameMismatch checks for mismatch between sketch folder name and primary file name.
 func SketchNameMismatch() (result ruleresult.Type, output string) {
-	for extension := range globals.MainFileValidExtensions {
-		validPrimarySketchFilePath := projectdata.ProjectPath().Join(projectdata.ProjectPath().Base() + extension)
-		exist, err := validPrimarySketchFilePath.ExistCheck()
-		if err != nil {
-			panic(err)
-		}
+	primarySketchFilePrefix := projectdata.ProjectPath().Base()
 
-		if exist {
-			return ruleresult.Pass, ""
+	directoryListing, err := projectdata.ProjectPath().ReadDir()
+	if err != nil {
+		panic(err)
+	}
+	directoryListing.FilterOutDirs()
+
+	for _, filePath := range directoryListing {
+		for extension := range globals.MainFileValidExtensions {
+			if filePath.Base() == primarySketchFilePrefix+extension {
+				// There was a case-sensitive match (paths package's Exist() is not always case-sensitive, so can't be used here).
+				return ruleresult.Pass, ""
+			}
 		}
 	}
 

internal/rule/rulefunction/sketch_test.go

@@ -64,7 +64,8 @@ func checkSketchRuleFunction(ruleFunction Type, testTables []sketchRuleFunctionT
 func TestSketchNameMismatch(t *testing.T) {
 	testTables := []sketchRuleFunctionTestTable{
 		{"Valid", "Valid", ruleresult.Pass, ""},
-		{"Mismatch", "NameMismatch", ruleresult.Fail, ""},
+		{"Name Mismatch", "NameMismatch", ruleresult.Fail, ""},
+		{"Case Mismatch", "CaseMismatch", ruleresult.Fail, ""},
 	}
 
 	checkSketchRuleFunction(SketchNameMismatch, testTables, t)

internal/rule/rulefunction/testdata/sketches/CaseMismatch/caseMismatch.ino

@@ -0,0 +1,2 @@
+void setup() {}
+void loop() {}