author | belugas |
Tue, 17 Apr 2007 20:23:13 +0000 | |
changeset 6481 | 85ad87daf4b0 |
parent 6247 | 7d81e3a5d803 |
child 7170 | 923946ec324f |
permissions | -rw-r--r-- |
3970 | 1 |
/* $Id$ */ |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
2 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
3 |
/** |
6117
6507b2a7e71d
(svn r8853) -Cleanup: doxygen changes. Correct forgotten c files to cpp files with the @file tag as well as a few general comments style
belugas
parents:
5584
diff
changeset
|
4 |
* @file qtmidi.cpp |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
5 |
* @brief MIDI music player for MacOS X using QuickTime. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
6 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
7 |
* This music player should work in all MacOS X releases starting from 10.0, |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
8 |
* as QuickTime is an integral part of the system since the old days of the |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
9 |
* Motorola 68k-based Macintoshes. The only extra dependency apart from |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
10 |
* QuickTime itself is Carbon, which is included since 10.0 as well. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
11 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
12 |
* QuickTime gets fooled with the MIDI files from Transport Tycoon Deluxe |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
13 |
* because of the @c .gm suffix. To force QuickTime to load the MIDI files |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
14 |
* without the need of dealing with the individual QuickTime components |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
15 |
* needed to play music (data source, MIDI parser, note allocators, |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
16 |
* synthesizers and the like) some Carbon functions are used to set the file |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
17 |
* type as seen by QuickTime, using @c FSpSetFInfo() (which modifies the |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
18 |
* file's resource fork). |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
19 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
20 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
21 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
22 |
/* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
23 |
* OpenTTD includes. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
24 |
*/ |
3016
958672b0f8e2
(svn r3596) -Codechange: [OSX] changed to use Apple's macros instead of OTTD macros for endian conversion
bjarni
parents:
2741
diff
changeset
|
25 |
#define WindowClass OSX_WindowClass |
958672b0f8e2
(svn r3596) -Codechange: [OSX] changed to use Apple's macros instead of OTTD macros for endian conversion
bjarni
parents:
2741
diff
changeset
|
26 |
#include <QuickTime/QuickTime.h> |
958672b0f8e2
(svn r3596) -Codechange: [OSX] changed to use Apple's macros instead of OTTD macros for endian conversion
bjarni
parents:
2741
diff
changeset
|
27 |
#undef WindowClass |
958672b0f8e2
(svn r3596) -Codechange: [OSX] changed to use Apple's macros instead of OTTD macros for endian conversion
bjarni
parents:
2741
diff
changeset
|
28 |
|
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
29 |
#include "../stdafx.h" |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
30 |
#include "../openttd.h" |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
31 |
#include "qtmidi.h" |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
32 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
33 |
/* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
34 |
* System includes. We need to workaround with some defines because there's |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
35 |
* stuff already defined in QuickTime headers. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
36 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
37 |
#define OTTD_Random OSX_OTTD_Random |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
38 |
#undef OTTD_Random |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
39 |
#undef WindowClass |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
40 |
#undef SL_ERROR |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
41 |
#undef bool |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
42 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
43 |
#include <assert.h> |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
44 |
#include <unistd.h> |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
45 |
#include <fcntl.h> |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
46 |
|
2741
65d4de069014
(svn r3286) -Fix: [OSX] 10.2 works again and universal binaries got 10.2 as target by default
bjarni
parents:
2548
diff
changeset
|
47 |
// we need to include debug.h after CoreServices because defining DEBUG will break CoreServices in OSX 10.2 |
65d4de069014
(svn r3286) -Fix: [OSX] 10.2 works again and universal binaries got 10.2 as target by default
bjarni
parents:
2548
diff
changeset
|
48 |
#include "../debug.h" |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
49 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
50 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
51 |
enum { |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
52 |
midiType = 'Midi' /**< OSType code for MIDI songs. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
53 |
}; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
54 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
55 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
56 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
57 |
* Converts a Unix-like pathname to a @c FSSpec structure which may be |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
58 |
* used with functions from several MacOS X frameworks (Carbon, QuickTime, |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
59 |
* etc). The pointed file or directory must exist. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
60 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
61 |
* @param *path A string containing a Unix-like path. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
62 |
* @param *spec Pointer to a @c FSSpec structure where the result will be |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
63 |
* stored. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
64 |
* @return Wether the conversion was successful. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
65 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
66 |
static bool PathToFSSpec(const char *path, FSSpec *spec) |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
67 |
{ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
68 |
FSRef ref; |
4000
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
69 |
assert(spec != NULL); |
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
70 |
assert(path != NULL); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
71 |
|
4000
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
72 |
return |
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
73 |
FSPathMakeRef((UInt8*)path, &ref, NULL) == noErr && |
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
74 |
FSGetCatalogInfo(&ref, kFSCatInfoNone, NULL, NULL, spec, NULL) == noErr; |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
75 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
76 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
77 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
78 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
79 |
* Sets the @c OSType of a given file to @c 'Midi', but only if it's not |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
80 |
* already set. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
81 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
82 |
* @param *spec A @c FSSpec structure referencing a file. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
83 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
84 |
static void SetMIDITypeIfNeeded(const FSSpec *spec) |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
85 |
{ |
5433
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
86 |
FSRef ref; |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
87 |
FSCatalogInfo catalogInfo; |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
88 |
|
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
89 |
assert(spec); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
90 |
|
5433
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
91 |
if (noErr != FSpMakeFSRef(spec, &ref)) return; |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
92 |
if (noErr != FSGetCatalogInfo(&ref, kFSCatInfoNodeFlags | kFSCatInfoFinderInfo, &catalogInfo, NULL, NULL, NULL)) return; |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
93 |
if (!(catalogInfo.nodeFlags & kFSNodeIsDirectoryMask)) { |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
94 |
FileInfo * const info = (FileInfo *) catalogInfo.finderInfo; |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
95 |
if (info->fileType != midiType && !(info->finderFlags & kIsAlias)) { |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
96 |
OSErr e; |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
97 |
info->fileType = midiType; |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
98 |
e = FSSetCatalogInfo(&ref, kFSCatInfoFinderInfo, &catalogInfo); |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
99 |
if (e == noErr) { |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
100 |
DEBUG(driver, 3, "qtmidi: changed filetype to 'Midi'"); |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
101 |
} else { |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
102 |
DEBUG(driver, 0, "qtmidi: changing filetype to 'Midi' failed - error %d", e); |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
103 |
} |
d98fcaa8dbc3
(svn r7639) -Fix: FS#487 Changed music/qtmidi.c to not use functions deprecated by Apple (pvz)
bjarni
parents:
5389
diff
changeset
|
104 |
} |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
105 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
106 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
107 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
108 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
109 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
110 |
* Loads a MIDI file and returns it as a QuickTime Movie structure. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
111 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
112 |
* @param *path String with the path of an existing MIDI file. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
113 |
* @param *moov Pointer to a @c Movie where the result will be stored. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
114 |
* @return Wether the file was loaded and the @c Movie successfully created. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
115 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
116 |
static bool LoadMovieForMIDIFile(const char *path, Movie *moov) |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
117 |
{ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
118 |
int fd; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
119 |
int ret; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
120 |
char magic[4]; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
121 |
FSSpec fsspec; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
122 |
short refnum = 0; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
123 |
short resid = 0; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
124 |
|
4000
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
125 |
assert(path != NULL); |
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
126 |
assert(moov != NULL); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
127 |
|
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
128 |
DEBUG(driver, 2, "qtmidi: start loading '%s'...", path); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
129 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
130 |
/* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
131 |
* XXX Manual check for MIDI header ('MThd'), as I don't know how to make |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
132 |
* QuickTime load MIDI files without a .mid suffix without knowing it's |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
133 |
* a MIDI file and setting the OSType of the file to the 'Midi' value. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
134 |
* Perhahaps ugly, but it seems that it does the Right Thing(tm). |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
135 |
*/ |
4000
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
136 |
fd = open(path, O_RDONLY, 0); |
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
137 |
if (fd == -1) return false; |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
138 |
ret = read(fd, magic, 4); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
139 |
close(fd); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
140 |
if (ret < 4) return false; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
141 |
|
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
142 |
DEBUG(driver, 3, "qtmidi: header is '%.4s'", magic); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
143 |
if (magic[0] != 'M' || magic[1] != 'T' || magic[2] != 'h' || magic[3] != 'd') |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
144 |
return false; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
145 |
|
4000
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
146 |
if (!PathToFSSpec(path, &fsspec)) return false; |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
147 |
SetMIDITypeIfNeeded(&fsspec); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
148 |
|
4000
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
149 |
if (OpenMovieFile(&fsspec, &refnum, fsRdPerm) != noErr) return false; |
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
150 |
DEBUG(driver, 3, "qtmidi: '%s' successfully opened", path); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
151 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
152 |
if (noErr != NewMovieFromFile(moov, refnum, &resid, NULL, |
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
153 |
newMovieActive | newMovieDontAskUnresolvedDataRefs, NULL)) { |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
154 |
CloseMovieFile(refnum); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
155 |
return false; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
156 |
} |
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
157 |
DEBUG(driver, 3, "qtmidi: movie container created"); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
158 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
159 |
CloseMovieFile(refnum); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
160 |
return true; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
161 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
162 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
163 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
164 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
165 |
* Flag which has the @c true value when QuickTime is available and |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
166 |
* initialized. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
167 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
168 |
static bool _quicktime_started = false; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
169 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
170 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
171 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
172 |
* Initialize QuickTime if needed. This function sets the |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
173 |
* #_quicktime_started flag to @c true if QuickTime is present in the system |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
174 |
* and it was initialized properly. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
175 |
*/ |
6247 | 176 |
static void InitQuickTimeIfNeeded() |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
177 |
{ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
178 |
OSStatus dummy; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
179 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
180 |
if (_quicktime_started) return; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
181 |
|
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
182 |
DEBUG(driver, 2, "qtmidi: initializing Quicktime"); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
183 |
/* Be polite: check wether QuickTime is available and initialize it. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
184 |
_quicktime_started = |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
185 |
(noErr == Gestalt(gestaltQuickTime, &dummy)) && |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
186 |
(noErr == EnterMovies()); |
5389 | 187 |
if (!_quicktime_started) DEBUG(driver, 0, "qtmidi: Quicktime initialization failed!"); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
188 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
189 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
190 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
191 |
/** Possible states of the QuickTime music driver. */ |
4000
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
192 |
enum { |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
193 |
QT_STATE_IDLE, /**< No file loaded. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
194 |
QT_STATE_PLAY, /**< File loaded, playing. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
195 |
QT_STATE_STOP, /**< File loaded, stopped. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
196 |
}; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
197 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
198 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
199 |
static Movie _quicktime_movie; /**< Current QuickTime @c Movie. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
200 |
static byte _quicktime_volume = 127; /**< Current volume. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
201 |
static int _quicktime_state = QT_STATE_IDLE; /**< Current player state. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
202 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
203 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
204 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
205 |
* Maps OpenTTD volume to QuickTime notion of volume. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
206 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
207 |
#define VOLUME ((short)((0x00FF & _quicktime_volume) << 1)) |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
208 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
209 |
|
6247 | 210 |
static void StopSong(); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
211 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
212 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
213 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
214 |
* Initialized the MIDI player, including QuickTime initialization. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
215 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
216 |
* @todo Give better error messages by inspecting error codes returned by |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
217 |
* @c Gestalt() and @c EnterMovies(). Needs changes in |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
218 |
* #InitQuickTimeIfNeeded. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
219 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
220 |
static const char* StartDriver(const char * const *parm) |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
221 |
{ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
222 |
InitQuickTimeIfNeeded(); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
223 |
return (_quicktime_started) ? NULL : "can't initialize QuickTime"; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
224 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
225 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
226 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
227 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
228 |
* Checks wether the player is active. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
229 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
230 |
* This function is called at regular intervals from OpenTTD's main loop, so |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
231 |
* we call @c MoviesTask() from here to let QuickTime do its work. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
232 |
*/ |
6247 | 233 |
static bool SongIsPlaying() |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
234 |
{ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
235 |
if (!_quicktime_started) return true; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
236 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
237 |
switch (_quicktime_state) { |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
238 |
case QT_STATE_IDLE: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
239 |
case QT_STATE_STOP: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
240 |
/* Do nothing. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
241 |
break; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
242 |
case QT_STATE_PLAY: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
243 |
MoviesTask(_quicktime_movie, 0); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
244 |
/* Check wether movie ended. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
245 |
if (IsMovieDone(_quicktime_movie) || |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
246 |
(GetMovieTime(_quicktime_movie, NULL) >= |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
247 |
GetMovieDuration(_quicktime_movie))) |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
248 |
_quicktime_state = QT_STATE_STOP; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
249 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
250 |
|
4000
4009d092b306
(svn r5210) Many small changes which piled up: const, unsigned, variable scope, CSE for readability, DeMorgan, if cascades -> switch, whitespace, parentheses, bracing, misc.
tron
parents:
3970
diff
changeset
|
251 |
return _quicktime_state == QT_STATE_PLAY; |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
252 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
253 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
254 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
255 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
256 |
* Stops the MIDI player. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
257 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
258 |
* Stops playing and frees any used resources before returning. As it |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
259 |
* deinitilizes QuickTime, the #_quicktime_started flag is set to @c false. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
260 |
*/ |
6247 | 261 |
static void StopDriver() |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
262 |
{ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
263 |
if (!_quicktime_started) return; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
264 |
|
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
265 |
DEBUG(driver, 2, "qtmidi: stopping driver..."); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
266 |
switch (_quicktime_state) { |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
267 |
case QT_STATE_IDLE: |
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
268 |
DEBUG(driver, 3, "qtmidi: stopping not needed, already idle"); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
269 |
/* Do nothing. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
270 |
break; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
271 |
case QT_STATE_PLAY: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
272 |
StopSong(); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
273 |
case QT_STATE_STOP: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
274 |
DisposeMovie(_quicktime_movie); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
275 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
276 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
277 |
ExitMovies(); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
278 |
_quicktime_started = false; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
279 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
280 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
281 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
282 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
283 |
* Starts playing a new song. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
284 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
285 |
* @param filename Path to a MIDI file. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
286 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
287 |
static void PlaySong(const char *filename) |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
288 |
{ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
289 |
if (!_quicktime_started) return; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
290 |
|
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
291 |
DEBUG(driver, 2, "qtmidi: trying to play '%s'", filename); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
292 |
switch (_quicktime_state) { |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
293 |
case QT_STATE_PLAY: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
294 |
StopSong(); |
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
295 |
DEBUG(driver, 3, "qtmidi: previous tune stopped"); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
296 |
/* XXX Fall-through -- no break needed. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
297 |
case QT_STATE_STOP: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
298 |
DisposeMovie(_quicktime_movie); |
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
299 |
DEBUG(driver, 3, "qtmidi: previous tune disposed"); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
300 |
_quicktime_state = QT_STATE_IDLE; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
301 |
/* XXX Fall-through -- no break needed. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
302 |
case QT_STATE_IDLE: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
303 |
LoadMovieForMIDIFile(filename, &_quicktime_movie); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
304 |
SetMovieVolume(_quicktime_movie, VOLUME); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
305 |
StartMovie(_quicktime_movie); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
306 |
_quicktime_state = QT_STATE_PLAY; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
307 |
} |
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
308 |
DEBUG(driver, 3, "qtmidi: playing '%s'", filename); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
309 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
310 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
311 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
312 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
313 |
* Stops playing the current song, if the player is active. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
314 |
*/ |
6247 | 315 |
static void StopSong() |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
316 |
{ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
317 |
if (!_quicktime_started) return; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
318 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
319 |
switch (_quicktime_state) { |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
320 |
case QT_STATE_IDLE: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
321 |
/* XXX Fall-through -- no break needed. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
322 |
case QT_STATE_STOP: |
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
323 |
DEBUG(driver, 3, "qtmidi: stop requested, but already idle"); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
324 |
/* Do nothing. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
325 |
break; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
326 |
case QT_STATE_PLAY: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
327 |
StopMovie(_quicktime_movie); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
328 |
_quicktime_state = QT_STATE_STOP; |
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
329 |
DEBUG(driver, 3, "qtmidi: player stopped"); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
330 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
331 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
332 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
333 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
334 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
335 |
* Changes the playing volume of the MIDI player. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
336 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
337 |
* As QuickTime controls volume in a per-movie basis, the desired volume is |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
338 |
* stored in #_quicktime_volume, and the volume is set here using the |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
339 |
* #VOLUME macro, @b and when loading new song in #PlaySong. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
340 |
* |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
341 |
* @param vol The desired volume, range of the value is @c 0-127 |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
342 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
343 |
static void SetVolume(byte vol) |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
344 |
{ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
345 |
if (!_quicktime_started) return; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
346 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
347 |
_quicktime_volume = vol; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
348 |
|
5388
db011d108caa
(svn r7577) -Fix (r7565): Missed out some OSX files (Bjarni)
Darkvater
parents:
4000
diff
changeset
|
349 |
DEBUG(driver, 2, "qtmidi: set volume to %u (%hi)", vol, VOLUME); |
2496
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
350 |
switch (_quicktime_state) { |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
351 |
case QT_STATE_IDLE: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
352 |
/* Do nothing. */ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
353 |
break; |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
354 |
case QT_STATE_PLAY: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
355 |
case QT_STATE_STOP: |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
356 |
SetMovieVolume(_quicktime_movie, VOLUME); |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
357 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
358 |
} |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
359 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
360 |
|
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
361 |
/** |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
362 |
* Table of callbacks that implement the QuickTime MIDI player. |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
363 |
*/ |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
364 |
const HalMusicDriver _qtime_music_driver = { |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
365 |
StartDriver, |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
366 |
StopDriver, |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
367 |
PlaySong, |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
368 |
StopSong, |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
369 |
SongIsPlaying, |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
370 |
SetVolume, |
74c42595f8e8
(svn r3022) -feature: [OSX] OSX now uses quicktime to play midi files
bjarni
parents:
diff
changeset
|
371 |
}; |