16cbd5570SChris Mason /* 26cbd5570SChris Mason * Copyright (C) 2007 Oracle. All rights reserved. 36cbd5570SChris Mason * 46cbd5570SChris Mason * This program is free software; you can redistribute it and/or 56cbd5570SChris Mason * modify it under the terms of the GNU General Public 66cbd5570SChris Mason * License v2 as published by the Free Software Foundation. 76cbd5570SChris Mason * 86cbd5570SChris Mason * This program is distributed in the hope that it will be useful, 96cbd5570SChris Mason * but WITHOUT ANY WARRANTY; without even the implied warranty of 106cbd5570SChris Mason * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 116cbd5570SChris Mason * General Public License for more details. 126cbd5570SChris Mason * 136cbd5570SChris Mason * You should have received a copy of the GNU General Public 146cbd5570SChris Mason * License along with this program; if not, write to the 156cbd5570SChris Mason * Free Software Foundation, Inc., 59 Temple Place - Suite 330, 166cbd5570SChris Mason * Boston, MA 021110-1307, USA. 176cbd5570SChris Mason */ 186cbd5570SChris Mason 19065631f6SChris Mason #include <linux/bio.h> 20065631f6SChris Mason #include <linux/pagemap.h> 21065631f6SChris Mason #include <linux/highmem.h> 221e1d2701SChris Mason #include "ctree.h" 23dee26a9fSChris Mason #include "disk-io.h" 249f5fae2fSChris Mason #include "transaction.h" 251de037a4SChris Mason #include "print-tree.h" 261e1d2701SChris Mason 276567e837SChris Mason #define MAX_CSUM_ITEMS(r) ((((BTRFS_LEAF_DATA_SIZE(r) - \ 28a429e513SChris Mason sizeof(struct btrfs_item) * 2) / \ 29509659cdSChris Mason BTRFS_CRC32_SIZE) - 1)) 30b18c6685SChris Mason int btrfs_insert_file_extent(struct btrfs_trans_handle *trans, 31dee26a9fSChris Mason struct btrfs_root *root, 32b18c6685SChris Mason u64 objectid, u64 pos, 33f2eb0a24SSage Weil u64 disk_offset, u64 disk_num_bytes, 34f2eb0a24SSage Weil u64 num_bytes, u64 offset) 359f5fae2fSChris Mason { 36dee26a9fSChris Mason int ret = 0; 37dee26a9fSChris Mason struct btrfs_file_extent_item *item; 38dee26a9fSChris Mason struct btrfs_key file_key; 395caf2a00SChris Mason struct btrfs_path *path; 405f39d397SChris Mason struct extent_buffer *leaf; 41dee26a9fSChris Mason 425caf2a00SChris Mason path = btrfs_alloc_path(); 435caf2a00SChris Mason BUG_ON(!path); 44dee26a9fSChris Mason file_key.objectid = objectid; 45b18c6685SChris Mason file_key.offset = pos; 46dee26a9fSChris Mason btrfs_set_key_type(&file_key, BTRFS_EXTENT_DATA_KEY); 47dee26a9fSChris Mason 485caf2a00SChris Mason ret = btrfs_insert_empty_item(trans, root, path, &file_key, 49dee26a9fSChris Mason sizeof(*item)); 5054aa1f4dSChris Mason if (ret < 0) 5154aa1f4dSChris Mason goto out; 529773a788SChris Mason BUG_ON(ret); 535f39d397SChris Mason leaf = path->nodes[0]; 545f39d397SChris Mason item = btrfs_item_ptr(leaf, path->slots[0], 55dee26a9fSChris Mason struct btrfs_file_extent_item); 56f2eb0a24SSage Weil btrfs_set_file_extent_disk_bytenr(leaf, item, disk_offset); 57db94535dSChris Mason btrfs_set_file_extent_disk_num_bytes(leaf, item, disk_num_bytes); 58f2eb0a24SSage Weil btrfs_set_file_extent_offset(leaf, item, offset); 59db94535dSChris Mason btrfs_set_file_extent_num_bytes(leaf, item, num_bytes); 605f39d397SChris Mason btrfs_set_file_extent_generation(leaf, item, trans->transid); 615f39d397SChris Mason btrfs_set_file_extent_type(leaf, item, BTRFS_FILE_EXTENT_REG); 625f39d397SChris Mason btrfs_mark_buffer_dirty(leaf); 6354aa1f4dSChris Mason out: 645caf2a00SChris Mason btrfs_free_path(path); 6554aa1f4dSChris Mason return ret; 669f5fae2fSChris Mason } 67dee26a9fSChris Mason 68b18c6685SChris Mason struct btrfs_csum_item *btrfs_lookup_csum(struct btrfs_trans_handle *trans, 69b18c6685SChris Mason struct btrfs_root *root, 706567e837SChris Mason struct btrfs_path *path, 71b18c6685SChris Mason u64 objectid, u64 offset, 72b18c6685SChris Mason int cow) 736567e837SChris Mason { 746567e837SChris Mason int ret; 756567e837SChris Mason struct btrfs_key file_key; 766567e837SChris Mason struct btrfs_key found_key; 776567e837SChris Mason struct btrfs_csum_item *item; 785f39d397SChris Mason struct extent_buffer *leaf; 796567e837SChris Mason u64 csum_offset = 0; 80a429e513SChris Mason int csums_in_item; 816567e837SChris Mason 826567e837SChris Mason file_key.objectid = objectid; 836567e837SChris Mason file_key.offset = offset; 846567e837SChris Mason btrfs_set_key_type(&file_key, BTRFS_CSUM_ITEM_KEY); 85b18c6685SChris Mason ret = btrfs_search_slot(trans, root, &file_key, path, 0, cow); 866567e837SChris Mason if (ret < 0) 876567e837SChris Mason goto fail; 885f39d397SChris Mason leaf = path->nodes[0]; 896567e837SChris Mason if (ret > 0) { 906567e837SChris Mason ret = 1; 9170b2befdSChris Mason if (path->slots[0] == 0) 926567e837SChris Mason goto fail; 936567e837SChris Mason path->slots[0]--; 945f39d397SChris Mason btrfs_item_key_to_cpu(leaf, &found_key, path->slots[0]); 956567e837SChris Mason if (btrfs_key_type(&found_key) != BTRFS_CSUM_ITEM_KEY || 966567e837SChris Mason found_key.objectid != objectid) { 976567e837SChris Mason goto fail; 986567e837SChris Mason } 996567e837SChris Mason csum_offset = (offset - found_key.offset) >> 1006567e837SChris Mason root->fs_info->sb->s_blocksize_bits; 1015f39d397SChris Mason csums_in_item = btrfs_item_size_nr(leaf, path->slots[0]); 102509659cdSChris Mason csums_in_item /= BTRFS_CRC32_SIZE; 103a429e513SChris Mason 104a429e513SChris Mason if (csum_offset >= csums_in_item) { 105a429e513SChris Mason ret = -EFBIG; 1066567e837SChris Mason goto fail; 1076567e837SChris Mason } 1086567e837SChris Mason } 1096567e837SChris Mason item = btrfs_item_ptr(leaf, path->slots[0], struct btrfs_csum_item); 110509659cdSChris Mason item = (struct btrfs_csum_item *)((unsigned char *)item + 111509659cdSChris Mason csum_offset * BTRFS_CRC32_SIZE); 1126567e837SChris Mason return item; 1136567e837SChris Mason fail: 1146567e837SChris Mason if (ret > 0) 115b18c6685SChris Mason ret = -ENOENT; 1166567e837SChris Mason return ERR_PTR(ret); 1176567e837SChris Mason } 1186567e837SChris Mason 1196567e837SChris Mason 120dee26a9fSChris Mason int btrfs_lookup_file_extent(struct btrfs_trans_handle *trans, 121dee26a9fSChris Mason struct btrfs_root *root, 122dee26a9fSChris Mason struct btrfs_path *path, u64 objectid, 1239773a788SChris Mason u64 offset, int mod) 124dee26a9fSChris Mason { 125dee26a9fSChris Mason int ret; 126dee26a9fSChris Mason struct btrfs_key file_key; 127dee26a9fSChris Mason int ins_len = mod < 0 ? -1 : 0; 128dee26a9fSChris Mason int cow = mod != 0; 129dee26a9fSChris Mason 130dee26a9fSChris Mason file_key.objectid = objectid; 13170b2befdSChris Mason file_key.offset = offset; 132dee26a9fSChris Mason btrfs_set_key_type(&file_key, BTRFS_EXTENT_DATA_KEY); 133dee26a9fSChris Mason ret = btrfs_search_slot(trans, root, &file_key, path, ins_len, cow); 134dee26a9fSChris Mason return ret; 135dee26a9fSChris Mason } 136f254e52cSChris Mason 137e015640fSChris Mason int btrfs_csum_one_bio(struct btrfs_root *root, 138*e6dcd2dcSChris Mason struct bio *bio, struct btrfs_ordered_sum **sums_ret) 139e015640fSChris Mason { 140*e6dcd2dcSChris Mason struct btrfs_ordered_sum *sums; 141*e6dcd2dcSChris Mason struct btrfs_sector_sum *sector_sum; 142e015640fSChris Mason char *data; 143e015640fSChris Mason struct bio_vec *bvec = bio->bi_io_vec; 144e015640fSChris Mason int bio_index = 0; 145e015640fSChris Mason 146*e6dcd2dcSChris Mason WARN_ON(bio->bi_vcnt <= 0); 147*e6dcd2dcSChris Mason sums = kzalloc(btrfs_ordered_sum_size(root, bio->bi_size), GFP_NOFS); 148e015640fSChris Mason if (!sums) 149e015640fSChris Mason return -ENOMEM; 150*e6dcd2dcSChris Mason *sums_ret = sums; 151*e6dcd2dcSChris Mason sector_sum = &sums->sums; 152*e6dcd2dcSChris Mason sums->file_offset = page_offset(bvec->bv_page); 153*e6dcd2dcSChris Mason sums->len = bio->bi_size; 154*e6dcd2dcSChris Mason INIT_LIST_HEAD(&sums->list); 155e015640fSChris Mason 156e015640fSChris Mason while(bio_index < bio->bi_vcnt) { 157e015640fSChris Mason data = kmap_atomic(bvec->bv_page, KM_USER0); 158*e6dcd2dcSChris Mason sector_sum->sum = ~(u32)0; 159*e6dcd2dcSChris Mason sector_sum->sum = btrfs_csum_data(root, 160*e6dcd2dcSChris Mason data + bvec->bv_offset, 161*e6dcd2dcSChris Mason sector_sum->sum, 162*e6dcd2dcSChris Mason bvec->bv_len); 163e015640fSChris Mason kunmap_atomic(data, KM_USER0); 164*e6dcd2dcSChris Mason btrfs_csum_final(sector_sum->sum, 165*e6dcd2dcSChris Mason (char *)§or_sum->sum); 166*e6dcd2dcSChris Mason sector_sum->offset = page_offset(bvec->bv_page) + 167*e6dcd2dcSChris Mason bvec->bv_offset; 168*e6dcd2dcSChris Mason sector_sum++; 169e015640fSChris Mason bio_index++; 170e015640fSChris Mason bvec++; 171e015640fSChris Mason } 172e015640fSChris Mason return 0; 173e015640fSChris Mason } 174e015640fSChris Mason 175065631f6SChris Mason int btrfs_csum_file_blocks(struct btrfs_trans_handle *trans, 176065631f6SChris Mason struct btrfs_root *root, struct inode *inode, 177*e6dcd2dcSChris Mason struct btrfs_ordered_sum *sums) 178f254e52cSChris Mason { 179065631f6SChris Mason u64 objectid = inode->i_ino; 180065631f6SChris Mason u64 offset; 181f254e52cSChris Mason int ret; 182f254e52cSChris Mason struct btrfs_key file_key; 1836567e837SChris Mason struct btrfs_key found_key; 184065631f6SChris Mason u64 next_offset; 185*e6dcd2dcSChris Mason u64 total_bytes = 0; 186065631f6SChris Mason int found_next; 1875caf2a00SChris Mason struct btrfs_path *path; 188f254e52cSChris Mason struct btrfs_csum_item *item; 189065631f6SChris Mason struct btrfs_csum_item *item_end; 190ff79f819SChris Mason struct extent_buffer *leaf = NULL; 1916567e837SChris Mason u64 csum_offset; 192*e6dcd2dcSChris Mason struct btrfs_sector_sum *sector_sum; 193f578d4bdSChris Mason u32 nritems; 194f578d4bdSChris Mason u32 ins_size; 1956e92f5e6SChris Mason char *eb_map; 1966e92f5e6SChris Mason char *eb_token; 1976e92f5e6SChris Mason unsigned long map_len; 1986e92f5e6SChris Mason unsigned long map_start; 1996e92f5e6SChris Mason 2005caf2a00SChris Mason path = btrfs_alloc_path(); 2015caf2a00SChris Mason BUG_ON(!path); 202*e6dcd2dcSChris Mason sector_sum = &sums->sums; 203065631f6SChris Mason again: 204065631f6SChris Mason next_offset = (u64)-1; 205065631f6SChris Mason found_next = 0; 206*e6dcd2dcSChris Mason offset = sector_sum->offset; 207f254e52cSChris Mason file_key.objectid = objectid; 208f254e52cSChris Mason file_key.offset = offset; 209f254e52cSChris Mason btrfs_set_key_type(&file_key, BTRFS_CSUM_ITEM_KEY); 210a429e513SChris Mason 211a429e513SChris Mason item = btrfs_lookup_csum(trans, root, path, objectid, offset, 1); 212ff79f819SChris Mason if (!IS_ERR(item)) { 213ff79f819SChris Mason leaf = path->nodes[0]; 214a429e513SChris Mason goto found; 215ff79f819SChris Mason } 216a429e513SChris Mason ret = PTR_ERR(item); 217a429e513SChris Mason if (ret == -EFBIG) { 218a429e513SChris Mason u32 item_size; 219a429e513SChris Mason /* we found one, but it isn't big enough yet */ 2205f39d397SChris Mason leaf = path->nodes[0]; 2215f39d397SChris Mason item_size = btrfs_item_size_nr(leaf, path->slots[0]); 222509659cdSChris Mason if ((item_size / BTRFS_CRC32_SIZE) >= MAX_CSUM_ITEMS(root)) { 223a429e513SChris Mason /* already at max size, make a new one */ 224a429e513SChris Mason goto insert; 225a429e513SChris Mason } 226a429e513SChris Mason } else { 227f578d4bdSChris Mason int slot = path->slots[0] + 1; 228a429e513SChris Mason /* we didn't find a csum item, insert one */ 229f578d4bdSChris Mason nritems = btrfs_header_nritems(path->nodes[0]); 230f578d4bdSChris Mason if (path->slots[0] >= nritems - 1) { 231f578d4bdSChris Mason ret = btrfs_next_leaf(root, path); 232b56baf5bSYan if (ret == 1) 233f578d4bdSChris Mason found_next = 1; 234b56baf5bSYan if (ret != 0) 235f578d4bdSChris Mason goto insert; 236b56baf5bSYan slot = 0; 237f578d4bdSChris Mason } 238f578d4bdSChris Mason btrfs_item_key_to_cpu(path->nodes[0], &found_key, slot); 239f578d4bdSChris Mason if (found_key.objectid != objectid || 240f578d4bdSChris Mason found_key.type != BTRFS_CSUM_ITEM_KEY) { 241f578d4bdSChris Mason found_next = 1; 242f578d4bdSChris Mason goto insert; 243f578d4bdSChris Mason } 244f578d4bdSChris Mason next_offset = found_key.offset; 245f578d4bdSChris Mason found_next = 1; 246a429e513SChris Mason goto insert; 247a429e513SChris Mason } 248a429e513SChris Mason 249a429e513SChris Mason /* 250a429e513SChris Mason * at this point, we know the tree has an item, but it isn't big 251a429e513SChris Mason * enough yet to put our csum in. Grow it 252a429e513SChris Mason */ 253a429e513SChris Mason btrfs_release_path(root, path); 2546567e837SChris Mason ret = btrfs_search_slot(trans, root, &file_key, path, 255509659cdSChris Mason BTRFS_CRC32_SIZE, 1); 2566567e837SChris Mason if (ret < 0) 2576567e837SChris Mason goto fail; 2586567e837SChris Mason if (ret == 0) { 259b18c6685SChris Mason BUG(); 2606567e837SChris Mason } 2616567e837SChris Mason if (path->slots[0] == 0) { 2626567e837SChris Mason goto insert; 2636567e837SChris Mason } 2646567e837SChris Mason path->slots[0]--; 2655f39d397SChris Mason leaf = path->nodes[0]; 2665f39d397SChris Mason btrfs_item_key_to_cpu(leaf, &found_key, path->slots[0]); 2676567e837SChris Mason csum_offset = (offset - found_key.offset) >> 2686567e837SChris Mason root->fs_info->sb->s_blocksize_bits; 2696567e837SChris Mason if (btrfs_key_type(&found_key) != BTRFS_CSUM_ITEM_KEY || 2706567e837SChris Mason found_key.objectid != objectid || 2716567e837SChris Mason csum_offset >= MAX_CSUM_ITEMS(root)) { 2726567e837SChris Mason goto insert; 2736567e837SChris Mason } 2745f39d397SChris Mason if (csum_offset >= btrfs_item_size_nr(leaf, path->slots[0]) / 275509659cdSChris Mason BTRFS_CRC32_SIZE) { 276509659cdSChris Mason u32 diff = (csum_offset + 1) * BTRFS_CRC32_SIZE; 2775f39d397SChris Mason diff = diff - btrfs_item_size_nr(leaf, path->slots[0]); 2783a686375SChris Mason if (diff != BTRFS_CRC32_SIZE) 2793a686375SChris Mason goto insert; 280a429e513SChris Mason ret = btrfs_extend_item(trans, root, path, diff); 2816567e837SChris Mason BUG_ON(ret); 2826567e837SChris Mason goto csum; 2836567e837SChris Mason } 2846567e837SChris Mason 2856567e837SChris Mason insert: 286a429e513SChris Mason btrfs_release_path(root, path); 2876567e837SChris Mason csum_offset = 0; 288f578d4bdSChris Mason if (found_next) { 289f578d4bdSChris Mason u64 tmp = min((u64)i_size_read(inode), next_offset); 290b56baf5bSYan tmp -= offset & ~((u64)root->sectorsize -1); 291f578d4bdSChris Mason tmp >>= root->fs_info->sb->s_blocksize_bits; 292f578d4bdSChris Mason tmp = max((u64)1, tmp); 293f578d4bdSChris Mason tmp = min(tmp, (u64)MAX_CSUM_ITEMS(root)); 294f578d4bdSChris Mason ins_size = BTRFS_CRC32_SIZE * tmp; 295f578d4bdSChris Mason } else { 296f578d4bdSChris Mason ins_size = BTRFS_CRC32_SIZE; 297f578d4bdSChris Mason } 2985caf2a00SChris Mason ret = btrfs_insert_empty_item(trans, root, path, &file_key, 299f578d4bdSChris Mason ins_size); 30054aa1f4dSChris Mason if (ret < 0) 30154aa1f4dSChris Mason goto fail; 302a429e513SChris Mason if (ret != 0) { 303a429e513SChris Mason WARN_ON(1); 304f254e52cSChris Mason goto fail; 305a429e513SChris Mason } 3066567e837SChris Mason csum: 3075f39d397SChris Mason leaf = path->nodes[0]; 3085f39d397SChris Mason item = btrfs_item_ptr(leaf, path->slots[0], struct btrfs_csum_item); 309f254e52cSChris Mason ret = 0; 310509659cdSChris Mason item = (struct btrfs_csum_item *)((unsigned char *)item + 311509659cdSChris Mason csum_offset * BTRFS_CRC32_SIZE); 312b18c6685SChris Mason found: 313065631f6SChris Mason item_end = btrfs_item_ptr(leaf, path->slots[0], struct btrfs_csum_item); 314065631f6SChris Mason item_end = (struct btrfs_csum_item *)((unsigned char *)item_end + 315065631f6SChris Mason btrfs_item_size_nr(leaf, path->slots[0])); 3166e92f5e6SChris Mason eb_token = NULL; 317*e6dcd2dcSChris Mason next_sector: 318aadfeb6eSChris Mason 3196e92f5e6SChris Mason if (!eb_token || 3206e92f5e6SChris Mason (unsigned long)item + BTRFS_CRC32_SIZE >= map_start + map_len) { 3216e92f5e6SChris Mason int err; 3226e92f5e6SChris Mason 3236e92f5e6SChris Mason if (eb_token) 324eb20978fSChris Mason unmap_extent_buffer(leaf, eb_token, KM_USER1); 3256e92f5e6SChris Mason eb_token = NULL; 3266e92f5e6SChris Mason err = map_private_extent_buffer(leaf, (unsigned long)item, 3276e92f5e6SChris Mason BTRFS_CRC32_SIZE, 3286e92f5e6SChris Mason &eb_token, &eb_map, 329eb20978fSChris Mason &map_start, &map_len, KM_USER1); 3306e92f5e6SChris Mason if (err) 3316e92f5e6SChris Mason eb_token = NULL; 3326e92f5e6SChris Mason } 3336e92f5e6SChris Mason if (eb_token) { 3346e92f5e6SChris Mason memcpy(eb_token + ((unsigned long)item & (PAGE_CACHE_SIZE - 1)), 335*e6dcd2dcSChris Mason §or_sum->sum, BTRFS_CRC32_SIZE); 3366e92f5e6SChris Mason } else { 337*e6dcd2dcSChris Mason write_extent_buffer(leaf, §or_sum->sum, 338*e6dcd2dcSChris Mason (unsigned long)item, BTRFS_CRC32_SIZE); 3396e92f5e6SChris Mason } 340*e6dcd2dcSChris Mason total_bytes += root->sectorsize; 341*e6dcd2dcSChris Mason sector_sum++; 342*e6dcd2dcSChris Mason if (total_bytes < sums->len) { 3436e92f5e6SChris Mason item = (struct btrfs_csum_item *)((char *)item + 3446e92f5e6SChris Mason BTRFS_CRC32_SIZE); 3452e1a992eSChris Mason if (item < item_end && offset + PAGE_CACHE_SIZE == 346*e6dcd2dcSChris Mason sector_sum->offset) { 347*e6dcd2dcSChris Mason offset = sector_sum->offset; 348*e6dcd2dcSChris Mason goto next_sector; 349065631f6SChris Mason } 3502e1a992eSChris Mason } 3516e92f5e6SChris Mason if (eb_token) { 352eb20978fSChris Mason unmap_extent_buffer(leaf, eb_token, KM_USER1); 3536e92f5e6SChris Mason eb_token = NULL; 3546e92f5e6SChris Mason } 3555caf2a00SChris Mason btrfs_mark_buffer_dirty(path->nodes[0]); 356*e6dcd2dcSChris Mason if (total_bytes < sums->len) { 3575caf2a00SChris Mason btrfs_release_path(root, path); 358065631f6SChris Mason goto again; 359065631f6SChris Mason } 360065631f6SChris Mason fail: 3615caf2a00SChris Mason btrfs_free_path(path); 362f254e52cSChris Mason return ret; 363f254e52cSChris Mason } 364f254e52cSChris Mason 3651de037a4SChris Mason int btrfs_csum_truncate(struct btrfs_trans_handle *trans, 3661de037a4SChris Mason struct btrfs_root *root, struct btrfs_path *path, 3671de037a4SChris Mason u64 isize) 3681de037a4SChris Mason { 3691de037a4SChris Mason struct btrfs_key key; 3705f39d397SChris Mason struct extent_buffer *leaf = path->nodes[0]; 3711de037a4SChris Mason int slot = path->slots[0]; 3721de037a4SChris Mason int ret; 3731de037a4SChris Mason u32 new_item_size; 3741de037a4SChris Mason u64 new_item_span; 3751de037a4SChris Mason u64 blocks; 3761de037a4SChris Mason 3775f39d397SChris Mason btrfs_item_key_to_cpu(leaf, &key, slot); 3781de037a4SChris Mason if (isize <= key.offset) 3791de037a4SChris Mason return 0; 3801de037a4SChris Mason new_item_span = isize - key.offset; 3815f39d397SChris Mason blocks = (new_item_span + root->sectorsize - 1) >> 38284f54cfaSChris Mason root->fs_info->sb->s_blocksize_bits; 3831de037a4SChris Mason new_item_size = blocks * BTRFS_CRC32_SIZE; 3845f39d397SChris Mason if (new_item_size >= btrfs_item_size_nr(leaf, slot)) 3851de037a4SChris Mason return 0; 386179e29e4SChris Mason ret = btrfs_truncate_item(trans, root, path, new_item_size, 1); 3871de037a4SChris Mason BUG_ON(ret); 3881de037a4SChris Mason return ret; 3891de037a4SChris Mason } 3901de037a4SChris Mason 391