diff options
Diffstat (limited to '')
-rw-r--r-- | grub-core/osdep/aros/hostdisk.c | 617 |
1 files changed, 617 insertions, 0 deletions
diff --git a/grub-core/osdep/aros/hostdisk.c b/grub-core/osdep/aros/hostdisk.c new file mode 100644 index 0000000..3b2c9de --- /dev/null +++ b/grub-core/osdep/aros/hostdisk.c @@ -0,0 +1,617 @@ +/* + * GRUB -- GRand Unified Bootloader + * Copyright (C) 1999,2000,2001,2002,2003,2004,2006,2007,2008,2009,2010,2011,2012,2013 Free Software Foundation, Inc. + * + * GRUB 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 3 of the License, or + * (at your option) any later version. + * + * GRUB 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 GRUB. If not, see <http://www.gnu.org/licenses/>. + */ + +#include <config-util.h> + +#include <grub/disk.h> +#include <grub/partition.h> +#include <grub/msdos_partition.h> +#include <grub/types.h> +#include <grub/err.h> +#include <grub/emu/misc.h> +#include <grub/emu/hostdisk.h> +#include <grub/emu/getroot.h> +#include <grub/misc.h> +#include <grub/i18n.h> +#include <grub/list.h> + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <ctype.h> +#include <assert.h> +#include <unistd.h> +#include <sys/types.h> +#include <sys/stat.h> +#include <fcntl.h> +#include <errno.h> +#include <limits.h> +#include <time.h> + +#include <string.h> +#include <dos/dos.h> +#include <dos/filesystem.h> +#include <dos/exall.h> +#include <proto/dos.h> +#include <devices/hardblocks.h> +#include <devices/newstyle.h> +#include <proto/exec.h> +#include <proto/utility.h> +#include <proto/partition.h> +#include <devices/trackdisk.h> +#include <exec/errors.h> + +#define BOUNCE_SIZE 1048576 + +static ULONG *bounce; + +char * +grub_canonicalize_file_name (const char *path) +{ + char *ret; + BPTR lck; + + if (path[0] == '/' && path[1] == '/' && path[2] == ':') + return xstrdup (path); + + ret = xmalloc (2048); + lck = Lock ((const unsigned char *) path, SHARED_LOCK); + + if (!lck || !NameFromLock (lck, (unsigned char *) ret, 2040)) + { + free (ret); + ret = xstrdup (path); + } + if (lck) + UnLock (lck); + + return ret; +} + +static grub_uint64_t +grub_util_get_fd_size_volume (grub_util_fd_t fd __attribute__ ((unused)), + const char *dev, + unsigned *log_secsize) +{ + struct DriveGeometry *geo; + LONG err; + unsigned sector_size, log_sector_size; + + if (!bounce) + bounce = AllocVec (BOUNCE_SIZE, MEMF_PUBLIC | MEMF_CLEAR); + if (!bounce) + grub_util_error ("out of memory"); + + fd->ioreq->iotd_Req.io_Command = TD_GETGEOMETRY; + fd->ioreq->iotd_Req.io_Length = sizeof (*geo); + fd->ioreq->iotd_Req.io_Data = bounce; + fd->ioreq->iotd_Req.io_Offset = 0; + fd->ioreq->iotd_Req.io_Actual = 0; + err = DoIO ((struct IORequest *) fd->ioreq); + if (err) + { + grub_util_info ("I/O failed with error %d, IoErr=%d", (int)err, (int) IoErr ()); + return -1; + } + + geo = (struct DriveGeometry *) bounce; + + sector_size = geo->dg_SectorSize; + + if (sector_size & (sector_size - 1) || !sector_size) + return -1; + + for (log_sector_size = 0; + (1 << log_sector_size) < sector_size; + log_sector_size++); + + if (log_secsize) + *log_secsize = log_sector_size; + + return (grub_uint64_t) geo->dg_TotalSectors * (grub_uint64_t) geo->dg_SectorSize; +} + +static grub_uint64_t +grub_util_get_fd_size_file (grub_util_fd_t fd, + const char *dev __attribute__ ((unused)), + unsigned *log_secsize) +{ + off_t oo, ro; + *log_secsize = 9; + /* FIXME: support 64-bit offsets. */ + oo = lseek (fd->fd, 0, SEEK_CUR); + ro = lseek (fd->fd, 0, SEEK_END); + lseek (fd->fd, oo, SEEK_SET); + return ro; +} + +int +grub_util_fd_seek (grub_util_fd_t fd, grub_uint64_t off) +{ + switch (fd->type) + { + case GRUB_UTIL_FD_FILE: + if (lseek (fd->fd, 0, SEEK_SET) == (off_t) -1) + return -1; + fd->off = off; + return 0; + case GRUB_UTIL_FD_DISK: + fd->off = off; + return 0; + } + + return -1; +} + +grub_util_fd_t +grub_util_fd_open (const char *dev, int flg) +{ + grub_util_fd_t ret = xmalloc (sizeof (*ret)); + const char *p1, *p2; + const char *dname; + char *tmp; + IPTR unit = 0; + ULONG flags = 0; + +#ifdef O_LARGEFILE + flg |= O_LARGEFILE; +#endif +#ifdef O_BINARY + flg |= O_BINARY; +#endif + + ret->off = 0; + + if (dev[0] != '/' || dev[1] != '/' || dev[2] != ':') + { + ret->type = GRUB_UTIL_FD_FILE; + ret->fd = open (dev, flg, S_IROTH | S_IRGRP | S_IRUSR | S_IWUSR); + if (ret->fd < 0) + { + free (ret); + return NULL; + } + return ret; + } + + p1 = strchr (dev + 3, '/'); + if (!p1) + p1 = dev + strlen (dev); + else + { + unit = grub_strtoul (p1 + 1, &p2, 16); + if (p2 && *p2 == '/') + flags = grub_strtoul (p2 + 1, 0, 16); + } + + ret->mp = CreateMsgPort(); + if (!ret->mp) + { + free (ret); + return NULL; + } + ret->ioreq = (struct IOExtTD *) CreateIORequest(ret->mp, + sizeof(struct IOExtTD)); + if (!ret->ioreq) + { + free (ret); + DeleteMsgPort (ret->mp); + return NULL; + } + + dname = dev + 3; + ret->type = GRUB_UTIL_FD_DISK; + + tmp = xmalloc (p1 - dname + 1); + memcpy (tmp, dname, p1 - dname); + tmp[p1 - dname] = '\0'; + + ret->is_floppy = (strcmp (tmp, TD_NAME) == 0); + ret->is_64 = 1; + + if (OpenDevice ((unsigned char *) tmp, unit, + (struct IORequest *) ret->ioreq, flags)) + { + free (tmp); + free (ret); + DeleteMsgPort (ret->mp); + return NULL; + } + free (tmp); + return ret; +} + +static ssize_t +grub_util_fd_read_file (grub_util_fd_t fd, char *buf, size_t len) +{ + ssize_t size = len; + + while (len) + { + ssize_t ret = read (fd->fd, buf, len); + + if (ret <= 0) + { + if (errno == EINTR) + continue; + else + return ret; + } + + fd->off += ret; + len -= ret; + buf += ret; + } + + return size; +} + +/* Write LEN bytes from BUF to FD. Return less than or equal to zero if an + error occurs, otherwise return LEN. */ +static ssize_t +grub_util_fd_write_file (grub_util_fd_t fd, const char *buf, size_t len) +{ + ssize_t size = len; + + while (len) + { + ssize_t ret = write (fd->fd, buf, len); + + if (ret <= 0) + { + if (errno == EINTR) + continue; + else + return ret; + } + + fd->off += ret; + len -= ret; + buf += ret; + } + + return size; +} + +static void +stop_motor (grub_util_fd_t fd) +{ + if (!fd->is_floppy) + return; + fd->ioreq->iotd_Req.io_Command = TD_MOTOR; + fd->ioreq->iotd_Req.io_Length = 0; + fd->ioreq->iotd_Req.io_Data = 0; + fd->ioreq->iotd_Req.io_Offset = 0; + fd->ioreq->iotd_Req.io_Actual = 0; + DoIO ((struct IORequest *) fd->ioreq); +} + +static ssize_t +grub_util_fd_read_volume (grub_util_fd_t fd, char *buf, size_t len) +{ + grub_uint64_t adj = 0; + + if (!bounce) + bounce = AllocVec (BOUNCE_SIZE, MEMF_PUBLIC | MEMF_CLEAR); + if (!bounce) + grub_util_error ("out of memory"); + + while (len) + { + size_t cr = len; + LONG err; + if (cr > BOUNCE_SIZE) + cr = BOUNCE_SIZE; + retry: + if (fd->is_64) + fd->ioreq->iotd_Req.io_Command = NSCMD_TD_READ64; + else + fd->ioreq->iotd_Req.io_Command = CMD_READ; + fd->ioreq->iotd_Req.io_Length = cr; + fd->ioreq->iotd_Req.io_Data = bounce; + fd->ioreq->iotd_Req.io_Offset = fd->off & 0xFFFFFFFF; + fd->ioreq->iotd_Req.io_Actual = fd->off >> 32; + err = DoIO ((struct IORequest *) fd->ioreq); + if (err == IOERR_NOCMD && fd->is_64) + { + fd->is_64 = 0; + goto retry; + } + if (err) + { + grub_util_info ("I/O failed with error %d, IoErr=%d", (int)err, (int) IoErr ()); + stop_motor (fd); + return -1; + } + memcpy (buf, bounce, cr); + adj += cr; + len -= cr; + buf += cr; + } + + fd->off += adj; + stop_motor (fd); + return adj; +} + +static ssize_t +grub_util_fd_write_volume (grub_util_fd_t fd, const char *buf, size_t len) +{ + grub_uint64_t adj = 0; + if (!bounce) + bounce = AllocVec (BOUNCE_SIZE, MEMF_PUBLIC | MEMF_CLEAR); + if (!bounce) + grub_util_error ("out of memory"); + + while (len) + { + size_t cr = len; + LONG err; + if (cr > BOUNCE_SIZE) + cr = BOUNCE_SIZE; + retry: + if (fd->is_64) + fd->ioreq->iotd_Req.io_Command = NSCMD_TD_WRITE64; + else + fd->ioreq->iotd_Req.io_Command = CMD_WRITE; + fd->ioreq->iotd_Req.io_Length = cr; + fd->ioreq->iotd_Req.io_Data = bounce; + fd->ioreq->iotd_Req.io_Offset = fd->off & 0xFFFFFFFF; + fd->ioreq->iotd_Req.io_Actual = fd->off >> 32; + memcpy (bounce, buf, cr); + err = DoIO ((struct IORequest *) fd->ioreq); + if (err == IOERR_NOCMD && fd->is_64) + { + fd->is_64 = 0; + goto retry; + } + if (err) + { + grub_util_info ("I/O failed with error %d", err); + stop_motor (fd); + return -1; + } + + adj += cr; + len -= cr; + buf += cr; + } + + fd->off += adj; + stop_motor (fd); + return adj; +} + +ssize_t +grub_util_fd_read (grub_util_fd_t fd, char *buf, size_t len) +{ + switch (fd->type) + { + case GRUB_UTIL_FD_FILE: + return grub_util_fd_read_file (fd, buf, len); + case GRUB_UTIL_FD_DISK: + return grub_util_fd_read_volume (fd, buf, len); + } + return -1; +} + +ssize_t +grub_util_fd_write (grub_util_fd_t fd, const char *buf, size_t len) +{ + switch (fd->type) + { + case GRUB_UTIL_FD_FILE: + return grub_util_fd_write_file (fd, buf, len); + case GRUB_UTIL_FD_DISK: + return grub_util_fd_write_volume (fd, buf, len); + } + return -1; +} + +grub_uint64_t +grub_util_get_fd_size (grub_util_fd_t fd, + const char *dev, + unsigned *log_secsize) +{ + switch (fd->type) + { + case GRUB_UTIL_FD_FILE: + return grub_util_get_fd_size_file (fd, dev, log_secsize); + + case GRUB_UTIL_FD_DISK: + return grub_util_get_fd_size_volume (fd, dev, log_secsize); + } + return -1; +} + +int +grub_util_fd_close (grub_util_fd_t fd) +{ + switch (fd->type) + { + case GRUB_UTIL_FD_FILE: + return close (fd->fd); + case GRUB_UTIL_FD_DISK: + CloseDevice ((struct IORequest *) fd->ioreq); + DeleteIORequest((struct IORequest *) fd->ioreq); + DeleteMsgPort (fd->mp); + return 0; + } + return 0; +} + +static int allow_fd_syncs = 1; + +static int +grub_util_fd_sync_volume (grub_util_fd_t fd) +{ + LONG err; + + fd->ioreq->iotd_Req.io_Command = CMD_UPDATE; + fd->ioreq->iotd_Req.io_Length = 0; + fd->ioreq->iotd_Req.io_Data = 0; + fd->ioreq->iotd_Req.io_Offset = 0; + fd->ioreq->iotd_Req.io_Actual = 0; + err = DoIO ((struct IORequest *) fd->ioreq); + if (err) + { + grub_util_info ("I/O failed with error %d, IoErr=%d", (int)err, (int) IoErr ()); + return -1; + } + return 0; +} + +int +grub_util_fd_sync (grub_util_fd_t fd) +{ + if (allow_fd_syncs) + { + switch (fd->type) + { + case GRUB_UTIL_FD_FILE: + return fsync (fd->fd); + case GRUB_UTIL_FD_DISK: + return grub_util_fd_sync_volume (fd); + } + } + return 0; +} + +int +grub_util_file_sync (FILE *f) +{ + if (fflush (f) != 0) + return -1; + if (!allow_fd_syncs) + return 0; + return fsync (fileno (f)); +} + +void +grub_util_disable_fd_syncs (void) +{ + allow_fd_syncs = 0; +} + +void +grub_hostdisk_flush_initial_buffer (const char *os_dev __attribute__ ((unused))) +{ +} + + +const char * +grub_util_fd_strerror (void) +{ + static char buf[201]; + LONG err = IoErr (); + if (!err) + return _("Success"); + memset (buf, '\0', sizeof (buf)); + Fault (err, (const unsigned char *) "", (STRPTR) buf, sizeof (buf)); + if (buf[0] == ':') + return buf + 1; + return buf; +} + +FILE * +grub_util_fopen (const char *path, const char *mode) +{ + return fopen (path, mode); +} + +int +grub_util_is_directory (const char *path) +{ + struct stat st; + + if (stat (path, &st) == -1) + return 0; + + return S_ISDIR (st.st_mode); +} + +int +grub_util_is_regular (const char *path) +{ + struct stat st; + + if (stat (path, &st) == -1) + return 0; + + return S_ISREG (st.st_mode); +} + +int +grub_util_is_special_file (const char *path) +{ + struct stat st; + + if (lstat (path, &st) == -1) + return 1; + return (!S_ISREG (st.st_mode) && !S_ISDIR (st.st_mode)); +} + +static char * +get_temp_name (void) +{ + static int ctr = 0; + char *t; + struct stat st; + + while (1) + { + t = xasprintf ("T:grub.%d.%d.%d.%d", (int) getpid (), (int) getppid (), + ctr++, time (0)); + if (stat (t, &st) == -1) + return t; + free (t); + } +} + +char * +grub_util_make_temporary_file (void) +{ + char *ret = get_temp_name (); + FILE *f; + + f = grub_util_fopen (ret, "wb"); + if (f) + fclose (f); + return ret; +} + +char * +grub_util_make_temporary_dir (void) +{ + char *ret = get_temp_name (); + + grub_util_mkdir (ret); + + return ret; +} + +grub_uint32_t +grub_util_get_mtime (const char *path) +{ + struct stat st; + + if (stat (path, &st) == -1) + return 0; + + return st.st_mtime; +} |