# $Csoft: agar.pm,v 1.7 2005/09/27 00:29:42 vedge Exp $
# vim:ts=4
#
# Copyright (c) 2007 Hypertriton, Inc.
# All rights reserved.
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions
# are met:
# 1. Redistributions of source code must retain the above copyright
# notice, this list of conditions and the following disclaimer.
# 2. Redistributions in binary form must reproduce the above copyright
# notice, this list of conditions and the following disclaimer in the
# documentation and/or other materials provided with the distribution.
#
# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
# ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
# ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
# DAMAGES (INCLUDING BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
# SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
# OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
# USE OF THIS SOFTWARE EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
sub Test
{
my ($ver) = @_;
MkExecOutput('agar-config', '--version', 'AGAR_VERSION');
MkExecOutput('agar-dev-config', '--version', 'AGAR_DEV_VERSION');
MkIf('"${AGAR_VERSION}" != "" -a "${AGAR_DEV_VERSION}" != ""');
MkPrint('yes');
MkPrintN('checking whether agar-dev works...');
MkExecOutput('agar-config', '--cflags', 'AGAR_CFLAGS');
MkExecOutput('agar-config', '--libs', 'AGAR_LIBS');
MkExecOutput('agar-dev-config', '--cflags', 'AGAR_DEV_CFLAGS');
MkExecOutput('agar-dev-config', '--libs', 'AGAR_DEV_LIBS');
MkCompileC('HAVE_AGAR_DEV',
'${AGAR_DEV_CFLAGS} ${AGAR_CFLAGS}',
'${AGAR_DEV_LIBS} ${AGAR_LIBS}',
<< 'EOF');
#include
#include
#include
int main(int argc, char *argv[]) {
AG_Object obj;
AG_Window *win;
AG_ObjectInitStatic(&obj, &agObjectClass);
DEV_InitSubsystem(0);
win = DEV_Browser(&obj);
AG_ObjectDestroy(&obj);
return (0);
}
EOF
MkIf('"${HAVE_AGAR_DEV}" != ""');
MkSaveMK('AGAR_DEV_CFLAGS', 'AGAR_DEV_LIBS');
MkSaveDefine('AGAR_DEV_CFLAGS', 'AGAR_DEV_LIBS');
MkEndif;
MkElse;
MkPrint('no');
MkSaveUndef('HAVE_AGAR_DEV', 'AGAR_DEV_CFLAGS', 'AGAR_DEV_LIBS');
MkEndif;
return (0);
}
sub Emul
{
my ($os, $osrel, $machine) = @_;
if ($os eq 'windows') {
MkDefine('AGAR_DEV_CFLAGS', '');
MkDefine('AGAR_DEV_LIBS', 'ag_dev');
} elsif ($os eq 'linux' || $os eq 'darwin' ||
$os =~ /^(open|net|free)bsd$/) {
MkDefine('AGAR_DEV_CFLAGS', '-I/usr/local/include/agar '.
'-I/usr/include/agar');
MkDefine('AGAR_DEV_LIBS', '-L/usr/local/lib -lag_dev');
} else {
goto UNAVAIL;
}
MkDefine('HAVE_AGAR_DEV', 'yes');
MkSaveDefine('HAVE_AGAR_DEV', 'AGAR_DEV_CFLAGS', 'AGAR_DEV_LIBS');
MkSaveMK('AGAR_DEV_CFLAGS', 'AGAR_DEV_LIBS');
return (1);
UNAVAIL:
MkDefine('HAVE_AGAR_DEV', 'no');
MkSaveUndef('HAVE_AGAR_DEV');
MkSaveMK('AGAR_DEV_CFLAGS', 'AGAR_DEV_LIBS');
return (1);
}
sub Link
{
my $var = shift;
if ($var eq 'ag_dev') {
print << 'EOF';
tinsert(package.links, { "ag_dev" })
EOF
return (1);
}
return (0);
}
BEGIN
{
$DESCR{'agar-dev'} = 'agar-dev (http://hypertriton.com/agar-dev/)';
$DEPS{'agar-dev'} = 'cc,agar';
$TESTS{'agar-dev'} = \&Test;
$LINK{'agar-dev'} = \&Link;
$EMUL{'agar-dev'} = \&Emul;
}
;1