video: test: Adjust order of file closure
[platform/kernel/u-boot.git] / disk / part_mac.c
1 /*
2  * (C) Copyright 2000
3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
4  *
5  * SPDX-License-Identifier:     GPL-2.0+
6  */
7
8 /*
9  * Support for harddisk partitions.
10  *
11  * To be compatible with LinuxPPC and Apple we use the standard Apple
12  * SCSI disk partitioning scheme. For more information see:
13  * http://developer.apple.com/techpubs/mac/Devices/Devices-126.html#MARKER-14-92
14  */
15
16 #include <common.h>
17 #include <command.h>
18 #include <memalign.h>
19 #include <ide.h>
20 #include "part_mac.h"
21
22 #ifdef HAVE_BLOCK_DEVICE
23
24 /* stdlib.h causes some compatibility problems; should fixe these! -- wd */
25 #ifndef __ldiv_t_defined
26 typedef struct {
27         long int quot;          /* Quotient     */
28         long int rem;           /* Remainder    */
29 } ldiv_t;
30 extern ldiv_t ldiv (long int __numer, long int __denom);
31 # define __ldiv_t_defined       1
32 #endif
33
34
35 static int part_mac_read_ddb (block_dev_desc_t *dev_desc, mac_driver_desc_t *ddb_p);
36 static int part_mac_read_pdb (block_dev_desc_t *dev_desc, int part, mac_partition_t *pdb_p);
37
38 /*
39  * Test for a valid MAC partition
40  */
41 int test_part_mac (block_dev_desc_t *dev_desc)
42 {
43         ALLOC_CACHE_ALIGN_BUFFER(mac_driver_desc_t, ddesc, 1);
44         ALLOC_CACHE_ALIGN_BUFFER(mac_partition_t, mpart, 1);
45         ulong i, n;
46
47         if (part_mac_read_ddb (dev_desc, ddesc)) {
48                 /* error reading Driver Desriptor Block, or no valid Signature */
49                 return (-1);
50         }
51
52         n = 1;  /* assuming at least one partition */
53         for (i=1; i<=n; ++i) {
54                 if ((dev_desc->block_read(dev_desc, i, 1,
55                                           (ulong *)mpart) != 1) ||
56                     (mpart->signature != MAC_PARTITION_MAGIC) ) {
57                         return (-1);
58                 }
59                 /* update partition count */
60                 n = mpart->map_count;
61         }
62         return (0);
63 }
64
65
66 void print_part_mac (block_dev_desc_t *dev_desc)
67 {
68         ulong i, n;
69         ALLOC_CACHE_ALIGN_BUFFER(mac_driver_desc_t, ddesc, 1);
70         ALLOC_CACHE_ALIGN_BUFFER(mac_partition_t, mpart, 1);
71         ldiv_t mb, gb;
72
73         if (part_mac_read_ddb (dev_desc, ddesc)) {
74                 /* error reading Driver Desriptor Block, or no valid Signature */
75                 return;
76         }
77
78         n  = ddesc->blk_count;
79
80         mb = ldiv(n, ((1024 * 1024) / ddesc->blk_size)); /* MB */
81         /* round to 1 digit */
82         mb.rem *= 10 * ddesc->blk_size;
83         mb.rem += 512 * 1024;
84         mb.rem /= 1024 * 1024;
85
86         gb = ldiv(10 * mb.quot + mb.rem, 10240);
87         gb.rem += 512;
88         gb.rem /= 1024;
89
90
91         printf ("Block Size=%d, Number of Blocks=%d, "
92                 "Total Capacity: %ld.%ld MB = %ld.%ld GB\n"
93                 "DeviceType=0x%x, DeviceId=0x%x\n\n"
94                 "   #:                 type name"
95                 "                   length   base       (size)\n",
96                 ddesc->blk_size,
97                 ddesc->blk_count,
98                 mb.quot, mb.rem, gb.quot, gb.rem,
99                 ddesc->dev_type, ddesc->dev_id
100                 );
101
102         n = 1;  /* assuming at least one partition */
103         for (i=1; i<=n; ++i) {
104                 ulong bytes;
105                 char c;
106
107                 printf ("%4ld: ", i);
108                 if (dev_desc->block_read(dev_desc, i, 1, (ulong *)mpart) != 1) {
109                         printf ("** Can't read Partition Map on %d:%ld **\n",
110                                 dev_desc->dev, i);
111                         return;
112                 }
113
114                 if (mpart->signature != MAC_PARTITION_MAGIC) {
115                         printf ("** Bad Signature on %d:%ld - "
116                                 "expected 0x%04x, got 0x%04x\n",
117                                 dev_desc->dev, i, MAC_PARTITION_MAGIC, mpart->signature);
118                         return;
119                 }
120
121                 /* update partition count */
122                 n = mpart->map_count;
123
124                 c      = 'k';
125                 bytes  = mpart->block_count;
126                 bytes /= (1024 / ddesc->blk_size);  /* kB; assumes blk_size == 512 */
127                 if (bytes >= 1024) {
128                         bytes >>= 10;
129                         c = 'M';
130                 }
131                 if (bytes >= 1024) {
132                         bytes >>= 10;
133                         c = 'G';
134                 }
135
136                 printf ("%20.32s %-18.32s %10u @ %-10u (%3ld%c)\n",
137                         mpart->type,
138                         mpart->name,
139                         mpart->block_count,
140                         mpart->start_block,
141                         bytes, c
142                         );
143         }
144
145         return;
146 }
147
148
149 /*
150  * Read Device Descriptor Block
151  */
152 static int part_mac_read_ddb (block_dev_desc_t *dev_desc, mac_driver_desc_t *ddb_p)
153 {
154         if (dev_desc->block_read(dev_desc, 0, 1, (ulong *)ddb_p) != 1) {
155                 printf ("** Can't read Driver Desriptor Block **\n");
156                 return (-1);
157         }
158
159         if (ddb_p->signature != MAC_DRIVER_MAGIC) {
160 #if 0
161                 printf ("** Bad Signature: expected 0x%04x, got 0x%04x\n",
162                         MAC_DRIVER_MAGIC, ddb_p->signature);
163 #endif
164                 return (-1);
165         }
166         return (0);
167 }
168
169 /*
170  * Read Partition Descriptor Block
171  */
172 static int part_mac_read_pdb (block_dev_desc_t *dev_desc, int part, mac_partition_t *pdb_p)
173 {
174         int n = 1;
175
176         for (;;) {
177                 /*
178                  * We must always read the descritpor block for
179                  * partition 1 first since this is the only way to
180                  * know how many partitions we have.
181                  */
182                 if (dev_desc->block_read(dev_desc, n, 1, (ulong *)pdb_p) != 1) {
183                         printf ("** Can't read Partition Map on %d:%d **\n",
184                                 dev_desc->dev, n);
185                         return (-1);
186                 }
187
188                 if (pdb_p->signature != MAC_PARTITION_MAGIC) {
189                         printf ("** Bad Signature on %d:%d: "
190                                 "expected 0x%04x, got 0x%04x\n",
191                                 dev_desc->dev, n, MAC_PARTITION_MAGIC, pdb_p->signature);
192                         return (-1);
193                 }
194
195                 if (n == part)
196                         return (0);
197
198                 if ((part < 1) || (part > pdb_p->map_count)) {
199                         printf ("** Invalid partition %d:%d [%d:1...%d:%d only]\n",
200                                 dev_desc->dev, part,
201                                 dev_desc->dev,
202                                 dev_desc->dev, pdb_p->map_count);
203                         return (-1);
204                 }
205
206                 /* update partition count */
207                 n = part;
208         }
209
210         /* NOTREACHED */
211 }
212
213 int get_partition_info_mac (block_dev_desc_t *dev_desc, int part, disk_partition_t *info)
214 {
215         ALLOC_CACHE_ALIGN_BUFFER(mac_driver_desc_t, ddesc, 1);
216         ALLOC_CACHE_ALIGN_BUFFER(mac_partition_t, mpart, 1);
217
218         if (part_mac_read_ddb (dev_desc, ddesc)) {
219                 return (-1);
220         }
221
222         info->blksz = ddesc->blk_size;
223
224         if (part_mac_read_pdb (dev_desc, part, mpart)) {
225                 return (-1);
226         }
227
228         info->start = mpart->start_block;
229         info->size  = mpart->block_count;
230         memcpy (info->type, mpart->type, sizeof(info->type));
231         memcpy (info->name, mpart->name, sizeof(info->name));
232
233         return (0);
234 }
235
236 #endif