62daa27056
Many of GRUB's utilities don't check anywhere near all the possible write errors. For example, if grub-install runs out of space when copying a file, it won't notice. There were missing checks for the return values of write, fflush, fsync, and close (or the equivalents on other OSes), all of which must be checked. I tried to be consistent with the existing logging practices of the various hostdisk implementations, but they weren't entirely consistent to start with so I used my judgement. The result at least looks reasonable on GNU/Linux when I provoke a write error: Installing for x86_64-efi platform. grub-install: error: cannot copy `/usr/lib/grub/x86_64-efi-signed/grubx64.efi.signed' to `/boot/efi/EFI/debian/grubx64.efi': No space left on device. There are more missing checks in other utilities, but this should fix the most critical ones. Fixes Debian bug #922741. Signed-off-by: Colin Watson <cjwatson@ubuntu.com> Reviewed-by: Steve McIntyre <93sam@debian.org> Reviewed-by: Daniel Kiper <daniel.kiper@oracle.com>
617 lines
12 KiB
C
617 lines
12 KiB
C
/*
|
|
* 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, (char **) &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;
|
|
}
|