1 // SPDX-License-Identifier: GPL-2.0+
4  * Hans-Joerg Frieden, Hyperion Entertainment
5  * Hans-JoergF@hyperion-entertainment.com
43 	len--;  in bcpl_strcpy()
49  * Print a BCPL String. BCPL strings start with a byte with the length
62 	len--;  in bstr_print()
66     printf("%-10s", buffer);  in bstr_print()
80     for (i = 0; i < header->summed_longs; i++)  in sum_block()
87  * Print an AmigaOS disk type. Disk types are a four-byte identifier
88  * describing the file system. They are usually written as a three-letter
112     g = (struct amiga_part_geometry *)&(p->environment);  in print_part_info()
114     bstr_print(p->drive_name);  in print_part_info()
116 	   g->low_cyl * g->block_per_track * g->surfaces ,  in print_part_info()
117 	   (g->high_cyl - g->low_cyl + 1) * g->block_per_track * g->surfaces - 1);  in print_part_info()
118     print_disk_type(g->dos_type);  in print_part_info()
119     printf("\t%5d\n", g->boot_priority);  in print_part_info()
126  * sum-to-zero checksum
146 	    if (trdb->id == AMIGA_ID_RDISK)  in get_rdisk()
188 	    if (boot->id == AMIGA_ID_BOOT)  in get_bootcode()
223 	    PRINTF("part_test_amiga: non-bootable Amiga disk\n");  in part_test_amiga()
230 	return -1;  in part_test_amiga()
255     block = rdb->partition_list;  in find_partition()
264 	    if (p->id == AMIGA_ID_PART)  in find_partition()
272 			partnum--;  in find_partition()
273 			block = p->next;  in find_partition()
295     struct partition_block *p = find_partition(dev_desc, part-1);  in part_get_info_amiga()
299     if (!p) return -1;  in part_get_info_amiga()
301     g = (struct amiga_part_geometry *)&(p->environment);  in part_get_info_amiga()
302     info->start = g->low_cyl  * g->block_per_track * g->surfaces;  in part_get_info_amiga()
303     info->size  = (g->high_cyl - g->low_cyl + 1) * g->block_per_track * g->surfaces - 1;  in part_get_info_amiga()
304     info->blksz = rdb.block_bytes;  in part_get_info_amiga()
305     bcpl_strcpy((char *)info->name, p->drive_name);  in part_get_info_amiga()
308     disk_type = g->dos_type;  in part_get_info_amiga()
310     info->type[0] = (disk_type & 0xFF000000)>>24;  in part_get_info_amiga()
311     info->type[1] = (disk_type & 0x00FF0000)>>16;  in part_get_info_amiga()
312     info->type[2] = (disk_type & 0x0000FF00)>>8;  in part_get_info_amiga()
313     info->type[3] = '\\';  in part_get_info_amiga()
314     info->type[4] = (disk_type & 0x000000FF) + '0';  in part_get_info_amiga()
315     info->type[5] = 0;  in part_get_info_amiga()
337     block = rdb->partition_list;  in part_print_amiga()
344 	   rdb->block_bytes, rdb->cylinders, rdb->sectors,  in part_print_amiga()
345 	   rdb->heads);  in part_print_amiga()
347     printf("                 First   Num. \n"  in part_print_amiga()
360 	    if (p->id == AMIGA_ID_PART)  in part_print_amiga()
365 		    printf("%-4d ", i); i++;  in part_print_amiga()
367 		    block = p->next;  in part_print_amiga()