1 # Automatic configuration of the UCW Library
2 # (c) 2005 Martin Mares <mj@ucw.cz>
6 Test("OS", "Checking on which OS we run", sub {
9 Fail "Unable to determine OS type" if $? || $os eq "";
13 if (Get("OS") eq "Linux") {
16 Fail "Don't know how to run on this operating system.";
22 Test("CC", "Checking for C compiler", sub { return "gcc"; });
25 Test("GCCVER", "Checking for GCC version", sub {
27 my $ver = `$gcc --version | sed '2,\$d; s/^\\(.* \\)\\?\\([0-9]*\\.[0-9]*\\).*/\\2/'`;
29 Fail "Unable to determine GCC version" if $? || $ver eq "";
32 my ($gccmaj, $gccmin) = split(/\./, Get("GCCVER"));
33 my $gccver = 1000*$gccmaj + $gccmin;
34 $gccver >= 3000 or Fail "GCC older than 3.0 doesn't support C99 well enough.";
38 Test("ARCH", "Checking for machine architecture", sub {
39 my $mach = `uname -m`;
41 Fail "Unable to determine machine type" if $? || $mach eq "";
42 if ($mach =~ /^i[0-9]86$/) {
44 } elsif ($mach =~ /^(x86[_-]|amd)64$/) {
51 Test("CPU_ARCH", "Checking for CPU architecture", sub {
52 my $mach = Get("ARCH");
53 if ($mach eq "i386") {
55 UnSet("CPU_64BIT_POINTERS");
56 Set("CPU_LITTLE_ENDIAN");
57 UnSet("CPU_BIG_ENDIAN");
58 Set("CPU_ALLOW_UNALIGNED");
59 Set("CPU_STRUCT_ALIGN" => 4);
61 if (IsSet("CONFIG_EXACT_CPU") && IsSet("CONFIG_LINUX") && open X, "/proc/cpuinfo") {
66 /^([^\t]+)\t+:\s*(.*)$/ and $pc{$1}=$2;
70 # Try to understand CPU vendor, family and model [inspired by MPlayer's configure script]
71 my $vendor = $pc{'vendor_id'} || "";
72 my $family = $pc{'cpu family'} || 0;
73 my $model = $pc{'model'} || 0;
74 if ($vendor eq "AuthenticAMD") {
76 if ($model >= 31 && $gccver >= 3004) { $arch = "athlon64"; }
77 elsif ($model >= 6 && $gccver >= 3003) { $arch = "athlon-xp"; }
78 else { $arch = "athlon"; }
80 } elsif ($vendor eq "GenuineIntel") {
81 # We don't recognize Prescott and Nocona cores yet (gcc-3.4+)
82 if ($family >= 15 && $gccver >= 3003) { $arch = "pentium4"; }
83 elsif ($family >= 6 && $gccver >= 3003) {
84 if ($model >= 7) { $arch = "pentium3"; }
85 elsif ($model >= 3) { $arch = "pentium2"; }
89 # No match on vendor, try the family
93 } elsif ($family >= 3) {
94 $arch = "i${family}86";
98 Log "(using /proc/cpuinfo) ";
100 Log "(don't understand /proc/cpuinfo) ";
103 return $arch ? $arch : "i386";
104 } elsif ($mach eq "amd64") {
106 Set("CPU_64BIT_POINTERS");
107 Set("CPU_LITTLE_ENDIAN");
108 UnSet("CPU_BIG_ENDIAN");
109 Set("CPU_ALLOW_UNALIGNED");
110 Set("CPU_STRUCT_ALIGN" => 8);
117 if (!IsSet("CPU_ARCH")) { Warn "CPU type not recognized, using defaults, keep fingers crossed."; }
119 ### Compiler and its Options ###
121 # C flags: tell the compiler we're speaking C99
122 Set("CLANG" => "-std=gnu99");
125 Set("COPT" => '-O2');
126 Append("COPT", '-march=$(CPU_ARCH)') if IsSet("CPU_ARCH");
128 # C optimizations for highly exposed code
129 Set("COPT2" => '-O3');
132 Set("CWARNS" => '-Wall -W -Wno-parentheses -Wstrict-prototypes -Wmissing-prototypes -Winline');
133 Set("CWARNS_OFF" => '');
141 # Extra flags for compiling and linking shared libraries
142 Set("CSHARED" => '-fPIC');
143 Set("LSHARED" => '-shared -Wl,-soname,lib/$(@F)');
145 # Extra switches depending on GCC version:
146 if ($gccver == 3000) {
147 Append("COPT" => "-fstrict-aliasing");
148 } elsif ($gccver == 3003) {
149 Append("CWARNS" => "-Wundef -Wredundant-decls");
150 Append("COPT" => "-finline-limit=20000 --param max-inline-insns-auto=1000");
151 } elsif ($gccver == 3004) {
152 Append("CWARNS" => "-Wundef -Wredundant-decls");
153 Append("COPT" => "-finline-limit=5000 --param large-function-insns=5000 --param inline-unit-growth=200 --param large-function-growth=400");
154 } elsif ($gccver == 4000) {
155 Append("CWARNS" => "-Wundef -Wredundant-decls -Wno-pointer-sign -Wdisabled-optimization -Wno-missing-field-initializers");
156 Append("CWARNS_OFF" => "-Wno-pointer-sign");
157 Append("COPT" => "-finline-limit=5000 --param large-function-insns=5000 --param inline-unit-growth=200 --param large-function-growth=400");
159 Warn "Don't know anything about this GCC version, using default switches.\n";
162 if (IsSet("CONFIG_DEBUG")) {
164 Set("DEBUG_ASSERTS");
165 Set("DEBUG_DIE_BY_ABORT") if Get("CONFIG_DEBUG") > 1;
166 Set("CDEBUG" => "-ggdb");
168 # If building a release version:
169 Append("COPT" => "-fomit-frame-pointer");
170 Append("LOPT" => "-s");
173 # If debugging memory allocations:
175 #CDEBUG+=-DDEBUG_DMALLOC