Software /
code /
prosody
Annotate
util/termcolours.lua @ 3361:8d4e7c231d3e
MUC: Fixed a traceback introduced in hg:bdc325ce9fbc.
author | Waqas Hussain <waqas20@gmail.com> |
---|---|
date | Wed, 14 Jul 2010 19:48:01 +0500 |
parent | 2923:b7049746bd29 |
child | 3749:588c09d7903c |
rev | line source |
---|---|
1523
841d61be198f
Remove version number from copyright headers
Matthew Wild <mwild1@gmail.com>
parents:
896
diff
changeset
|
1 -- Prosody IM |
2923
b7049746bd29
Update copyright headers for 2010
Matthew Wild <mwild1@gmail.com>
parents:
1523
diff
changeset
|
2 -- Copyright (C) 2008-2010 Matthew Wild |
b7049746bd29
Update copyright headers for 2010
Matthew Wild <mwild1@gmail.com>
parents:
1523
diff
changeset
|
3 -- Copyright (C) 2008-2010 Waqas Hussain |
519
cccd610a0ef9
Insert copyright/license headers
Matthew Wild <mwild1@gmail.com>
parents:
262
diff
changeset
|
4 -- |
758 | 5 -- This project is MIT/X11 licensed. Please see the |
6 -- COPYING file in the source package for more information. | |
519
cccd610a0ef9
Insert copyright/license headers
Matthew Wild <mwild1@gmail.com>
parents:
262
diff
changeset
|
7 -- |
cccd610a0ef9
Insert copyright/license headers
Matthew Wild <mwild1@gmail.com>
parents:
262
diff
changeset
|
8 |
cccd610a0ef9
Insert copyright/license headers
Matthew Wild <mwild1@gmail.com>
parents:
262
diff
changeset
|
9 |
262 | 10 local t_concat, t_insert = table.concat, table.insert; |
11 local char, format = string.char, string.format; | |
12 local ipairs = ipairs; | |
13 module "termcolours" | |
14 | |
15 local stylemap = { | |
16 reset = 0; bright = 1, dim = 2, underscore = 4, blink = 5, reverse = 7, hidden = 8; | |
17 black = 30; red = 31; green = 32; yellow = 33; blue = 34; magenta = 35; cyan = 36; white = 37; | |
18 ["black background"] = 40; ["red background"] = 41; ["green background"] = 42; ["yellow background"] = 43; ["blue background"] = 44; ["magenta background"] = 45; ["cyan background"] = 46; ["white background"] = 47; | |
19 bold = 1, dark = 2, underline = 4, underlined = 4, normal = 0; | |
20 } | |
21 | |
22 local fmt_string = char(0x1B).."[%sm%s"..char(0x1B).."[0m"; | |
23 function getstring(style, text) | |
24 if style then | |
25 return format(fmt_string, style, text); | |
26 else | |
27 return text; | |
28 end | |
29 end | |
30 | |
31 function getstyle(...) | |
32 local styles, result = { ... }, {}; | |
33 for i, style in ipairs(styles) do | |
34 style = stylemap[style]; | |
35 if style then | |
36 t_insert(result, style); | |
37 end | |
38 end | |
39 return t_concat(result, ";"); | |
40 end | |
41 | |
42 return _M; |