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
|
/* gtstyle.c: Style formatting hints.
for GlkTerm, curses.h implementation of the Glk API.
Designed by Andrew Plotkin <erkyrath@eblong.com>
http://www.eblong.com/zarf/glk/index.html
*/
#include "gtoption.h"
#include <stdio.h>
#include <wchar.h>
#include <curses.h>
#include "glk.h"
#include "glkterm.h"
#include "gtw_grid.h"
#include "gtw_buf.h"
/* This version of the library doesn't accept style hints. */
void glk_stylehint_set(glui32 wintype, glui32 styl, glui32 hint,
glsi32 val)
{
}
void glk_stylehint_clear(glui32 wintype, glui32 styl, glui32 hint)
{
}
glui32 glk_style_distinguish(window_t *win, glui32 styl1, glui32 styl2)
{
int *styleattrs;
if (!win) {
gli_strict_warning(L"style_distinguish: invalid ref");
return FALSE;
}
if (styl1 >= style_NUMSTYLES || styl2 >= style_NUMSTYLES)
return FALSE;
switch (win->type) {
case wintype_TextBuffer:
styleattrs = win_textbuffer_styleattrs;
break;
case wintype_TextGrid:
styleattrs = win_textgrid_styleattrs;
break;
default:
return FALSE;
}
/* styleattrs is an array of chtype values, as defined in curses.h. */
if (styleattrs[styl1] != styleattrs[styl2])
return TRUE;
return FALSE;
}
glui32 glk_style_measure(window_t *win, glui32 styl, glui32 hint,
glui32 *result)
{
int *styleattrs;
glui32 dummy;
if (!win) {
gli_strict_warning(L"style_measure: invalid ref");
return FALSE;
}
if (styl >= style_NUMSTYLES || hint >= stylehint_NUMHINTS)
return FALSE;
switch (win->type) {
case wintype_TextBuffer:
styleattrs = win_textbuffer_styleattrs;
break;
case wintype_TextGrid:
styleattrs = win_textgrid_styleattrs;
break;
default:
return FALSE;
}
if (!result)
result = &dummy;
switch (hint) {
case stylehint_Indentation:
case stylehint_ParaIndentation:
*result = 0;
return TRUE;
case stylehint_Justification:
*result = stylehint_just_LeftFlush;
return TRUE;
case stylehint_Size:
*result = 1;
return TRUE;
case stylehint_Weight:
*result = ((styleattrs[styl] & A_BOLD) != 0);
return TRUE;
case stylehint_Oblique:
*result = ((styleattrs[styl] & A_UNDERLINE) != 0);
return TRUE;
case stylehint_Proportional:
*result = FALSE;
return TRUE;
}
return FALSE;
}
|
