Repository navigation
Expand file tree
/
Copy pathFile.lua
More file actions
97 lines (80 loc) · 2.14 KB
/
Copy pathFile.lua
File metadata and controls
97 lines (80 loc) · 2.14 KB
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
--[[
Copyright 2017 YANG Huan ([email protected]).
Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at
http://www.apache.org/licenses/LICENSE-2.0
Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
See the License for the specific language governing permissions and
limitations under the License.
--]]
local System = System
local throw = System.throw
local each = System.each
local open = io.open
local tinsert = table.insert
local IOException = System.define("System.IOException", {
__tostring = System.Exception.ToString,
__inherits__ = { System.Exception },
__ctor__ = function(this, message, innerException)
System.Exception.__ctor__(this, message, innerException)
end,
})
local File = {}
local function openFile(path, mode)
local f, err = open(path, mode)
if f == nil then
throw(IOException(err))
end
return f
end
local function readAll(path, mode)
local f = openFile(path, mode)
local bytes = f:read("*all")
f:close()
return bytes
end
function File.ReadAllBytes(path)
return readAll(path, "rb")
end
function File.ReadAllText(path)
return readAll(path, "r")
end
function File.ReadAllLines(path)
local f = openFile(path, mode)
local t = {}
while true do
local line = f:read()
if line == nil then
break
end
tinsert(t, line)
end
f:close()
return System.arrayFromTable(t, System.String)
end
local function writeAll(path, contents, mode)
local f = openFile(path, mode)
f:write(contents)
f:close()
end
function File.WriteWriteAllBytes(path, contents)
writeAll(path, contents, "wb")
end
function File.WriteAllText(path, contents)
writeAll(path, contents, "w")
end
function File.WriteAllLines(path, contents)
local f = openFile(path, mode)
for _, line in each(contents) do
if line == nil then
f:write("\n")
else
f:write(line, "\n")
end
end
f:close()
end
System.define("System.IO.File", File)