close(fd);

	if (ret < 4) return false;

	DEBUG(driver, 3, "qtmidi: header is '%.4s'", magic);

	if (magic[0] != 'M' || magic[1] != 'T' || magic[2] != 'h' || magic[3] != 'd')

		return false;

	if (!PathToFSSpec(path, &fsspec)) return false;

	SetMIDITypeIfNeeded(&fsspec);

	if (OpenMovieFile(&fsspec, &refnum, fsRdPerm) != noErr) return false;

	DEBUG(driver, 3, "qtmidi: '%s' successfully opened", path);

	if (noErr != NewMovieFromFile(moov, refnum, &resid, NULL,

				newMovieActive | newMovieDontAskUnresolvedDataRefs, NULL)) {

		CloseMovieFile(refnum);

		return false;

	}

	DEBUG(driver, 3, "qtmidi: movie container created");

	CloseMovieFile(refnum);

	return true;

}

/**

 * Flag which has the @c true value when QuickTime is available and

 * initialized.

 */

static bool _quicktime_started = false;

/**

 * Initialize QuickTime if needed. This function sets the

 * #_quicktime_started flag to @c true if QuickTime is present in the system

 * and it was initialized properly.

 */

static void InitQuickTimeIfNeeded(void)

{

	OSStatus dummy;

	if (_quicktime_started) return;

	DEBUG(driver, 2, "qtmidi: initializing Quicktime");

	/* Be polite: check wether QuickTime is available and initialize it. */

	_quicktime_started =

		(noErr == Gestalt(gestaltQuickTime, &dummy)) &&

		(noErr == EnterMovies());

}

/** Possible states of the QuickTime music driver. */

enum {

	QT_STATE_IDLE, /**< No file loaded. */

	QT_STATE_PLAY, /**< File loaded, playing. */

	QT_STATE_STOP, /**< File loaded, stopped. */

};

static Movie _quicktime_movie;                  /**< Current QuickTime @c Movie. */

static byte  _quicktime_volume = 127;           /**< Current volume. */

static int   _quicktime_state  = QT_STATE_IDLE; /**< Current player state. */

/**

 * Maps OpenTTD volume to QuickTime notion of volume.

 */

#define VOLUME  ((short)((0x00FF & _quicktime_volume) << 1))

static void StopSong(void);

/**

 * Initialized the MIDI player, including QuickTime initialization.

 *

 * @todo Give better error messages by inspecting error codes returned by

 * @c Gestalt() and @c EnterMovies(). Needs changes in

 * #InitQuickTimeIfNeeded.

 */

static const char* StartDriver(const char * const *parm)

{

	InitQuickTimeIfNeeded();

	return (_quicktime_started) ? NULL : "can't initialize QuickTime";

}

/**

 * Checks wether the player is active.

 *

 * This function is called at regular intervals from OpenTTD's main loop, so

 * we call @c MoviesTask() from here to let QuickTime do its work.

 */

static bool SongIsPlaying(void)

{

	if (!_quicktime_started) return true;