Roger E. Masse | 7eee08d | 1996-12-13 20:32:26 +0000 | [diff] [blame] | 1 | #! /usr/bin/env python |
| 2 | """Test dlmodule.c |
Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 3 | Roger E. Masse revised strategy by Barry Warsaw |
Roger E. Masse | 7eee08d | 1996-12-13 20:32:26 +0000 | [diff] [blame] | 4 | """ |
Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 5 | verbose = 0 |
| 6 | if __name__ == '__main__': |
| 7 | verbose = 1 |
Roger E. Masse | 7eee08d | 1996-12-13 20:32:26 +0000 | [diff] [blame] | 8 | |
Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 9 | import dl |
Roger E. Masse | 7eee08d | 1996-12-13 20:32:26 +0000 | [diff] [blame] | 10 | |
Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 11 | sharedlibs = [ |
| 12 | # SunOS/Solaris |
| 13 | ('/usr/lib/libresolv.so', 'gethostent'), |
Guido van Rossum | 4f30aff | 1996-12-20 03:13:36 +0000 | [diff] [blame] | 14 | # SGI IRIX |
| 15 | ('/usr/lib/libm.so', 'sin'), |
Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 16 | ] |
Roger E. Masse | 7eee08d | 1996-12-13 20:32:26 +0000 | [diff] [blame] | 17 | |
Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 18 | for s, func in sharedlibs: |
| 19 | try: |
| 20 | if verbose: |
| 21 | print 'trying to open:', s, |
| 22 | l = dl.open(s) |
| 23 | except dl.error: |
| 24 | if verbose: |
| 25 | print 'failed' |
| 26 | pass |
| 27 | else: |
| 28 | if verbose: |
| 29 | print 'succeeded...', |
| 30 | l.call(func) |
| 31 | l.close() |
| 32 | if verbose: |
| 33 | print 'worked!' |
| 34 | break |
| 35 | else: |
| 36 | print 'Could not open any shared libraries' |