ibm.c 4.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193
  1. /*
  2. * File...........: linux/fs/partitions/ibm.c
  3. * Author(s)......: Holger Smolinski <Holger.Smolinski@de.ibm.com>
  4. * Volker Sameske <sameske@de.ibm.com>
  5. * Bugreports.to..: <Linux390@de.ibm.com>
  6. * (C) IBM Corporation, IBM Deutschland Entwicklung GmbH, 1999,2000
  7. */
  8. #include <linux/buffer_head.h>
  9. #include <linux/hdreg.h>
  10. #include <linux/slab.h>
  11. #include <asm/dasd.h>
  12. #include <asm/ebcdic.h>
  13. #include <asm/uaccess.h>
  14. #include <asm/vtoc.h>
  15. #include "check.h"
  16. #include "ibm.h"
  17. /*
  18. * compute the block number from a
  19. * cyl-cyl-head-head structure
  20. */
  21. static inline int
  22. cchh2blk (struct vtoc_cchh *ptr, struct hd_geometry *geo) {
  23. return ptr->cc * geo->heads * geo->sectors +
  24. ptr->hh * geo->sectors;
  25. }
  26. /*
  27. * compute the block number from a
  28. * cyl-cyl-head-head-block structure
  29. */
  30. static inline int
  31. cchhb2blk (struct vtoc_cchhb *ptr, struct hd_geometry *geo) {
  32. return ptr->cc * geo->heads * geo->sectors +
  33. ptr->hh * geo->sectors +
  34. ptr->b;
  35. }
  36. /*
  37. */
  38. int
  39. ibm_partition(struct parsed_partitions *state, struct block_device *bdev)
  40. {
  41. int blocksize, offset, size,res;
  42. loff_t i_size;
  43. dasd_information_t *info;
  44. struct hd_geometry *geo;
  45. char type[5] = {0,};
  46. char name[7] = {0,};
  47. union label_t {
  48. struct vtoc_volume_label vol;
  49. struct vtoc_cms_label cms;
  50. } *label;
  51. unsigned char *data;
  52. Sector sect;
  53. res = 0;
  54. blocksize = bdev_hardsect_size(bdev);
  55. if (blocksize <= 0)
  56. goto out_exit;
  57. i_size = i_size_read(bdev->bd_inode);
  58. if (i_size == 0)
  59. goto out_exit;
  60. if ((info = kmalloc(sizeof(dasd_information_t), GFP_KERNEL)) == NULL)
  61. goto out_exit;
  62. if ((geo = kmalloc(sizeof(struct hd_geometry), GFP_KERNEL)) == NULL)
  63. goto out_nogeo;
  64. if ((label = kmalloc(sizeof(union label_t), GFP_KERNEL)) == NULL)
  65. goto out_nolab;
  66. if (ioctl_by_bdev(bdev, BIODASDINFO, (unsigned long)info) != 0 ||
  67. ioctl_by_bdev(bdev, HDIO_GETGEO, (unsigned long)geo) != 0)
  68. goto out_freeall;
  69. /*
  70. * Get volume label, extract name and type.
  71. */
  72. data = read_dev_sector(bdev, info->label_block*(blocksize/512), &sect);
  73. if (data == NULL)
  74. goto out_readerr;
  75. strncpy (type, data, 4);
  76. if ((!info->FBA_layout) && (!strcmp(info->type, "ECKD")))
  77. strncpy(name, data + 8, 6);
  78. else
  79. strncpy(name, data + 4, 6);
  80. memcpy(label, data, sizeof(union label_t));
  81. put_dev_sector(sect);
  82. EBCASC(type, 4);
  83. EBCASC(name, 6);
  84. res = 1;
  85. /*
  86. * Three different types: CMS1, VOL1 and LNX1/unlabeled
  87. */
  88. if (strncmp(type, "CMS1", 4) == 0) {
  89. /*
  90. * VM style CMS1 labeled disk
  91. */
  92. if (label->cms.disk_offset != 0) {
  93. printk("CMS1/%8s(MDSK):", name);
  94. /* disk is reserved minidisk */
  95. blocksize = label->cms.block_size;
  96. offset = label->cms.disk_offset;
  97. size = (label->cms.block_count - 1) * (blocksize >> 9);
  98. } else {
  99. printk("CMS1/%8s:", name);
  100. offset = (info->label_block + 1);
  101. size = i_size >> 9;
  102. }
  103. put_partition(state, 1, offset*(blocksize >> 9),
  104. size-offset*(blocksize >> 9));
  105. } else if ((strncmp(type, "VOL1", 4) == 0) &&
  106. (!info->FBA_layout) && (!strcmp(info->type, "ECKD"))) {
  107. /*
  108. * New style VOL1 labeled disk
  109. */
  110. unsigned int blk;
  111. int counter;
  112. printk("VOL1/%8s:", name);
  113. /* get block number and read then go through format1 labels */
  114. blk = cchhb2blk(&label->vol.vtoc, geo) + 1;
  115. counter = 0;
  116. while ((data = read_dev_sector(bdev, blk*(blocksize/512),
  117. &sect)) != NULL) {
  118. struct vtoc_format1_label f1;
  119. memcpy(&f1, data, sizeof(struct vtoc_format1_label));
  120. put_dev_sector(sect);
  121. /* skip FMT4 / FMT5 / FMT7 labels */
  122. if (f1.DS1FMTID == _ascebc['4']
  123. || f1.DS1FMTID == _ascebc['5']
  124. || f1.DS1FMTID == _ascebc['7']) {
  125. blk++;
  126. continue;
  127. }
  128. /* only FMT1 valid at this point */
  129. if (f1.DS1FMTID != _ascebc['1'])
  130. break;
  131. /* OK, we got valid partition data */
  132. offset = cchh2blk(&f1.DS1EXT1.llimit, geo);
  133. size = cchh2blk(&f1.DS1EXT1.ulimit, geo) -
  134. offset + geo->sectors;
  135. if (counter >= state->limit)
  136. break;
  137. put_partition(state, counter + 1,
  138. offset * (blocksize >> 9),
  139. size * (blocksize >> 9));
  140. counter++;
  141. blk++;
  142. }
  143. if (!data)
  144. /* Are we not supposed to report this ? */
  145. goto out_readerr;
  146. } else {
  147. /*
  148. * Old style LNX1 or unlabeled disk
  149. */
  150. if (strncmp(type, "LNX1", 4) == 0)
  151. printk ("LNX1/%8s:", name);
  152. else
  153. printk("(nonl)/%8s:", name);
  154. offset = (info->label_block + 1);
  155. size = i_size >> 9;
  156. put_partition(state, 1, offset*(blocksize >> 9),
  157. size-offset*(blocksize >> 9));
  158. }
  159. printk("\n");
  160. goto out_freeall;
  161. out_readerr:
  162. res = -1;
  163. out_freeall:
  164. kfree(label);
  165. out_nolab:
  166. kfree(geo);
  167. out_nogeo:
  168. kfree(info);
  169. out_exit:
  170. return res;
  171. }