blob: 2328cd555108aabbdecc441ba30f8d43722edec9 (
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
|
import algorithm
import utils/twtstr
type DirlistItemType = enum
ITEM_FILE, ITEM_LINK, ITEM_DIR
type DirlistItem* = object
name*: string
modified*: string
case t*: DirlistItemType
of ITEM_LINK:
linkto*: string
of ITEM_FILE:
nsize*: int
of ITEM_DIR:
discard
type NameWidthTuple = tuple[name: string, width: int]
func makeDirlist*(items: seq[DirlistItem]): string =
var names: seq[NameWidthTuple]
var maxw = 20
for item in items:
var name = item.name
if item.t == ITEM_LINK:
name &= '@'
elif item.t == ITEM_DIR:
name &= '/'
let w = name.width()
maxw = max(w, maxw)
names.add((name, w))
names.sort(proc(a, b: NameWidthTuple): int = cmp(a.name, b.name))
var outs = "<A HREF=\"../\">[Upper Directory]</A>\n"
for i in 0 ..< items.len:
let item = items[i]
var (name, width) = names[i]
var path = percentEncode(item.name, PathPercentEncodeSet)
if item.t == ITEM_LINK:
if item.linkto.len > 0 and item.linkto[^1] == '/':
# If the target is a directory, treat it as a directory. (For FTP.)
path &= '/'
elif item.t == ITEM_DIR:
path &= '/'
var line = "<A HREF=\"" & path & "\">" & htmlEscape(name) & "</A>"
while width <= maxw:
if width mod 2 == 0:
line &= ' '
else:
line &= '.'
inc width
if line[^1] != ' ':
line &= ' '
line &= htmlEscape(item.modified)
if item.t == ITEM_FILE:
line &= ' ' & convert_size(item.nsize)
elif item.t == ITEM_LINK:
line &= " -> " & htmlEscape(item.linkto)
outs &= line & '\n'
return outs
|