2
* GRUB -- GRand Unified Bootloader
3
* Copyright (C) 2002,2003,2004,2006,2007,2008,2009,2010 Free Software Foundation, Inc.
5
* GRUB is free software: you can redistribute it and/or modify
6
* it under the terms of the GNU General Public License as published by
7
* the Free Software Foundation, either version 3 of the License, or
8
* (at your option) any later version.
10
* GRUB is distributed in the hope that it will be useful,
11
* but WITHOUT ANY WARRANTY; without even the implied warranty of
12
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13
* GNU General Public License for more details.
15
* You should have received a copy of the GNU General Public License
16
* along with GRUB. If not, see <http://www.gnu.org/licenses/>.
19
#include <grub/disk.h>
22
#include <grub/types.h>
23
#include <grub/partition.h>
24
#include <grub/misc.h>
25
#include <grub/time.h>
26
#include <grub/file.h>
28
#define GRUB_CACHE_TIMEOUT 2
30
/* The last time the disk was used. */
31
static grub_uint64_t grub_last_time = 0;
35
struct grub_disk_cache
37
enum grub_disk_dev_id dev_id;
38
unsigned long disk_id;
39
grub_disk_addr_t sector;
44
static struct grub_disk_cache grub_disk_cache_table[GRUB_DISK_CACHE_NUM];
46
void (*grub_disk_firmware_fini) (void);
47
int grub_disk_firmware_is_tainted;
49
grub_err_t (* grub_disk_ata_pass_through) (grub_disk_t,
50
struct grub_disk_ata_pass_through_parms *);
54
static unsigned long grub_disk_cache_hits;
55
static unsigned long grub_disk_cache_misses;
58
grub_disk_cache_get_performance (unsigned long *hits, unsigned long *misses)
60
*hits = grub_disk_cache_hits;
61
*misses = grub_disk_cache_misses;
66
grub_disk_cache_get_index (unsigned long dev_id, unsigned long disk_id,
67
grub_disk_addr_t sector)
69
return ((dev_id * 524287UL + disk_id * 2606459UL
70
+ ((unsigned) (sector >> GRUB_DISK_CACHE_BITS)))
71
% GRUB_DISK_CACHE_NUM);
75
grub_disk_cache_invalidate (unsigned long dev_id, unsigned long disk_id,
76
grub_disk_addr_t sector)
79
struct grub_disk_cache *cache;
81
sector &= ~(GRUB_DISK_CACHE_SIZE - 1);
82
index = grub_disk_cache_get_index (dev_id, disk_id, sector);
83
cache = grub_disk_cache_table + index;
85
if (cache->dev_id == dev_id && cache->disk_id == disk_id
86
&& cache->sector == sector && cache->data)
89
grub_free (cache->data);
96
grub_disk_cache_invalidate_all (void)
100
for (i = 0; i < GRUB_DISK_CACHE_NUM; i++)
102
struct grub_disk_cache *cache = grub_disk_cache_table + i;
104
if (cache->data && ! cache->lock)
106
grub_free (cache->data);
113
grub_disk_cache_fetch (unsigned long dev_id, unsigned long disk_id,
114
grub_disk_addr_t sector)
116
struct grub_disk_cache *cache;
119
index = grub_disk_cache_get_index (dev_id, disk_id, sector);
120
cache = grub_disk_cache_table + index;
122
if (cache->dev_id == dev_id && cache->disk_id == disk_id
123
&& cache->sector == sector)
127
grub_disk_cache_hits++;
133
grub_disk_cache_misses++;
140
grub_disk_cache_unlock (unsigned long dev_id, unsigned long disk_id,
141
grub_disk_addr_t sector)
143
struct grub_disk_cache *cache;
146
index = grub_disk_cache_get_index (dev_id, disk_id, sector);
147
cache = grub_disk_cache_table + index;
149
if (cache->dev_id == dev_id && cache->disk_id == disk_id
150
&& cache->sector == sector)
155
grub_disk_cache_store (unsigned long dev_id, unsigned long disk_id,
156
grub_disk_addr_t sector, const char *data)
159
struct grub_disk_cache *cache;
161
index = grub_disk_cache_get_index (dev_id, disk_id, sector);
162
cache = grub_disk_cache_table + index;
165
grub_free (cache->data);
169
cache->data = grub_malloc (GRUB_DISK_SECTOR_SIZE << GRUB_DISK_CACHE_BITS);
173
grub_memcpy (cache->data, data,
174
GRUB_DISK_SECTOR_SIZE << GRUB_DISK_CACHE_BITS);
175
cache->dev_id = dev_id;
176
cache->disk_id = disk_id;
177
cache->sector = sector;
179
return GRUB_ERR_NONE;
184
static grub_disk_dev_t grub_disk_dev_list;
187
grub_disk_dev_register (grub_disk_dev_t dev)
189
dev->next = grub_disk_dev_list;
190
grub_disk_dev_list = dev;
194
grub_disk_dev_unregister (grub_disk_dev_t dev)
196
grub_disk_dev_t *p, q;
198
for (p = &grub_disk_dev_list, q = *p; q; p = &(q->next), q = q->next)
207
grub_disk_dev_iterate (int (*hook) (const char *name))
211
for (p = grub_disk_dev_list; p; p = p->next)
212
if (p->iterate && (p->iterate) (hook))
218
/* Return the location of the first ',', if any, which is not
221
find_part_sep (const char *name)
223
const char *p = name;
226
while ((c = *p++) != '\0')
228
if (c == '\\' && *p == ',')
237
grub_disk_open (const char *name)
242
char *raw = (char *) name;
243
grub_uint64_t current_time;
245
grub_dprintf ("disk", "Opening `%s'...\n", name);
247
disk = (grub_disk_t) grub_zalloc (sizeof (*disk));
251
disk->name = grub_strdup (name);
255
p = find_part_sep (name);
258
grub_size_t len = p - name;
260
raw = grub_malloc (len + 1);
264
grub_memcpy (raw, name, len);
268
for (dev = grub_disk_dev_list; dev; dev = dev->next)
270
if ((dev->open) (raw, disk) == GRUB_ERR_NONE)
272
else if (grub_errno == GRUB_ERR_UNKNOWN_DEVICE)
273
grub_errno = GRUB_ERR_NONE;
280
grub_error (GRUB_ERR_UNKNOWN_DEVICE, "no such disk");
284
if (p && ! disk->has_partitions)
286
grub_error (GRUB_ERR_BAD_DEVICE, "no partition on this disk");
294
disk->partition = grub_partition_probe (disk, p + 1);
295
if (! disk->partition)
297
grub_error (GRUB_ERR_UNKNOWN_DEVICE, "no such partition");
302
/* The cache will be invalidated about 2 seconds after a device was
304
current_time = grub_get_time_ms ();
306
if (current_time > (grub_last_time
307
+ GRUB_CACHE_TIMEOUT * 1000))
308
grub_disk_cache_invalidate_all ();
310
grub_last_time = current_time;
314
if (raw && raw != name)
317
if (grub_errno != GRUB_ERR_NONE)
320
grub_dprintf ("disk", "Opening `%s' failed.\n", name);
323
grub_disk_close (disk);
331
grub_disk_close (grub_disk_t disk)
333
grub_partition_t part;
334
grub_dprintf ("disk", "Closing `%s'.\n", disk->name);
336
if (disk->dev && disk->dev->close)
337
(disk->dev->close) (disk);
339
/* Reset the timer. */
340
grub_last_time = grub_get_time_ms ();
342
while (disk->partition)
344
part = disk->partition->parent;
345
grub_free (disk->partition);
346
disk->partition = part;
348
grub_free ((void *) disk->name);
352
/* This function performs three tasks:
353
- Make sectors disk relative from partition relative.
354
- Normalize offset to be less than the sector size.
355
- Verify that the range is inside the partition. */
357
grub_disk_adjust_range (grub_disk_t disk, grub_disk_addr_t *sector,
358
grub_off_t *offset, grub_size_t size)
360
grub_partition_t part;
361
*sector += *offset >> GRUB_DISK_SECTOR_BITS;
362
*offset &= GRUB_DISK_SECTOR_SIZE - 1;
364
for (part = disk->partition; part; part = part->parent)
366
grub_disk_addr_t start;
373
|| len - *sector < ((*offset + size + GRUB_DISK_SECTOR_SIZE - 1)
374
>> GRUB_DISK_SECTOR_BITS))
375
return grub_error (GRUB_ERR_OUT_OF_RANGE, "out of partition");
380
if (disk->total_sectors <= *sector
381
|| ((*offset + size + GRUB_DISK_SECTOR_SIZE - 1)
382
>> GRUB_DISK_SECTOR_BITS) > disk->total_sectors - *sector)
383
return grub_error (GRUB_ERR_OUT_OF_RANGE, "out of disk");
385
return GRUB_ERR_NONE;
388
/* Read data from the disk. */
390
grub_disk_read (grub_disk_t disk, grub_disk_addr_t sector,
391
grub_off_t offset, grub_size_t size, void *buf)
394
unsigned real_offset;
396
/* First of all, check if the region is within the disk. */
397
if (grub_disk_adjust_range (disk, §or, &offset, size) != GRUB_ERR_NONE)
400
grub_dprintf ("disk", "Read out of range: sector 0x%llx (%s).\n",
401
(unsigned long long) sector, grub_errmsg);
406
real_offset = offset;
408
/* Allocate a temporary buffer. */
409
tmp_buf = grub_malloc (GRUB_DISK_SECTOR_SIZE << GRUB_DISK_CACHE_BITS);
413
/* Until SIZE is zero... */
417
grub_disk_addr_t start_sector;
421
/* For reading bulk data. */
422
start_sector = sector & ~(GRUB_DISK_CACHE_SIZE - 1);
423
pos = (sector - start_sector) << GRUB_DISK_SECTOR_BITS;
424
len = ((GRUB_DISK_SECTOR_SIZE << GRUB_DISK_CACHE_BITS)
425
- pos - real_offset);
429
/* Fetch the cache. */
430
data = grub_disk_cache_fetch (disk->dev->id, disk->id, start_sector);
434
grub_memcpy (buf, data + pos + real_offset, len);
435
grub_disk_cache_unlock (disk->dev->id, disk->id, start_sector);
439
/* Otherwise read data from the disk actually. */
440
if (start_sector + GRUB_DISK_CACHE_SIZE > disk->total_sectors
441
|| (disk->dev->read) (disk, start_sector,
442
GRUB_DISK_CACHE_SIZE, tmp_buf)
445
/* Uggh... Failed. Instead, just read necessary data. */
449
grub_errno = GRUB_ERR_NONE;
451
num = ((size + real_offset + GRUB_DISK_SECTOR_SIZE - 1)
452
>> GRUB_DISK_SECTOR_BITS);
454
p = grub_realloc (tmp_buf, num << GRUB_DISK_SECTOR_BITS);
460
if ((disk->dev->read) (disk, sector, num, tmp_buf))
463
grub_dprintf ("disk", "%s read failed\n", disk->name);
468
grub_memcpy (buf, tmp_buf + real_offset, size);
470
/* Call the read hook, if any. */
474
grub_size_t to_read = (size > GRUB_DISK_SECTOR_SIZE) ? GRUB_DISK_SECTOR_SIZE : size;
475
(disk->read_hook) (sector, real_offset,
477
if (grub_errno != GRUB_ERR_NONE)
481
size -= to_read - real_offset;
485
/* This must be the end. */
489
/* Copy it and store it in the disk cache. */
490
grub_memcpy (buf, tmp_buf + pos + real_offset, len);
491
grub_disk_cache_store (disk->dev->id, disk->id,
492
start_sector, tmp_buf);
495
/* Call the read hook, if any. */
498
grub_disk_addr_t s = sector;
503
(disk->read_hook) (s, real_offset,
504
((l > GRUB_DISK_SECTOR_SIZE)
505
? GRUB_DISK_SECTOR_SIZE
508
if (l < GRUB_DISK_SECTOR_SIZE - real_offset)
512
l -= GRUB_DISK_SECTOR_SIZE - real_offset;
517
sector = start_sector + GRUB_DISK_CACHE_SIZE;
518
buf = (char *) buf + len;
531
grub_disk_write (grub_disk_t disk, grub_disk_addr_t sector,
532
grub_off_t offset, grub_size_t size, const void *buf)
534
unsigned real_offset;
536
grub_dprintf ("disk", "Writing `%s'...\n", disk->name);
538
if (grub_disk_adjust_range (disk, §or, &offset, size) != GRUB_ERR_NONE)
541
real_offset = offset;
545
if (real_offset != 0 || (size < GRUB_DISK_SECTOR_SIZE && size != 0))
547
char tmp_buf[GRUB_DISK_SECTOR_SIZE];
549
grub_partition_t part;
551
part = disk->partition;
553
if (grub_disk_read (disk, sector, 0, GRUB_DISK_SECTOR_SIZE, tmp_buf)
556
disk->partition = part;
559
disk->partition = part;
561
len = GRUB_DISK_SECTOR_SIZE - real_offset;
565
grub_memcpy (tmp_buf + real_offset, buf, len);
567
grub_disk_cache_invalidate (disk->dev->id, disk->id, sector);
569
if ((disk->dev->write) (disk, sector, 1, tmp_buf) != GRUB_ERR_NONE)
573
buf = (char *) buf + len;
582
len = size & ~(GRUB_DISK_SECTOR_SIZE - 1);
583
n = size >> GRUB_DISK_SECTOR_BITS;
585
if ((disk->dev->write) (disk, sector, n, buf) != GRUB_ERR_NONE)
589
grub_disk_cache_invalidate (disk->dev->id, disk->id, sector++);
591
buf = (char *) buf + len;
602
grub_disk_get_size (grub_disk_t disk)
605
return grub_partition_get_len (disk->partition);
607
return disk->total_sectors;