]> git.sur5r.net Git - u-boot/blob - disk/part_dos.c
ARM: tegra210: implement PLLE init procedure from TRM
[u-boot] / disk / part_dos.c
1 /*
2  * (C) Copyright 2001
3  * Raymond Lo, lo@routefree.com
4  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
5  *
6  * SPDX-License-Identifier:     GPL-2.0+
7  */
8
9 /*
10  * Support for harddisk partitions.
11  *
12  * To be compatible with LinuxPPC and Apple we use the standard Apple
13  * SCSI disk partitioning scheme. For more information see:
14  * http://developer.apple.com/techpubs/mac/Devices/Devices-126.html#MARKER-14-92
15  */
16
17 #include <common.h>
18 #include <command.h>
19 #include <ide.h>
20 #include <memalign.h>
21 #include "part_dos.h"
22
23 #ifdef HAVE_BLOCK_DEVICE
24
25 #define DOS_PART_DEFAULT_SECTOR 512
26
27 /* Convert char[4] in little endian format to the host format integer
28  */
29 static inline int le32_to_int(unsigned char *le32)
30 {
31     return ((le32[3] << 24) +
32             (le32[2] << 16) +
33             (le32[1] << 8) +
34              le32[0]
35            );
36 }
37
38 static inline int is_extended(int part_type)
39 {
40     return (part_type == 0x5 ||
41             part_type == 0xf ||
42             part_type == 0x85);
43 }
44
45 static inline int is_bootable(dos_partition_t *p)
46 {
47         return p->boot_ind == 0x80;
48 }
49
50 static void print_one_part(dos_partition_t *p, int ext_part_sector,
51                            int part_num, unsigned int disksig)
52 {
53         int lba_start = ext_part_sector + le32_to_int (p->start4);
54         int lba_size  = le32_to_int (p->size4);
55
56         printf("%3d\t%-10d\t%-10d\t%08x-%02x\t%02x%s%s\n",
57                 part_num, lba_start, lba_size, disksig, part_num, p->sys_ind,
58                 (is_extended(p->sys_ind) ? " Extd" : ""),
59                 (is_bootable(p) ? " Boot" : ""));
60 }
61
62 static int test_block_type(unsigned char *buffer)
63 {
64         int slot;
65         struct dos_partition *p;
66
67         if((buffer[DOS_PART_MAGIC_OFFSET + 0] != 0x55) ||
68             (buffer[DOS_PART_MAGIC_OFFSET + 1] != 0xaa) ) {
69                 return (-1);
70         } /* no DOS Signature at all */
71         p = (struct dos_partition *)&buffer[DOS_PART_TBL_OFFSET];
72         for (slot = 0; slot < 3; slot++) {
73                 if (p->boot_ind != 0 && p->boot_ind != 0x80) {
74                         if (!slot &&
75                             (strncmp((char *)&buffer[DOS_PBR_FSTYPE_OFFSET],
76                                      "FAT", 3) == 0 ||
77                              strncmp((char *)&buffer[DOS_PBR32_FSTYPE_OFFSET],
78                                      "FAT32", 5) == 0)) {
79                                 return DOS_PBR; /* is PBR */
80                         } else {
81                                 return -1;
82                         }
83                 }
84         }
85         return DOS_MBR;     /* Is MBR */
86 }
87
88
89 int test_part_dos (block_dev_desc_t *dev_desc)
90 {
91         ALLOC_CACHE_ALIGN_BUFFER(unsigned char, buffer, dev_desc->blksz);
92
93         if (dev_desc->block_read(dev_desc->dev, 0, 1, (ulong *) buffer) != 1)
94                 return -1;
95
96         if (test_block_type(buffer) != DOS_MBR)
97                 return -1;
98
99         return 0;
100 }
101
102 /*  Print a partition that is relative to its Extended partition table
103  */
104 static void print_partition_extended(block_dev_desc_t *dev_desc,
105                                      int ext_part_sector, int relative,
106                                      int part_num, unsigned int disksig)
107 {
108         ALLOC_CACHE_ALIGN_BUFFER(unsigned char, buffer, dev_desc->blksz);
109         dos_partition_t *pt;
110         int i;
111
112         if (dev_desc->block_read(dev_desc->dev, ext_part_sector, 1, (ulong *) buffer) != 1) {
113                 printf ("** Can't read partition table on %d:%d **\n",
114                         dev_desc->dev, ext_part_sector);
115                 return;
116         }
117         i=test_block_type(buffer);
118         if (i != DOS_MBR) {
119                 printf ("bad MBR sector signature 0x%02x%02x\n",
120                         buffer[DOS_PART_MAGIC_OFFSET],
121                         buffer[DOS_PART_MAGIC_OFFSET + 1]);
122                 return;
123         }
124
125         if (!ext_part_sector)
126                 disksig = le32_to_int(&buffer[DOS_PART_DISKSIG_OFFSET]);
127
128         /* Print all primary/logical partitions */
129         pt = (dos_partition_t *) (buffer + DOS_PART_TBL_OFFSET);
130         for (i = 0; i < 4; i++, pt++) {
131                 /*
132                  * fdisk does not show the extended partitions that
133                  * are not in the MBR
134                  */
135
136                 if ((pt->sys_ind != 0) &&
137                     (ext_part_sector == 0 || !is_extended (pt->sys_ind)) ) {
138                         print_one_part(pt, ext_part_sector, part_num, disksig);
139                 }
140
141                 /* Reverse engr the fdisk part# assignment rule! */
142                 if ((ext_part_sector == 0) ||
143                     (pt->sys_ind != 0 && !is_extended (pt->sys_ind)) ) {
144                         part_num++;
145                 }
146         }
147
148         /* Follows the extended partitions */
149         pt = (dos_partition_t *) (buffer + DOS_PART_TBL_OFFSET);
150         for (i = 0; i < 4; i++, pt++) {
151                 if (is_extended (pt->sys_ind)) {
152                         int lba_start = le32_to_int (pt->start4) + relative;
153
154                         print_partition_extended(dev_desc, lba_start,
155                                 ext_part_sector == 0  ? lba_start : relative,
156                                 part_num, disksig);
157                 }
158         }
159
160         return;
161 }
162
163
164 /*  Print a partition that is relative to its Extended partition table
165  */
166 static int get_partition_info_extended (block_dev_desc_t *dev_desc, int ext_part_sector,
167                                  int relative, int part_num,
168                                  int which_part, disk_partition_t *info,
169                                  unsigned int disksig)
170 {
171         ALLOC_CACHE_ALIGN_BUFFER(unsigned char, buffer, dev_desc->blksz);
172         dos_partition_t *pt;
173         int i;
174         int dos_type;
175
176         if (dev_desc->block_read (dev_desc->dev, ext_part_sector, 1, (ulong *) buffer) != 1) {
177                 printf ("** Can't read partition table on %d:%d **\n",
178                         dev_desc->dev, ext_part_sector);
179                 return -1;
180         }
181         if (buffer[DOS_PART_MAGIC_OFFSET] != 0x55 ||
182                 buffer[DOS_PART_MAGIC_OFFSET + 1] != 0xaa) {
183                 printf ("bad MBR sector signature 0x%02x%02x\n",
184                         buffer[DOS_PART_MAGIC_OFFSET],
185                         buffer[DOS_PART_MAGIC_OFFSET + 1]);
186                 return -1;
187         }
188
189 #ifdef CONFIG_PARTITION_UUIDS
190         if (!ext_part_sector)
191                 disksig = le32_to_int(&buffer[DOS_PART_DISKSIG_OFFSET]);
192 #endif
193
194         /* Print all primary/logical partitions */
195         pt = (dos_partition_t *) (buffer + DOS_PART_TBL_OFFSET);
196         for (i = 0; i < 4; i++, pt++) {
197                 /*
198                  * fdisk does not show the extended partitions that
199                  * are not in the MBR
200                  */
201                 if (((pt->boot_ind & ~0x80) == 0) &&
202                     (pt->sys_ind != 0) &&
203                     (part_num == which_part) &&
204                     (is_extended(pt->sys_ind) == 0)) {
205                         info->blksz = DOS_PART_DEFAULT_SECTOR;
206                         info->start = (lbaint_t)(ext_part_sector +
207                                         le32_to_int(pt->start4));
208                         info->size  = (lbaint_t)le32_to_int(pt->size4);
209                         switch(dev_desc->if_type) {
210                                 case IF_TYPE_IDE:
211                                 case IF_TYPE_SATA:
212                                 case IF_TYPE_ATAPI:
213                                         sprintf ((char *)info->name, "hd%c%d",
214                                                 'a' + dev_desc->dev, part_num);
215                                         break;
216                                 case IF_TYPE_SCSI:
217                                         sprintf ((char *)info->name, "sd%c%d",
218                                                 'a' + dev_desc->dev, part_num);
219                                         break;
220                                 case IF_TYPE_USB:
221                                         sprintf ((char *)info->name, "usbd%c%d",
222                                                 'a' + dev_desc->dev, part_num);
223                                         break;
224                                 case IF_TYPE_DOC:
225                                         sprintf ((char *)info->name, "docd%c%d",
226                                                 'a' + dev_desc->dev, part_num);
227                                         break;
228                                 default:
229                                         sprintf ((char *)info->name, "xx%c%d",
230                                                 'a' + dev_desc->dev, part_num);
231                                         break;
232                         }
233                         /* sprintf(info->type, "%d, pt->sys_ind); */
234                         sprintf ((char *)info->type, "U-Boot");
235                         info->bootable = is_bootable(pt);
236 #ifdef CONFIG_PARTITION_UUIDS
237                         sprintf(info->uuid, "%08x-%02x", disksig, part_num);
238 #endif
239                         return 0;
240                 }
241
242                 /* Reverse engr the fdisk part# assignment rule! */
243                 if ((ext_part_sector == 0) ||
244                     (pt->sys_ind != 0 && !is_extended (pt->sys_ind)) ) {
245                         part_num++;
246                 }
247         }
248
249         /* Follows the extended partitions */
250         pt = (dos_partition_t *) (buffer + DOS_PART_TBL_OFFSET);
251         for (i = 0; i < 4; i++, pt++) {
252                 if (is_extended (pt->sys_ind)) {
253                         int lba_start = le32_to_int (pt->start4) + relative;
254
255                         return get_partition_info_extended (dev_desc, lba_start,
256                                  ext_part_sector == 0 ? lba_start : relative,
257                                  part_num, which_part, info, disksig);
258                 }
259         }
260
261         /* Check for DOS PBR if no partition is found */
262         dos_type = test_block_type(buffer);
263
264         if (dos_type == DOS_PBR) {
265                 info->start = 0;
266                 info->size = dev_desc->lba;
267                 info->blksz = DOS_PART_DEFAULT_SECTOR;
268                 info->bootable = 0;
269                 sprintf ((char *)info->type, "U-Boot");
270 #ifdef CONFIG_PARTITION_UUIDS
271                 info->uuid[0] = 0;
272 #endif
273                 return 0;
274         }
275
276         return -1;
277 }
278
279 void print_part_dos (block_dev_desc_t *dev_desc)
280 {
281         printf("Part\tStart Sector\tNum Sectors\tUUID\t\tType\n");
282         print_partition_extended(dev_desc, 0, 0, 1, 0);
283 }
284
285 int get_partition_info_dos (block_dev_desc_t *dev_desc, int part, disk_partition_t * info)
286 {
287         return get_partition_info_extended(dev_desc, 0, 0, 1, part, info, 0);
288 }
289
290
291 #endif