fs/sysv/balloc.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  *  linux/fs/sysv/balloc.c
   4  *
   5  *  minix/bitmap.c
   6  *  Copyright (C) 1991, 1992  Linus Torvalds
   7  *
   8  *  ext/freelists.c
   9  *  Copyright (C) 1992  Remy Card (card@masi.ibp.fr)
  10  *
  11  *  xenix/alloc.c
  12  *  Copyright (C) 1992  Doug Evans
  13  *
  14  *  coh/alloc.c
  15  *  Copyright (C) 1993  Pascal Haible, Bruno Haible
  16  *
  17  *  sysv/balloc.c
  18  *  Copyright (C) 1993  Bruno Haible
  19  *
  20  *  This file contains code for allocating/freeing blocks.
  21  */
  22
  23 #include <linux/buffer_head.h>
  24 #include <linux/string.h>
  25 #include "sysv.h"
  26
  27 /* We don't trust the value of
  28    sb->sv_sbd2->s_tfree = *sb->sv_free_blocks
  29    but we nevertheless keep it up to date. */
  30
  31 static inline sysv_zone_t *get_chunk(struct super_block *sb, struct buffer_head *bh)
  32 {
  33         char *bh_data = bh->b_data;
  34
  35         if (SYSV_SB(sb)->s_type == FSTYPE_SYSV4)
  36                 return (sysv_zone_t*)(bh_data+4);
  37         else
  38                 return (sysv_zone_t*)(bh_data+2);
  39 }
  40
  41 /* NOTE NOTE NOTE: nr is a block number _as_ _stored_ _on_ _disk_ */
  42
  43 void sysv_free_block(struct super_block * sb, sysv_zone_t nr)
  44 {
  45         struct sysv_sb_info * sbi = SYSV_SB(sb);
  46         struct buffer_head * bh;
  47         sysv_zone_t *blocks = sbi->s_bcache;
  48         unsigned count;
  49         unsigned block = fs32_to_cpu(sbi, nr);
  50
  51         /*
  52          * This code does not work at all for AFS (it has a bitmap
  53          * free list).  As AFS is supposed to be read-only no one
  54          * should call this for an AFS filesystem anyway...
  55          */
  56         if (sbi->s_type == FSTYPE_AFS)
  57                 return;
  58
  59         if (block < sbi->s_firstdatazone || block >= sbi->s_nzones) {
  60                 printk("sysv_free_block: trying to free block not in datazone\n");
  61                 return;
  62         }
  63
  64         mutex_lock(&sbi->s_lock);
  65         count = fs16_to_cpu(sbi, *sbi->s_bcache_count);
  66
  67         if (count > sbi->s_flc_size) {
  68                 printk("sysv_free_block: flc_count > flc_size\n");
  69                 mutex_unlock(&sbi->s_lock);
  70                 return;
  71         }
  72         /* If the free list head in super-block is full, it is copied
  73          * into this block being freed, ditto if it's completely empty
  74          * (applies only on Coherent).
  75          */
  76         if (count == sbi->s_flc_size || count == 0) {
  77                 block += sbi->s_block_base;
  78                 bh = sb_getblk(sb, block);
  79                 if (!bh) {
  80                         printk("sysv_free_block: getblk() failed\n");
  81                         mutex_unlock(&sbi->s_lock);
  82                         return;
  83                 }
  84                 memset(bh->b_data, 0, sb->s_blocksize);
  85                 *(__fs16*)bh->b_data = cpu_to_fs16(sbi, count);
  86                 memcpy(get_chunk(sb,bh), blocks, count * sizeof(sysv_zone_t));
  87                 mark_buffer_dirty(bh);
  88                 set_buffer_uptodate(bh);
  89                 brelse(bh);
  90                 count = 0;
  91         }
  92         sbi->s_bcache[count++] = nr;
  93
  94         *sbi->s_bcache_count = cpu_to_fs16(sbi, count);
  95         fs32_add(sbi, sbi->s_free_blocks, 1);
  96         dirty_sb(sb);
  97         mutex_unlock(&sbi->s_lock);
  98 }
  99
 100 sysv_zone_t sysv_new_block(struct super_block * sb)
 101 {
 102         struct sysv_sb_info *sbi = SYSV_SB(sb);
 103         unsigned int block;
 104         sysv_zone_t nr;
 105         struct buffer_head * bh;
 106         unsigned count;
 107
 108         mutex_lock(&sbi->s_lock);
 109         count = fs16_to_cpu(sbi, *sbi->s_bcache_count);
 110
 111         if (count == 0) /* Applies only to Coherent FS */
 112                 goto Enospc;
 113         nr = sbi->s_bcache[--count];
 114         if (nr == 0)  /* Applies only to Xenix FS, SystemV FS */
 115                 goto Enospc;
 116
 117         block = fs32_to_cpu(sbi, nr);
 118
 119         *sbi->s_bcache_count = cpu_to_fs16(sbi, count);
 120
 121         if (block < sbi->s_firstdatazone || block >= sbi->s_nzones) {
 122                 printk("sysv_new_block: new block %d is not in data zone\n",
 123                         block);
 124                 goto Enospc;
 125         }
 126
 127         if (count == 0) { /* the last block continues the free list */
 128                 unsigned count;
 129
 130                 block += sbi->s_block_base;
 131                 if (!(bh = sb_bread(sb, block))) {
 132                         printk("sysv_new_block: cannot read free-list block\n");
 133                         /* retry this same block next time */
 134                         *sbi->s_bcache_count = cpu_to_fs16(sbi, 1);
 135                         goto Enospc;
 136                 }
 137                 count = fs16_to_cpu(sbi, *(__fs16*)bh->b_data);
 138                 if (count > sbi->s_flc_size) {
 139                         printk("sysv_new_block: free-list block with >flc_size entries\n");
 140                         brelse(bh);
 141                         goto Enospc;
 142                 }
 143                 *sbi->s_bcache_count = cpu_to_fs16(sbi, count);
 144                 memcpy(sbi->s_bcache, get_chunk(sb, bh),
 145                                 count * sizeof(sysv_zone_t));
 146                 brelse(bh);
 147         }
 148         /* Now the free list head in the superblock is valid again. */
 149         fs32_add(sbi, sbi->s_free_blocks, -1);
 150         dirty_sb(sb);
 151         mutex_unlock(&sbi->s_lock);
 152         return nr;
 153
 154 Enospc:
 155         mutex_unlock(&sbi->s_lock);
 156         return 0;
 157 }
 158
 159 unsigned long sysv_count_free_blocks(struct super_block * sb)
 160 {
 161         struct sysv_sb_info * sbi = SYSV_SB(sb);
 162         int sb_count;
 163         int count;
 164         struct buffer_head * bh = NULL;
 165         sysv_zone_t *blocks;
 166         unsigned block;
 167         int n;
 168
 169         /*
 170          * This code does not work at all for AFS (it has a bitmap
 171          * free list).  As AFS is supposed to be read-only we just
 172          * lie and say it has no free block at all.
 173          */
 174         if (sbi->s_type == FSTYPE_AFS)
 175                 return 0;
 176
 177         mutex_lock(&sbi->s_lock);
 178         sb_count = fs32_to_cpu(sbi, *sbi->s_free_blocks);
 179
 180         if (0)
 181                 goto trust_sb;
 182
 183         /* this causes a lot of disk traffic ... */
 184         count = 0;
 185         n = fs16_to_cpu(sbi, *sbi->s_bcache_count);
 186         blocks = sbi->s_bcache;
 187         while (1) {
 188                 sysv_zone_t zone;
 189                 if (n > sbi->s_flc_size)
 190                         goto E2big;
 191                 zone = 0;
 192                 while (n && (zone = blocks[--n]) != 0)
 193                         count++;
 194                 if (zone == 0)
 195                         break;
 196
 197                 block = fs32_to_cpu(sbi, zone);
 198                 if (bh)
 199                         brelse(bh);
 200
 201                 if (block < sbi->s_firstdatazone || block >= sbi->s_nzones)
 202                         goto Einval;
 203                 block += sbi->s_block_base;
 204                 bh = sb_bread(sb, block);
 205                 if (!bh)
 206                         goto Eio;
 207                 n = fs16_to_cpu(sbi, *(__fs16*)bh->b_data);
 208                 blocks = get_chunk(sb, bh);
 209         }
 210         if (bh)
 211                 brelse(bh);
 212         if (count != sb_count)
 213                 goto Ecount;
 214 done:
 215         mutex_unlock(&sbi->s_lock);
 216         return count;
 217
 218 Einval:
 219         printk("sysv_count_free_blocks: new block %d is not in data zone\n",
 220                 block);
 221         goto trust_sb;
 222 Eio:
 223         printk("sysv_count_free_blocks: cannot read free-list block\n");
 224         goto trust_sb;
 225 E2big:
 226         printk("sysv_count_free_blocks: >flc_size entries in free-list block\n");
 227         if (bh)
 228                 brelse(bh);
 229 trust_sb:
 230         count = sb_count;
 231         goto done;
 232 Ecount:
 233         printk("sysv_count_free_blocks: free block count was %d, "
 234                 "correcting to %d\n", sb_count, count);
 235         if (!sb_rdonly(sb)) {
 236                 *sbi->s_free_blocks = cpu_to_fs32(sbi, count);
 237                 dirty_sb(sb);
 238         }
 239         goto done;
 240 }