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
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
|
{-# LANGUAGE TypeApplications #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE QuasiQuotes #-}
module Main where
import System.OsPath.Types
import System.OsPath.Encoding ( ucs2le )
import qualified System.OsString.Internal.Types as OST
import qualified Data.ByteString.Short as SBS
import Test.Tasty.Bench
import qualified System.FilePath.Posix as PF
import qualified System.FilePath.Posix as WF
import qualified System.OsString.Posix as OSP
import qualified System.OsString.Windows as WSP
import qualified System.OsPath.Posix as APF
import qualified System.OsPath.Windows as AWF
main :: IO ()
main = defaultMain
[ bgroup "filepath (string)" $ map (uncurry bench)
[("splitExtension (posix)" , nf PF.splitExtension posixPath)
,("splitExtension (windows)" , nf WF.splitExtension windowsPath)
,("takeExtension (posix)" , nf PF.takeExtension posixPath)
,("takeExtension (windows)" , nf WF.takeExtension windowsPath)
,("replaceExtension (posix)" , nf (PF.replaceExtension ".lol") posixPath)
,("replaceExtension (windows)" , nf (WF.replaceExtension ".lol") windowsPath)
,("dropExtension (posix)" , nf PF.dropExtension posixPath)
,("dropExtension (windows)" , nf WF.dropExtension windowsPath)
,("addExtension (posix)" , nf (PF.addExtension ".lol") posixPath)
,("addExtension (windows)" , nf (WF.addExtension ".lol") windowsPath)
,("hasExtension (posix)" , nf PF.hasExtension posixPath)
,("hasExtension (windows)" , nf WF.hasExtension windowsPath)
,("splitExtensions (posix)" , nf PF.splitExtensions posixPath)
,("splitExtensions (windows)" , nf WF.splitExtensions windowsPath)
,("dropExtensions (posix)" , nf PF.dropExtensions posixPath)
,("dropExtensions (windows)" , nf WF.dropExtensions windowsPath)
,("takeExtensions (posix)" , nf PF.takeExtensions posixPath)
,("takeExtensions (windows)" , nf WF.takeExtensions windowsPath)
,("replaceExtensions (posix)" , nf (PF.replaceExtensions ".lol") posixPath)
,("replaceExtensions (windows)" , nf (WF.replaceExtensions ".lol") windowsPath)
,("isExtensionOf (posix)" , nf (PF.isExtensionOf ".lol") posixPath)
,("isExtensionOf (windows)" , nf (WF.isExtensionOf ".lol") windowsPath)
,("stripExtension (posix)" , nf (PF.stripExtension ".lol") posixPath)
,("stripExtension (windows)" , nf (WF.stripExtension ".lol") windowsPath)
,("splitFileName (posix)" , nf PF.splitFileName posixPath)
,("splitFileName (windows)" , nf WF.splitFileName windowsPath)
,("takeFileName (posix)" , nf PF.takeFileName posixPath)
,("takeFileName (windows)" , nf WF.takeFileName windowsPath)
,("replaceFileName (posix)" , nf (PF.replaceFileName "lol") posixPath)
,("replaceFileName (windows)" , nf (WF.replaceFileName "lol") windowsPath)
,("dropFileName (posix)" , nf PF.dropFileName posixPath)
,("dropFileName (windows)" , nf WF.dropFileName windowsPath)
,("takeBaseName (posix)" , nf PF.takeBaseName posixPath)
,("takeBaseName (windows)" , nf WF.takeBaseName windowsPath)
,("replaceBaseName (posix)" , nf (PF.replaceBaseName "lol") posixPath)
,("replaceBaseName (windows)" , nf (WF.replaceBaseName "lol") windowsPath)
,("takeDirectory (posix)" , nf PF.takeDirectory posixPath)
,("takeDirectory (windows)" , nf WF.takeDirectory windowsPath)
,("replaceDirectory (posix)" , nf (PF.replaceDirectory "lol") posixPath)
,("replaceDirectory (windows)" , nf (WF.replaceDirectory "lol") windowsPath)
,("combine (posix)" , nf (PF.combine "lol") posixPath)
,("combine (windows)" , nf (WF.combine "lol") windowsPath)
,("splitPath (posix)" , nf PF.splitPath posixPath)
,("splitPath (windows)" , nf WF.splitPath windowsPath)
,("joinPath (posix)" , nf PF.joinPath (PF.splitPath posixPath))
,("joinPath (windows)" , nf WF.joinPath (WF.splitPath windowsPath))
,("splitDirectories (posix)" , nf PF.splitDirectories posixPath)
,("splitDirectories (windows)" , nf WF.splitDirectories windowsPath)
,("splitDrive (posix)" , nf PF.splitDrive posixPath)
,("splitDrive (windows)" , nf WF.splitDrive windowsPath)
,("joinDrive (posix)" , nf (PF.joinDrive "/") posixPath)
,("joinDrive (windows)" , nf (WF.joinDrive "C:\\") windowsPath)
,("takeDrive (posix)" , nf PF.takeDrive posixPath)
,("takeDrive (windows)" , nf WF.takeDrive windowsPath)
,("hasDrive (posix)" , nf PF.hasDrive posixPath)
,("hasDrive (windows)" , nf WF.hasDrive windowsPath)
,("dropDrive (posix)" , nf PF.dropDrive posixPath)
,("dropDrive (windows)" , nf WF.dropDrive windowsPath)
,("isDrive (posix)" , nf PF.isDrive posixPath)
,("isDrive (windows)" , nf WF.isDrive windowsPath)
,("hasTrailingPathSeparator (posix)" , nf PF.hasTrailingPathSeparator posixPath)
,("hasTrailingPathSeparator (windows)" , nf WF.hasTrailingPathSeparator windowsPath)
,("addTrailingPathSeparator (posix)" , nf PF.addTrailingPathSeparator posixPath)
,("addTrailingPathSeparator (windows)" , nf WF.addTrailingPathSeparator windowsPath)
,("dropTrailingPathSeparator (posix)" , nf PF.addTrailingPathSeparator posixPath)
,("dropTrailingPathSeparator (windows)" , nf WF.addTrailingPathSeparator windowsPath)
,("normalise (posix)" , nf PF.normalise posixPath)
,("normalise (windows)" , nf WF.normalise windowsPath)
,("equalFilePath (posix)" , nf (PF.equalFilePath "abc/def/zs") posixPath)
,("equalFilePath (windows)" , nf (WF.equalFilePath "abc/def/zs") windowsPath)
,("makeRelative (posix)" , nf (PF.makeRelative "abc/def/zs") posixPath)
,("makeRelative (windows)" , nf (WF.makeRelative "abc/def/zs") windowsPath)
,("isRelative (posix)" , nf PF.isRelative posixPath)
,("isRelative (windows)" , nf WF.isRelative windowsPath)
,("isAbsolute (posix)" , nf PF.isAbsolute posixPath)
,("isAbsolute (windows)" , nf WF.isAbsolute windowsPath)
,("isValid (posix)" , nf PF.isValid posixPath)
,("isValid (windows)" , nf WF.isValid windowsPath)
,("makeValid (posix)" , nf PF.makeValid posixPath)
,("makeValid (windows)" , nf WF.makeValid windowsPath)
,("splitSearchPath (posix)" , nf PF.splitSearchPath posixSearchPath)
,("splitSearchPath (windows)" , nf WF.splitSearchPath windowsSearchPath)
]
, bgroup "filepath (AFPP)" $ map (uncurry bench)
[ ("splitExtension (posix)" , nf APF.splitExtension posixPathAFPP)
, ("splitExtension (windows)" , nf AWF.splitExtension windowsPathAFPP)
, ("takeExtension (posix)" , nf APF.takeExtension posixPathAFPP)
, ("takeExtension (windows)" , nf AWF.takeExtension windowsPathAFPP)
, ("replaceExtension (posix)" , nf (APF.replaceExtension [OSP.pstr|.lol|]) posixPathAFPP)
, ("replaceExtension (windows)" , nf (AWF.replaceExtension [WSP.pstr|.lol|]) windowsPathAFPP)
, ("dropExtension (posix)" , nf APF.dropExtension posixPathAFPP)
, ("dropExtension (windows)" , nf AWF.dropExtension windowsPathAFPP)
, ("addExtension (posix)" , nf (APF.addExtension [OSP.pstr|.lol|]) posixPathAFPP)
, ("addExtension (windows)" , nf (AWF.addExtension [WSP.pstr|.lol|]) windowsPathAFPP)
, ("hasExtension (posix)" , nf APF.hasExtension posixPathAFPP)
, ("hasExtension (windows)" , nf AWF.hasExtension windowsPathAFPP)
, ("splitExtensions (posix)" , nf APF.splitExtensions posixPathAFPP)
, ("splitExtensions (windows)" , nf AWF.splitExtensions windowsPathAFPP)
, ("dropExtensions (posix)" , nf APF.dropExtensions posixPathAFPP)
, ("dropExtensions (windows)" , nf AWF.dropExtensions windowsPathAFPP)
, ("takeExtensions (posix)" , nf APF.takeExtensions posixPathAFPP)
, ("takeExtensions (windows)" , nf AWF.takeExtensions windowsPathAFPP)
, ("replaceExtensions (posix)" , nf (APF.replaceExtensions [OSP.pstr|.lol|]) posixPathAFPP)
, ("replaceExtensions (windows)" , nf (AWF.replaceExtensions [WSP.pstr|.lol|]) windowsPathAFPP)
, ("isExtensionOf (posix)" , nf (APF.isExtensionOf [OSP.pstr|.lol|]) posixPathAFPP)
, ("isExtensionOf (windows)" , nf (AWF.isExtensionOf [WSP.pstr|.lol|]) windowsPathAFPP)
, ("stripExtension (posix)" , nf (APF.stripExtension [OSP.pstr|.lol|]) posixPathAFPP)
, ("stripExtension (windows)" , nf (AWF.stripExtension [WSP.pstr|.lol|]) windowsPathAFPP)
, ("splitFileName (posix)" , nf APF.splitFileName posixPathAFPP)
, ("splitFileName (windows)" , nf AWF.splitFileName windowsPathAFPP)
, ("takeFileName (posix)" , nf APF.takeFileName posixPathAFPP)
, ("takeFileName (windows)" , nf AWF.takeFileName windowsPathAFPP)
, ("replaceFileName (posix)" , nf (APF.replaceFileName [OSP.pstr|lol|]) posixPathAFPP)
, ("replaceFileName (windows)" , nf (AWF.replaceFileName [WSP.pstr|lol|]) windowsPathAFPP)
, ("dropFileName (posix)" , nf APF.dropFileName posixPathAFPP)
, ("dropFileName (windows)" , nf AWF.dropFileName windowsPathAFPP)
, ("takeBaseName (posix)" , nf APF.takeBaseName posixPathAFPP)
, ("takeBaseName (windows)" , nf AWF.takeBaseName windowsPathAFPP)
, ("replaceBaseName (posix)" , nf (APF.replaceBaseName [OSP.pstr|lol|]) posixPathAFPP)
, ("replaceBaseName (windows)" , nf (AWF.replaceBaseName [WSP.pstr|lol|]) windowsPathAFPP)
, ("takeDirectory (posix)" , nf APF.takeDirectory posixPathAFPP)
, ("takeDirectory (windows)" , nf AWF.takeDirectory windowsPathAFPP)
, ("replaceDirectory (posix)" , nf (APF.replaceDirectory [OSP.pstr|lol|]) posixPathAFPP)
, ("replaceDirectory (windows)" , nf (AWF.replaceDirectory [WSP.pstr|lol|]) windowsPathAFPP)
, ("combine (posix)" , nf (APF.combine [OSP.pstr|lol|]) posixPathAFPP)
, ("combine (windows)" , nf (AWF.combine [WSP.pstr|lol|]) windowsPathAFPP)
, ("splitPath (posix)" , nf APF.splitPath posixPathAFPP)
, ("splitPath (windows)" , nf AWF.splitPath windowsPathAFPP)
, ("joinPath (posix)" , nf APF.joinPath (APF.splitPath posixPathAFPP))
, ("joinPath (windows)" , nf AWF.joinPath (AWF.splitPath windowsPathAFPP))
, ("splitDirectories (posix)" , nf APF.splitDirectories posixPathAFPP)
, ("splitDirectories (windows)" , nf AWF.splitDirectories windowsPathAFPP)
, ("splitDrive (posix)" , nf APF.splitDrive posixPathAFPP)
, ("splitDrive (windows)" , nf AWF.splitDrive windowsPathAFPP)
, ("joinDrive (posix)" , nf (APF.joinDrive [OSP.pstr|/|]) posixPathAFPP)
, ("joinDrive (windows)" , nf (AWF.joinDrive [WSP.pstr|C:\|]) windowsPathAFPP)
, ("takeDrive (posix)" , nf APF.takeDrive posixPathAFPP)
, ("takeDrive (windows)" , nf AWF.takeDrive windowsPathAFPP)
, ("hasDrive (posix)" , nf APF.hasDrive posixPathAFPP)
, ("hasDrive (windows)" , nf AWF.hasDrive windowsPathAFPP)
, ("dropDrive (posix)" , nf APF.dropDrive posixPathAFPP)
, ("dropDrive (windows)" , nf AWF.dropDrive windowsPathAFPP)
, ("isDrive (posix)" , nf APF.isDrive posixPathAFPP)
, ("isDrive (windows)" , nf AWF.isDrive windowsPathAFPP)
, ("hasTrailingPathSeparator (posix)" , nf APF.hasTrailingPathSeparator posixPathAFPP)
, ("hasTrailingPathSeparator (windows)" , nf AWF.hasTrailingPathSeparator windowsPathAFPP)
, ("addTrailingPathSeparator (posix)" , nf APF.addTrailingPathSeparator posixPathAFPP)
, ("addTrailingPathSeparator (windows)" , nf AWF.addTrailingPathSeparator windowsPathAFPP)
, ("dropTrailingPathSeparator (posix)" , nf APF.addTrailingPathSeparator posixPathAFPP)
, ("dropTrailingPathSeparator (windows)" , nf AWF.addTrailingPathSeparator windowsPathAFPP)
, ("normalise (posix)" , nf APF.normalise posixPathAFPP)
, ("normalise (windows)" , nf AWF.normalise windowsPathAFPP)
, ("equalFilePath (posix)" , nf (APF.equalFilePath [OSP.pstr|abc/def/zs|]) posixPathAFPP)
, ("equalFilePath (windows)" , nf (AWF.equalFilePath [WSP.pstr|abc/def/zs|]) windowsPathAFPP)
, ("makeRelative (posix)" , nf (APF.makeRelative [OSP.pstr|abc/def/zs|]) posixPathAFPP)
, ("makeRelative (windows)" , nf (AWF.makeRelative [WSP.pstr|abc/def/zs|]) windowsPathAFPP)
, ("isRelative (posix)" , nf APF.isRelative posixPathAFPP)
, ("isRelative (windows)" , nf AWF.isRelative windowsPathAFPP)
, ("isAbsolute (posix)" , nf APF.isAbsolute posixPathAFPP)
, ("isAbsolute (windows)" , nf AWF.isAbsolute windowsPathAFPP)
, ("isValid (posix)" , nf APF.isValid posixPathAFPP)
, ("isValid (windows)" , nf AWF.isValid windowsPathAFPP)
, ("makeValid (posix)" , nf APF.makeValid posixPathAFPP)
, ("makeValid (windows)" , nf AWF.makeValid windowsPathAFPP)
, ("splitSearchPath (posix)" , nf APF.splitSearchPath posixSearchPathAFPP)
, ("splitSearchPath (windows)" , nf AWF.splitSearchPath windowsSearchPathAFPP)
]
, bgroup "encoding/decoding" $ map (uncurry bench)
[ ("decodeUtf (posix)" , nf (APF.decodeUtf @Maybe) posixPathAFPP)
, ("decodeUtf (windows)" , nf (AWF.decodeUtf @Maybe) windowsPathAFPP)
, ("decodeWith (windows)" , nf (AWF.decodeWith ucs2le) windowsPathAFPP)
, ("encodeUtf (posix)" , nf (APF.encodeUtf @Maybe) posixPath)
, ("encodeUtf (windows)" , nf (AWF.encodeUtf @Maybe) windowsPath)
, ("encodeWith (windows)" , nf (AWF.encodeWith ucs2le) windowsPath)
, ("unpack PlatformString (posix)" , nf APF.unpack posixPathAFPP)
, ("unpack PlatformString (windows)" , nf AWF.unpack windowsPathAFPP)
, ("pack PlatformString (posix)" , nf APF.pack (APF.unpack posixPathAFPP))
, ("pack PlatformString (windows)" , nf AWF.pack (AWF.unpack windowsPathAFPP))
, ("fromBytes (posix)" , nf (OSP.fromBytes @Maybe) (SBS.fromShort . OST.getPosixString $ posixPathAFPP))
, ("fromBytes (windows)" , nf (WSP.fromBytes @Maybe) (SBS.fromShort . OST.getWindowsString $ windowsPathAFPP))
]
]
posixPath :: FilePath
posixPath = "/foo/bar/bath/baz/baz/tz/fooooooooooooooo/laaaaaaaaaaaaaaa/baaaaaaaaaaaaar/zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz/zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz/kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk/kkkkkkkkkkkkkkkkkk/h/h/h/a/s/r/a/h/gt/r/r/r/s/s.txt"
windowsPath :: FilePath
windowsPath = "C:\\foo\\bar\\bath\\baz\\baz\\tz\\fooooooooooooooo\\laaaaaaaaaaaaaaa\\baaaaaaaaaaaaar\\zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz\\zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz\\kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk\\kkkkkkkkkkkkkkkkkk\\h\\h\\h\\a\\s\\r\\a\\h\\gt\\r\\r\\r\\s\\s.txt"
posixPathAFPP :: PosixPath
posixPathAFPP = [OSP.pstr|/foo/bar/bath/baz/baz/tz/fooooooooooooooo/laaaaaaaaaaaaaaa/baaaaaaaaaaaaar/zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz/zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz/kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk/kkkkkkkkkkkkkkkkkk/h/h/h/a/s/r/a/h/gt/r/r/r/s/s.txt|]
windowsPathAFPP :: WindowsPath
windowsPathAFPP = [WSP.pstr|C:\\foo\\bar\\bath\\baz\\baz\\tz\\fooooooooooooooo\\laaaaaaaaaaaaaaa\\baaaaaaaaaaaaar\\zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz\\zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz\\kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk\\kkkkkkkkkkkkkkkkkk\\h\\h\\h\\a\\s\\r\\a\\h\\gt\\r\\r\\r\\s\\s.txt|]
posixSearchPath :: FilePath
posixSearchPath = ":foo:bar:bath:baz:baz:tz:fooooooooooooooo:laaaaaaaaaaaaaaa:baaaaaaaaaaaaar:zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz:zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz:kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk:kkkkkkkkkkkkkkkkkk:h:h:h:a:s:r:a:h:gt:r:r:r:s:s.txt"
windowsSearchPath :: FilePath
windowsSearchPath = "foo;bar;bath;baz;baz;tz;fooooooooooooooo;laaaaaaaaaaaaaaa;baaaaaaaaaaaaar;zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz;zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz;kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk;kkkkkkkkkkkkkkkkkk;h;h;h;a;s;r;a;h;gt;r;r;r;s;s.txt"
posixSearchPathAFPP :: PosixString
posixSearchPathAFPP = [OSP.pstr|:foo:bar:bath:baz:baz:tz:fooooooooooooooo:laaaaaaaaaaaaaaa:baaaaaaaaaaaaar:zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz:zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz:kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk:kkkkkkkkkkkkkkkkkk:h:h:h:a:s:r:a:h:gt:r:r:r:s:s.txt|]
windowsSearchPathAFPP :: WindowsString
windowsSearchPathAFPP = [WSP.pstr|foo;bar;bath;baz;baz;tz;fooooooooooooooo;laaaaaaaaaaaaaaa;baaaaaaaaaaaaar;zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz;zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz;kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk;kkkkkkkkkkkkkkkkkk;h;h;h;a;s;r;a;h;gt;r;r;r;s;s.txt|]
|
