fs/minix/bitmap.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  *  linux/fs/minix/bitmap.c
   4  *
   5  *  Copyright (C) 1991, 1992  Linus Torvalds
   6  */
   7
   8 /*
   9  * Modified for 680x0 by Hamish Macdonald
  10  * Fixed for 680x0 by Andreas Schwab
  11  */
  12
  13 /* bitmap.c contains the code that handles the inode and block bitmaps */
  14
  15 #include "minix.h"
  16 #include <linux/buffer_head.h>
  17 #include <linux/bitops.h>
  18 #include <linux/sched.h>
  19
  20 static DEFINE_SPINLOCK(bitmap_lock);
  21
  22 /*
  23  * bitmap consists of blocks filled with 16bit words
  24  * bit set == busy, bit clear == free
  25  * endianness is a mess, but for counting zero bits it really doesn't matter...
  26  */
  27 static __u32 count_free(struct buffer_head *map[], unsigned blocksize, __u32 numbits)
  28 {
  29         __u32 sum = 0;
  30         unsigned blocks = DIV_ROUND_UP(numbits, blocksize * 8);
  31
  32         while (blocks--) {
  33                 unsigned words = blocksize / 2;
  34                 __u16 *p = (__u16 *)(*map++)->b_data;
  35                 while (words--)
  36                         sum += 16 - hweight16(*p++);
  37         }
  38
  39         return sum;
  40 }
  41
  42 void minix_free_block(struct inode *inode, unsigned long block)
  43 {
  44         struct super_block *sb = inode->i_sb;
  45         struct minix_sb_info *sbi = minix_sb(sb);
  46         struct buffer_head *bh;
  47         int k = sb->s_blocksize_bits + 3;
  48         unsigned long bit, zone;
  49
  50         if (block < sbi->s_firstdatazone || block >= sbi->s_nzones) {
  51                 printk("Trying to free block not in datazone\n");
  52                 return;
  53         }
  54         zone = block - sbi->s_firstdatazone + 1;
  55         bit = zone & ((1<<k) - 1);
  56         zone >>= k;
  57         if (zone >= sbi->s_zmap_blocks) {
  58                 printk("minix_free_block: nonexistent bitmap buffer\n");
  59                 return;
  60         }
  61         bh = sbi->s_zmap[zone];
  62         spin_lock(&bitmap_lock);
  63         if (!minix_test_and_clear_bit(bit, bh->b_data))
  64                 printk("minix_free_block (%s:%lu): bit already cleared\n",
  65                        sb->s_id, block);
  66         spin_unlock(&bitmap_lock);
  67         mark_buffer_dirty(bh);
  68         return;
  69 }
  70
  71 int minix_new_block(struct inode * inode)
  72 {
  73         struct minix_sb_info *sbi = minix_sb(inode->i_sb);
  74         int bits_per_zone = 8 * inode->i_sb->s_blocksize;
  75         int i;
  76
  77         for (i = 0; i < sbi->s_zmap_blocks; i++) {
  78                 struct buffer_head *bh = sbi->s_zmap[i];
  79                 int j;
  80
  81                 spin_lock(&bitmap_lock);
  82                 j = minix_find_first_zero_bit(bh->b_data, bits_per_zone);
  83                 if (j < bits_per_zone) {
  84                         minix_set_bit(j, bh->b_data);
  85                         spin_unlock(&bitmap_lock);
  86                         mark_buffer_dirty(bh);
  87                         j += i * bits_per_zone + sbi->s_firstdatazone-1;
  88                         if (j < sbi->s_firstdatazone || j >= sbi->s_nzones)
  89                                 break;
  90                         return j;
  91                 }
  92                 spin_unlock(&bitmap_lock);
  93         }
  94         return 0;
  95 }
  96
  97 unsigned long minix_count_free_blocks(struct super_block *sb)
  98 {
  99         struct minix_sb_info *sbi = minix_sb(sb);
 100         u32 bits = sbi->s_nzones - sbi->s_firstdatazone + 1;
 101
 102         return (count_free(sbi->s_zmap, sb->s_blocksize, bits)
 103                 << sbi->s_log_zone_size);
 104 }
 105
 106 struct minix_inode *
 107 minix_V1_raw_inode(struct super_block *sb, ino_t ino, struct buffer_head **bh)
 108 {
 109         int block;
 110         struct minix_sb_info *sbi = minix_sb(sb);
 111         struct minix_inode *p;
 112
 113         if (!ino || ino > sbi->s_ninodes) {
 114                 printk("Bad inode number on dev %s: %ld is out of range\n",
 115                        sb->s_id, (long)ino);
 116                 return NULL;
 117         }
 118         ino--;
 119         block = 2 + sbi->s_imap_blocks + sbi->s_zmap_blocks +
 120                  ino / MINIX_INODES_PER_BLOCK;
 121         *bh = sb_bread(sb, block);
 122         if (!*bh) {
 123                 printk("Unable to read inode block\n");
 124                 return NULL;
 125         }
 126         p = (void *)(*bh)->b_data;
 127         return p + ino % MINIX_INODES_PER_BLOCK;
 128 }
 129
 130 struct minix2_inode *
 131 minix_V2_raw_inode(struct super_block *sb, ino_t ino, struct buffer_head **bh)
 132 {
 133         int block;
 134         struct minix_sb_info *sbi = minix_sb(sb);
 135         struct minix2_inode *p;
 136         int minix2_inodes_per_block = sb->s_blocksize / sizeof(struct minix2_inode);
 137
 138         *bh = NULL;
 139         if (!ino || ino > sbi->s_ninodes) {
 140                 printk("Bad inode number on dev %s: %ld is out of range\n",
 141                        sb->s_id, (long)ino);
 142                 return NULL;
 143         }
 144         ino--;
 145         block = 2 + sbi->s_imap_blocks + sbi->s_zmap_blocks +
 146                  ino / minix2_inodes_per_block;
 147         *bh = sb_bread(sb, block);
 148         if (!*bh) {
 149                 printk("Unable to read inode block\n");
 150                 return NULL;
 151         }
 152         p = (void *)(*bh)->b_data;
 153         return p + ino % minix2_inodes_per_block;
 154 }
 155
 156 /* Clear the link count and mode of a deleted inode on disk. */
 157
 158 static void minix_clear_inode(struct inode *inode)
 159 {
 160         struct buffer_head *bh = NULL;
 161
 162         if (INODE_VERSION(inode) == MINIX_V1) {
 163                 struct minix_inode *raw_inode;
 164                 raw_inode = minix_V1_raw_inode(inode->i_sb, inode->i_ino, &bh);
 165                 if (raw_inode) {
 166                         raw_inode->i_nlinks = 0;
 167                         raw_inode->i_mode = 0;
 168                 }
 169         } else {
 170                 struct minix2_inode *raw_inode;
 171                 raw_inode = minix_V2_raw_inode(inode->i_sb, inode->i_ino, &bh);
 172                 if (raw_inode) {
 173                         raw_inode->i_nlinks = 0;
 174                         raw_inode->i_mode = 0;
 175                 }
 176         }
 177         if (bh) {
 178                 mark_buffer_dirty(bh);
 179                 brelse (bh);
 180         }
 181 }
 182
 183 void minix_free_inode(struct inode * inode)
 184 {
 185         struct super_block *sb = inode->i_sb;
 186         struct minix_sb_info *sbi = minix_sb(inode->i_sb);
 187         struct buffer_head *bh;
 188         int k = sb->s_blocksize_bits + 3;
 189         unsigned long ino, bit;
 190
 191         ino = inode->i_ino;
 192         if (ino < 1 || ino > sbi->s_ninodes) {
 193                 printk("minix_free_inode: inode 0 or nonexistent inode\n");
 194                 return;
 195         }
 196         bit = ino & ((1<<k) - 1);
 197         ino >>= k;
 198         if (ino >= sbi->s_imap_blocks) {
 199                 printk("minix_free_inode: nonexistent imap in superblock\n");
 200                 return;
 201         }
 202
 203         minix_clear_inode(inode);       /* clear on-disk copy */
 204
 205         bh = sbi->s_imap[ino];
 206         spin_lock(&bitmap_lock);
 207         if (!minix_test_and_clear_bit(bit, bh->b_data))
 208                 printk("minix_free_inode: bit %lu already cleared\n", bit);
 209         spin_unlock(&bitmap_lock);
 210         mark_buffer_dirty(bh);
 211 }
 212
 213 struct inode *minix_new_inode(const struct inode *dir, umode_t mode, int *error)
 214 {
 215         struct super_block *sb = dir->i_sb;
 216         struct minix_sb_info *sbi = minix_sb(sb);
 217         struct inode *inode = new_inode(sb);
 218         struct buffer_head * bh;
 219         int bits_per_zone = 8 * sb->s_blocksize;
 220         unsigned long j;
 221         int i;
 222
 223         if (!inode) {
 224                 *error = -ENOMEM;
 225                 return NULL;
 226         }
 227         j = bits_per_zone;
 228         bh = NULL;
 229         *error = -ENOSPC;
 230         spin_lock(&bitmap_lock);
 231         for (i = 0; i < sbi->s_imap_blocks; i++) {
 232                 bh = sbi->s_imap[i];
 233                 j = minix_find_first_zero_bit(bh->b_data, bits_per_zone);
 234                 if (j < bits_per_zone)
 235                         break;
 236         }
 237         if (!bh || j >= bits_per_zone) {
 238                 spin_unlock(&bitmap_lock);
 239                 iput(inode);
 240                 return NULL;
 241         }
 242         if (minix_test_and_set_bit(j, bh->b_data)) {    /* shouldn't happen */
 243                 spin_unlock(&bitmap_lock);
 244                 printk("minix_new_inode: bit already set\n");
 245                 iput(inode);
 246                 return NULL;
 247         }
 248         spin_unlock(&bitmap_lock);
 249         mark_buffer_dirty(bh);
 250         j += i * bits_per_zone;
 251         if (!j || j > sbi->s_ninodes) {
 252                 iput(inode);
 253                 return NULL;
 254         }
 255         inode_init_owner(inode, dir, mode);
 256         inode->i_ino = j;
 257         inode->i_mtime = inode->i_atime = inode->i_ctime = current_time(inode);
 258         inode->i_blocks = 0;
 259         memset(&minix_i(inode)->u, 0, sizeof(minix_i(inode)->u));
 260         insert_inode_hash(inode);
 261         mark_inode_dirty(inode);
 262
 263         *error = 0;
 264         return inode;
 265 }
 266
 267 unsigned long minix_count_free_inodes(struct super_block *sb)
 268 {
 269         struct minix_sb_info *sbi = minix_sb(sb);
 270         u32 bits = sbi->s_ninodes + 1;
 271
 272         return count_free(sbi->s_imap, sb->s_blocksize, bits);
 273 }