Guido van Rossum | e7b146f | 2000-02-04 15:28:42 +0000 | [diff] [blame] | 1 | """Interpret sun audio headers.""" |
Guido van Rossum | 217a5fa | 1990-12-26 15:40:07 +0000 | [diff] [blame] | 2 | |
Guido van Rossum | 217a5fa | 1990-12-26 15:40:07 +0000 | [diff] [blame] | 3 | MAGIC = '.snd' |
| 4 | |
| 5 | error = 'sunaudio sound header conversion error' |
| 6 | |
| 7 | |
Guido van Rossum | d482e8a | 1992-06-03 16:47:49 +0000 | [diff] [blame] | 8 | def get_long_be(s): |
Guido van Rossum | e7b146f | 2000-02-04 15:28:42 +0000 | [diff] [blame] | 9 | """Convert a 4-char value to integer.""" |
Guido van Rossum | d482e8a | 1992-06-03 16:47:49 +0000 | [diff] [blame] | 10 | return (ord(s[0])<<24) | (ord(s[1])<<16) | (ord(s[2])<<8) | ord(s[3]) |
Guido van Rossum | 217a5fa | 1990-12-26 15:40:07 +0000 | [diff] [blame] | 11 | |
| 12 | |
Guido van Rossum | 217a5fa | 1990-12-26 15:40:07 +0000 | [diff] [blame] | 13 | def gethdr(fp): |
Guido van Rossum | e7b146f | 2000-02-04 15:28:42 +0000 | [diff] [blame] | 14 | """Read a sound header from an open file.""" |
Guido van Rossum | 217a5fa | 1990-12-26 15:40:07 +0000 | [diff] [blame] | 15 | if fp.read(4) <> MAGIC: |
| 16 | raise error, 'gethdr: bad magic word' |
Guido van Rossum | d482e8a | 1992-06-03 16:47:49 +0000 | [diff] [blame] | 17 | hdr_size = get_long_be(fp.read(4)) |
| 18 | data_size = get_long_be(fp.read(4)) |
| 19 | encoding = get_long_be(fp.read(4)) |
| 20 | sample_rate = get_long_be(fp.read(4)) |
| 21 | channels = get_long_be(fp.read(4)) |
Guido van Rossum | 217a5fa | 1990-12-26 15:40:07 +0000 | [diff] [blame] | 22 | excess = hdr_size - 24 |
| 23 | if excess < 0: |
| 24 | raise error, 'gethdr: bad hdr_size' |
| 25 | if excess > 0: |
| 26 | info = fp.read(excess) |
| 27 | else: |
| 28 | info = '' |
| 29 | return (data_size, encoding, sample_rate, channels, info) |
| 30 | |
| 31 | |
Guido van Rossum | 217a5fa | 1990-12-26 15:40:07 +0000 | [diff] [blame] | 32 | def printhdr(file): |
Guido van Rossum | e7b146f | 2000-02-04 15:28:42 +0000 | [diff] [blame] | 33 | """Read and print the sound header of a named file.""" |
Guido van Rossum | 217a5fa | 1990-12-26 15:40:07 +0000 | [diff] [blame] | 34 | hdr = gethdr(open(file, 'r')) |
| 35 | data_size, encoding, sample_rate, channels, info = hdr |
Guido van Rossum | bdfcfcc | 1992-01-01 19:35:13 +0000 | [diff] [blame] | 36 | while info[-1:] == '\0': |
Guido van Rossum | 217a5fa | 1990-12-26 15:40:07 +0000 | [diff] [blame] | 37 | info = info[:-1] |
| 38 | print 'File name: ', file |
| 39 | print 'Data size: ', data_size |
| 40 | print 'Encoding: ', encoding |
| 41 | print 'Sample rate:', sample_rate |
| 42 | print 'Channels: ', channels |
| 43 | print 'Info: ', `info` |