| 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 | 7eee08d | 1996-12-13 20:32:26 +0000 | [diff] [blame] | 5 | |
| Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 6 | import dl |
| Roger E. Masse | fab8ab8 | 1996-12-20 22:36:52 +0000 | [diff] [blame] | 7 | from test_support import verbose |
| 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 | sharedlibs = [ |
| Guido van Rossum | a6ed225 | 1997-04-09 20:57:52 +0000 | [diff] [blame] | 10 | ('/usr/lib/libc.so', 'getpid'), |
| Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 11 | ] |
| Roger E. Masse | 7eee08d | 1996-12-13 20:32:26 +0000 | [diff] [blame] | 12 | |
| Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 13 | for s, func in sharedlibs: |
| 14 | try: | ||||
| Guido van Rossum | 41360a4 | 1998-03-26 19:42:58 +0000 | [diff] [blame] | 15 | if verbose: |
| 16 | print 'trying to open:', s, | ||||
| 17 | l = dl.open(s) | ||||
| Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 18 | except dl.error: |
| Guido van Rossum | 41360a4 | 1998-03-26 19:42:58 +0000 | [diff] [blame] | 19 | if verbose: |
| 20 | print 'failed' | ||||
| 21 | pass | ||||
| Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 22 | else: |
| Guido van Rossum | 41360a4 | 1998-03-26 19:42:58 +0000 | [diff] [blame] | 23 | if verbose: |
| 24 | print 'succeeded...', | ||||
| 25 | l.call(func) | ||||
| 26 | l.close() | ||||
| 27 | if verbose: | ||||
| 28 | print 'worked!' | ||||
| 29 | break | ||||
| Roger E. Masse | 2362b58 | 1996-12-16 20:25:44 +0000 | [diff] [blame] | 30 | else: |
| 31 | print 'Could not open any shared libraries' | ||||