summaryrefslogtreecommitdiffstats
path: root/src/Bindings/CheckBindingsDependencies.lua
blob: c0565ead8f8fe725d86148d581141a7bee98caeb (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
-- CheckBindingsDependencies.lua

-- This script checks whether all files listed in AllToLua.pkg are also in the dependencies for bindings regeneration.
-- This script is run as part of the CircleCI tests





--- Filenames that should be ignored in the AllToLua.pkg file:
-- Dictionary of "filename" -> true for each ignored filename
local g_ShouldIgnorePkg =
{
	-- ["../IniFile.h"] = true,
}

--- Filenames that should be ignored in the CMakeLists.txt file:
-- Dictionary of "filename" -> true for each ignored filename
local g_ShouldIgnoreCMake =
{
	["tolua"] = true,
	["../Bindings/AllToLua.pkg"] = true,
	["../Bindings/BindingsProcessor.lua"] = true,
}





--- Returns a sorted list of all files listed in AllToLua.pkg
-- The returned table has both an array part (list of files) and a dictionary part ("filename" -> true)
local function getAllToLuaPkgFiles()
	local res = {}
	for line in io.lines("AllToLua.pkg") do
		line:gsub("$cfile \"(.+)\"",  -- Parse each line with a $cfile directive
			function (a_FileName)
				if (g_ShouldIgnorePkg[a_FileName]) then
					return
				end
				a_FileName = a_FileName:gsub("../Bindings/", "")  -- Normalize the path
				table.insert(res, a_FileName)
				res[a_FileName] = true
			end
		)
	end
	table.sort(res)
	return res
end





--- Returns a sorted list of all files listed as dependencies in CMakeLists.txt
-- The returned table has both an array part (list of files) and a dictionary part ("filename" -> true)
local function getCMakeListsFiles()
	local f = assert(io.open("CMakeLists.txt", "r"))
	local contents = f:read("*all")
	f:close()
	local res = {}
	contents:gsub("set%s*(%b())",  -- Process each CMake's "set" statement
		function (a_SetStatement)
			if not(a_SetStatement:find("%(BINDING_DEPENDENCIES")) then
				return
			end
			-- This is the statement setting the dependencies, parse the files:
			a_SetStatement:gsub("%s(%S+)%s",
				function (a_FileName)
					if (g_ShouldIgnoreCMake[a_FileName]) then
						return
					end
					a_FileName = a_FileName:gsub("../Bindings/", "")  -- Normalize the path
					table.insert(res, a_FileName)
					res[a_FileName] = true
				end
			)
		end
	)
	table.sort(res)
	return res
end





-- Check each set of files against the other:
local pkgFiles = getAllToLuaPkgFiles()
local cmakeFiles = getCMakeListsFiles()
local numMissingFiles = 0
for _, fnam in ipairs(pkgFiles) do
	if not(cmakeFiles[fnam]) then
		io.stderr:write("Bindings dependency file ", fnam, " is not listed in src/Bindings/CMakeLists.txt\n")
		numMissingFiles = numMissingFiles + 1
	end
end
for _, fnam in ipairs(cmakeFiles) do
	if not(pkgFiles[fnam]) then
		io.stderr:write("Bindings dependency file ", fnam, " is not listed in src/Bindings/AllToLua.pkg\n")
		numMissingFiles = numMissingFiles + 1
	end
end

-- If any mismatch was found, exit with an error code:
if (numMissingFiles > 0) then
	io.stderr:write("Bindings dependency mismatches found: ", numMissingFiles, "\n")
	os.exit(1)
end