FilesExpand file tree

 master

/

dir.lua

Copy path

Blame

More file actions

Blame

More file actions

Latest commit

 

History

History

History

68 lines (58 loc) · 2.02 KB

 master

/

dir.lua

Copy path

Top

File metadata and controls

• Code
• Blame

68 lines (58 loc) · 2.02 KB

Raw

Copy raw file

Download raw file

Open symbols panel

Edit and raw actions

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

module("luarocks.dir", package.seeall)

separator = "/"

--- Strip the path off a path+filename.

-- @param pathname string: A path+name, such as "/a/b/c"

-- or "\a\b\c".

-- @return string: The filename without its path, such as "c".

function base_name(pathname)

assert(type(pathname) == "string")

local base = pathname:match(".*[/\\]([^/\\]*)")

return base or pathname

end

--- Strip the name off a path+filename.

-- @param pathname string: A path+name, such as "/a/b/c".

-- @return string: The filename without its path, such as "/a/b/".

-- For entries such as "/a/b/", "/a/" is returned. If there are

-- no directory separators in input, "" is returned.

function dir_name(pathname)

assert(type(pathname) == "string")

return (pathname:gsub("/*$", ""):match("(.*/)[^/]*")) or ""

end

function strip_base_dir(pathname)

return pathname:gsub("^[^/]*/", "")

end

--- Describe a path in a cross-platform way.

-- Use this function to avoid platform-specific directory

-- separators in other modules. If the first item contains a

-- protocol descriptor (e.g. "http:"), paths are always constituted

-- with forward slashes.

-- @param ... strings representing directories

-- @return string: a string with a platform-specific representation

-- of the path.

function path(...)

local items = {...}

local i = 1

while items[i] do

items[i] = items[i]:gsub("/*$", "")

if items[i] == "" then

table.remove(items, i)

else

i = i + 1

end

end

return table.concat(items, "/")

end

--- Split protocol and path from an URL or local pathname.

-- URLs should be in the "protocol://path" format.

-- For local pathnames, "file" is returned as the protocol.

-- @param url string: an URL or a local pathname.

-- @return string, string: the protocol, and the pathname without the protocol.

function split_url(url)

assert(type(url) == "string")

local protocol, pathname = url:match("^([^:]*)://(.*)")

if not protocol then

protocol = "file"

pathname = url

end

return protocol, pathname

end