mirror of
https://github.com/kanjitalk755/macemu.git
synced 2024-08-25 06:28:57 +00:00
1127 lines
26 KiB
C++
1127 lines
26 KiB
C++
/*
|
|
* sys_unix.cpp - System dependent routines, Unix implementation
|
|
*
|
|
* Basilisk II (C) 1997-2003 Christian Bauer
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#include "sysdeps.h"
|
|
|
|
#include <sys/ioctl.h>
|
|
#include <sys/stat.h>
|
|
#include <errno.h>
|
|
|
|
#ifdef __linux__
|
|
#include <sys/mount.h>
|
|
#include <linux/cdrom.h>
|
|
#include <linux/fd.h>
|
|
#include <linux/major.h>
|
|
#include <linux/kdev_t.h>
|
|
#include <linux/unistd.h>
|
|
#include <dirent.h>
|
|
|
|
#ifdef __NR__llseek
|
|
_syscall5(int, _llseek, unsigned int, fd, unsigned long, hi, unsigned long, lo, loff_t *, res, unsigned int, wh);
|
|
#else
|
|
static int _llseek(unsigned int fd, unsigned long hi, unsigned long lo, loff_t *res, unsigned int wh)
|
|
{
|
|
if (hi)
|
|
return -1;
|
|
*res = lseek(fd, lo, wh);
|
|
if (*res == -1)
|
|
return -1;
|
|
return 0;
|
|
}
|
|
#endif
|
|
#endif
|
|
|
|
#if defined(__FreeBSD__) || defined(__NetBSD__)
|
|
#include <sys/cdio.h>
|
|
#endif
|
|
|
|
#include "main.h"
|
|
#include "macos_util.h"
|
|
#include "prefs.h"
|
|
#include "user_strings.h"
|
|
#include "sys.h"
|
|
|
|
#define DEBUG 0
|
|
#include "debug.h"
|
|
|
|
|
|
// File handles are pointers to these structures
|
|
struct file_handle {
|
|
char *name; // Copy of device/file name
|
|
int fd;
|
|
bool is_file; // Flag: plain file or /dev/something?
|
|
bool is_floppy; // Flag: floppy device
|
|
bool is_cdrom; // Flag: CD-ROM device
|
|
bool read_only; // Copy of Sys_open() flag
|
|
loff_t start_byte; // Size of file header (if any)
|
|
loff_t file_size; // Size of file data (only valid if is_file is true)
|
|
|
|
#if defined(__linux__)
|
|
int cdrom_cap; // CD-ROM capability flags (only valid if is_cdrom is true)
|
|
#elif defined(__FreeBSD__)
|
|
struct ioc_capability cdrom_cap;
|
|
#elif defined(__APPLE__) && defined(__MACH__)
|
|
char *ioctl_name; // For CDs on OS X - a device for special ioctls
|
|
int ioctl_fd;
|
|
#endif
|
|
};
|
|
|
|
// File handle of first floppy drive (for SysMountFirstFloppy())
|
|
static file_handle *first_floppy = NULL;
|
|
|
|
|
|
/*
|
|
* Initialization
|
|
*/
|
|
|
|
void SysInit(void)
|
|
{
|
|
}
|
|
|
|
|
|
/*
|
|
* Deinitialization
|
|
*/
|
|
|
|
void SysExit(void)
|
|
{
|
|
}
|
|
|
|
|
|
/*
|
|
* Mount first floppy disk
|
|
*/
|
|
|
|
void SysMountFirstFloppy(void)
|
|
{
|
|
if (first_floppy)
|
|
MountVolume(first_floppy);
|
|
}
|
|
|
|
|
|
/*
|
|
* This gets called when no "floppy" prefs items are found
|
|
* It scans for available floppy drives and adds appropriate prefs items
|
|
*/
|
|
|
|
void SysAddFloppyPrefs(void)
|
|
{
|
|
#if defined(__linux__)
|
|
if (access("/dev/.devfsd", F_OK) < 0) {
|
|
PrefsAddString("floppy", "/dev/fd0u1440");
|
|
PrefsAddString("floppy", "/dev/fd1u1440");
|
|
} else {
|
|
DIR *fd_dir = opendir("/dev/floppy");
|
|
if (fd_dir) {
|
|
struct dirent *floppy_dev;
|
|
while ((floppy_dev = readdir(fd_dir)) != NULL) {
|
|
if (strstr(floppy_dev->d_name, "u1440") != NULL) {
|
|
char fd_dev[20];
|
|
sprintf(fd_dev, "/dev/floppy/%s", floppy_dev->d_name);
|
|
PrefsAddString("floppy", fd_dev);
|
|
}
|
|
}
|
|
closedir(fd_dir);
|
|
}
|
|
}
|
|
#elif defined(__NetBSD__)
|
|
PrefsAddString("floppy", "/dev/fd0a");
|
|
PrefsAddString("floppy", "/dev/fd1a");
|
|
#elif defined(__APPLE__) && defined(__MACH__)
|
|
PrefsAddString("floppy", "/dev/fd/0");
|
|
PrefsAddString("floppy", "/dev/fd/1");
|
|
#else
|
|
PrefsAddString("floppy", "/dev/fd0");
|
|
PrefsAddString("floppy", "/dev/fd1");
|
|
#endif
|
|
}
|
|
|
|
|
|
/*
|
|
* This gets called when no "disk" prefs items are found
|
|
* It scans for available HFS volumes and adds appropriate prefs items
|
|
* On OS X, we could do the same, but on an OS X machine I think it is
|
|
* very unlikely that any mounted volumes would contain a system which
|
|
* is old enough to boot a 68k Mac, so we just do nothing here for now.
|
|
*/
|
|
|
|
void SysAddDiskPrefs(void)
|
|
{
|
|
#ifdef __linux__
|
|
FILE *f = fopen("/etc/fstab", "r");
|
|
if (f) {
|
|
char line[256];
|
|
while(fgets(line, 255, f)) {
|
|
// Read line
|
|
int len = strlen(line);
|
|
if (len == 0 || line[0] == '#')
|
|
continue;
|
|
line[len-1] = 0;
|
|
|
|
// Parse line
|
|
char *dev, *mnt_point, *fstype;
|
|
if (sscanf(line, "%as %as %as", &dev, &mnt_point, &fstype) == 3) {
|
|
if (strcmp(fstype, "hfs") == 0)
|
|
PrefsAddString("disk", dev);
|
|
}
|
|
free(dev); free(mnt_point); free(fstype);
|
|
}
|
|
fclose(f);
|
|
}
|
|
#endif
|
|
}
|
|
|
|
|
|
/*
|
|
* This gets called when no "cdrom" prefs items are found
|
|
* It scans for available CD-ROM drives and adds appropriate prefs items
|
|
*/
|
|
|
|
void SysAddCDROMPrefs(void)
|
|
{
|
|
// Don't scan for drives if nocdrom option given
|
|
if (PrefsFindBool("nocdrom"))
|
|
return;
|
|
|
|
#if defined(__linux__)
|
|
if (access("/dev/.devfsd", F_OK) < 0)
|
|
PrefsAddString("cdrom", "/dev/cdrom");
|
|
else {
|
|
DIR *cd_dir = opendir("/dev/cdroms");
|
|
if (cd_dir) {
|
|
struct dirent *cdrom_dev;
|
|
while ((cdrom_dev = readdir(cd_dir)) != NULL) {
|
|
if (strcmp(cdrom_dev->d_name, ".") != 0 && strcmp(cdrom_dev->d_name, "..") != 0) {
|
|
char cd_dev[20];
|
|
sprintf(cd_dev, "/dev/cdroms/%s", cdrom_dev->d_name);
|
|
PrefsAddString("cdrom", cd_dev);
|
|
}
|
|
}
|
|
closedir(cd_dir);
|
|
}
|
|
}
|
|
#elif defined(__APPLE__) && defined(__MACH__)
|
|
extern void DarwinAddCDROMPrefs(void);
|
|
|
|
DarwinAddCDROMPrefs();
|
|
#elif defined(__FreeBSD__) || defined(__NetBSD__)
|
|
PrefsAddString("cdrom", "/dev/cd0c");
|
|
#endif
|
|
}
|
|
|
|
|
|
/*
|
|
* Add default serial prefs (must be added, even if no ports present)
|
|
*/
|
|
|
|
void SysAddSerialPrefs(void)
|
|
{
|
|
#if defined(__linux__)
|
|
if (access("/dev/.devfsd", F_OK) < 0) {
|
|
PrefsAddString("seriala", "/dev/ttyS0");
|
|
PrefsAddString("serialb", "/dev/ttyS1");
|
|
} else {
|
|
PrefsAddString("seriala", "/dev/tts/0");
|
|
PrefsAddString("serialb", "/dev/tts/1");
|
|
}
|
|
#elif defined(__FreeBSD__)
|
|
PrefsAddString("seriala", "/dev/cuaa0");
|
|
PrefsAddString("serialb", "/dev/cuaa1");
|
|
#elif defined(__NetBSD__)
|
|
PrefsAddString("seriala", "/dev/tty00");
|
|
PrefsAddString("serialb", "/dev/tty01");
|
|
#elif defined(__APPLE__) && defined(__MACH__)
|
|
PrefsAddString("seriala", "/dev/ttys0");
|
|
PrefsAddString("serialb", "/dev/ttys1");
|
|
// PrefsAddString("seriala", "/dev/cu.modem");
|
|
// PrefsAddString("serialb", "/dev/cu.IrDA-IrCOMMch-b");
|
|
#endif
|
|
}
|
|
|
|
|
|
/*
|
|
* Check if device is a mounted HFS volume, get mount name
|
|
*/
|
|
|
|
static bool is_drive_mounted(const char *dev_name, char *mount_name)
|
|
{
|
|
#ifdef __linux__
|
|
FILE *f = fopen("/proc/mounts", "r");
|
|
if (f) {
|
|
char line[256];
|
|
while(fgets(line, 255, f)) {
|
|
// Read line
|
|
int len = strlen(line);
|
|
if (len == 0)
|
|
continue;
|
|
line[len-1] = 0;
|
|
|
|
// Parse line
|
|
if (strncmp(line, dev_name, strlen(dev_name)) == 0) {
|
|
mount_name[0] = 0;
|
|
char *dummy;
|
|
sscanf(line, "%as %s", &dummy, mount_name);
|
|
free(dummy);
|
|
fclose(f);
|
|
return true;
|
|
}
|
|
}
|
|
fclose(f);
|
|
}
|
|
#endif
|
|
return false;
|
|
}
|
|
|
|
|
|
/*
|
|
* Open file/device, create new file handle (returns NULL on error)
|
|
*/
|
|
|
|
void *Sys_open(const char *name, bool read_only)
|
|
{
|
|
bool is_file = strncmp(name, "/dev/", 5) != 0;
|
|
#if defined(__FreeBSD__)
|
|
// SCSI IDE
|
|
bool is_cdrom = strncmp(name, "/dev/cd", 7) == 0 || strncmp(name, "/dev/acd", 8) == 0;
|
|
#else
|
|
bool is_cdrom = strncmp(name, "/dev/cd", 7) == 0;
|
|
#endif
|
|
|
|
#if defined(__APPLE__) && defined(__MACH__)
|
|
//
|
|
// There is no set filename in /dev which is the cdrom,
|
|
// so we have to see if it is any of the devices that we found earlier
|
|
//
|
|
const char *cdrom;
|
|
int tmp = 0;
|
|
|
|
while ( (cdrom = PrefsFindString("cdrom", tmp) ) != NULL )
|
|
{
|
|
if ( strcmp(name, cdrom) == 0 )
|
|
{
|
|
is_cdrom = 1;
|
|
read_only = 1;
|
|
break;
|
|
}
|
|
++tmp;
|
|
}
|
|
#endif
|
|
|
|
D(bug("Sys_open(%s, %s)\n", name, read_only ? "read-only" : "read/write"));
|
|
|
|
// Check if write access is allowed, set read-only flag if not
|
|
if (!read_only && access(name, W_OK))
|
|
read_only = true;
|
|
|
|
// Print warning message and eventually unmount drive when this is an HFS volume mounted under Linux (double mounting will corrupt the volume)
|
|
char mount_name[256];
|
|
if (!is_file && !read_only && is_drive_mounted(name, mount_name)) {
|
|
char str[512];
|
|
sprintf(str, GetString(STR_VOLUME_IS_MOUNTED_WARN), mount_name);
|
|
WarningAlert(str);
|
|
sprintf(str, "umount %s", mount_name);
|
|
if (system(str)) {
|
|
sprintf(str, GetString(STR_CANNOT_UNMOUNT_WARN), mount_name, strerror(errno));
|
|
WarningAlert(str);
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
// Open file/device
|
|
#if defined(__linux__) || defined(__FreeBSD__) || defined(__NetBSD__)
|
|
int fd = open(name, (read_only ? O_RDONLY : O_RDWR) | (is_cdrom ? O_NONBLOCK : 0));
|
|
#else
|
|
int fd = open(name, read_only ? O_RDONLY : O_RDWR);
|
|
#endif
|
|
if (fd < 0 && !read_only) {
|
|
// Read-write failed, try read-only
|
|
read_only = true;
|
|
fd = open(name, O_RDONLY);
|
|
}
|
|
if (fd >= 0) {
|
|
file_handle *fh = new file_handle;
|
|
fh->name = strdup(name);
|
|
fh->fd = fd;
|
|
fh->is_file = is_file;
|
|
fh->read_only = read_only;
|
|
fh->start_byte = 0;
|
|
fh->is_floppy = false;
|
|
fh->is_cdrom = false;
|
|
if (fh->is_file) {
|
|
// Detect disk image file layout
|
|
loff_t size = 0;
|
|
#if defined(__linux__)
|
|
_llseek(fh->fd, 0, 0, &size, SEEK_END);
|
|
#else
|
|
size = lseek(fd, 0, SEEK_END);
|
|
#endif
|
|
uint8 data[256];
|
|
lseek(fd, 0, SEEK_SET);
|
|
read(fd, data, 256);
|
|
FileDiskLayout(size, data, fh->start_byte, fh->file_size);
|
|
} else {
|
|
struct stat st;
|
|
if (fstat(fd, &st) == 0) {
|
|
if (S_ISBLK(st.st_mode)) {
|
|
fh->is_cdrom = is_cdrom;
|
|
#if defined(__linux__)
|
|
fh->is_floppy = (MAJOR(st.st_rdev) == FLOPPY_MAJOR);
|
|
#ifdef CDROM_GET_CAPABILITY
|
|
if (is_cdrom) {
|
|
fh->cdrom_cap = ioctl(fh->fd, CDROM_GET_CAPABILITY);
|
|
if (fh->cdrom_cap < 0)
|
|
fh->cdrom_cap = 0;
|
|
}
|
|
#else
|
|
fh->cdrom_cap = 0;
|
|
#endif
|
|
#elif defined(__FreeBSD__)
|
|
fh->is_floppy = ((st.st_rdev >> 16) == 2);
|
|
#ifdef CDIOCCAPABILITY
|
|
if (is_cdrom) {
|
|
if (ioctl(fh->fd, CDIOCCAPABILITY, &fh->cdrom_cap) < 0)
|
|
memset(&fh->cdrom_cap, 0, sizeof(fh->cdrom_cap));
|
|
}
|
|
#else
|
|
fh->cdrom_cap = 0;
|
|
#endif
|
|
#elif defined(__NetBSD__)
|
|
fh->is_floppy = ((st.st_rdev >> 16) == 2);
|
|
#endif
|
|
}
|
|
#if defined(__APPLE__) && defined(__MACH__)
|
|
|
|
// In OS X, the device name is OK for sending ioctls to,
|
|
// but not for reading raw CDROM data from.
|
|
// (it seems to have extra data padded in)
|
|
//
|
|
// So, we keep the already opened fiole handle,
|
|
// and open a slightly different file for CDROM data
|
|
//
|
|
if ( is_cdrom )
|
|
{
|
|
fh->ioctl_name = fh->name;
|
|
fh->ioctl_fd = fh->fd;
|
|
|
|
fh->name = (char *) malloc(strlen(name) + 2);
|
|
if ( fh->name )
|
|
{
|
|
*fh->name = '\0';
|
|
strcat(fh->name, name);
|
|
strcat(fh->name, "s1");
|
|
fh->fd = open(fh->name, (read_only ? O_RDONLY : O_RDWR));
|
|
if ( fh->fd < 0 ) {
|
|
printf("WARNING: Cannot open %s (%s)\n",
|
|
fh->name, strerror(errno));
|
|
return NULL;
|
|
}
|
|
}
|
|
}
|
|
#endif
|
|
}
|
|
}
|
|
if (fh->is_floppy && first_floppy == NULL)
|
|
first_floppy = fh;
|
|
return fh;
|
|
} else {
|
|
printf("WARNING: Cannot open %s (%s)\n", name, strerror(errno));
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* Close file/device, delete file handle
|
|
*/
|
|
|
|
void Sys_close(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return;
|
|
|
|
close(fh->fd);
|
|
if (fh->name)
|
|
free(fh->name);
|
|
delete fh;
|
|
}
|
|
|
|
|
|
/*
|
|
* Read "length" bytes from file/device, starting at "offset", to "buffer",
|
|
* returns number of bytes read (or 0)
|
|
*/
|
|
|
|
size_t Sys_read(void *arg, void *buffer, loff_t offset, size_t length)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return 0;
|
|
|
|
// Seek to position
|
|
#if defined(__linux__)
|
|
loff_t pos = offset + fh->start_byte, res;
|
|
if (_llseek(fh->fd, pos >> 32, pos, &res, SEEK_SET) < 0)
|
|
return 0;
|
|
#else
|
|
if (lseek(fh->fd, offset + fh->start_byte, SEEK_SET) < 0)
|
|
return 0;
|
|
#endif
|
|
|
|
// Read data
|
|
return read(fh->fd, buffer, length);
|
|
}
|
|
|
|
|
|
/*
|
|
* Write "length" bytes from "buffer" to file/device, starting at "offset",
|
|
* returns number of bytes written (or 0)
|
|
*/
|
|
|
|
size_t Sys_write(void *arg, void *buffer, loff_t offset, size_t length)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return 0;
|
|
|
|
// Seek to position
|
|
#if defined(__linux__)
|
|
loff_t pos = offset + fh->start_byte, res;
|
|
if (_llseek(fh->fd, pos >> 32, pos, &res, SEEK_SET) < 0)
|
|
return 0;
|
|
#else
|
|
if (lseek(fh->fd, offset + fh->start_byte, SEEK_SET) < 0)
|
|
return 0;
|
|
#endif
|
|
|
|
// Write data
|
|
return write(fh->fd, buffer, length);
|
|
}
|
|
|
|
|
|
/*
|
|
* Return size of file/device (minus header)
|
|
*/
|
|
|
|
loff_t SysGetFileSize(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return true;
|
|
|
|
if (fh->is_file)
|
|
return fh->file_size;
|
|
else {
|
|
#if defined(__linux__)
|
|
long blocks;
|
|
if (ioctl(fh->fd, BLKGETSIZE, &blocks) < 0)
|
|
return 0;
|
|
D(bug(" BLKGETSIZE returns %d blocks\n", blocks));
|
|
return (loff_t)blocks * 512;
|
|
#else
|
|
return lseek(fh->fd, 0, SEEK_END) - fh->start_byte;
|
|
#endif
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* Eject volume (if applicable)
|
|
*/
|
|
|
|
void SysEject(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return;
|
|
|
|
#if defined(__linux__)
|
|
if (fh->is_floppy) {
|
|
fsync(fh->fd);
|
|
ioctl(fh->fd, FDFLUSH);
|
|
ioctl(fh->fd, FDEJECT);
|
|
close(fh->fd); // Close and reopen so the driver will see the media change
|
|
fh->fd = open(fh->name, fh->read_only ? O_RDONLY : O_RDWR);
|
|
} else if (fh->is_cdrom) {
|
|
ioctl(fh->fd, CDROMEJECT);
|
|
close(fh->fd); // Close and reopen so the driver will see the media change
|
|
fh->fd = open(fh->name, O_RDONLY | O_NONBLOCK);
|
|
}
|
|
#elif defined(__FreeBSD__) || defined(__NetBSD__)
|
|
if (fh->is_floppy) {
|
|
fsync(fh->fd);
|
|
} else if (fh->is_cdrom) {
|
|
ioctl(fh->fd, CDIOCEJECT);
|
|
close(fh->fd); // Close and reopen so the driver will see the media change
|
|
fh->fd = open(fh->name, O_RDONLY | O_NONBLOCK);
|
|
}
|
|
#elif defined(__APPLE__) && defined(__MACH__)
|
|
if ( fh->is_cdrom ) {
|
|
|
|
// Stolen from IOKit/storage/IOMediaBSDClient.h
|
|
#define DKIOCEJECT _IO('d', 21)
|
|
|
|
close(fh->fd);
|
|
if ( ioctl(fh->ioctl_fd, DKIOCEJECT) < 0 )
|
|
{
|
|
printf("ioctl(DKIOCEJECT) failed on file %s: %s\n",
|
|
fh->ioctl_name, strerror(errno));
|
|
|
|
// If we are running OSX, the device may be is busy
|
|
// due to the Finder having the disk mounted and open,
|
|
// so we have to use another method.
|
|
|
|
// The only problem is that this takes about 5 seconds:
|
|
|
|
char *cmd = (char *) malloc(30+sizeof(fh->name));
|
|
|
|
if ( ! cmd )
|
|
return;
|
|
close(fh->ioctl_fd);
|
|
sprintf(cmd, "diskutil eject %s 2>&1 >/dev/null", fh->name);
|
|
system(cmd);
|
|
}
|
|
}
|
|
#endif
|
|
}
|
|
|
|
|
|
/*
|
|
* Format volume (if applicable)
|
|
*/
|
|
|
|
bool SysFormat(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return false;
|
|
|
|
//!!
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* Check if file/device is read-only (this includes the read-only flag on Sys_open())
|
|
*/
|
|
|
|
bool SysIsReadOnly(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return true;
|
|
|
|
#if defined(__linux__)
|
|
if (fh->is_floppy) {
|
|
struct floppy_drive_struct stat;
|
|
ioctl(fh->fd, FDGETDRVSTAT, &stat);
|
|
return !(stat.flags & FD_DISK_WRITABLE);
|
|
} else
|
|
#endif
|
|
return fh->read_only;
|
|
}
|
|
|
|
|
|
/*
|
|
* Check if the given file handle refers to a fixed or a removable disk
|
|
*/
|
|
|
|
bool SysIsFixedDisk(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return true;
|
|
|
|
if (fh->is_file)
|
|
return true;
|
|
else if (fh->is_floppy || fh->is_cdrom)
|
|
return false;
|
|
else
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* Check if a disk is inserted in the drive (always true for files)
|
|
*/
|
|
|
|
bool SysIsDiskInserted(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return false;
|
|
|
|
if (fh->is_file) {
|
|
return true;
|
|
|
|
#if defined(__linux__)
|
|
} else if (fh->is_floppy) {
|
|
char block[512];
|
|
lseek(fh->fd, 0, SEEK_SET);
|
|
ssize_t actual = read(fh->fd, block, 512);
|
|
if (actual < 0) {
|
|
close(fh->fd); // Close and reopen so the driver will see the media change
|
|
fh->fd = open(fh->name, fh->read_only ? O_RDONLY : O_RDWR);
|
|
actual = read(fh->fd, block, 512);
|
|
}
|
|
return actual == 512;
|
|
} else if (fh->is_cdrom) {
|
|
#ifdef CDROM_MEDIA_CHANGED
|
|
if (fh->cdrom_cap & CDC_MEDIA_CHANGED) {
|
|
// If we don't do this, all attempts to read from a disc fail
|
|
// once the tray has been opened (altough the TOC reads fine).
|
|
// Can somebody explain this to me?
|
|
if (ioctl(fh->fd, CDROM_MEDIA_CHANGED) == 1) {
|
|
close(fh->fd);
|
|
fh->fd = open(fh->name, O_RDONLY | O_NONBLOCK);
|
|
}
|
|
}
|
|
#endif
|
|
#ifdef CDROM_DRIVE_STATUS
|
|
if (fh->cdrom_cap & CDC_DRIVE_STATUS) {
|
|
return ioctl(fh->fd, CDROM_DRIVE_STATUS, CDSL_CURRENT) == CDS_DISC_OK;
|
|
}
|
|
#endif
|
|
cdrom_tochdr header;
|
|
return ioctl(fh->fd, CDROMREADTOCHDR, &header) == 0;
|
|
#elif defined(__FreeBSD__) || defined(__NetBSD__)
|
|
} else if (fh->is_floppy) {
|
|
return false; //!!
|
|
} else if (fh->is_cdrom) {
|
|
struct ioc_toc_header header;
|
|
return ioctl(fh->fd, CDIOREADTOCHEADER, &header) == 0;
|
|
#endif
|
|
|
|
} else
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* Prevent medium removal (if applicable)
|
|
*/
|
|
|
|
void SysPreventRemoval(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return;
|
|
|
|
#if defined(__linux__) && defined(CDROM_LOCKDOOR)
|
|
if (fh->is_cdrom)
|
|
ioctl(fh->fd, CDROM_LOCKDOOR, 1);
|
|
#endif
|
|
}
|
|
|
|
|
|
/*
|
|
* Allow medium removal (if applicable)
|
|
*/
|
|
|
|
void SysAllowRemoval(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return;
|
|
|
|
#if defined(__linux__) && defined(CDROM_LOCKDOOR)
|
|
if (fh->is_cdrom)
|
|
ioctl(fh->fd, CDROM_LOCKDOOR, 0);
|
|
#endif
|
|
}
|
|
|
|
|
|
/*
|
|
* Read CD-ROM TOC (binary MSF format, 804 bytes max.)
|
|
*/
|
|
|
|
bool SysCDReadTOC(void *arg, uint8 *toc)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return false;
|
|
|
|
if (fh->is_cdrom) {
|
|
#if defined(__linux__)
|
|
uint8 *p = toc + 2;
|
|
|
|
// Header
|
|
cdrom_tochdr header;
|
|
if (ioctl(fh->fd, CDROMREADTOCHDR, &header) < 0)
|
|
return false;
|
|
*p++ = header.cdth_trk0;
|
|
*p++ = header.cdth_trk1;
|
|
|
|
// Tracks
|
|
cdrom_tocentry entry;
|
|
for (int i=header.cdth_trk0; i<=header.cdth_trk1; i++) {
|
|
entry.cdte_track = i;
|
|
entry.cdte_format = CDROM_MSF;
|
|
if (ioctl(fh->fd, CDROMREADTOCENTRY, &entry) < 0)
|
|
return false;
|
|
*p++ = 0;
|
|
*p++ = (entry.cdte_adr << 4) | entry.cdte_ctrl;
|
|
*p++ = entry.cdte_track;
|
|
*p++ = 0;
|
|
*p++ = 0;
|
|
*p++ = entry.cdte_addr.msf.minute;
|
|
*p++ = entry.cdte_addr.msf.second;
|
|
*p++ = entry.cdte_addr.msf.frame;
|
|
}
|
|
|
|
// Leadout track
|
|
entry.cdte_track = CDROM_LEADOUT;
|
|
entry.cdte_format = CDROM_MSF;
|
|
if (ioctl(fh->fd, CDROMREADTOCENTRY, &entry) < 0)
|
|
return false;
|
|
*p++ = 0;
|
|
*p++ = (entry.cdte_adr << 4) | entry.cdte_ctrl;
|
|
*p++ = entry.cdte_track;
|
|
*p++ = 0;
|
|
*p++ = 0;
|
|
*p++ = entry.cdte_addr.msf.minute;
|
|
*p++ = entry.cdte_addr.msf.second;
|
|
*p++ = entry.cdte_addr.msf.frame;
|
|
|
|
// TOC size
|
|
int toc_size = p - toc;
|
|
*toc++ = toc_size >> 8;
|
|
*toc++ = toc_size & 0xff;
|
|
return true;
|
|
#elif defined(__APPLE__) && defined(__MACH__) && defined(MAC_OS_X_VERSION_10_2)
|
|
extern bool DarwinCDReadTOC(char *name, uint8 *toc);
|
|
|
|
return DarwinCDReadTOC(fh->name, toc);
|
|
#elif defined(__FreeBSD__)
|
|
uint8 *p = toc + 2;
|
|
|
|
// Header
|
|
struct ioc_toc_header header;
|
|
if (ioctl(fh->fd, CDIOREADTOCHEADER, &header) < 0)
|
|
return false;
|
|
*p++ = header.starting_track;
|
|
*p++ = header.ending_track;
|
|
|
|
// Tracks
|
|
struct ioc_read_toc_single_entry entry;
|
|
for (int i=header.starting_track; i<=header.ending_track; i++) {
|
|
entry.track = i;
|
|
entry.address_format = CD_MSF_FORMAT;
|
|
if (ioctl(fh->fd, CDIOREADTOCENTRY, &entry) < 0)
|
|
return false;
|
|
*p++ = 0;
|
|
*p++ = (entry.entry.addr_type << 4) | entry.entry.control;
|
|
*p++ = entry.entry.track;
|
|
*p++ = 0;
|
|
*p++ = 0;
|
|
*p++ = entry.entry.addr.msf.minute;
|
|
*p++ = entry.entry.addr.msf.second;
|
|
*p++ = entry.entry.addr.msf.frame;
|
|
}
|
|
|
|
// Leadout track
|
|
entry.track = CD_TRACK_INFO;
|
|
entry.address_format = CD_MSF_FORMAT;
|
|
if (ioctl(fh->fd, CDIOREADTOCENTRY, &entry) < 0)
|
|
return false;
|
|
*p++ = 0;
|
|
*p++ = (entry.entry.addr_type << 4) | entry.entry.control;
|
|
*p++ = entry.entry.track;
|
|
*p++ = 0;
|
|
*p++ = 0;
|
|
*p++ = entry.entry.addr.msf.minute;
|
|
*p++ = entry.entry.addr.msf.second;
|
|
*p++ = entry.entry.addr.msf.frame;
|
|
|
|
// TOC size
|
|
int toc_size = p - toc;
|
|
*toc++ = toc_size >> 8;
|
|
*toc++ = toc_size & 0xff;
|
|
return true;
|
|
#elif defined(__NetBSD__)
|
|
uint8 *p = toc + 2;
|
|
|
|
// Header
|
|
struct ioc_toc_header header;
|
|
if (ioctl(fh->fd, CDIOREADTOCHEADER, &header) < 0)
|
|
return false;
|
|
*p++ = header.starting_track;
|
|
*p++ = header.ending_track;
|
|
|
|
// Tracks (this is nice... :-)
|
|
struct ioc_read_toc_entry entries;
|
|
entries.address_format = CD_MSF_FORMAT;
|
|
entries.starting_track = 1;
|
|
entries.data_len = 800;
|
|
entries.data = (cd_toc_entry *)p;
|
|
if (ioctl(fh->fd, CDIOREADTOCENTRIES, &entries) < 0)
|
|
return false;
|
|
|
|
// TOC size
|
|
int toc_size = p - toc;
|
|
*toc++ = toc_size >> 8;
|
|
*toc++ = toc_size & 0xff;
|
|
return true;
|
|
#else
|
|
return false;
|
|
#endif
|
|
} else
|
|
return false;
|
|
}
|
|
|
|
|
|
/*
|
|
* Read CD-ROM position data (Sub-Q Channel, 16 bytes, see SCSI standard)
|
|
*/
|
|
|
|
bool SysCDGetPosition(void *arg, uint8 *pos)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return false;
|
|
|
|
if (fh->is_cdrom) {
|
|
#if defined(__linux__)
|
|
cdrom_subchnl chan;
|
|
chan.cdsc_format = CDROM_MSF;
|
|
if (ioctl(fh->fd, CDROMSUBCHNL, &chan) < 0)
|
|
return false;
|
|
*pos++ = 0;
|
|
*pos++ = chan.cdsc_audiostatus;
|
|
*pos++ = 0;
|
|
*pos++ = 12; // Sub-Q data length
|
|
*pos++ = 0;
|
|
*pos++ = (chan.cdsc_adr << 4) | chan.cdsc_ctrl;
|
|
*pos++ = chan.cdsc_trk;
|
|
*pos++ = chan.cdsc_ind;
|
|
*pos++ = 0;
|
|
*pos++ = chan.cdsc_absaddr.msf.minute;
|
|
*pos++ = chan.cdsc_absaddr.msf.second;
|
|
*pos++ = chan.cdsc_absaddr.msf.frame;
|
|
*pos++ = 0;
|
|
*pos++ = chan.cdsc_reladdr.msf.minute;
|
|
*pos++ = chan.cdsc_reladdr.msf.second;
|
|
*pos++ = chan.cdsc_reladdr.msf.frame;
|
|
return true;
|
|
#elif defined(__FreeBSD__) || defined(__NetBSD__)
|
|
struct ioc_read_subchannel chan;
|
|
chan.data_format = CD_MSF_FORMAT;
|
|
chan.address_format = CD_MSF_FORMAT;
|
|
chan.track = CD_CURRENT_POSITION;
|
|
if (ioctl(fh->fd, CDIOCREADSUBCHANNEL, &chan) < 0)
|
|
return false;
|
|
*pos++ = 0;
|
|
*pos++ = chan.data->header.audio_status;
|
|
*pos++ = 0;
|
|
*pos++ = 12; // Sub-Q data length
|
|
*pos++ = 0;
|
|
*pos++ = (chan.data->what.position.addr_type << 4) | chan.data->what.position.control;
|
|
*pos++ = chan.data->what.position.track_number;
|
|
*pos++ = chan.data->what.position.index_number;
|
|
*pos++ = 0;
|
|
*pos++ = chan.data->what.position.absaddr.msf.minute;
|
|
*pos++ = chan.data->what.position.absaddr.msf.second;
|
|
*pos++ = chan.data->what.position.absaddr.msf.frame;
|
|
*pos++ = 0;
|
|
*pos++ = chan.data->what.position.reladdr.msf.minute;
|
|
*pos++ = chan.data->what.position.reladdr.msf.second;
|
|
*pos++ = chan.data->what.position.reladdr.msf.frame;
|
|
return true;
|
|
#else
|
|
return false;
|
|
#endif
|
|
} else
|
|
return false;
|
|
}
|
|
|
|
|
|
/*
|
|
* Play CD audio
|
|
*/
|
|
|
|
bool SysCDPlay(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, uint8 end_m, uint8 end_s, uint8 end_f)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return false;
|
|
|
|
if (fh->is_cdrom) {
|
|
#if defined(__linux__)
|
|
cdrom_msf play;
|
|
play.cdmsf_min0 = start_m;
|
|
play.cdmsf_sec0 = start_s;
|
|
play.cdmsf_frame0 = start_f;
|
|
play.cdmsf_min1 = end_m;
|
|
play.cdmsf_sec1 = end_s;
|
|
play.cdmsf_frame1 = end_f;
|
|
return ioctl(fh->fd, CDROMPLAYMSF, &play) == 0;
|
|
#elif defined(__FreeBSD__) || defined(__NetBSD__)
|
|
struct ioc_play_msf play;
|
|
play.start_m = start_m;
|
|
play.start_s = start_s;
|
|
play.start_f = start_f;
|
|
play.end_m = end_m;
|
|
play.end_s = end_s;
|
|
play.end_f = end_f;
|
|
return ioctl(fh->fd, CDIOCPLAYMSF, &play) == 0;
|
|
#else
|
|
return false;
|
|
#endif
|
|
} else
|
|
return false;
|
|
}
|
|
|
|
|
|
/*
|
|
* Pause CD audio
|
|
*/
|
|
|
|
bool SysCDPause(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return false;
|
|
|
|
if (fh->is_cdrom) {
|
|
#if defined(__linux__)
|
|
return ioctl(fh->fd, CDROMPAUSE) == 0;
|
|
#elif defined(__FreeBSD__) || defined(__NetBSD__)
|
|
return ioctl(fh->fd, CDIOCPAUSE) == 0;
|
|
#else
|
|
return false;
|
|
#endif
|
|
} else
|
|
return false;
|
|
}
|
|
|
|
|
|
/*
|
|
* Resume paused CD audio
|
|
*/
|
|
|
|
bool SysCDResume(void *arg)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return false;
|
|
|
|
if (fh->is_cdrom) {
|
|
#if defined(__linux__)
|
|
return ioctl(fh->fd, CDROMRESUME) == 0;
|
|
#elif defined(__FreeBSD__) || defined(__NetBSD__)
|
|
return ioctl(fh->fd, CDIOCRESUME) == 0;
|
|
#else
|
|
return false;
|
|
#endif
|
|
} else
|
|
return false;
|
|
}
|
|
|
|
|
|
/*
|
|
* Stop CD audio
|
|
*/
|
|
|
|
bool SysCDStop(void *arg, uint8 lead_out_m, uint8 lead_out_s, uint8 lead_out_f)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return false;
|
|
|
|
if (fh->is_cdrom) {
|
|
#if defined(__linux__)
|
|
return ioctl(fh->fd, CDROMSTOP) == 0;
|
|
#elif defined(__FreeBSD__) || defined(__NetBSD__)
|
|
return ioctl(fh->fd, CDIOCSTOP) == 0;
|
|
#else
|
|
return false;
|
|
#endif
|
|
} else
|
|
return false;
|
|
}
|
|
|
|
|
|
/*
|
|
* Perform CD audio fast-forward/fast-reverse operation starting from specified address
|
|
*/
|
|
|
|
bool SysCDScan(void *arg, uint8 start_m, uint8 start_s, uint8 start_f, bool reverse)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return false;
|
|
|
|
// Not supported under Linux
|
|
return false;
|
|
}
|
|
|
|
|
|
/*
|
|
* Set CD audio volume (0..255 each channel)
|
|
*/
|
|
|
|
void SysCDSetVolume(void *arg, uint8 left, uint8 right)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return;
|
|
|
|
if (fh->is_cdrom) {
|
|
#if defined(__linux__)
|
|
cdrom_volctrl vol;
|
|
vol.channel0 = vol.channel2 = left;
|
|
vol.channel1 = vol.channel3 = right;
|
|
ioctl(fh->fd, CDROMVOLCTRL, &vol);
|
|
#elif defined(__FreeBSD__) || defined(__NetBSD__)
|
|
struct ioc_vol vol;
|
|
vol.vol[0] = vol.vol[2] = left;
|
|
vol.vol[1] = vol.vol[3] = right;
|
|
ioctl(fh->fd, CDIOCSETVOL, &vol);
|
|
#endif
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* Get CD audio volume (0..255 each channel)
|
|
*/
|
|
|
|
void SysCDGetVolume(void *arg, uint8 &left, uint8 &right)
|
|
{
|
|
file_handle *fh = (file_handle *)arg;
|
|
if (!fh)
|
|
return;
|
|
|
|
left = right = 0;
|
|
if (fh->is_cdrom) {
|
|
#if defined(__linux__)
|
|
cdrom_volctrl vol;
|
|
ioctl(fh->fd, CDROMVOLREAD, &vol);
|
|
left = vol.channel0;
|
|
right = vol.channel1;
|
|
#elif defined(__FreeBSD__) || defined(__NetBSD__)
|
|
struct ioc_vol vol;
|
|
ioctl(fh->fd, CDIOCGETVOL, &vol);
|
|
left = vol.vol[0];
|
|
right = vol.vol[1];
|
|
#endif
|
|
}
|
|
}
|