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
|
require 'mkmf'
def have_all(*args)
old_libs = $libs.dup
old_defs = $defs.dup
result = []
begin
args.each {|arg|
r = arg.call(*result)
if !r
return nil
end
result << r
}
result
ensure
if result.length != args.length
$libs = old_libs
$defs = old_defs
end
end
end
dir_config('curses')
dir_config('ncurses')
dir_config('termcap')
have_library("mytinfo", "tgetent") if /bow/ =~ RUBY_PLATFORM
have_library("tinfo", "tgetent") or have_library("termcap", "tgetent")
header_library = nil
[
["ncurses.h", ["ncursesw", "ncurses"]],
["ncurses/curses.h", ["ncurses"]],
["curses_colr/curses.h", ["cur_colr"]],
["curses.h", ["curses"]],
].each {|hdr, libs|
header_library = have_all(
lambda { have_header(hdr) && hdr },
lambda {|h| libs.find {|lib| have_library(lib, "initscr", h) } })
if header_library
break;
end
}
if header_library
header, library = header_library
puts "header: #{header}"
puts "library: #{library}"
curses = [header]
if header == 'curses_colr/curses.h'
curses.unshift("varargs.h")
end
for f in %w(beep bkgd bkgdset curs_set deleteln doupdate flash
getbkgd getnstr init isendwin keyname keypad resizeterm
scrl set setscrreg ungetch
wattroff wattron wattrset wbkgd wbkgdset wdeleteln wgetnstr
wresize wscrl wsetscrreg
def_prog_mode reset_prog_mode timeout wtimeout nodelay
init_color wcolor_set use_default_colors newpad)
have_func(f) || (have_macro(f, curses) && $defs.push(format("-DHAVE_%s", f.upcase)))
end
flag = "-D_XOPEN_SOURCE_EXTENDED"
if try_static_assert("sizeof(char*)>sizeof(int)",
%w[stdio.h stdlib.h]+curses,
flag)
$defs << flag
end
have_var("ESCDELAY", curses)
have_var("TABSIZE", curses)
have_var("COLORS", curses)
have_var("COLOR_PAIRS", curses)
# SVR4 curses has a (undocumented) variable char *curses_version.
# ncurses and PDcurses has a function char *curses_version().
# Note that the original BSD curses doesn't provide version information.
prolog = cpp_include(curses)
if checking_for(checking_message('function curses_version', curses)) {
try_run(<<-"End")
#{prolog}
int main(int argc, char *argv[])
{
curses_version();
return EXIT_SUCCESS;
}
End
}
$defs << '-DHAVE_FUNC_CURSES_VERSION'
end
if checking_for(checking_message('variable curses_version', curses)) {
try_run(<<-"End")
#{prolog}
extern char *curses_version;
int main(int argc, char *argv[])
{
int i = 0;
for (i = 0; i < 100; i++) {
if (curses_version[i] == 0)
return 0 < i ? EXIT_SUCCESS : EXIT_FAILURE;
if (curses_version[i] & 0x80)
return EXIT_FAILURE;
}
return EXIT_FAILURE;
}
End
}
$defs << '-DHAVE_VAR_CURSES_VERSION'
end
create_makefile("curses")
end
|
