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
|
// Get device info from PLplot driver module
//
// Copyright (C) 2003 Rafael Laboissiere
// Copyright (C) 2004 Joao Cardoso
//
// This file is part of PLplot.
//
// PLplot is free software; you can redistribute it and/or modify it under
// the terms of the GNU Library General Public License as published by the
// Free Software Foundation; either version 2 of the License, or (at your
// option) any later version.
//
// PLplot is distributed in the hope that it will be useful, but WITHOUT ANY
// WARRANTY; without even the implied warranty of MERCHANTABILITY
// or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library
// General Public License for more details.
//
// You should have received a copy of the GNU Library General Public License
// along with the GNU C Library; see the file COPYING.LIB. If not, write to
// the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
// MA 02110-1301, USA.
//
#include "plplotP.h"
#ifndef LTDL_WIN32
#include <ltdl.h>
#else
#include "ltdl_win32.h"
#endif
#include <stdio.h>
#include <signal.h>
#include <stdlib.h>
#include <string.h>
#define SYM_LEN 300
#define DRVSPEC_LEN 400
// function prototype
RETSIGTYPE catch_segv( int sig );
// SEGV signal handler
RETSIGTYPE
catch_segv( int PL_UNUSED( sig ) )
{
fprintf( stderr, "libltdl error: %s\n", lt_dlerror() );
exit( 1 );
}
int
main( int argc, char* argv[] )
{
lt_dlhandle dlhand;
char sym[SYM_LEN];
char * library_target_prefix;
char * drvnam;
char drvspec[ DRVSPEC_LEN ];
char ** info;
char *string, *token, *saveptr;
if ( argc == 3 )
{
library_target_prefix = argv[1];
drvnam = argv[2];
}
else
{
fprintf( stderr, "%s needs to be invoked with two additional string arguments (library target prefix and driver name) beyond the application name\n", argv[0] );
exit( 1 );
}
// Establish a handler for SIGSEGV signals.
signal( SIGSEGV, catch_segv );
lt_dlinit();
#if defined ( LTDL_WIN32 ) || defined ( __CYGWIN__ )
snprintf( drvspec, DRVSPEC_LEN, "%s%s", library_target_prefix, drvnam );
#else
snprintf( drvspec, DRVSPEC_LEN, "%s/%s%s", plGetDrvDir(), library_target_prefix, drvnam );
#endif // LTDL_WIN32
dlhand = lt_dlopenext( drvspec );
if ( dlhand == NULL )
{
fprintf( stderr, "Could not open driver module %s\n"
"libltdl error: %s\n", drvspec, lt_dlerror() );
exit( 1 );
}
snprintf( sym, SYM_LEN, "plD_DEVICE_INFO_%s", drvnam );
info = (char **) lt_dlsym( dlhand, sym );
if ( info != NULL )
{
printf( "%s", *info );
exit( 0 );
}
else
{
fprintf( stderr, "Could not read symbol %s in driver module %s\n"
"libltdl error: %s\n", sym, drvspec, lt_dlerror() );
exit( 1 );
}
}
|
