6402 lines
188 KiB
C
6402 lines
188 KiB
C
/**
|
|
* attrib.c - Attribute handling code. Originated from the Linux-NTFS project.
|
|
*
|
|
* Copyright (c) 2000-2010 Anton Altaparmakov
|
|
* Copyright (c) 2002-2005 Richard Russon
|
|
* Copyright (c) 2002-2008 Szabolcs Szakacsits
|
|
* Copyright (c) 2004-2007 Yura Pakhuchiy
|
|
* Copyright (c) 2007-2010 Jean-Pierre Andre
|
|
* Copyright (c) 2010 Erik Larsson
|
|
*
|
|
* This program/include file is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License as published
|
|
* by the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program/include file is distributed in the hope that it will be
|
|
* useful, but WITHOUT ANY WARRANTY; without even the implied warranty
|
|
* of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program (in the main directory of the NTFS-3G
|
|
* distribution in the file COPYING); if not, write to the Free Software
|
|
* Foundation,Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#ifdef HAVE_STDIO_H
|
|
#include <stdio.h>
|
|
#endif
|
|
#ifdef HAVE_STRING_H
|
|
#include <string.h>
|
|
#endif
|
|
#ifdef HAVE_STDLIB_H
|
|
#include <stdlib.h>
|
|
#endif
|
|
#ifdef HAVE_ERRNO_H
|
|
#include <errno.h>
|
|
#endif
|
|
#ifdef HAVE_LIMITS_H
|
|
#include <limits.h>
|
|
#endif
|
|
|
|
#include "param.h"
|
|
#include "compat.h"
|
|
#include "attrib.h"
|
|
#include "attrlist.h"
|
|
#include "device.h"
|
|
#include "mft.h"
|
|
#include "debug.h"
|
|
#include "mst.h"
|
|
#include "volume.h"
|
|
#include "types.h"
|
|
#include "layout.h"
|
|
#include "inode.h"
|
|
#include "runlist.h"
|
|
#include "lcnalloc.h"
|
|
#include "dir.h"
|
|
#include "compress.h"
|
|
#include "bitmap.h"
|
|
#include "logging.h"
|
|
#include "misc.h"
|
|
#include "efs.h"
|
|
|
|
ntfschar AT_UNNAMED[] = { const_cpu_to_le16('\0') };
|
|
ntfschar STREAM_SDS[] = { const_cpu_to_le16('$'),
|
|
const_cpu_to_le16('S'),
|
|
const_cpu_to_le16('D'),
|
|
const_cpu_to_le16('S'),
|
|
const_cpu_to_le16('\0') };
|
|
|
|
ntfschar TXF_DATA[] = { const_cpu_to_le16('$'),
|
|
const_cpu_to_le16('T'),
|
|
const_cpu_to_le16('X'),
|
|
const_cpu_to_le16('F'),
|
|
const_cpu_to_le16('_'),
|
|
const_cpu_to_le16('D'),
|
|
const_cpu_to_le16('A'),
|
|
const_cpu_to_le16('T'),
|
|
const_cpu_to_le16('A'),
|
|
const_cpu_to_le16('\0') };
|
|
|
|
static int NAttrFlag(ntfs_attr *na, FILE_ATTR_FLAGS flag)
|
|
{
|
|
if (na->type == AT_DATA && na->name == AT_UNNAMED)
|
|
return (na->ni->flags & flag);
|
|
return 0;
|
|
}
|
|
|
|
static void NAttrSetFlag(ntfs_attr *na, FILE_ATTR_FLAGS flag)
|
|
{
|
|
if (na->type == AT_DATA && na->name == AT_UNNAMED)
|
|
na->ni->flags |= flag;
|
|
else
|
|
ntfs_log_trace("Denied setting flag %d for not unnamed data "
|
|
"attribute\n", flag);
|
|
}
|
|
|
|
static void NAttrClearFlag(ntfs_attr *na, FILE_ATTR_FLAGS flag)
|
|
{
|
|
if (na->type == AT_DATA && na->name == AT_UNNAMED)
|
|
na->ni->flags &= ~flag;
|
|
}
|
|
|
|
#define GenNAttrIno(func_name, flag) \
|
|
int NAttr##func_name(ntfs_attr *na) { return NAttrFlag (na, flag); } \
|
|
void NAttrSet##func_name(ntfs_attr *na) { NAttrSetFlag (na, flag); } \
|
|
void NAttrClear##func_name(ntfs_attr *na){ NAttrClearFlag(na, flag); }
|
|
|
|
GenNAttrIno(Compressed, FILE_ATTR_COMPRESSED)
|
|
GenNAttrIno(Encrypted, FILE_ATTR_ENCRYPTED)
|
|
GenNAttrIno(Sparse, FILE_ATTR_SPARSE_FILE)
|
|
|
|
/**
|
|
* ntfs_get_attribute_value_length - Find the length of an attribute
|
|
* @a:
|
|
*
|
|
* Description...
|
|
*
|
|
* Returns:
|
|
*/
|
|
s64 ntfs_get_attribute_value_length(const ATTR_RECORD *a)
|
|
{
|
|
if (!a) {
|
|
errno = EINVAL;
|
|
return 0;
|
|
}
|
|
errno = 0;
|
|
if (a->non_resident)
|
|
return sle64_to_cpu(a->data_size);
|
|
|
|
return (s64)le32_to_cpu(a->value_length);
|
|
}
|
|
|
|
/**
|
|
* ntfs_get_attribute_value - Get a copy of an attribute
|
|
* @vol:
|
|
* @a:
|
|
* @b:
|
|
*
|
|
* Description...
|
|
*
|
|
* Returns:
|
|
*/
|
|
s64 ntfs_get_attribute_value(const ntfs_volume *vol,
|
|
const ATTR_RECORD *a, u8 *b)
|
|
{
|
|
runlist *rl;
|
|
s64 total, r;
|
|
int i;
|
|
|
|
/* Sanity checks. */
|
|
if (!vol || !a || !b) {
|
|
errno = EINVAL;
|
|
return 0;
|
|
}
|
|
/* Complex attribute? */
|
|
/*
|
|
* Ignore the flags in case they are not zero for an attribute list
|
|
* attribute. Windows does not complain about invalid flags and chkdsk
|
|
* does not detect or fix them so we need to cope with it, too.
|
|
*/
|
|
if (a->type != AT_ATTRIBUTE_LIST && a->flags) {
|
|
ntfs_log_error("Non-zero (%04x) attribute flags. Cannot handle "
|
|
"this yet.\n", le16_to_cpu(a->flags));
|
|
errno = EOPNOTSUPP;
|
|
return 0;
|
|
}
|
|
if (!a->non_resident) {
|
|
/* Attribute is resident. */
|
|
|
|
/* Sanity check. */
|
|
if (le32_to_cpu(a->value_length) + le16_to_cpu(a->value_offset)
|
|
> le32_to_cpu(a->length)) {
|
|
return 0;
|
|
}
|
|
|
|
memcpy(b, (const char*)a + le16_to_cpu(a->value_offset),
|
|
le32_to_cpu(a->value_length));
|
|
errno = 0;
|
|
return (s64)le32_to_cpu(a->value_length);
|
|
}
|
|
|
|
/* Attribute is not resident. */
|
|
|
|
/* If no data, return 0. */
|
|
if (!(a->data_size)) {
|
|
errno = 0;
|
|
return 0;
|
|
}
|
|
/*
|
|
* FIXME: What about attribute lists?!? (AIA)
|
|
*/
|
|
/* Decompress the mapping pairs array into a runlist. */
|
|
rl = ntfs_mapping_pairs_decompress(vol, a, NULL);
|
|
if (!rl) {
|
|
errno = EINVAL;
|
|
return 0;
|
|
}
|
|
/*
|
|
* FIXED: We were overflowing here in a nasty fashion when we
|
|
* reach the last cluster in the runlist as the buffer will
|
|
* only be big enough to hold data_size bytes while we are
|
|
* reading in allocated_size bytes which is usually larger
|
|
* than data_size, since the actual data is unlikely to have a
|
|
* size equal to a multiple of the cluster size!
|
|
* FIXED2: We were also overflowing here in the same fashion
|
|
* when the data_size was more than one run smaller than the
|
|
* allocated size which happens with Windows XP sometimes.
|
|
*/
|
|
/* Now load all clusters in the runlist into b. */
|
|
for (i = 0, total = 0; rl[i].length; i++) {
|
|
if (total + (rl[i].length << vol->cluster_size_bits) >=
|
|
sle64_to_cpu(a->data_size)) {
|
|
unsigned char *intbuf = NULL;
|
|
/*
|
|
* We have reached the last run so we were going to
|
|
* overflow when executing the ntfs_pread() which is
|
|
* BAAAAAAAD!
|
|
* Temporary fix:
|
|
* Allocate a new buffer with size:
|
|
* rl[i].length << vol->cluster_size_bits, do the
|
|
* read into our buffer, then memcpy the correct
|
|
* amount of data into the caller supplied buffer,
|
|
* free our buffer, and continue.
|
|
* We have reached the end of data size so we were
|
|
* going to overflow in the same fashion.
|
|
* Temporary fix: same as above.
|
|
*/
|
|
intbuf = ntfs_malloc(rl[i].length << vol->cluster_size_bits);
|
|
if (!intbuf) {
|
|
free(rl);
|
|
return 0;
|
|
}
|
|
/*
|
|
* FIXME: If compressed file: Only read if lcn != -1.
|
|
* Otherwise, we are dealing with a sparse run and we
|
|
* just memset the user buffer to 0 for the length of
|
|
* the run, which should be 16 (= compression unit
|
|
* size).
|
|
* FIXME: Really only when file is compressed, or can
|
|
* we have sparse runs in uncompressed files as well?
|
|
* - Yes we can, in sparse files! But not necessarily
|
|
* size of 16, just run length.
|
|
*/
|
|
r = ntfs_pread(vol->dev, rl[i].lcn <<
|
|
vol->cluster_size_bits, rl[i].length <<
|
|
vol->cluster_size_bits, intbuf);
|
|
if (r != rl[i].length << vol->cluster_size_bits) {
|
|
#define ESTR "Error reading attribute value"
|
|
if (r == -1)
|
|
ntfs_log_perror(ESTR);
|
|
else if (r < rl[i].length <<
|
|
vol->cluster_size_bits) {
|
|
ntfs_log_debug(ESTR ": Ran out of input data.\n");
|
|
errno = EIO;
|
|
} else {
|
|
ntfs_log_debug(ESTR ": unknown error\n");
|
|
errno = EIO;
|
|
}
|
|
#undef ESTR
|
|
free(rl);
|
|
free(intbuf);
|
|
return 0;
|
|
}
|
|
memcpy(b + total, intbuf, sle64_to_cpu(a->data_size) -
|
|
total);
|
|
free(intbuf);
|
|
total = sle64_to_cpu(a->data_size);
|
|
break;
|
|
}
|
|
/*
|
|
* FIXME: If compressed file: Only read if lcn != -1.
|
|
* Otherwise, we are dealing with a sparse run and we just
|
|
* memset the user buffer to 0 for the length of the run, which
|
|
* should be 16 (= compression unit size).
|
|
* FIXME: Really only when file is compressed, or can
|
|
* we have sparse runs in uncompressed files as well?
|
|
* - Yes we can, in sparse files! But not necessarily size of
|
|
* 16, just run length.
|
|
*/
|
|
r = ntfs_pread(vol->dev, rl[i].lcn << vol->cluster_size_bits,
|
|
rl[i].length << vol->cluster_size_bits,
|
|
b + total);
|
|
if (r != rl[i].length << vol->cluster_size_bits) {
|
|
#define ESTR "Error reading attribute value"
|
|
if (r == -1)
|
|
ntfs_log_perror(ESTR);
|
|
else if (r < rl[i].length << vol->cluster_size_bits) {
|
|
ntfs_log_debug(ESTR ": Ran out of input data.\n");
|
|
errno = EIO;
|
|
} else {
|
|
ntfs_log_debug(ESTR ": unknown error\n");
|
|
errno = EIO;
|
|
}
|
|
#undef ESTR
|
|
free(rl);
|
|
return 0;
|
|
}
|
|
total += r;
|
|
}
|
|
free(rl);
|
|
return total;
|
|
}
|
|
|
|
/* Already cleaned up code below, but still look for FIXME:... */
|
|
|
|
/**
|
|
* __ntfs_attr_init - primary initialization of an ntfs attribute structure
|
|
* @na: ntfs attribute to initialize
|
|
* @ni: ntfs inode with which to initialize the ntfs attribute
|
|
* @type: attribute type
|
|
* @name: attribute name in little endian Unicode or NULL
|
|
* @name_len: length of attribute @name in Unicode characters (if @name given)
|
|
*
|
|
* Initialize the ntfs attribute @na with @ni, @type, @name, and @name_len.
|
|
*/
|
|
static void __ntfs_attr_init(ntfs_attr *na, ntfs_inode *ni,
|
|
const ATTR_TYPES type, ntfschar *name, const u32 name_len)
|
|
{
|
|
na->rl = NULL;
|
|
na->ni = ni;
|
|
na->type = type;
|
|
na->name = name;
|
|
if (name)
|
|
na->name_len = name_len;
|
|
else
|
|
na->name_len = 0;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_init - initialize an ntfs_attr with data sizes and status
|
|
* @na:
|
|
* @non_resident:
|
|
* @compressed:
|
|
* @encrypted:
|
|
* @sparse:
|
|
* @allocated_size:
|
|
* @data_size:
|
|
* @initialized_size:
|
|
* @compressed_size:
|
|
* @compression_unit:
|
|
*
|
|
* Final initialization for an ntfs attribute.
|
|
*/
|
|
void ntfs_attr_init(ntfs_attr *na, const BOOL non_resident,
|
|
const ATTR_FLAGS data_flags,
|
|
const BOOL encrypted, const BOOL sparse,
|
|
const s64 allocated_size, const s64 data_size,
|
|
const s64 initialized_size, const s64 compressed_size,
|
|
const u8 compression_unit)
|
|
{
|
|
if (!NAttrInitialized(na)) {
|
|
na->data_flags = data_flags;
|
|
if (non_resident)
|
|
NAttrSetNonResident(na);
|
|
if (data_flags & ATTR_COMPRESSION_MASK)
|
|
NAttrSetCompressed(na);
|
|
if (encrypted)
|
|
NAttrSetEncrypted(na);
|
|
if (sparse)
|
|
NAttrSetSparse(na);
|
|
na->allocated_size = allocated_size;
|
|
na->data_size = data_size;
|
|
na->initialized_size = initialized_size;
|
|
if ((data_flags & ATTR_COMPRESSION_MASK) || sparse) {
|
|
ntfs_volume *vol = na->ni->vol;
|
|
|
|
na->compressed_size = compressed_size;
|
|
na->compression_block_clusters = 1 << compression_unit;
|
|
na->compression_block_size = 1 << (compression_unit +
|
|
vol->cluster_size_bits);
|
|
na->compression_block_size_bits = ffs(
|
|
na->compression_block_size) - 1;
|
|
}
|
|
NAttrSetInitialized(na);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_open - open an ntfs attribute for access
|
|
* @ni: open ntfs inode in which the ntfs attribute resides
|
|
* @type: attribute type
|
|
* @name: attribute name in little endian Unicode or AT_UNNAMED or NULL
|
|
* @name_len: length of attribute @name in Unicode characters (if @name given)
|
|
*
|
|
* Allocate a new ntfs attribute structure, initialize it with @ni, @type,
|
|
* @name, and @name_len, then return it. Return NULL on error with
|
|
* errno set to the error code.
|
|
*
|
|
* If @name is AT_UNNAMED look specifically for an unnamed attribute. If you
|
|
* do not care whether the attribute is named or not set @name to NULL. In
|
|
* both those cases @name_len is not used at all.
|
|
*/
|
|
ntfs_attr *ntfs_attr_open(ntfs_inode *ni, const ATTR_TYPES type,
|
|
ntfschar *name, u32 name_len)
|
|
{
|
|
ntfs_attr_search_ctx *ctx;
|
|
ntfs_attr *na = NULL;
|
|
ntfschar *newname = NULL;
|
|
ATTR_RECORD *a;
|
|
BOOL cs;
|
|
|
|
ntfs_log_enter("Entering for inode %lld, attr 0x%x.\n",
|
|
(unsigned long long)ni->mft_no, type);
|
|
|
|
if (!ni || !ni->vol || !ni->mrec) {
|
|
errno = EINVAL;
|
|
goto out;
|
|
}
|
|
na = ntfs_calloc(sizeof(ntfs_attr));
|
|
if (!na)
|
|
goto out;
|
|
if (name && name != AT_UNNAMED && name != NTFS_INDEX_I30) {
|
|
name = ntfs_ucsndup(name, name_len);
|
|
if (!name)
|
|
goto err_out;
|
|
newname = name;
|
|
}
|
|
|
|
ctx = ntfs_attr_get_search_ctx(ni, NULL);
|
|
if (!ctx)
|
|
goto err_out;
|
|
|
|
if (ntfs_attr_lookup(type, name, name_len, 0, 0, NULL, 0, ctx))
|
|
goto put_err_out;
|
|
|
|
a = ctx->attr;
|
|
|
|
if (!name) {
|
|
if (a->name_length) {
|
|
name = ntfs_ucsndup((ntfschar*)((u8*)a + le16_to_cpu(
|
|
a->name_offset)), a->name_length);
|
|
if (!name)
|
|
goto put_err_out;
|
|
newname = name;
|
|
name_len = a->name_length;
|
|
} else {
|
|
name = AT_UNNAMED;
|
|
name_len = 0;
|
|
}
|
|
}
|
|
|
|
__ntfs_attr_init(na, ni, type, name, name_len);
|
|
|
|
/*
|
|
* Wipe the flags in case they are not zero for an attribute list
|
|
* attribute. Windows does not complain about invalid flags and chkdsk
|
|
* does not detect or fix them so we need to cope with it, too.
|
|
*/
|
|
if (type == AT_ATTRIBUTE_LIST)
|
|
a->flags = 0;
|
|
|
|
if ((type == AT_DATA) && !a->initialized_size) {
|
|
/*
|
|
* Define/redefine the compression state if stream is
|
|
* empty, based on the compression mark on parent
|
|
* directory (for unnamed data streams) or on current
|
|
* inode (for named data streams). The compression mark
|
|
* may change any time, the compression state can only
|
|
* change when stream is wiped out.
|
|
*
|
|
* Also prevent compression on NTFS version < 3.0
|
|
* or cluster size > 4K or compression is disabled
|
|
*/
|
|
a->flags &= ~ATTR_COMPRESSION_MASK;
|
|
if ((ni->flags & FILE_ATTR_COMPRESSED)
|
|
&& (ni->vol->major_ver >= 3)
|
|
&& NVolCompression(ni->vol)
|
|
&& (ni->vol->cluster_size <= MAX_COMPRESSION_CLUSTER_SIZE))
|
|
a->flags |= ATTR_IS_COMPRESSED;
|
|
}
|
|
|
|
cs = a->flags & (ATTR_IS_COMPRESSED | ATTR_IS_SPARSE);
|
|
|
|
if (na->type == AT_DATA && na->name == AT_UNNAMED &&
|
|
((!(a->flags & ATTR_IS_SPARSE) != !NAttrSparse(na)) ||
|
|
(!(a->flags & ATTR_IS_ENCRYPTED) != !NAttrEncrypted(na)))) {
|
|
errno = EIO;
|
|
ntfs_log_perror("Inode %lld has corrupt attribute flags "
|
|
"(0x%x <> 0x%x)",(unsigned long long)ni->mft_no,
|
|
a->flags, na->ni->flags);
|
|
goto put_err_out;
|
|
}
|
|
|
|
if (a->non_resident) {
|
|
if ((a->flags & ATTR_COMPRESSION_MASK)
|
|
&& !a->compression_unit) {
|
|
errno = EIO;
|
|
ntfs_log_perror("Compressed inode %lld attr 0x%x has "
|
|
"no compression unit",
|
|
(unsigned long long)ni->mft_no, type);
|
|
goto put_err_out;
|
|
}
|
|
ntfs_attr_init(na, TRUE, a->flags,
|
|
a->flags & ATTR_IS_ENCRYPTED,
|
|
a->flags & ATTR_IS_SPARSE,
|
|
sle64_to_cpu(a->allocated_size),
|
|
sle64_to_cpu(a->data_size),
|
|
sle64_to_cpu(a->initialized_size),
|
|
cs ? sle64_to_cpu(a->compressed_size) : 0,
|
|
cs ? a->compression_unit : 0);
|
|
} else {
|
|
s64 l = le32_to_cpu(a->value_length);
|
|
ntfs_attr_init(na, FALSE, a->flags,
|
|
a->flags & ATTR_IS_ENCRYPTED,
|
|
a->flags & ATTR_IS_SPARSE, (l + 7) & ~7, l, l,
|
|
cs ? (l + 7) & ~7 : 0, 0);
|
|
}
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
out:
|
|
ntfs_log_leave("\n");
|
|
return na;
|
|
|
|
put_err_out:
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
err_out:
|
|
free(newname);
|
|
free(na);
|
|
na = NULL;
|
|
goto out;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_close - free an ntfs attribute structure
|
|
* @na: ntfs attribute structure to free
|
|
*
|
|
* Release all memory associated with the ntfs attribute @na and then release
|
|
* @na itself.
|
|
*/
|
|
void ntfs_attr_close(ntfs_attr *na)
|
|
{
|
|
if (!na)
|
|
return;
|
|
if (NAttrNonResident(na) && na->rl)
|
|
free(na->rl);
|
|
/* Don't release if using an internal constant. */
|
|
if (na->name != AT_UNNAMED && na->name != NTFS_INDEX_I30
|
|
&& na->name != STREAM_SDS)
|
|
free(na->name);
|
|
free(na);
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_map_runlist - map (a part of) a runlist of an ntfs attribute
|
|
* @na: ntfs attribute for which to map (part of) a runlist
|
|
* @vcn: map runlist part containing this vcn
|
|
*
|
|
* Map the part of a runlist containing the @vcn of the ntfs attribute @na.
|
|
*
|
|
* Return 0 on success and -1 on error with errno set to the error code.
|
|
*/
|
|
int ntfs_attr_map_runlist(ntfs_attr *na, VCN vcn)
|
|
{
|
|
LCN lcn;
|
|
ntfs_attr_search_ctx *ctx;
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr 0x%x, vcn 0x%llx.\n",
|
|
(unsigned long long)na->ni->mft_no, na->type, (long long)vcn);
|
|
|
|
lcn = ntfs_rl_vcn_to_lcn(na->rl, vcn);
|
|
if (lcn >= 0 || lcn == LCN_HOLE || lcn == LCN_ENOENT)
|
|
return 0;
|
|
|
|
ctx = ntfs_attr_get_search_ctx(na->ni, NULL);
|
|
if (!ctx)
|
|
return -1;
|
|
|
|
/* Find the attribute in the mft record. */
|
|
if (!ntfs_attr_lookup(na->type, na->name, na->name_len, CASE_SENSITIVE,
|
|
vcn, NULL, 0, ctx)) {
|
|
runlist_element *rl;
|
|
|
|
/* Decode the runlist. */
|
|
rl = ntfs_mapping_pairs_decompress(na->ni->vol, ctx->attr,
|
|
na->rl);
|
|
if (rl) {
|
|
na->rl = rl;
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return -1;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_map_whole_runlist - map the whole runlist of an ntfs attribute
|
|
* @na: ntfs attribute for which to map the runlist
|
|
*
|
|
* Map the whole runlist of the ntfs attribute @na. For an attribute made up
|
|
* of only one attribute extent this is the same as calling
|
|
* ntfs_attr_map_runlist(na, 0) but for an attribute with multiple extents this
|
|
* will map the runlist fragments from each of the extents thus giving access
|
|
* to the entirety of the disk allocation of an attribute.
|
|
*
|
|
* Return 0 on success and -1 on error with errno set to the error code.
|
|
*/
|
|
int ntfs_attr_map_whole_runlist(ntfs_attr *na)
|
|
{
|
|
VCN next_vcn, last_vcn, highest_vcn;
|
|
ntfs_attr_search_ctx *ctx;
|
|
ntfs_volume *vol = na->ni->vol;
|
|
ATTR_RECORD *a;
|
|
int ret = -1;
|
|
|
|
ntfs_log_enter("Entering for inode %llu, attr 0x%x.\n",
|
|
(unsigned long long)na->ni->mft_no, na->type);
|
|
|
|
/* avoid multiple full runlist mappings */
|
|
if (NAttrFullyMapped(na)) {
|
|
ret = 0;
|
|
goto out;
|
|
}
|
|
ctx = ntfs_attr_get_search_ctx(na->ni, NULL);
|
|
if (!ctx)
|
|
goto out;
|
|
|
|
/* Map all attribute extents one by one. */
|
|
next_vcn = last_vcn = highest_vcn = 0;
|
|
a = NULL;
|
|
while (1) {
|
|
runlist_element *rl;
|
|
|
|
int not_mapped = 0;
|
|
if (ntfs_rl_vcn_to_lcn(na->rl, next_vcn) == LCN_RL_NOT_MAPPED)
|
|
not_mapped = 1;
|
|
|
|
if (ntfs_attr_lookup(na->type, na->name, na->name_len,
|
|
CASE_SENSITIVE, next_vcn, NULL, 0, ctx))
|
|
break;
|
|
|
|
a = ctx->attr;
|
|
|
|
if (not_mapped) {
|
|
/* Decode the runlist. */
|
|
rl = ntfs_mapping_pairs_decompress(na->ni->vol,
|
|
a, na->rl);
|
|
if (!rl)
|
|
goto err_out;
|
|
na->rl = rl;
|
|
}
|
|
|
|
/* Are we in the first extent? */
|
|
if (!next_vcn) {
|
|
if (a->lowest_vcn) {
|
|
errno = EIO;
|
|
ntfs_log_perror("First extent of inode %llu "
|
|
"attribute has non-zero lowest_vcn",
|
|
(unsigned long long)na->ni->mft_no);
|
|
goto err_out;
|
|
}
|
|
/* Get the last vcn in the attribute. */
|
|
last_vcn = sle64_to_cpu(a->allocated_size) >>
|
|
vol->cluster_size_bits;
|
|
}
|
|
|
|
/* Get the lowest vcn for the next extent. */
|
|
highest_vcn = sle64_to_cpu(a->highest_vcn);
|
|
next_vcn = highest_vcn + 1;
|
|
|
|
/* Only one extent or error, which we catch below. */
|
|
if (next_vcn <= 0) {
|
|
errno = ENOENT;
|
|
break;
|
|
}
|
|
|
|
/* Avoid endless loops due to corruption. */
|
|
if (next_vcn < sle64_to_cpu(a->lowest_vcn)) {
|
|
errno = EIO;
|
|
ntfs_log_perror("Inode %llu has corrupt attribute list",
|
|
(unsigned long long)na->ni->mft_no);
|
|
goto err_out;
|
|
}
|
|
}
|
|
if (!a) {
|
|
ntfs_log_perror("Couldn't find attribute for runlist mapping");
|
|
goto err_out;
|
|
}
|
|
if (highest_vcn && highest_vcn != last_vcn - 1) {
|
|
errno = EIO;
|
|
ntfs_log_perror("Failed to load full runlist: inode: %llu "
|
|
"highest_vcn: 0x%llx last_vcn: 0x%llx",
|
|
(unsigned long long)na->ni->mft_no,
|
|
(long long)highest_vcn, (long long)last_vcn);
|
|
goto err_out;
|
|
}
|
|
if (errno == ENOENT) {
|
|
NAttrSetFullyMapped(na);
|
|
ret = 0;
|
|
}
|
|
err_out:
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
out:
|
|
ntfs_log_leave("\n");
|
|
return ret;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_vcn_to_lcn - convert a vcn into a lcn given an ntfs attribute
|
|
* @na: ntfs attribute whose runlist to use for conversion
|
|
* @vcn: vcn to convert
|
|
*
|
|
* Convert the virtual cluster number @vcn of an attribute into a logical
|
|
* cluster number (lcn) of a device using the runlist @na->rl to map vcns to
|
|
* their corresponding lcns.
|
|
*
|
|
* If the @vcn is not mapped yet, attempt to map the attribute extent
|
|
* containing the @vcn and retry the vcn to lcn conversion.
|
|
*
|
|
* Since lcns must be >= 0, we use negative return values with special meaning:
|
|
*
|
|
* Return value Meaning / Description
|
|
* ==========================================
|
|
* -1 = LCN_HOLE Hole / not allocated on disk.
|
|
* -3 = LCN_ENOENT There is no such vcn in the attribute.
|
|
* -4 = LCN_EINVAL Input parameter error.
|
|
* -5 = LCN_EIO Corrupt fs, disk i/o error, or not enough memory.
|
|
*/
|
|
LCN ntfs_attr_vcn_to_lcn(ntfs_attr *na, const VCN vcn)
|
|
{
|
|
LCN lcn;
|
|
BOOL is_retry = FALSE;
|
|
|
|
if (!na || !NAttrNonResident(na) || vcn < 0)
|
|
return (LCN)LCN_EINVAL;
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr 0x%x.\n", (unsigned long
|
|
long)na->ni->mft_no, na->type);
|
|
retry:
|
|
/* Convert vcn to lcn. If that fails map the runlist and retry once. */
|
|
lcn = ntfs_rl_vcn_to_lcn(na->rl, vcn);
|
|
if (lcn >= 0)
|
|
return lcn;
|
|
if (!is_retry && !ntfs_attr_map_runlist(na, vcn)) {
|
|
is_retry = TRUE;
|
|
goto retry;
|
|
}
|
|
/*
|
|
* If the attempt to map the runlist failed, or we are getting
|
|
* LCN_RL_NOT_MAPPED despite having mapped the attribute extent
|
|
* successfully, something is really badly wrong...
|
|
*/
|
|
if (!is_retry || lcn == (LCN)LCN_RL_NOT_MAPPED)
|
|
return (LCN)LCN_EIO;
|
|
/* lcn contains the appropriate error code. */
|
|
return lcn;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_find_vcn - find a vcn in the runlist of an ntfs attribute
|
|
* @na: ntfs attribute whose runlist to search
|
|
* @vcn: vcn to find
|
|
*
|
|
* Find the virtual cluster number @vcn in the runlist of the ntfs attribute
|
|
* @na and return the the address of the runlist element containing the @vcn.
|
|
*
|
|
* Note you need to distinguish between the lcn of the returned runlist
|
|
* element being >= 0 and LCN_HOLE. In the later case you have to return zeroes
|
|
* on read and allocate clusters on write. You need to update the runlist, the
|
|
* attribute itself as well as write the modified mft record to disk.
|
|
*
|
|
* If there is an error return NULL with errno set to the error code. The
|
|
* following error codes are defined:
|
|
* EINVAL Input parameter error.
|
|
* ENOENT There is no such vcn in the runlist.
|
|
* ENOMEM Not enough memory.
|
|
* EIO I/O error or corrupt metadata.
|
|
*/
|
|
runlist_element *ntfs_attr_find_vcn(ntfs_attr *na, const VCN vcn)
|
|
{
|
|
runlist_element *rl;
|
|
BOOL is_retry = FALSE;
|
|
|
|
if (!na || !NAttrNonResident(na) || vcn < 0) {
|
|
errno = EINVAL;
|
|
return NULL;
|
|
}
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr 0x%x, vcn %llx\n",
|
|
(unsigned long long)na->ni->mft_no, na->type,
|
|
(long long)vcn);
|
|
retry:
|
|
rl = na->rl;
|
|
if (!rl)
|
|
goto map_rl;
|
|
if (vcn < rl[0].vcn)
|
|
goto map_rl;
|
|
while (rl->length) {
|
|
if (vcn < rl[1].vcn) {
|
|
if (rl->lcn >= (LCN)LCN_HOLE)
|
|
return rl;
|
|
break;
|
|
}
|
|
rl++;
|
|
}
|
|
switch (rl->lcn) {
|
|
case (LCN)LCN_RL_NOT_MAPPED:
|
|
goto map_rl;
|
|
case (LCN)LCN_ENOENT:
|
|
errno = ENOENT;
|
|
break;
|
|
case (LCN)LCN_EINVAL:
|
|
errno = EINVAL;
|
|
break;
|
|
default:
|
|
errno = EIO;
|
|
break;
|
|
}
|
|
return NULL;
|
|
map_rl:
|
|
/* The @vcn is in an unmapped region, map the runlist and retry. */
|
|
if (!is_retry && !ntfs_attr_map_runlist(na, vcn)) {
|
|
is_retry = TRUE;
|
|
goto retry;
|
|
}
|
|
/*
|
|
* If we already retried or the mapping attempt failed something has
|
|
* gone badly wrong. EINVAL and ENOENT coming from a failed mapping
|
|
* attempt are equivalent to errors for us as they should not happen
|
|
* in our code paths.
|
|
*/
|
|
if (is_retry || errno == EINVAL || errno == ENOENT)
|
|
errno = EIO;
|
|
return NULL;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_pread_i - see description at ntfs_attr_pread()
|
|
*/
|
|
static s64 ntfs_attr_pread_i(ntfs_attr *na, const s64 pos, s64 count, void *b)
|
|
{
|
|
s64 br, to_read, ofs, total, total2, max_read, max_init;
|
|
ntfs_volume *vol;
|
|
runlist_element *rl;
|
|
u16 efs_padding_length;
|
|
|
|
/* Sanity checking arguments is done in ntfs_attr_pread(). */
|
|
|
|
if ((na->data_flags & ATTR_COMPRESSION_MASK) && NAttrNonResident(na)) {
|
|
if ((na->data_flags & ATTR_COMPRESSION_MASK)
|
|
== ATTR_IS_COMPRESSED)
|
|
return ntfs_compressed_attr_pread(na, pos, count, b);
|
|
else {
|
|
/* compression mode not supported */
|
|
errno = EOPNOTSUPP;
|
|
return -1;
|
|
}
|
|
}
|
|
/*
|
|
* Encrypted non-resident attributes are not supported. We return
|
|
* access denied, which is what Windows NT4 does, too.
|
|
* However, allow if mounted with efs_raw option
|
|
*/
|
|
vol = na->ni->vol;
|
|
if (!vol->efs_raw && NAttrEncrypted(na) && NAttrNonResident(na)) {
|
|
errno = EACCES;
|
|
return -1;
|
|
}
|
|
|
|
if (!count)
|
|
return 0;
|
|
/*
|
|
* Truncate reads beyond end of attribute,
|
|
* but round to next 512 byte boundary for encrypted
|
|
* attributes with efs_raw mount option
|
|
*/
|
|
max_read = na->data_size;
|
|
max_init = na->initialized_size;
|
|
if (na->ni->vol->efs_raw
|
|
&& (na->data_flags & ATTR_IS_ENCRYPTED)
|
|
&& NAttrNonResident(na)) {
|
|
if (na->data_size != na->initialized_size) {
|
|
ntfs_log_error("uninitialized encrypted file not supported\n");
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
max_init = max_read = ((na->data_size + 511) & ~511) + 2;
|
|
}
|
|
if (pos + count > max_read) {
|
|
if (pos >= max_read)
|
|
return 0;
|
|
count = max_read - pos;
|
|
}
|
|
/* If it is a resident attribute, get the value from the mft record. */
|
|
if (!NAttrNonResident(na)) {
|
|
ntfs_attr_search_ctx *ctx;
|
|
char *val;
|
|
|
|
ctx = ntfs_attr_get_search_ctx(na->ni, NULL);
|
|
if (!ctx)
|
|
return -1;
|
|
if (ntfs_attr_lookup(na->type, na->name, na->name_len, 0,
|
|
0, NULL, 0, ctx)) {
|
|
res_err_out:
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return -1;
|
|
}
|
|
val = (char*)ctx->attr + le16_to_cpu(ctx->attr->value_offset);
|
|
if (val < (char*)ctx->attr || val +
|
|
le32_to_cpu(ctx->attr->value_length) >
|
|
(char*)ctx->mrec + vol->mft_record_size) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Sanity check failed", __FUNCTION__);
|
|
goto res_err_out;
|
|
}
|
|
memcpy(b, val + pos, count);
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return count;
|
|
}
|
|
total = total2 = 0;
|
|
/* Zero out reads beyond initialized size. */
|
|
if (pos + count > max_init) {
|
|
if (pos >= max_init) {
|
|
memset(b, 0, count);
|
|
return count;
|
|
}
|
|
total2 = pos + count - max_init;
|
|
count -= total2;
|
|
memset((u8*)b + count, 0, total2);
|
|
}
|
|
/*
|
|
* for encrypted non-resident attributes with efs_raw set
|
|
* the last two bytes aren't read from disk but contain
|
|
* the number of padding bytes so original size can be
|
|
* restored
|
|
*/
|
|
if (na->ni->vol->efs_raw &&
|
|
(na->data_flags & ATTR_IS_ENCRYPTED) &&
|
|
((pos + count) > max_init-2)) {
|
|
efs_padding_length = 511 - ((na->data_size - 1) & 511);
|
|
if (pos+count == max_init) {
|
|
if (count == 1) {
|
|
*((u8*)b+count-1) = (u8)(efs_padding_length >> 8);
|
|
count--;
|
|
total2++;
|
|
} else {
|
|
*(u16*)((u8*)b+count-2) = cpu_to_le16(efs_padding_length);
|
|
count -= 2;
|
|
total2 +=2;
|
|
}
|
|
} else {
|
|
*((u8*)b+count-1) = (u8)(efs_padding_length & 0xff);
|
|
count--;
|
|
total2++;
|
|
}
|
|
}
|
|
|
|
/* Find the runlist element containing the vcn. */
|
|
rl = ntfs_attr_find_vcn(na, pos >> vol->cluster_size_bits);
|
|
if (!rl) {
|
|
/*
|
|
* If the vcn is not present it is an out of bounds read.
|
|
* However, we already truncated the read to the data_size,
|
|
* so getting this here is an error.
|
|
*/
|
|
if (errno == ENOENT) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Failed to find VCN #1", __FUNCTION__);
|
|
}
|
|
return -1;
|
|
}
|
|
/*
|
|
* Gather the requested data into the linear destination buffer. Note,
|
|
* a partial final vcn is taken care of by the @count capping of read
|
|
* length.
|
|
*/
|
|
ofs = pos - (rl->vcn << vol->cluster_size_bits);
|
|
for (; count; rl++, ofs = 0) {
|
|
if (rl->lcn == LCN_RL_NOT_MAPPED) {
|
|
rl = ntfs_attr_find_vcn(na, rl->vcn);
|
|
if (!rl) {
|
|
if (errno == ENOENT) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Failed to find VCN #2",
|
|
__FUNCTION__);
|
|
}
|
|
goto rl_err_out;
|
|
}
|
|
/* Needed for case when runs merged. */
|
|
ofs = pos + total - (rl->vcn << vol->cluster_size_bits);
|
|
}
|
|
if (!rl->length) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Zero run length", __FUNCTION__);
|
|
goto rl_err_out;
|
|
}
|
|
if (rl->lcn < (LCN)0) {
|
|
if (rl->lcn != (LCN)LCN_HOLE) {
|
|
ntfs_log_perror("%s: Bad run (%lld)",
|
|
__FUNCTION__,
|
|
(long long)rl->lcn);
|
|
goto rl_err_out;
|
|
}
|
|
/* It is a hole, just zero the matching @b range. */
|
|
to_read = min(count, (rl->length <<
|
|
vol->cluster_size_bits) - ofs);
|
|
memset(b, 0, to_read);
|
|
/* Update progress counters. */
|
|
total += to_read;
|
|
count -= to_read;
|
|
b = (u8*)b + to_read;
|
|
continue;
|
|
}
|
|
/* It is a real lcn, read it into @dst. */
|
|
to_read = min(count, (rl->length << vol->cluster_size_bits) -
|
|
ofs);
|
|
retry:
|
|
ntfs_log_trace("Reading %lld bytes from vcn %lld, lcn %lld, ofs"
|
|
" %lld.\n", (long long)to_read, (long long)rl->vcn,
|
|
(long long )rl->lcn, (long long)ofs);
|
|
br = ntfs_pread(vol->dev, (rl->lcn << vol->cluster_size_bits) +
|
|
ofs, to_read, b);
|
|
/* If everything ok, update progress counters and continue. */
|
|
if (br > 0) {
|
|
total += br;
|
|
count -= br;
|
|
b = (u8*)b + br;
|
|
}
|
|
if (br == to_read)
|
|
continue;
|
|
/* If the syscall was interrupted, try again. */
|
|
if (br == (s64)-1 && errno == EINTR)
|
|
goto retry;
|
|
if (total)
|
|
return total;
|
|
if (!br)
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: ntfs_pread failed", __FUNCTION__);
|
|
return -1;
|
|
}
|
|
/* Finally, return the number of bytes read. */
|
|
return total + total2;
|
|
rl_err_out:
|
|
if (total)
|
|
return total;
|
|
errno = EIO;
|
|
return -1;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_pread - read from an attribute specified by an ntfs_attr structure
|
|
* @na: ntfs attribute to read from
|
|
* @pos: byte position in the attribute to begin reading from
|
|
* @count: number of bytes to read
|
|
* @b: output data buffer
|
|
*
|
|
* This function will read @count bytes starting at offset @pos from the ntfs
|
|
* attribute @na into the data buffer @b.
|
|
*
|
|
* On success, return the number of successfully read bytes. If this number is
|
|
* lower than @count this means that the read reached end of file or that an
|
|
* error was encountered during the read so that the read is partial. 0 means
|
|
* end of file or nothing was read (also return 0 when @count is 0).
|
|
*
|
|
* On error and nothing has been read, return -1 with errno set appropriately
|
|
* to the return code of ntfs_pread(), or to EINVAL in case of invalid
|
|
* arguments.
|
|
*/
|
|
s64 ntfs_attr_pread(ntfs_attr *na, const s64 pos, s64 count, void *b)
|
|
{
|
|
s64 ret;
|
|
|
|
if (!na || !na->ni || !na->ni->vol || !b || pos < 0 || count < 0) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s: na=%p b=%p pos=%lld count=%lld",
|
|
__FUNCTION__, na, b, (long long)pos,
|
|
(long long)count);
|
|
return -1;
|
|
}
|
|
|
|
ntfs_log_enter("Entering for inode %lld attr 0x%x pos %lld count "
|
|
"%lld\n", (unsigned long long)na->ni->mft_no,
|
|
na->type, (long long)pos, (long long)count);
|
|
|
|
ret = ntfs_attr_pread_i(na, pos, count, b);
|
|
|
|
ntfs_log_leave("\n");
|
|
return ret;
|
|
}
|
|
|
|
static int ntfs_attr_fill_zero(ntfs_attr *na, s64 pos, s64 count)
|
|
{
|
|
char *buf;
|
|
s64 written, size, end = pos + count;
|
|
s64 ofsi;
|
|
const runlist_element *rli;
|
|
ntfs_volume *vol;
|
|
int ret = -1;
|
|
|
|
ntfs_log_trace("pos %lld, count %lld\n", (long long)pos,
|
|
(long long)count);
|
|
|
|
if (!na || pos < 0 || count < 0) {
|
|
errno = EINVAL;
|
|
goto err_out;
|
|
}
|
|
|
|
buf = ntfs_calloc(NTFS_BUF_SIZE);
|
|
if (!buf)
|
|
goto err_out;
|
|
|
|
rli = na->rl;
|
|
ofsi = 0;
|
|
vol = na->ni->vol;
|
|
while (pos < end) {
|
|
while (rli->length && (ofsi + (rli->length <<
|
|
vol->cluster_size_bits) <= pos)) {
|
|
ofsi += (rli->length << vol->cluster_size_bits);
|
|
rli++;
|
|
}
|
|
size = min(end - pos, NTFS_BUF_SIZE);
|
|
written = ntfs_rl_pwrite(vol, rli, ofsi, pos, size, buf);
|
|
if (written <= 0) {
|
|
ntfs_log_perror("Failed to zero space");
|
|
goto err_free;
|
|
}
|
|
pos += written;
|
|
}
|
|
|
|
ret = 0;
|
|
err_free:
|
|
free(buf);
|
|
err_out:
|
|
return ret;
|
|
}
|
|
|
|
static int ntfs_attr_fill_hole(ntfs_attr *na, s64 count, s64 *ofs,
|
|
runlist_element **rl, VCN *update_from)
|
|
{
|
|
s64 to_write;
|
|
s64 need;
|
|
ntfs_volume *vol = na->ni->vol;
|
|
int eo, ret = -1;
|
|
runlist *rlc;
|
|
LCN lcn_seek_from = -1;
|
|
VCN cur_vcn, from_vcn;
|
|
|
|
to_write = min(count, ((*rl)->length << vol->cluster_size_bits) - *ofs);
|
|
|
|
cur_vcn = (*rl)->vcn;
|
|
from_vcn = (*rl)->vcn + (*ofs >> vol->cluster_size_bits);
|
|
|
|
ntfs_log_trace("count: %lld, cur_vcn: %lld, from: %lld, to: %lld, ofs: "
|
|
"%lld\n", (long long)count, (long long)cur_vcn,
|
|
(long long)from_vcn, (long long)to_write, (long long)*ofs);
|
|
|
|
/* Map whole runlist to be able update mapping pairs later. */
|
|
if (ntfs_attr_map_whole_runlist(na))
|
|
goto err_out;
|
|
|
|
/* Restore @*rl, it probably get lost during runlist mapping. */
|
|
*rl = ntfs_attr_find_vcn(na, cur_vcn);
|
|
if (!*rl) {
|
|
ntfs_log_error("Failed to find run after mapping runlist. "
|
|
"Please report to %s.\n", NTFS_DEV_LIST);
|
|
errno = EIO;
|
|
goto err_out;
|
|
}
|
|
|
|
/* Search backwards to find the best lcn to start seek from. */
|
|
rlc = *rl;
|
|
while (rlc->vcn) {
|
|
rlc--;
|
|
if (rlc->lcn >= 0) {
|
|
/*
|
|
* avoid fragmenting a compressed file
|
|
* Windows does not do that, and that may
|
|
* not be desirable for files which can
|
|
* be updated
|
|
*/
|
|
if (na->data_flags & ATTR_COMPRESSION_MASK)
|
|
lcn_seek_from = rlc->lcn + rlc->length;
|
|
else
|
|
lcn_seek_from = rlc->lcn + (from_vcn - rlc->vcn);
|
|
break;
|
|
}
|
|
}
|
|
if (lcn_seek_from == -1) {
|
|
/* Backwards search failed, search forwards. */
|
|
rlc = *rl;
|
|
while (rlc->length) {
|
|
rlc++;
|
|
if (rlc->lcn >= 0) {
|
|
lcn_seek_from = rlc->lcn - (rlc->vcn - from_vcn);
|
|
if (lcn_seek_from < -1)
|
|
lcn_seek_from = -1;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
need = ((*ofs + to_write - 1) >> vol->cluster_size_bits)
|
|
+ 1 + (*rl)->vcn - from_vcn;
|
|
if ((na->data_flags & ATTR_COMPRESSION_MASK)
|
|
&& (need < na->compression_block_clusters)) {
|
|
/*
|
|
* for a compressed file, be sure to allocate the full
|
|
* compression block, as we may need space to decompress
|
|
* existing compressed data.
|
|
* So allocate the space common to compression block
|
|
* and existing hole.
|
|
*/
|
|
VCN alloc_vcn;
|
|
|
|
if ((from_vcn & -na->compression_block_clusters) <= (*rl)->vcn)
|
|
alloc_vcn = (*rl)->vcn;
|
|
else
|
|
alloc_vcn = from_vcn & -na->compression_block_clusters;
|
|
need = (alloc_vcn | (na->compression_block_clusters - 1))
|
|
+ 1 - alloc_vcn;
|
|
if (need > (*rl)->length) {
|
|
ntfs_log_error("Cannot allocate %lld clusters"
|
|
" within a hole of %lld\n",
|
|
(long long)need,
|
|
(long long)(*rl)->length);
|
|
errno = EIO;
|
|
goto err_out;
|
|
}
|
|
rlc = ntfs_cluster_alloc(vol, alloc_vcn, need,
|
|
lcn_seek_from, DATA_ZONE);
|
|
} else
|
|
rlc = ntfs_cluster_alloc(vol, from_vcn, need,
|
|
lcn_seek_from, DATA_ZONE);
|
|
if (!rlc)
|
|
goto err_out;
|
|
if (na->data_flags & (ATTR_COMPRESSION_MASK | ATTR_IS_SPARSE))
|
|
na->compressed_size += need << vol->cluster_size_bits;
|
|
|
|
*rl = ntfs_runlists_merge(na->rl, rlc);
|
|
/*
|
|
* For a compressed attribute, we must be sure there are two
|
|
* available entries, so reserve them before it gets too late.
|
|
*/
|
|
if (*rl && (na->data_flags & ATTR_COMPRESSION_MASK)) {
|
|
runlist_element *oldrl = na->rl;
|
|
na->rl = *rl;
|
|
*rl = ntfs_rl_extend(na,*rl,2);
|
|
if (!*rl) na->rl = oldrl; /* restore to original if failed */
|
|
}
|
|
if (!*rl) {
|
|
eo = errno;
|
|
ntfs_log_perror("Failed to merge runlists");
|
|
if (ntfs_cluster_free_from_rl(vol, rlc)) {
|
|
ntfs_log_perror("Failed to free hot clusters. "
|
|
"Please run chkdsk /f");
|
|
}
|
|
errno = eo;
|
|
goto err_out;
|
|
}
|
|
na->unused_runs = 2;
|
|
na->rl = *rl;
|
|
if ((*update_from == -1) || (from_vcn < *update_from))
|
|
*update_from = from_vcn;
|
|
*rl = ntfs_attr_find_vcn(na, cur_vcn);
|
|
if (!*rl) {
|
|
/*
|
|
* It's definitely a BUG, if we failed to find @cur_vcn, because
|
|
* we missed it during instantiating of the hole.
|
|
*/
|
|
ntfs_log_error("Failed to find run after hole instantiation. "
|
|
"Please report to %s.\n", NTFS_DEV_LIST);
|
|
errno = EIO;
|
|
goto err_out;
|
|
}
|
|
/* If leaved part of the hole go to the next run. */
|
|
if ((*rl)->lcn < 0)
|
|
(*rl)++;
|
|
/* Now LCN shoudn't be less than 0. */
|
|
if ((*rl)->lcn < 0) {
|
|
ntfs_log_error("BUG! LCN is lesser than 0. "
|
|
"Please report to the %s.\n", NTFS_DEV_LIST);
|
|
errno = EIO;
|
|
goto err_out;
|
|
}
|
|
if (*ofs) {
|
|
/* Clear non-sparse region from @cur_vcn to @*ofs. */
|
|
if (ntfs_attr_fill_zero(na, cur_vcn << vol->cluster_size_bits,
|
|
*ofs))
|
|
goto err_out;
|
|
}
|
|
if ((*rl)->vcn < cur_vcn) {
|
|
/*
|
|
* Clusters that replaced hole are merged with
|
|
* previous run, so we need to update offset.
|
|
*/
|
|
*ofs += (cur_vcn - (*rl)->vcn) << vol->cluster_size_bits;
|
|
}
|
|
if ((*rl)->vcn > cur_vcn) {
|
|
/*
|
|
* We left part of the hole, so we need to update offset
|
|
*/
|
|
*ofs -= ((*rl)->vcn - cur_vcn) << vol->cluster_size_bits;
|
|
}
|
|
|
|
ret = 0;
|
|
err_out:
|
|
return ret;
|
|
}
|
|
|
|
static int stuff_hole(ntfs_attr *na, const s64 pos);
|
|
|
|
/*
|
|
* Split an existing hole for overwriting with data
|
|
* The hole may have to be split into two or three parts, so
|
|
* that the overwritten part fits within a single compression block
|
|
*
|
|
* No cluster allocation is needed, this will be done later in
|
|
* standard hole filling, hence no need to reserve runs for
|
|
* future needs.
|
|
*
|
|
* Returns the number of clusters with existing compressed data
|
|
* in the compression block to be written to
|
|
* (or the full block, if it was a full hole)
|
|
* -1 if there were an error
|
|
*/
|
|
|
|
static int split_compressed_hole(ntfs_attr *na, runlist_element **prl,
|
|
s64 pos, s64 count, VCN *update_from)
|
|
{
|
|
int compressed_part;
|
|
int cluster_size_bits = na->ni->vol->cluster_size_bits;
|
|
runlist_element *rl = *prl;
|
|
|
|
compressed_part
|
|
= na->compression_block_clusters;
|
|
/* reserve entries in runlist if we have to split */
|
|
if (rl->length > na->compression_block_clusters) {
|
|
*prl = ntfs_rl_extend(na,*prl,2);
|
|
if (!*prl) {
|
|
compressed_part = -1;
|
|
} else {
|
|
rl = *prl;
|
|
na->unused_runs = 2;
|
|
}
|
|
}
|
|
if (*prl && (rl->length > na->compression_block_clusters)) {
|
|
/*
|
|
* Locate the update part relative to beginning of
|
|
* current run
|
|
*/
|
|
int beginwrite = (pos >> cluster_size_bits) - rl->vcn;
|
|
s32 endblock = (((pos + count - 1) >> cluster_size_bits)
|
|
| (na->compression_block_clusters - 1)) + 1 - rl->vcn;
|
|
|
|
compressed_part = na->compression_block_clusters
|
|
- (rl->length & (na->compression_block_clusters - 1));
|
|
if ((beginwrite + compressed_part) >= na->compression_block_clusters)
|
|
compressed_part = na->compression_block_clusters;
|
|
/*
|
|
* if the run ends beyond end of needed block
|
|
* we have to split the run
|
|
*/
|
|
if (endblock < rl[0].length) {
|
|
runlist_element *xrl;
|
|
int n;
|
|
|
|
/*
|
|
* we have to split into three parts if the run
|
|
* does not end within the first compression block.
|
|
* This means the hole begins before the
|
|
* compression block.
|
|
*/
|
|
if (endblock > na->compression_block_clusters) {
|
|
if (na->unused_runs < 2) {
|
|
ntfs_log_error("No free run, case 1\n");
|
|
}
|
|
na->unused_runs -= 2;
|
|
xrl = rl;
|
|
n = 0;
|
|
while (xrl->length) {
|
|
xrl++;
|
|
n++;
|
|
}
|
|
do {
|
|
xrl[2] = *xrl;
|
|
xrl--;
|
|
} while (xrl != rl);
|
|
rl[1].length = na->compression_block_clusters;
|
|
rl[2].length = rl[0].length - endblock;
|
|
rl[0].length = endblock
|
|
- na->compression_block_clusters;
|
|
rl[1].lcn = LCN_HOLE;
|
|
rl[2].lcn = LCN_HOLE;
|
|
rl[1].vcn = rl[0].vcn + rl[0].length;
|
|
rl[2].vcn = rl[1].vcn
|
|
+ na->compression_block_clusters;
|
|
rl = ++(*prl);
|
|
} else {
|
|
/*
|
|
* split into two parts and use the
|
|
* first one
|
|
*/
|
|
if (!na->unused_runs) {
|
|
ntfs_log_error("No free run, case 2\n");
|
|
}
|
|
na->unused_runs--;
|
|
xrl = rl;
|
|
n = 0;
|
|
while (xrl->length) {
|
|
xrl++;
|
|
n++;
|
|
}
|
|
do {
|
|
xrl[1] = *xrl;
|
|
xrl--;
|
|
} while (xrl != rl);
|
|
if (beginwrite < endblock) {
|
|
/* we will write into the first part of hole */
|
|
rl[1].length = rl[0].length - endblock;
|
|
rl[0].length = endblock;
|
|
rl[1].vcn = rl[0].vcn + rl[0].length;
|
|
rl[1].lcn = LCN_HOLE;
|
|
} else {
|
|
/* we will write into the second part of hole */
|
|
// impossible ?
|
|
rl[1].length = rl[0].length - endblock;
|
|
rl[0].length = endblock;
|
|
rl[1].vcn = rl[0].vcn + rl[0].length;
|
|
rl[1].lcn = LCN_HOLE;
|
|
rl = ++(*prl);
|
|
}
|
|
}
|
|
} else {
|
|
if (rl[1].length) {
|
|
runlist_element *xrl;
|
|
int n;
|
|
|
|
/*
|
|
* split into two parts and use the
|
|
* last one
|
|
*/
|
|
if (!na->unused_runs) {
|
|
ntfs_log_error("No free run, case 4\n");
|
|
}
|
|
na->unused_runs--;
|
|
xrl = rl;
|
|
n = 0;
|
|
while (xrl->length) {
|
|
xrl++;
|
|
n++;
|
|
}
|
|
do {
|
|
xrl[1] = *xrl;
|
|
xrl--;
|
|
} while (xrl != rl);
|
|
} else {
|
|
rl[2].lcn = rl[1].lcn;
|
|
rl[2].vcn = rl[1].vcn;
|
|
rl[2].length = rl[1].length;
|
|
}
|
|
rl[1].vcn -= na->compression_block_clusters;
|
|
rl[1].lcn = LCN_HOLE;
|
|
rl[1].length = na->compression_block_clusters;
|
|
rl[0].length -= na->compression_block_clusters;
|
|
if (pos >= (rl[1].vcn << cluster_size_bits)) {
|
|
rl = ++(*prl);
|
|
}
|
|
}
|
|
if ((*update_from == -1) || ((*prl)->vcn < *update_from))
|
|
*update_from = (*prl)->vcn;
|
|
}
|
|
return (compressed_part);
|
|
}
|
|
|
|
/*
|
|
* Borrow space from adjacent hole for appending data
|
|
* The hole may have to be split so that the end of hole is not
|
|
* affected by cluster allocation and overwriting
|
|
* Cluster allocation is needed for the overwritten compression block
|
|
*
|
|
* Must always leave two unused entries in the runlist
|
|
*
|
|
* Returns the number of clusters with existing compressed data
|
|
* in the compression block to be written to
|
|
* -1 if there were an error
|
|
*/
|
|
|
|
static int borrow_from_hole(ntfs_attr *na, runlist_element **prl,
|
|
s64 pos, s64 count, VCN *update_from, BOOL wasnonresident)
|
|
{
|
|
int compressed_part = 0;
|
|
int cluster_size_bits = na->ni->vol->cluster_size_bits;
|
|
runlist_element *rl = *prl;
|
|
s32 endblock;
|
|
long long allocated;
|
|
runlist_element *zrl;
|
|
int irl;
|
|
BOOL undecided;
|
|
BOOL nothole;
|
|
|
|
/* check whether the compression block is fully allocated */
|
|
endblock = (((pos + count - 1) >> cluster_size_bits) | (na->compression_block_clusters - 1)) + 1 - rl->vcn;
|
|
allocated = 0;
|
|
zrl = rl;
|
|
irl = 0;
|
|
while (zrl->length && (zrl->lcn >= 0) && (allocated < endblock)) {
|
|
allocated += zrl->length;
|
|
zrl++;
|
|
irl++;
|
|
}
|
|
|
|
undecided = (allocated < endblock) && (zrl->lcn == LCN_RL_NOT_MAPPED);
|
|
nothole = (allocated >= endblock) || (zrl->lcn != LCN_HOLE);
|
|
|
|
if (undecided || nothole) {
|
|
runlist_element *orl = na->rl;
|
|
s64 olcn = (*prl)->lcn;
|
|
/*
|
|
* Map the full runlist (needed to compute the
|
|
* compressed size), unless the runlist has not
|
|
* yet been created (data just made non-resident)
|
|
*/
|
|
irl = *prl - na->rl;
|
|
if (!NAttrBeingNonResident(na)
|
|
&& ntfs_attr_map_whole_runlist(na)) {
|
|
rl = (runlist_element*)NULL;
|
|
} else {
|
|
/*
|
|
* Mapping the runlist may cause its relocation,
|
|
* and relocation may be at the same place with
|
|
* relocated contents.
|
|
* Have to find the current run again when this
|
|
* happens.
|
|
*/
|
|
if ((na->rl != orl) || ((*prl)->lcn != olcn)) {
|
|
zrl = &na->rl[irl];
|
|
while (zrl->length && (zrl->lcn != olcn))
|
|
zrl++;
|
|
*prl = zrl;
|
|
}
|
|
if (!(*prl)->length) {
|
|
ntfs_log_error("Mapped run not found,"
|
|
" inode %lld lcn 0x%llx\n",
|
|
(long long)na->ni->mft_no,
|
|
(long long)olcn);
|
|
rl = (runlist_element*)NULL;
|
|
} else {
|
|
rl = ntfs_rl_extend(na,*prl,2);
|
|
na->unused_runs = 2;
|
|
}
|
|
}
|
|
*prl = rl;
|
|
if (rl && undecided) {
|
|
allocated = 0;
|
|
zrl = rl;
|
|
irl = 0;
|
|
while (zrl->length && (zrl->lcn >= 0)
|
|
&& (allocated < endblock)) {
|
|
allocated += zrl->length;
|
|
zrl++;
|
|
irl++;
|
|
}
|
|
}
|
|
}
|
|
/*
|
|
* compression block not fully allocated and followed
|
|
* by a hole : we must allocate in the hole.
|
|
*/
|
|
if (rl && (allocated < endblock) && (zrl->lcn == LCN_HOLE)) {
|
|
s64 xofs;
|
|
|
|
/*
|
|
* split the hole if not fully needed
|
|
*/
|
|
if ((allocated + zrl->length) > endblock) {
|
|
runlist_element *xrl;
|
|
|
|
*prl = ntfs_rl_extend(na,*prl,1);
|
|
if (*prl) {
|
|
/* beware : rl was reallocated */
|
|
rl = *prl;
|
|
zrl = &rl[irl];
|
|
na->unused_runs = 0;
|
|
xrl = zrl;
|
|
while (xrl->length) xrl++;
|
|
do {
|
|
xrl[1] = *xrl;
|
|
} while (xrl-- != zrl);
|
|
zrl->length = endblock - allocated;
|
|
zrl[1].length -= zrl->length;
|
|
zrl[1].vcn = zrl->vcn + zrl->length;
|
|
}
|
|
}
|
|
if (*prl) {
|
|
if (wasnonresident)
|
|
compressed_part = na->compression_block_clusters
|
|
- zrl->length;
|
|
xofs = 0;
|
|
if (ntfs_attr_fill_hole(na,
|
|
zrl->length << cluster_size_bits,
|
|
&xofs, &zrl, update_from))
|
|
compressed_part = -1;
|
|
else {
|
|
/* go back to initial cluster, now reallocated */
|
|
while (zrl->vcn > (pos >> cluster_size_bits))
|
|
zrl--;
|
|
*prl = zrl;
|
|
}
|
|
}
|
|
}
|
|
if (!*prl) {
|
|
ntfs_log_error("No elements to borrow from a hole\n");
|
|
compressed_part = -1;
|
|
} else
|
|
if ((*update_from == -1) || ((*prl)->vcn < *update_from))
|
|
*update_from = (*prl)->vcn;
|
|
return (compressed_part);
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_pwrite - positioned write to an ntfs attribute
|
|
* @na: ntfs attribute to write to
|
|
* @pos: position in the attribute to write to
|
|
* @count: number of bytes to write
|
|
* @b: data buffer to write to disk
|
|
*
|
|
* This function will write @count bytes from data buffer @b to ntfs attribute
|
|
* @na at position @pos.
|
|
*
|
|
* On success, return the number of successfully written bytes. If this number
|
|
* is lower than @count this means that an error was encountered during the
|
|
* write so that the write is partial. 0 means nothing was written (also return
|
|
* 0 when @count is 0).
|
|
*
|
|
* On error and nothing has been written, return -1 with errno set
|
|
* appropriately to the return code of ntfs_pwrite(), or to EINVAL in case of
|
|
* invalid arguments.
|
|
*/
|
|
s64 ntfs_attr_pwrite(ntfs_attr *na, const s64 pos, s64 count, const void *b)
|
|
{
|
|
s64 written, to_write, ofs, old_initialized_size, old_data_size;
|
|
s64 total = 0;
|
|
VCN update_from = -1;
|
|
ntfs_volume *vol;
|
|
s64 fullcount;
|
|
ntfs_attr_search_ctx *ctx = NULL;
|
|
runlist_element *rl;
|
|
s64 hole_end;
|
|
int eo;
|
|
int compressed_part;
|
|
struct {
|
|
unsigned int undo_initialized_size : 1;
|
|
unsigned int undo_data_size : 1;
|
|
} need_to = { 0, 0 };
|
|
BOOL wasnonresident = FALSE;
|
|
BOOL compressed;
|
|
BOOL updatemap;
|
|
|
|
ntfs_log_enter("Entering for inode %lld, attr 0x%x, pos 0x%llx, count "
|
|
"0x%llx.\n", (long long)na->ni->mft_no, na->type,
|
|
(long long)pos, (long long)count);
|
|
|
|
if (!na || !na->ni || !na->ni->vol || !b || pos < 0 || count < 0) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s", __FUNCTION__);
|
|
goto errno_set;
|
|
}
|
|
vol = na->ni->vol;
|
|
compressed = (na->data_flags & ATTR_COMPRESSION_MASK)
|
|
!= const_cpu_to_le16(0);
|
|
na->unused_runs = 0; /* prepare overflow checks */
|
|
/*
|
|
* Encrypted attributes are only supported in raw mode. We return
|
|
* access denied, which is what Windows NT4 does, too.
|
|
* Moreover a file cannot be both encrypted and compressed.
|
|
*/
|
|
if ((na->data_flags & ATTR_IS_ENCRYPTED)
|
|
&& (compressed || !vol->efs_raw)) {
|
|
errno = EACCES;
|
|
goto errno_set;
|
|
}
|
|
/*
|
|
* Fill the gap, when writing beyond the end of a compressed
|
|
* file. This will make recursive calls
|
|
*/
|
|
if (compressed
|
|
&& (na->type == AT_DATA)
|
|
&& (pos > na->initialized_size)
|
|
&& stuff_hole(na,pos))
|
|
goto errno_set;
|
|
/* If this is a compressed attribute it needs special treatment. */
|
|
wasnonresident = NAttrNonResident(na) != 0;
|
|
/*
|
|
* Compression is restricted to data streams and
|
|
* only ATTR_IS_COMPRESSED compression mode is supported.
|
|
*/
|
|
if (compressed
|
|
&& ((na->type != AT_DATA)
|
|
|| ((na->data_flags & ATTR_COMPRESSION_MASK)
|
|
!= ATTR_IS_COMPRESSED))) {
|
|
errno = EOPNOTSUPP;
|
|
goto errno_set;
|
|
}
|
|
|
|
if (!count)
|
|
goto out;
|
|
/* for a compressed file, get prepared to reserve a full block */
|
|
fullcount = count;
|
|
/* If the write reaches beyond the end, extend the attribute. */
|
|
old_data_size = na->data_size;
|
|
if (pos + count > na->data_size) {
|
|
if (ntfs_attr_truncate(na, pos + count)) {
|
|
ntfs_log_perror("Failed to enlarge attribute");
|
|
goto errno_set;
|
|
}
|
|
/* resizing may change the compression mode */
|
|
compressed = (na->data_flags & ATTR_COMPRESSION_MASK)
|
|
!= const_cpu_to_le16(0);
|
|
need_to.undo_data_size = 1;
|
|
}
|
|
/*
|
|
* For compressed data, a single full block was allocated
|
|
* to deal with compression, possibly in a previous call.
|
|
* We are not able to process several blocks because
|
|
* some clusters are freed after compression and
|
|
* new allocations have to be done before proceeding,
|
|
* so truncate the requested count if needed (big buffers).
|
|
*/
|
|
if (compressed) {
|
|
fullcount = (pos | (na->compression_block_size - 1)) + 1 - pos;
|
|
if (count > fullcount)
|
|
count = fullcount;
|
|
}
|
|
old_initialized_size = na->initialized_size;
|
|
/* If it is a resident attribute, write the data to the mft record. */
|
|
if (!NAttrNonResident(na)) {
|
|
char *val;
|
|
|
|
ctx = ntfs_attr_get_search_ctx(na->ni, NULL);
|
|
if (!ctx)
|
|
goto err_out;
|
|
if (ntfs_attr_lookup(na->type, na->name, na->name_len, 0,
|
|
0, NULL, 0, ctx)) {
|
|
ntfs_log_perror("%s: lookup failed", __FUNCTION__);
|
|
goto err_out;
|
|
}
|
|
val = (char*)ctx->attr + le16_to_cpu(ctx->attr->value_offset);
|
|
if (val < (char*)ctx->attr || val +
|
|
le32_to_cpu(ctx->attr->value_length) >
|
|
(char*)ctx->mrec + vol->mft_record_size) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Sanity check failed", __FUNCTION__);
|
|
goto err_out;
|
|
}
|
|
memcpy(val + pos, b, count);
|
|
if (ntfs_mft_record_write(vol, ctx->ntfs_ino->mft_no,
|
|
ctx->mrec)) {
|
|
/*
|
|
* NOTE: We are in a bad state at this moment. We have
|
|
* dirtied the mft record but we failed to commit it to
|
|
* disk. Since we have read the mft record ok before,
|
|
* it is unlikely to fail writing it, so is ok to just
|
|
* return error here... (AIA)
|
|
*/
|
|
ntfs_log_perror("%s: failed to write mft record", __FUNCTION__);
|
|
goto err_out;
|
|
}
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
total = count;
|
|
goto out;
|
|
}
|
|
|
|
/* Handle writes beyond initialized_size. */
|
|
|
|
if (pos + count > na->initialized_size) {
|
|
if (ntfs_attr_map_whole_runlist(na))
|
|
goto err_out;
|
|
/*
|
|
* For a compressed attribute, we must be sure there is an
|
|
* available entry, and, when reopening a compressed file,
|
|
* we may need to split a hole. So reserve the entries
|
|
* before it gets too late.
|
|
*/
|
|
if (compressed) {
|
|
na->rl = ntfs_rl_extend(na,na->rl,2);
|
|
if (!na->rl)
|
|
goto err_out;
|
|
na->unused_runs = 2;
|
|
}
|
|
/* Set initialized_size to @pos + @count. */
|
|
ctx = ntfs_attr_get_search_ctx(na->ni, NULL);
|
|
if (!ctx)
|
|
goto err_out;
|
|
if (ntfs_attr_lookup(na->type, na->name, na->name_len, 0,
|
|
0, NULL, 0, ctx))
|
|
goto err_out;
|
|
|
|
/* If write starts beyond initialized_size, zero the gap. */
|
|
if (pos > na->initialized_size)
|
|
if (ntfs_attr_fill_zero(na, na->initialized_size,
|
|
pos - na->initialized_size))
|
|
goto err_out;
|
|
|
|
ctx->attr->initialized_size = cpu_to_sle64(pos + count);
|
|
/* fix data_size for compressed files */
|
|
if (compressed) {
|
|
na->data_size = pos + count;
|
|
ctx->attr->data_size = ctx->attr->initialized_size;
|
|
}
|
|
if (ntfs_mft_record_write(vol, ctx->ntfs_ino->mft_no,
|
|
ctx->mrec)) {
|
|
/*
|
|
* Undo the change in the in-memory copy and send it
|
|
* back for writing.
|
|
*/
|
|
ctx->attr->initialized_size =
|
|
cpu_to_sle64(old_initialized_size);
|
|
ntfs_mft_record_write(vol, ctx->ntfs_ino->mft_no,
|
|
ctx->mrec);
|
|
goto err_out;
|
|
}
|
|
na->initialized_size = pos + count;
|
|
#if CACHE_NIDATA_SIZE
|
|
if (na->ni->mrec->flags & MFT_RECORD_IS_DIRECTORY
|
|
? na->type == AT_INDEX_ROOT && na->name == NTFS_INDEX_I30
|
|
: na->type == AT_DATA && na->name == AT_UNNAMED) {
|
|
na->ni->data_size = na->data_size;
|
|
if ((compressed || NAttrSparse(na))
|
|
&& NAttrNonResident(na))
|
|
na->ni->allocated_size = na->compressed_size;
|
|
else
|
|
na->ni->allocated_size = na->allocated_size;
|
|
set_nino_flag(na->ni,KnownSize);
|
|
}
|
|
#endif
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
ctx = NULL;
|
|
/*
|
|
* NOTE: At this point the initialized_size in the mft record
|
|
* has been updated BUT there is random data on disk thus if
|
|
* we decide to abort, we MUST change the initialized_size
|
|
* again.
|
|
*/
|
|
need_to.undo_initialized_size = 1;
|
|
}
|
|
/* Find the runlist element containing the vcn. */
|
|
rl = ntfs_attr_find_vcn(na, pos >> vol->cluster_size_bits);
|
|
if (!rl) {
|
|
/*
|
|
* If the vcn is not present it is an out of bounds write.
|
|
* However, we already extended the size of the attribute,
|
|
* so getting this here must be an error of some kind.
|
|
*/
|
|
if (errno == ENOENT) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Failed to find VCN #3", __FUNCTION__);
|
|
}
|
|
goto err_out;
|
|
}
|
|
/*
|
|
* Determine if there is compressed data in the current
|
|
* compression block (when appending to an existing file).
|
|
* If so, decompression will be needed, and the full block
|
|
* must be allocated to be identified as uncompressed.
|
|
* This comes in two variants, depending on whether
|
|
* compression has saved at least one cluster.
|
|
* The compressed size can never be over full size by
|
|
* more than 485 (maximum for 15 compression blocks
|
|
* compressed to 4098 and the last 3640 bytes compressed
|
|
* to 3640 + 3640/8 = 4095, with 15*2 + 4095 - 3640 = 485)
|
|
* This is less than the smallest cluster, so the hole is
|
|
* is never beyond the cluster next to the position of
|
|
* the first uncompressed byte to write.
|
|
*/
|
|
compressed_part = 0;
|
|
if (compressed) {
|
|
if ((rl->lcn == (LCN)LCN_HOLE)
|
|
&& wasnonresident) {
|
|
if (rl->length < na->compression_block_clusters)
|
|
/*
|
|
* the needed block is in a hole smaller
|
|
* than the compression block : we can use
|
|
* it fully
|
|
*/
|
|
compressed_part
|
|
= na->compression_block_clusters
|
|
- rl->length;
|
|
else {
|
|
/*
|
|
* the needed block is in a hole bigger
|
|
* than the compression block : we must
|
|
* split the hole and use it partially
|
|
*/
|
|
compressed_part = split_compressed_hole(na,
|
|
&rl, pos, count, &update_from);
|
|
}
|
|
} else {
|
|
if (rl->lcn >= 0) {
|
|
/*
|
|
* the needed block contains data, make
|
|
* sure the full compression block is
|
|
* allocated. Borrow from hole if needed
|
|
*/
|
|
compressed_part = borrow_from_hole(na,
|
|
&rl, pos, count, &update_from,
|
|
wasnonresident);
|
|
}
|
|
}
|
|
|
|
if (compressed_part < 0)
|
|
goto err_out;
|
|
|
|
/* just making non-resident, so not yet compressed */
|
|
if (NAttrBeingNonResident(na)
|
|
&& (compressed_part < na->compression_block_clusters))
|
|
compressed_part = 0;
|
|
}
|
|
ofs = pos - (rl->vcn << vol->cluster_size_bits);
|
|
/*
|
|
* Scatter the data from the linear data buffer to the volume. Note, a
|
|
* partial final vcn is taken care of by the @count capping of write
|
|
* length.
|
|
*/
|
|
for (hole_end = 0; count; rl++, ofs = 0) {
|
|
if (rl->lcn == LCN_RL_NOT_MAPPED) {
|
|
rl = ntfs_attr_find_vcn(na, rl->vcn);
|
|
if (!rl) {
|
|
if (errno == ENOENT) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Failed to find VCN"
|
|
" #4", __FUNCTION__);
|
|
}
|
|
goto rl_err_out;
|
|
}
|
|
/* Needed for case when runs merged. */
|
|
ofs = pos + total - (rl->vcn << vol->cluster_size_bits);
|
|
}
|
|
if (!rl->length) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Zero run length", __FUNCTION__);
|
|
goto rl_err_out;
|
|
}
|
|
if (rl->lcn < (LCN)0) {
|
|
hole_end = rl->vcn + rl->length;
|
|
|
|
if (rl->lcn != (LCN)LCN_HOLE) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Unexpected LCN (%lld)",
|
|
__FUNCTION__,
|
|
(long long)rl->lcn);
|
|
goto rl_err_out;
|
|
}
|
|
if (ntfs_attr_fill_hole(na, fullcount, &ofs, &rl,
|
|
&update_from))
|
|
goto err_out;
|
|
}
|
|
if (compressed) {
|
|
while (rl->length
|
|
&& (ofs >= (rl->length << vol->cluster_size_bits))) {
|
|
ofs -= rl->length << vol->cluster_size_bits;
|
|
rl++;
|
|
}
|
|
}
|
|
|
|
/* It is a real lcn, write it to the volume. */
|
|
to_write = min(count, (rl->length << vol->cluster_size_bits) - ofs);
|
|
retry:
|
|
ntfs_log_trace("Writing %lld bytes to vcn %lld, lcn %lld, ofs "
|
|
"%lld.\n", (long long)to_write, (long long)rl->vcn,
|
|
(long long)rl->lcn, (long long)ofs);
|
|
if (!NVolReadOnly(vol)) {
|
|
|
|
s64 wpos = (rl->lcn << vol->cluster_size_bits) + ofs;
|
|
s64 wend = (rl->vcn << vol->cluster_size_bits) + ofs + to_write;
|
|
u32 bsize = vol->cluster_size;
|
|
/* Byte size needed to zero fill a cluster */
|
|
s64 rounding = ((wend + bsize - 1) & ~(s64)(bsize - 1)) - wend;
|
|
/**
|
|
* Zero fill to cluster boundary if we're writing at the
|
|
* end of the attribute or into an ex-sparse cluster.
|
|
* This will cause the kernel not to seek and read disk
|
|
* blocks during write(2) to fill the end of the buffer
|
|
* which increases write speed by 2-10 fold typically.
|
|
*
|
|
* This is done even for compressed files, because
|
|
* data is generally first written uncompressed.
|
|
*/
|
|
if (rounding && ((wend == na->initialized_size) ||
|
|
(wend < (hole_end << vol->cluster_size_bits)))){
|
|
|
|
char *cb;
|
|
|
|
rounding += to_write;
|
|
|
|
cb = ntfs_malloc(rounding);
|
|
if (!cb)
|
|
goto err_out;
|
|
|
|
memcpy(cb, b, to_write);
|
|
memset(cb + to_write, 0, rounding - to_write);
|
|
|
|
if (compressed) {
|
|
written = ntfs_compressed_pwrite(na,
|
|
rl, wpos, ofs, to_write,
|
|
rounding, cb, compressed_part,
|
|
&update_from);
|
|
} else {
|
|
written = ntfs_pwrite(vol->dev, wpos,
|
|
rounding, cb);
|
|
if (written == rounding)
|
|
written = to_write;
|
|
}
|
|
|
|
free(cb);
|
|
} else {
|
|
if (compressed) {
|
|
written = ntfs_compressed_pwrite(na,
|
|
rl, wpos, ofs, to_write,
|
|
to_write, b, compressed_part,
|
|
&update_from);
|
|
} else
|
|
written = ntfs_pwrite(vol->dev, wpos,
|
|
to_write, b);
|
|
}
|
|
} else
|
|
written = to_write;
|
|
/* If everything ok, update progress counters and continue. */
|
|
if (written > 0) {
|
|
total += written;
|
|
count -= written;
|
|
fullcount -= written;
|
|
b = (const u8*)b + written;
|
|
}
|
|
if (written != to_write) {
|
|
/* Partial write cannot be dealt with, stop there */
|
|
/* If the syscall was interrupted, try again. */
|
|
if (written == (s64)-1 && errno == EINTR)
|
|
goto retry;
|
|
if (!written)
|
|
errno = EIO;
|
|
goto rl_err_out;
|
|
}
|
|
compressed_part = 0;
|
|
}
|
|
done:
|
|
if (ctx)
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
/*
|
|
* Update mapping pairs if needed.
|
|
* For a compressed file, we try to make a partial update
|
|
* of the mapping list. This makes a difference only if
|
|
* inode extents were needed.
|
|
*/
|
|
updatemap = (compressed
|
|
? NAttrFullyMapped(na) != 0 : update_from != -1);
|
|
if (updatemap)
|
|
if (ntfs_attr_update_mapping_pairs(na,
|
|
(update_from < 0 ? 0 : update_from))) {
|
|
/*
|
|
* FIXME: trying to recover by goto rl_err_out;
|
|
* could cause driver hang by infinite looping.
|
|
*/
|
|
total = -1;
|
|
goto out;
|
|
}
|
|
out:
|
|
ntfs_log_leave("\n");
|
|
return total;
|
|
rl_err_out:
|
|
eo = errno;
|
|
if (total) {
|
|
if (need_to.undo_initialized_size) {
|
|
if (pos + total > na->initialized_size)
|
|
goto done;
|
|
/*
|
|
* TODO: Need to try to change initialized_size. If it
|
|
* succeeds goto done, otherwise goto err_out. (AIA)
|
|
*/
|
|
goto err_out;
|
|
}
|
|
goto done;
|
|
}
|
|
errno = eo;
|
|
err_out:
|
|
eo = errno;
|
|
if (need_to.undo_initialized_size) {
|
|
int err;
|
|
|
|
err = 0;
|
|
if (!ctx) {
|
|
ctx = ntfs_attr_get_search_ctx(na->ni, NULL);
|
|
if (!ctx)
|
|
err = 1;
|
|
} else
|
|
ntfs_attr_reinit_search_ctx(ctx);
|
|
if (!err) {
|
|
err = ntfs_attr_lookup(na->type, na->name,
|
|
na->name_len, 0, 0, NULL, 0, ctx);
|
|
if (!err) {
|
|
na->initialized_size = old_initialized_size;
|
|
ctx->attr->initialized_size = cpu_to_sle64(
|
|
old_initialized_size);
|
|
err = ntfs_mft_record_write(vol,
|
|
ctx->ntfs_ino->mft_no,
|
|
ctx->mrec);
|
|
}
|
|
}
|
|
if (err) {
|
|
/*
|
|
* FIXME: At this stage could try to recover by filling
|
|
* old_initialized_size -> new_initialized_size with
|
|
* data or at least zeroes. (AIA)
|
|
*/
|
|
ntfs_log_error("Eeek! Failed to recover from error. "
|
|
"Leaving metadata in inconsistent "
|
|
"state! Run chkdsk!\n");
|
|
}
|
|
}
|
|
if (ctx)
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
/* Update mapping pairs if needed. */
|
|
updatemap = (compressed
|
|
? NAttrFullyMapped(na) != 0 : update_from != -1);
|
|
if (updatemap)
|
|
ntfs_attr_update_mapping_pairs(na, 0);
|
|
/* Restore original data_size if needed. */
|
|
if (need_to.undo_data_size && ntfs_attr_truncate(na, old_data_size))
|
|
ntfs_log_perror("Failed to restore data_size");
|
|
errno = eo;
|
|
errno_set:
|
|
total = -1;
|
|
goto out;
|
|
}
|
|
|
|
int ntfs_attr_pclose(ntfs_attr *na)
|
|
{
|
|
s64 ofs;
|
|
int failed;
|
|
BOOL ok = TRUE;
|
|
VCN update_from = -1;
|
|
ntfs_volume *vol;
|
|
ntfs_attr_search_ctx *ctx = NULL;
|
|
runlist_element *rl;
|
|
int eo;
|
|
s64 hole;
|
|
int compressed_part;
|
|
BOOL compressed;
|
|
|
|
ntfs_log_enter("Entering for inode 0x%llx, attr 0x%x.\n",
|
|
na->ni->mft_no, na->type);
|
|
|
|
if (!na || !na->ni || !na->ni->vol) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s", __FUNCTION__);
|
|
goto errno_set;
|
|
}
|
|
vol = na->ni->vol;
|
|
na->unused_runs = 0;
|
|
compressed = (na->data_flags & ATTR_COMPRESSION_MASK)
|
|
!= const_cpu_to_le16(0);
|
|
/*
|
|
* Encrypted non-resident attributes are not supported. We return
|
|
* access denied, which is what Windows NT4 does, too.
|
|
*/
|
|
if (NAttrEncrypted(na) && NAttrNonResident(na)) {
|
|
errno = EACCES;
|
|
goto errno_set;
|
|
}
|
|
/* If this is not a compressed attribute get out */
|
|
/* same if it is resident */
|
|
if (!compressed || !NAttrNonResident(na))
|
|
goto out;
|
|
|
|
/* safety check : no recursion on close */
|
|
if (NAttrComprClosing(na)) {
|
|
errno = EIO;
|
|
ntfs_log_error("Bad ntfs_attr_pclose"
|
|
" recursion on inode %lld\n",
|
|
(long long)na->ni->mft_no);
|
|
goto out;
|
|
}
|
|
NAttrSetComprClosing(na);
|
|
/*
|
|
* For a compressed attribute, we must be sure there are two
|
|
* available entries, so reserve them before it gets too late.
|
|
*/
|
|
if (ntfs_attr_map_whole_runlist(na))
|
|
goto err_out;
|
|
na->rl = ntfs_rl_extend(na,na->rl,2);
|
|
if (!na->rl)
|
|
goto err_out;
|
|
na->unused_runs = 2;
|
|
/* Find the runlist element containing the terminal vcn. */
|
|
rl = ntfs_attr_find_vcn(na, (na->initialized_size - 1) >> vol->cluster_size_bits);
|
|
if (!rl) {
|
|
/*
|
|
* If the vcn is not present it is an out of bounds write.
|
|
* However, we have already written the last byte uncompressed,
|
|
* so getting this here must be an error of some kind.
|
|
*/
|
|
if (errno == ENOENT) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Failed to find VCN #5", __FUNCTION__);
|
|
}
|
|
goto err_out;
|
|
}
|
|
/*
|
|
* Scatter the data from the linear data buffer to the volume. Note, a
|
|
* partial final vcn is taken care of by the @count capping of write
|
|
* length.
|
|
*/
|
|
compressed_part = 0;
|
|
if (rl->lcn >= 0) {
|
|
runlist_element *xrl;
|
|
|
|
xrl = rl;
|
|
do {
|
|
xrl++;
|
|
} while (xrl->lcn >= 0);
|
|
compressed_part = (-xrl->length)
|
|
& (na->compression_block_clusters - 1);
|
|
} else
|
|
if (rl->lcn == (LCN)LCN_HOLE) {
|
|
if (rl->length < na->compression_block_clusters)
|
|
compressed_part
|
|
= na->compression_block_clusters
|
|
- rl->length;
|
|
else
|
|
compressed_part
|
|
= na->compression_block_clusters;
|
|
}
|
|
/* done, if the last block set was compressed */
|
|
if (compressed_part)
|
|
goto out;
|
|
|
|
ofs = na->initialized_size - (rl->vcn << vol->cluster_size_bits);
|
|
|
|
if (rl->lcn == LCN_RL_NOT_MAPPED) {
|
|
rl = ntfs_attr_find_vcn(na, rl->vcn);
|
|
if (!rl) {
|
|
if (errno == ENOENT) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Failed to find VCN"
|
|
" #6", __FUNCTION__);
|
|
}
|
|
goto rl_err_out;
|
|
}
|
|
/* Needed for case when runs merged. */
|
|
ofs = na->initialized_size - (rl->vcn << vol->cluster_size_bits);
|
|
}
|
|
if (!rl->length) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Zero run length", __FUNCTION__);
|
|
goto rl_err_out;
|
|
}
|
|
if (rl->lcn < (LCN)0) {
|
|
hole = rl->vcn + rl->length;
|
|
if (rl->lcn != (LCN)LCN_HOLE) {
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Unexpected LCN (%lld)",
|
|
__FUNCTION__,
|
|
(long long)rl->lcn);
|
|
goto rl_err_out;
|
|
}
|
|
|
|
if (ntfs_attr_fill_hole(na, (s64)0, &ofs, &rl, &update_from))
|
|
goto err_out;
|
|
}
|
|
while (rl->length
|
|
&& (ofs >= (rl->length << vol->cluster_size_bits))) {
|
|
ofs -= rl->length << vol->cluster_size_bits;
|
|
rl++;
|
|
}
|
|
|
|
retry:
|
|
failed = 0;
|
|
if (update_from < 0) update_from = 0;
|
|
if (!NVolReadOnly(vol)) {
|
|
failed = ntfs_compressed_close(na, rl, ofs, &update_from);
|
|
#if CACHE_NIDATA_SIZE
|
|
if (na->ni->mrec->flags & MFT_RECORD_IS_DIRECTORY
|
|
? na->type == AT_INDEX_ROOT && na->name == NTFS_INDEX_I30
|
|
: na->type == AT_DATA && na->name == AT_UNNAMED) {
|
|
na->ni->data_size = na->data_size;
|
|
na->ni->allocated_size = na->compressed_size;
|
|
set_nino_flag(na->ni,KnownSize);
|
|
}
|
|
#endif
|
|
}
|
|
if (failed) {
|
|
/* If the syscall was interrupted, try again. */
|
|
if (errno == EINTR)
|
|
goto retry;
|
|
else
|
|
goto rl_err_out;
|
|
}
|
|
if (ctx)
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
/* Update mapping pairs if needed. */
|
|
if (NAttrFullyMapped(na))
|
|
if (ntfs_attr_update_mapping_pairs(na, update_from)) {
|
|
/*
|
|
* FIXME: trying to recover by goto rl_err_out;
|
|
* could cause driver hang by infinite looping.
|
|
*/
|
|
ok = FALSE;
|
|
goto out;
|
|
}
|
|
out:
|
|
ntfs_log_leave("\n");
|
|
return (!ok);
|
|
rl_err_out:
|
|
/*
|
|
* need not restore old sizes, only compressed_size
|
|
* can have changed. It has been set according to
|
|
* the current runlist while updating the mapping pairs,
|
|
* and must be kept consistent with the runlists.
|
|
*/
|
|
err_out:
|
|
eo = errno;
|
|
if (ctx)
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
/* Update mapping pairs if needed. */
|
|
if (NAttrFullyMapped(na))
|
|
ntfs_attr_update_mapping_pairs(na, 0);
|
|
errno = eo;
|
|
errno_set:
|
|
ok = FALSE;
|
|
goto out;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_mst_pread - multi sector transfer protected ntfs attribute read
|
|
* @na: multi sector transfer protected ntfs attribute to read from
|
|
* @pos: byte position in the attribute to begin reading from
|
|
* @bk_cnt: number of mst protected blocks to read
|
|
* @bk_size: size of each mst protected block in bytes
|
|
* @dst: output data buffer
|
|
*
|
|
* This function will read @bk_cnt blocks of size @bk_size bytes each starting
|
|
* at offset @pos from the ntfs attribute @na into the data buffer @b.
|
|
*
|
|
* On success, the multi sector transfer fixups are applied and the number of
|
|
* read blocks is returned. If this number is lower than @bk_cnt this means
|
|
* that the read has either reached end of attribute or that an error was
|
|
* encountered during the read so that the read is partial. 0 means end of
|
|
* attribute or nothing to read (also return 0 when @bk_cnt or @bk_size are 0).
|
|
*
|
|
* On error and nothing has been read, return -1 with errno set appropriately
|
|
* to the return code of ntfs_attr_pread() or to EINVAL in case of invalid
|
|
* arguments.
|
|
*
|
|
* NOTE: If an incomplete multi sector transfer is detected the magic is
|
|
* changed to BAAD but no error is returned, i.e. it is possible that any of
|
|
* the returned blocks have multi sector transfer errors. This should be
|
|
* detected by the caller by checking each block with is_baad_recordp(&block).
|
|
* The reasoning is that we want to fixup as many blocks as possible and we
|
|
* want to return even bad ones to the caller so, e.g. in case of ntfsck, the
|
|
* errors can be repaired.
|
|
*/
|
|
s64 ntfs_attr_mst_pread(ntfs_attr *na, const s64 pos, const s64 bk_cnt,
|
|
const u32 bk_size, void *dst)
|
|
{
|
|
s64 br;
|
|
u8 *end;
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr type 0x%x, pos 0x%llx.\n",
|
|
(unsigned long long)na->ni->mft_no, na->type,
|
|
(long long)pos);
|
|
if (bk_cnt < 0 || bk_size % NTFS_BLOCK_SIZE) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s", __FUNCTION__);
|
|
return -1;
|
|
}
|
|
br = ntfs_attr_pread(na, pos, bk_cnt * bk_size, dst);
|
|
if (br <= 0)
|
|
return br;
|
|
br /= bk_size;
|
|
for (end = (u8*)dst + br * bk_size; (u8*)dst < end; dst = (u8*)dst +
|
|
bk_size)
|
|
ntfs_mst_post_read_fixup((NTFS_RECORD*)dst, bk_size);
|
|
/* Finally, return the number of blocks read. */
|
|
return br;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_mst_pwrite - multi sector transfer protected ntfs attribute write
|
|
* @na: multi sector transfer protected ntfs attribute to write to
|
|
* @pos: position in the attribute to write to
|
|
* @bk_cnt: number of mst protected blocks to write
|
|
* @bk_size: size of each mst protected block in bytes
|
|
* @src: data buffer to write to disk
|
|
*
|
|
* This function will write @bk_cnt blocks of size @bk_size bytes each from
|
|
* data buffer @b to multi sector transfer (mst) protected ntfs attribute @na
|
|
* at position @pos.
|
|
*
|
|
* On success, return the number of successfully written blocks. If this number
|
|
* is lower than @bk_cnt this means that an error was encountered during the
|
|
* write so that the write is partial. 0 means nothing was written (also
|
|
* return 0 when @bk_cnt or @bk_size are 0).
|
|
*
|
|
* On error and nothing has been written, return -1 with errno set
|
|
* appropriately to the return code of ntfs_attr_pwrite(), or to EINVAL in case
|
|
* of invalid arguments.
|
|
*
|
|
* NOTE: We mst protect the data, write it, then mst deprotect it using a quick
|
|
* deprotect algorithm (no checking). This saves us from making a copy before
|
|
* the write and at the same time causes the usn to be incremented in the
|
|
* buffer. This conceptually fits in better with the idea that cached data is
|
|
* always deprotected and protection is performed when the data is actually
|
|
* going to hit the disk and the cache is immediately deprotected again
|
|
* simulating an mst read on the written data. This way cache coherency is
|
|
* achieved.
|
|
*/
|
|
s64 ntfs_attr_mst_pwrite(ntfs_attr *na, const s64 pos, s64 bk_cnt,
|
|
const u32 bk_size, void *src)
|
|
{
|
|
s64 written, i;
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr type 0x%x, pos 0x%llx.\n",
|
|
(unsigned long long)na->ni->mft_no, na->type,
|
|
(long long)pos);
|
|
if (bk_cnt < 0 || bk_size % NTFS_BLOCK_SIZE) {
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
if (!bk_cnt)
|
|
return 0;
|
|
/* Prepare data for writing. */
|
|
for (i = 0; i < bk_cnt; ++i) {
|
|
int err;
|
|
|
|
err = ntfs_mst_pre_write_fixup((NTFS_RECORD*)
|
|
((u8*)src + i * bk_size), bk_size);
|
|
if (err < 0) {
|
|
/* Abort write at this position. */
|
|
ntfs_log_perror("%s #1", __FUNCTION__);
|
|
if (!i)
|
|
return err;
|
|
bk_cnt = i;
|
|
break;
|
|
}
|
|
}
|
|
/* Write the prepared data. */
|
|
written = ntfs_attr_pwrite(na, pos, bk_cnt * bk_size, src);
|
|
if (written <= 0) {
|
|
ntfs_log_perror("%s: written=%lld", __FUNCTION__,
|
|
(long long)written);
|
|
}
|
|
/* Quickly deprotect the data again. */
|
|
for (i = 0; i < bk_cnt; ++i)
|
|
ntfs_mst_post_write_fixup((NTFS_RECORD*)((u8*)src + i *
|
|
bk_size));
|
|
if (written <= 0)
|
|
return written;
|
|
/* Finally, return the number of complete blocks written. */
|
|
return written / bk_size;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_find - find (next) attribute in mft record
|
|
* @type: attribute type to find
|
|
* @name: attribute name to find (optional, i.e. NULL means don't care)
|
|
* @name_len: attribute name length (only needed if @name present)
|
|
* @ic: IGNORE_CASE or CASE_SENSITIVE (ignored if @name not present)
|
|
* @val: attribute value to find (optional, resident attributes only)
|
|
* @val_len: attribute value length
|
|
* @ctx: search context with mft record and attribute to search from
|
|
*
|
|
* You shouldn't need to call this function directly. Use lookup_attr() instead.
|
|
*
|
|
* ntfs_attr_find() takes a search context @ctx as parameter and searches the
|
|
* mft record specified by @ctx->mrec, beginning at @ctx->attr, for an
|
|
* attribute of @type, optionally @name and @val. If found, ntfs_attr_find()
|
|
* returns 0 and @ctx->attr will point to the found attribute.
|
|
*
|
|
* If not found, ntfs_attr_find() returns -1, with errno set to ENOENT and
|
|
* @ctx->attr will point to the attribute before which the attribute being
|
|
* searched for would need to be inserted if such an action were to be desired.
|
|
*
|
|
* On actual error, ntfs_attr_find() returns -1 with errno set to the error
|
|
* code but not to ENOENT. In this case @ctx->attr is undefined and in
|
|
* particular do not rely on it not changing.
|
|
*
|
|
* If @ctx->is_first is TRUE, the search begins with @ctx->attr itself. If it
|
|
* is FALSE, the search begins after @ctx->attr.
|
|
*
|
|
* If @type is AT_UNUSED, return the first found attribute, i.e. one can
|
|
* enumerate all attributes by setting @type to AT_UNUSED and then calling
|
|
* ntfs_attr_find() repeatedly until it returns -1 with errno set to ENOENT to
|
|
* indicate that there are no more entries. During the enumeration, each
|
|
* successful call of ntfs_attr_find() will return the next attribute in the
|
|
* mft record @ctx->mrec.
|
|
*
|
|
* If @type is AT_END, seek to the end and return -1 with errno set to ENOENT.
|
|
* AT_END is not a valid attribute, its length is zero for example, thus it is
|
|
* safer to return error instead of success in this case. This also allows us
|
|
* to interoperate cleanly with ntfs_external_attr_find().
|
|
*
|
|
* If @name is AT_UNNAMED search for an unnamed attribute. If @name is present
|
|
* but not AT_UNNAMED search for a named attribute matching @name. Otherwise,
|
|
* match both named and unnamed attributes.
|
|
*
|
|
* If @ic is IGNORE_CASE, the @name comparison is not case sensitive and
|
|
* @ctx->ntfs_ino must be set to the ntfs inode to which the mft record
|
|
* @ctx->mrec belongs. This is so we can get at the ntfs volume and hence at
|
|
* the upcase table. If @ic is CASE_SENSITIVE, the comparison is case
|
|
* sensitive. When @name is present, @name_len is the @name length in Unicode
|
|
* characters.
|
|
*
|
|
* If @name is not present (NULL), we assume that the unnamed attribute is
|
|
* being searched for.
|
|
*
|
|
* Finally, the resident attribute value @val is looked for, if present.
|
|
* If @val is not present (NULL), @val_len is ignored.
|
|
*
|
|
* ntfs_attr_find() only searches the specified mft record and it ignores the
|
|
* presence of an attribute list attribute (unless it is the one being searched
|
|
* for, obviously). If you need to take attribute lists into consideration, use
|
|
* ntfs_attr_lookup() instead (see below). This also means that you cannot use
|
|
* ntfs_attr_find() to search for extent records of non-resident attributes, as
|
|
* extents with lowest_vcn != 0 are usually described by the attribute list
|
|
* attribute only. - Note that it is possible that the first extent is only in
|
|
* the attribute list while the last extent is in the base mft record, so don't
|
|
* rely on being able to find the first extent in the base mft record.
|
|
*
|
|
* Warning: Never use @val when looking for attribute types which can be
|
|
* non-resident as this most likely will result in a crash!
|
|
*/
|
|
static int ntfs_attr_find(const ATTR_TYPES type, const ntfschar *name,
|
|
const u32 name_len, const IGNORE_CASE_BOOL ic,
|
|
const u8 *val, const u32 val_len, ntfs_attr_search_ctx *ctx)
|
|
{
|
|
ATTR_RECORD *a;
|
|
ntfs_volume *vol;
|
|
ntfschar *upcase;
|
|
u32 upcase_len;
|
|
|
|
ntfs_log_trace("attribute type 0x%x.\n", type);
|
|
|
|
if (ctx->ntfs_ino) {
|
|
vol = ctx->ntfs_ino->vol;
|
|
upcase = vol->upcase;
|
|
upcase_len = vol->upcase_len;
|
|
} else {
|
|
if (name && name != AT_UNNAMED) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s", __FUNCTION__);
|
|
return -1;
|
|
}
|
|
vol = NULL;
|
|
upcase = NULL;
|
|
upcase_len = 0;
|
|
}
|
|
/*
|
|
* Iterate over attributes in mft record starting at @ctx->attr, or the
|
|
* attribute following that, if @ctx->is_first is TRUE.
|
|
*/
|
|
if (ctx->is_first) {
|
|
a = ctx->attr;
|
|
ctx->is_first = FALSE;
|
|
} else
|
|
a = (ATTR_RECORD*)((char*)ctx->attr +
|
|
le32_to_cpu(ctx->attr->length));
|
|
for (;; a = (ATTR_RECORD*)((char*)a + le32_to_cpu(a->length))) {
|
|
if (p2n(a) < p2n(ctx->mrec) || (char*)a > (char*)ctx->mrec +
|
|
le32_to_cpu(ctx->mrec->bytes_allocated))
|
|
break;
|
|
ctx->attr = a;
|
|
if (((type != AT_UNUSED) && (le32_to_cpu(a->type) >
|
|
le32_to_cpu(type))) ||
|
|
(a->type == AT_END)) {
|
|
errno = ENOENT;
|
|
return -1;
|
|
}
|
|
if (!a->length)
|
|
break;
|
|
/* If this is an enumeration return this attribute. */
|
|
if (type == AT_UNUSED)
|
|
return 0;
|
|
if (a->type != type)
|
|
continue;
|
|
/*
|
|
* If @name is AT_UNNAMED we want an unnamed attribute.
|
|
* If @name is present, compare the two names.
|
|
* Otherwise, match any attribute.
|
|
*/
|
|
if (name == AT_UNNAMED) {
|
|
/* The search failed if the found attribute is named. */
|
|
if (a->name_length) {
|
|
errno = ENOENT;
|
|
return -1;
|
|
}
|
|
} else {
|
|
register int rc;
|
|
if (name && ((rc = ntfs_names_full_collate(name,
|
|
name_len, (ntfschar*)((char*)a +
|
|
le16_to_cpu(a->name_offset)),
|
|
a->name_length, ic,
|
|
upcase, upcase_len)))) {
|
|
/*
|
|
* If @name collates before a->name,
|
|
* there is no matching attribute.
|
|
*/
|
|
if (rc < 0) {
|
|
errno = ENOENT;
|
|
return -1;
|
|
}
|
|
/* If the strings are not equal, continue search. */
|
|
continue;
|
|
}
|
|
}
|
|
/*
|
|
* The names match or @name not present and attribute is
|
|
* unnamed. If no @val specified, we have found the attribute
|
|
* and are done.
|
|
*/
|
|
if (!val)
|
|
return 0;
|
|
/* @val is present; compare values. */
|
|
else {
|
|
register int rc;
|
|
|
|
rc = memcmp(val, (char*)a +le16_to_cpu(a->value_offset),
|
|
min(val_len,
|
|
le32_to_cpu(a->value_length)));
|
|
/*
|
|
* If @val collates before the current attribute's
|
|
* value, there is no matching attribute.
|
|
*/
|
|
if (!rc) {
|
|
register u32 avl;
|
|
avl = le32_to_cpu(a->value_length);
|
|
if (val_len == avl)
|
|
return 0;
|
|
if (val_len < avl) {
|
|
errno = ENOENT;
|
|
return -1;
|
|
}
|
|
} else if (rc < 0) {
|
|
errno = ENOENT;
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: Corrupt inode (%lld)", __FUNCTION__,
|
|
ctx->ntfs_ino ? (long long)ctx->ntfs_ino->mft_no : -1);
|
|
return -1;
|
|
}
|
|
|
|
void ntfs_attr_name_free(char **name)
|
|
{
|
|
if (*name) {
|
|
free(*name);
|
|
*name = NULL;
|
|
}
|
|
}
|
|
|
|
char *ntfs_attr_name_get(const ntfschar *uname, const int uname_len)
|
|
{
|
|
char *name = NULL;
|
|
int name_len;
|
|
|
|
name_len = ntfs_ucstombs(uname, uname_len, &name, 0);
|
|
if (name_len < 0) {
|
|
ntfs_log_perror("ntfs_ucstombs");
|
|
return NULL;
|
|
|
|
} else if (name_len > 0)
|
|
return name;
|
|
|
|
ntfs_attr_name_free(&name);
|
|
return NULL;
|
|
}
|
|
|
|
/**
|
|
* ntfs_external_attr_find - find an attribute in the attribute list of an inode
|
|
* @type: attribute type to find
|
|
* @name: attribute name to find (optional, i.e. NULL means don't care)
|
|
* @name_len: attribute name length (only needed if @name present)
|
|
* @ic: IGNORE_CASE or CASE_SENSITIVE (ignored if @name not present)
|
|
* @lowest_vcn: lowest vcn to find (optional, non-resident attributes only)
|
|
* @val: attribute value to find (optional, resident attributes only)
|
|
* @val_len: attribute value length
|
|
* @ctx: search context with mft record and attribute to search from
|
|
*
|
|
* You shouldn't need to call this function directly. Use ntfs_attr_lookup()
|
|
* instead.
|
|
*
|
|
* Find an attribute by searching the attribute list for the corresponding
|
|
* attribute list entry. Having found the entry, map the mft record for read
|
|
* if the attribute is in a different mft record/inode, find the attribute in
|
|
* there and return it.
|
|
*
|
|
* If @type is AT_UNUSED, return the first found attribute, i.e. one can
|
|
* enumerate all attributes by setting @type to AT_UNUSED and then calling
|
|
* ntfs_external_attr_find() repeatedly until it returns -1 with errno set to
|
|
* ENOENT to indicate that there are no more entries. During the enumeration,
|
|
* each successful call of ntfs_external_attr_find() will return the next
|
|
* attribute described by the attribute list of the base mft record described
|
|
* by the search context @ctx.
|
|
*
|
|
* If @type is AT_END, seek to the end of the base mft record ignoring the
|
|
* attribute list completely and return -1 with errno set to ENOENT. AT_END is
|
|
* not a valid attribute, its length is zero for example, thus it is safer to
|
|
* return error instead of success in this case.
|
|
*
|
|
* If @name is AT_UNNAMED search for an unnamed attribute. If @name is present
|
|
* but not AT_UNNAMED search for a named attribute matching @name. Otherwise,
|
|
* match both named and unnamed attributes.
|
|
*
|
|
* On first search @ctx->ntfs_ino must be the inode of the base mft record and
|
|
* @ctx must have been obtained from a call to ntfs_attr_get_search_ctx().
|
|
* On subsequent calls, @ctx->ntfs_ino can be any extent inode, too
|
|
* (@ctx->base_ntfs_ino is then the base inode).
|
|
*
|
|
* After finishing with the attribute/mft record you need to call
|
|
* ntfs_attr_put_search_ctx() to cleanup the search context (unmapping any
|
|
* mapped extent inodes, etc).
|
|
*
|
|
* Return 0 if the search was successful and -1 if not, with errno set to the
|
|
* error code.
|
|
*
|
|
* On success, @ctx->attr is the found attribute, it is in mft record
|
|
* @ctx->mrec, and @ctx->al_entry is the attribute list entry for this
|
|
* attribute with @ctx->base_* being the base mft record to which @ctx->attr
|
|
* belongs.
|
|
*
|
|
* On error ENOENT, i.e. attribute not found, @ctx->attr is set to the
|
|
* attribute which collates just after the attribute being searched for in the
|
|
* base ntfs inode, i.e. if one wants to add the attribute to the mft record
|
|
* this is the correct place to insert it into, and if there is not enough
|
|
* space, the attribute should be placed in an extent mft record.
|
|
* @ctx->al_entry points to the position within @ctx->base_ntfs_ino->attr_list
|
|
* at which the new attribute's attribute list entry should be inserted. The
|
|
* other @ctx fields, base_ntfs_ino, base_mrec, and base_attr are set to NULL.
|
|
* The only exception to this is when @type is AT_END, in which case
|
|
* @ctx->al_entry is set to NULL also (see above).
|
|
*
|
|
* The following error codes are defined:
|
|
* ENOENT Attribute not found, not an error as such.
|
|
* EINVAL Invalid arguments.
|
|
* EIO I/O error or corrupt data structures found.
|
|
* ENOMEM Not enough memory to allocate necessary buffers.
|
|
*/
|
|
static int ntfs_external_attr_find(ATTR_TYPES type, const ntfschar *name,
|
|
const u32 name_len, const IGNORE_CASE_BOOL ic,
|
|
const VCN lowest_vcn, const u8 *val, const u32 val_len,
|
|
ntfs_attr_search_ctx *ctx)
|
|
{
|
|
ntfs_inode *base_ni, *ni;
|
|
ntfs_volume *vol;
|
|
ATTR_LIST_ENTRY *al_entry, *next_al_entry;
|
|
u8 *al_start, *al_end;
|
|
ATTR_RECORD *a;
|
|
ntfschar *al_name;
|
|
u32 al_name_len;
|
|
BOOL is_first_search = FALSE;
|
|
|
|
ni = ctx->ntfs_ino;
|
|
base_ni = ctx->base_ntfs_ino;
|
|
ntfs_log_trace("Entering for inode %lld, attribute type 0x%x.\n",
|
|
(unsigned long long)ni->mft_no, type);
|
|
if (!base_ni) {
|
|
/* First call happens with the base mft record. */
|
|
base_ni = ctx->base_ntfs_ino = ctx->ntfs_ino;
|
|
ctx->base_mrec = ctx->mrec;
|
|
}
|
|
if (ni == base_ni)
|
|
ctx->base_attr = ctx->attr;
|
|
if (type == AT_END)
|
|
goto not_found;
|
|
vol = base_ni->vol;
|
|
al_start = base_ni->attr_list;
|
|
al_end = al_start + base_ni->attr_list_size;
|
|
if (!ctx->al_entry) {
|
|
ctx->al_entry = (ATTR_LIST_ENTRY*)al_start;
|
|
is_first_search = TRUE;
|
|
}
|
|
/*
|
|
* Iterate over entries in attribute list starting at @ctx->al_entry,
|
|
* or the entry following that, if @ctx->is_first is TRUE.
|
|
*/
|
|
if (ctx->is_first) {
|
|
al_entry = ctx->al_entry;
|
|
ctx->is_first = FALSE;
|
|
/*
|
|
* If an enumeration and the first attribute is higher than
|
|
* the attribute list itself, need to return the attribute list
|
|
* attribute.
|
|
*/
|
|
if ((type == AT_UNUSED) && is_first_search &&
|
|
le32_to_cpu(al_entry->type) >
|
|
le32_to_cpu(AT_ATTRIBUTE_LIST))
|
|
goto find_attr_list_attr;
|
|
} else {
|
|
al_entry = (ATTR_LIST_ENTRY*)((char*)ctx->al_entry +
|
|
le16_to_cpu(ctx->al_entry->length));
|
|
/*
|
|
* If this is an enumeration and the attribute list attribute
|
|
* is the next one in the enumeration sequence, just return the
|
|
* attribute list attribute from the base mft record as it is
|
|
* not listed in the attribute list itself.
|
|
*/
|
|
if ((type == AT_UNUSED) && le32_to_cpu(ctx->al_entry->type) <
|
|
le32_to_cpu(AT_ATTRIBUTE_LIST) &&
|
|
le32_to_cpu(al_entry->type) >
|
|
le32_to_cpu(AT_ATTRIBUTE_LIST)) {
|
|
int rc;
|
|
find_attr_list_attr:
|
|
|
|
/* Check for bogus calls. */
|
|
if (name || name_len || val || val_len || lowest_vcn) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s", __FUNCTION__);
|
|
return -1;
|
|
}
|
|
|
|
/* We want the base record. */
|
|
ctx->ntfs_ino = base_ni;
|
|
ctx->mrec = ctx->base_mrec;
|
|
ctx->is_first = TRUE;
|
|
/* Sanity checks are performed elsewhere. */
|
|
ctx->attr = (ATTR_RECORD*)((u8*)ctx->mrec +
|
|
le16_to_cpu(ctx->mrec->attrs_offset));
|
|
|
|
/* Find the attribute list attribute. */
|
|
rc = ntfs_attr_find(AT_ATTRIBUTE_LIST, NULL, 0,
|
|
IGNORE_CASE, NULL, 0, ctx);
|
|
|
|
/*
|
|
* Setup the search context so the correct
|
|
* attribute is returned next time round.
|
|
*/
|
|
ctx->al_entry = al_entry;
|
|
ctx->is_first = TRUE;
|
|
|
|
/* Got it. Done. */
|
|
if (!rc)
|
|
return 0;
|
|
|
|
/* Error! If other than not found return it. */
|
|
if (errno != ENOENT)
|
|
return rc;
|
|
|
|
/* Not found?!? Absurd! */
|
|
errno = EIO;
|
|
ntfs_log_error("Attribute list wasn't found");
|
|
return -1;
|
|
}
|
|
}
|
|
for (;; al_entry = next_al_entry) {
|
|
/* Out of bounds check. */
|
|
if ((u8*)al_entry < base_ni->attr_list ||
|
|
(u8*)al_entry > al_end)
|
|
break; /* Inode is corrupt. */
|
|
ctx->al_entry = al_entry;
|
|
/* Catch the end of the attribute list. */
|
|
if ((u8*)al_entry == al_end)
|
|
goto not_found;
|
|
if (!al_entry->length)
|
|
break;
|
|
if ((u8*)al_entry + 6 > al_end || (u8*)al_entry +
|
|
le16_to_cpu(al_entry->length) > al_end)
|
|
break;
|
|
next_al_entry = (ATTR_LIST_ENTRY*)((u8*)al_entry +
|
|
le16_to_cpu(al_entry->length));
|
|
if (type != AT_UNUSED) {
|
|
if (le32_to_cpu(al_entry->type) > le32_to_cpu(type))
|
|
goto not_found;
|
|
if (type != al_entry->type)
|
|
continue;
|
|
}
|
|
al_name_len = al_entry->name_length;
|
|
al_name = (ntfschar*)((u8*)al_entry + al_entry->name_offset);
|
|
/*
|
|
* If !@type we want the attribute represented by this
|
|
* attribute list entry.
|
|
*/
|
|
if (type == AT_UNUSED)
|
|
goto is_enumeration;
|
|
/*
|
|
* If @name is AT_UNNAMED we want an unnamed attribute.
|
|
* If @name is present, compare the two names.
|
|
* Otherwise, match any attribute.
|
|
*/
|
|
if (name == AT_UNNAMED) {
|
|
if (al_name_len)
|
|
goto not_found;
|
|
} else {
|
|
int rc;
|
|
|
|
if (name && ((rc = ntfs_names_full_collate(name,
|
|
name_len, al_name, al_name_len, ic,
|
|
vol->upcase, vol->upcase_len)))) {
|
|
|
|
/*
|
|
* If @name collates before al_name,
|
|
* there is no matching attribute.
|
|
*/
|
|
if (rc < 0)
|
|
goto not_found;
|
|
/* If the strings are not equal, continue search. */
|
|
continue;
|
|
}
|
|
}
|
|
/*
|
|
* The names match or @name not present and attribute is
|
|
* unnamed. Now check @lowest_vcn. Continue search if the
|
|
* next attribute list entry still fits @lowest_vcn. Otherwise
|
|
* we have reached the right one or the search has failed.
|
|
*/
|
|
if (lowest_vcn && (u8*)next_al_entry >= al_start &&
|
|
(u8*)next_al_entry + 6 < al_end &&
|
|
(u8*)next_al_entry + le16_to_cpu(
|
|
next_al_entry->length) <= al_end &&
|
|
sle64_to_cpu(next_al_entry->lowest_vcn) <=
|
|
lowest_vcn &&
|
|
next_al_entry->type == al_entry->type &&
|
|
next_al_entry->name_length == al_name_len &&
|
|
ntfs_names_are_equal((ntfschar*)((char*)
|
|
next_al_entry +
|
|
next_al_entry->name_offset),
|
|
next_al_entry->name_length,
|
|
al_name, al_name_len, CASE_SENSITIVE,
|
|
vol->upcase, vol->upcase_len))
|
|
continue;
|
|
is_enumeration:
|
|
if (MREF_LE(al_entry->mft_reference) == ni->mft_no) {
|
|
if (MSEQNO_LE(al_entry->mft_reference) !=
|
|
le16_to_cpu(
|
|
ni->mrec->sequence_number)) {
|
|
ntfs_log_error("Found stale mft reference in "
|
|
"attribute list!\n");
|
|
break;
|
|
}
|
|
} else { /* Mft references do not match. */
|
|
/* Do we want the base record back? */
|
|
if (MREF_LE(al_entry->mft_reference) ==
|
|
base_ni->mft_no) {
|
|
ni = ctx->ntfs_ino = base_ni;
|
|
ctx->mrec = ctx->base_mrec;
|
|
} else {
|
|
/* We want an extent record. */
|
|
ni = ntfs_extent_inode_open(base_ni,
|
|
al_entry->mft_reference);
|
|
if (!ni)
|
|
break;
|
|
ctx->ntfs_ino = ni;
|
|
ctx->mrec = ni->mrec;
|
|
}
|
|
}
|
|
a = ctx->attr = (ATTR_RECORD*)((char*)ctx->mrec +
|
|
le16_to_cpu(ctx->mrec->attrs_offset));
|
|
/*
|
|
* ctx->ntfs_ino, ctx->mrec, and ctx->attr now point to the
|
|
* mft record containing the attribute represented by the
|
|
* current al_entry.
|
|
*
|
|
* We could call into ntfs_attr_find() to find the right
|
|
* attribute in this mft record but this would be less
|
|
* efficient and not quite accurate as ntfs_attr_find() ignores
|
|
* the attribute instance numbers for example which become
|
|
* important when one plays with attribute lists. Also, because
|
|
* a proper match has been found in the attribute list entry
|
|
* above, the comparison can now be optimized. So it is worth
|
|
* re-implementing a simplified ntfs_attr_find() here.
|
|
*
|
|
* Use a manual loop so we can still use break and continue
|
|
* with the same meanings as above.
|
|
*/
|
|
do_next_attr_loop:
|
|
if ((char*)a < (char*)ctx->mrec || (char*)a > (char*)ctx->mrec +
|
|
le32_to_cpu(ctx->mrec->bytes_allocated))
|
|
break;
|
|
if (a->type == AT_END)
|
|
continue;
|
|
if (!a->length)
|
|
break;
|
|
if (al_entry->instance != a->instance)
|
|
goto do_next_attr;
|
|
/*
|
|
* If the type and/or the name are/is mismatched between the
|
|
* attribute list entry and the attribute record, there is
|
|
* corruption so we break and return error EIO.
|
|
*/
|
|
if (al_entry->type != a->type)
|
|
break;
|
|
if (!ntfs_names_are_equal((ntfschar*)((char*)a +
|
|
le16_to_cpu(a->name_offset)),
|
|
a->name_length, al_name,
|
|
al_name_len, CASE_SENSITIVE,
|
|
vol->upcase, vol->upcase_len))
|
|
break;
|
|
ctx->attr = a;
|
|
/*
|
|
* If no @val specified or @val specified and it matches, we
|
|
* have found it! Also, if !@type, it is an enumeration, so we
|
|
* want the current attribute.
|
|
*/
|
|
if ((type == AT_UNUSED) || !val || (!a->non_resident &&
|
|
le32_to_cpu(a->value_length) == val_len &&
|
|
!memcmp((char*)a + le16_to_cpu(a->value_offset),
|
|
val, val_len))) {
|
|
return 0;
|
|
}
|
|
do_next_attr:
|
|
/* Proceed to the next attribute in the current mft record. */
|
|
a = (ATTR_RECORD*)((char*)a + le32_to_cpu(a->length));
|
|
goto do_next_attr_loop;
|
|
}
|
|
if (ni != base_ni) {
|
|
ctx->ntfs_ino = base_ni;
|
|
ctx->mrec = ctx->base_mrec;
|
|
ctx->attr = ctx->base_attr;
|
|
}
|
|
errno = EIO;
|
|
ntfs_log_perror("Inode is corrupt (%lld)", (long long)base_ni->mft_no);
|
|
return -1;
|
|
not_found:
|
|
/*
|
|
* If we were looking for AT_END or we were enumerating and reached the
|
|
* end, we reset the search context @ctx and use ntfs_attr_find() to
|
|
* seek to the end of the base mft record.
|
|
*/
|
|
if (type == AT_UNUSED || type == AT_END) {
|
|
ntfs_attr_reinit_search_ctx(ctx);
|
|
return ntfs_attr_find(AT_END, name, name_len, ic, val, val_len,
|
|
ctx);
|
|
}
|
|
/*
|
|
* The attribute wasn't found. Before we return, we want to ensure
|
|
* @ctx->mrec and @ctx->attr indicate the position at which the
|
|
* attribute should be inserted in the base mft record. Since we also
|
|
* want to preserve @ctx->al_entry we cannot reinitialize the search
|
|
* context using ntfs_attr_reinit_search_ctx() as this would set
|
|
* @ctx->al_entry to NULL. Thus we do the necessary bits manually (see
|
|
* ntfs_attr_init_search_ctx() below). Note, we _only_ preserve
|
|
* @ctx->al_entry as the remaining fields (base_*) are identical to
|
|
* their non base_ counterparts and we cannot set @ctx->base_attr
|
|
* correctly yet as we do not know what @ctx->attr will be set to by
|
|
* the call to ntfs_attr_find() below.
|
|
*/
|
|
ctx->mrec = ctx->base_mrec;
|
|
ctx->attr = (ATTR_RECORD*)((u8*)ctx->mrec +
|
|
le16_to_cpu(ctx->mrec->attrs_offset));
|
|
ctx->is_first = TRUE;
|
|
ctx->ntfs_ino = ctx->base_ntfs_ino;
|
|
ctx->base_ntfs_ino = NULL;
|
|
ctx->base_mrec = NULL;
|
|
ctx->base_attr = NULL;
|
|
/*
|
|
* In case there are multiple matches in the base mft record, need to
|
|
* keep enumerating until we get an attribute not found response (or
|
|
* another error), otherwise we would keep returning the same attribute
|
|
* over and over again and all programs using us for enumeration would
|
|
* lock up in a tight loop.
|
|
*/
|
|
{
|
|
int ret;
|
|
|
|
do {
|
|
ret = ntfs_attr_find(type, name, name_len, ic, val,
|
|
val_len, ctx);
|
|
} while (!ret);
|
|
return ret;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_lookup - find an attribute in an ntfs inode
|
|
* @type: attribute type to find
|
|
* @name: attribute name to find (optional, i.e. NULL means don't care)
|
|
* @name_len: attribute name length (only needed if @name present)
|
|
* @ic: IGNORE_CASE or CASE_SENSITIVE (ignored if @name not present)
|
|
* @lowest_vcn: lowest vcn to find (optional, non-resident attributes only)
|
|
* @val: attribute value to find (optional, resident attributes only)
|
|
* @val_len: attribute value length
|
|
* @ctx: search context with mft record and attribute to search from
|
|
*
|
|
* Find an attribute in an ntfs inode. On first search @ctx->ntfs_ino must
|
|
* be the base mft record and @ctx must have been obtained from a call to
|
|
* ntfs_attr_get_search_ctx().
|
|
*
|
|
* This function transparently handles attribute lists and @ctx is used to
|
|
* continue searches where they were left off at.
|
|
*
|
|
* If @type is AT_UNUSED, return the first found attribute, i.e. one can
|
|
* enumerate all attributes by setting @type to AT_UNUSED and then calling
|
|
* ntfs_attr_lookup() repeatedly until it returns -1 with errno set to ENOENT
|
|
* to indicate that there are no more entries. During the enumeration, each
|
|
* successful call of ntfs_attr_lookup() will return the next attribute, with
|
|
* the current attribute being described by the search context @ctx.
|
|
*
|
|
* If @type is AT_END, seek to the end of the base mft record ignoring the
|
|
* attribute list completely and return -1 with errno set to ENOENT. AT_END is
|
|
* not a valid attribute, its length is zero for example, thus it is safer to
|
|
* return error instead of success in this case. It should never be needed to
|
|
* do this, but we implement the functionality because it allows for simpler
|
|
* code inside ntfs_external_attr_find().
|
|
*
|
|
* If @name is AT_UNNAMED search for an unnamed attribute. If @name is present
|
|
* but not AT_UNNAMED search for a named attribute matching @name. Otherwise,
|
|
* match both named and unnamed attributes.
|
|
*
|
|
* After finishing with the attribute/mft record you need to call
|
|
* ntfs_attr_put_search_ctx() to cleanup the search context (unmapping any
|
|
* mapped extent inodes, etc).
|
|
*
|
|
* Return 0 if the search was successful and -1 if not, with errno set to the
|
|
* error code.
|
|
*
|
|
* On success, @ctx->attr is the found attribute, it is in mft record
|
|
* @ctx->mrec, and @ctx->al_entry is the attribute list entry for this
|
|
* attribute with @ctx->base_* being the base mft record to which @ctx->attr
|
|
* belongs. If no attribute list attribute is present @ctx->al_entry and
|
|
* @ctx->base_* are NULL.
|
|
*
|
|
* On error ENOENT, i.e. attribute not found, @ctx->attr is set to the
|
|
* attribute which collates just after the attribute being searched for in the
|
|
* base ntfs inode, i.e. if one wants to add the attribute to the mft record
|
|
* this is the correct place to insert it into, and if there is not enough
|
|
* space, the attribute should be placed in an extent mft record.
|
|
* @ctx->al_entry points to the position within @ctx->base_ntfs_ino->attr_list
|
|
* at which the new attribute's attribute list entry should be inserted. The
|
|
* other @ctx fields, base_ntfs_ino, base_mrec, and base_attr are set to NULL.
|
|
* The only exception to this is when @type is AT_END, in which case
|
|
* @ctx->al_entry is set to NULL also (see above).
|
|
*
|
|
*
|
|
* The following error codes are defined:
|
|
* ENOENT Attribute not found, not an error as such.
|
|
* EINVAL Invalid arguments.
|
|
* EIO I/O error or corrupt data structures found.
|
|
* ENOMEM Not enough memory to allocate necessary buffers.
|
|
*/
|
|
int ntfs_attr_lookup(const ATTR_TYPES type, const ntfschar *name,
|
|
const u32 name_len, const IGNORE_CASE_BOOL ic,
|
|
const VCN lowest_vcn, const u8 *val, const u32 val_len,
|
|
ntfs_attr_search_ctx *ctx)
|
|
{
|
|
ntfs_volume *vol;
|
|
ntfs_inode *base_ni;
|
|
int ret = -1;
|
|
|
|
ntfs_log_enter("Entering for attribute type 0x%x\n", type);
|
|
|
|
if (!ctx || !ctx->mrec || !ctx->attr || (name && name != AT_UNNAMED &&
|
|
(!ctx->ntfs_ino || !(vol = ctx->ntfs_ino->vol) ||
|
|
!vol->upcase || !vol->upcase_len))) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s", __FUNCTION__);
|
|
goto out;
|
|
}
|
|
|
|
if (ctx->base_ntfs_ino)
|
|
base_ni = ctx->base_ntfs_ino;
|
|
else
|
|
base_ni = ctx->ntfs_ino;
|
|
if (!base_ni || !NInoAttrList(base_ni) || type == AT_ATTRIBUTE_LIST)
|
|
ret = ntfs_attr_find(type, name, name_len, ic, val, val_len, ctx);
|
|
else
|
|
ret = ntfs_external_attr_find(type, name, name_len, ic,
|
|
lowest_vcn, val, val_len, ctx);
|
|
out:
|
|
ntfs_log_leave("\n");
|
|
return ret;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_position - find given or next attribute type in an ntfs inode
|
|
* @type: attribute type to start lookup
|
|
* @ctx: search context with mft record and attribute to search from
|
|
*
|
|
* Find an attribute type in an ntfs inode or the next attribute which is not
|
|
* the AT_END attribute. Please see more details at ntfs_attr_lookup.
|
|
*
|
|
* Return 0 if the search was successful and -1 if not, with errno set to the
|
|
* error code.
|
|
*
|
|
* The following error codes are defined:
|
|
* EINVAL Invalid arguments.
|
|
* EIO I/O error or corrupt data structures found.
|
|
* ENOMEM Not enough memory to allocate necessary buffers.
|
|
* ENOSPC No attribute was found after 'type', only AT_END.
|
|
*/
|
|
int ntfs_attr_position(const ATTR_TYPES type, ntfs_attr_search_ctx *ctx)
|
|
{
|
|
if (ntfs_attr_lookup(type, NULL, 0, CASE_SENSITIVE, 0, NULL, 0, ctx)) {
|
|
if (errno != ENOENT)
|
|
return -1;
|
|
if (ctx->attr->type == AT_END) {
|
|
errno = ENOSPC;
|
|
return -1;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_init_search_ctx - initialize an attribute search context
|
|
* @ctx: attribute search context to initialize
|
|
* @ni: ntfs inode with which to initialize the search context
|
|
* @mrec: mft record with which to initialize the search context
|
|
*
|
|
* Initialize the attribute search context @ctx with @ni and @mrec.
|
|
*/
|
|
static void ntfs_attr_init_search_ctx(ntfs_attr_search_ctx *ctx,
|
|
ntfs_inode *ni, MFT_RECORD *mrec)
|
|
{
|
|
if (!mrec)
|
|
mrec = ni->mrec;
|
|
ctx->mrec = mrec;
|
|
/* Sanity checks are performed elsewhere. */
|
|
ctx->attr = (ATTR_RECORD*)((u8*)mrec + le16_to_cpu(mrec->attrs_offset));
|
|
ctx->is_first = TRUE;
|
|
ctx->ntfs_ino = ni;
|
|
ctx->al_entry = NULL;
|
|
ctx->base_ntfs_ino = NULL;
|
|
ctx->base_mrec = NULL;
|
|
ctx->base_attr = NULL;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_reinit_search_ctx - reinitialize an attribute search context
|
|
* @ctx: attribute search context to reinitialize
|
|
*
|
|
* Reinitialize the attribute search context @ctx.
|
|
*
|
|
* This is used when a search for a new attribute is being started to reset
|
|
* the search context to the beginning.
|
|
*/
|
|
void ntfs_attr_reinit_search_ctx(ntfs_attr_search_ctx *ctx)
|
|
{
|
|
if (!ctx->base_ntfs_ino) {
|
|
/* No attribute list. */
|
|
ctx->is_first = TRUE;
|
|
/* Sanity checks are performed elsewhere. */
|
|
ctx->attr = (ATTR_RECORD*)((u8*)ctx->mrec +
|
|
le16_to_cpu(ctx->mrec->attrs_offset));
|
|
/*
|
|
* This needs resetting due to ntfs_external_attr_find() which
|
|
* can leave it set despite having zeroed ctx->base_ntfs_ino.
|
|
*/
|
|
ctx->al_entry = NULL;
|
|
return;
|
|
} /* Attribute list. */
|
|
ntfs_attr_init_search_ctx(ctx, ctx->base_ntfs_ino, ctx->base_mrec);
|
|
return;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_get_search_ctx - allocate/initialize a new attribute search context
|
|
* @ni: ntfs inode with which to initialize the search context
|
|
* @mrec: mft record with which to initialize the search context
|
|
*
|
|
* Allocate a new attribute search context, initialize it with @ni and @mrec,
|
|
* and return it. Return NULL on error with errno set.
|
|
*
|
|
* @mrec can be NULL, in which case the mft record is taken from @ni.
|
|
*
|
|
* Note: For low level utilities which know what they are doing we allow @ni to
|
|
* be NULL and @mrec to be set. Do NOT do this unless you understand the
|
|
* implications!!! For example it is no longer safe to call ntfs_attr_lookup().
|
|
*/
|
|
ntfs_attr_search_ctx *ntfs_attr_get_search_ctx(ntfs_inode *ni, MFT_RECORD *mrec)
|
|
{
|
|
ntfs_attr_search_ctx *ctx;
|
|
|
|
if (!ni && !mrec) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("NULL arguments");
|
|
return NULL;
|
|
}
|
|
ctx = ntfs_malloc(sizeof(ntfs_attr_search_ctx));
|
|
if (ctx)
|
|
ntfs_attr_init_search_ctx(ctx, ni, mrec);
|
|
return ctx;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_put_search_ctx - release an attribute search context
|
|
* @ctx: attribute search context to free
|
|
*
|
|
* Release the attribute search context @ctx.
|
|
*/
|
|
void ntfs_attr_put_search_ctx(ntfs_attr_search_ctx *ctx)
|
|
{
|
|
// NOTE: save errno if it could change and function stays void!
|
|
free(ctx);
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_find_in_attrdef - find an attribute in the $AttrDef system file
|
|
* @vol: ntfs volume to which the attribute belongs
|
|
* @type: attribute type which to find
|
|
*
|
|
* Search for the attribute definition record corresponding to the attribute
|
|
* @type in the $AttrDef system file.
|
|
*
|
|
* Return the attribute type definition record if found and NULL if not found
|
|
* or an error occurred. On error the error code is stored in errno. The
|
|
* following error codes are defined:
|
|
* ENOENT - The attribute @type is not specified in $AttrDef.
|
|
* EINVAL - Invalid parameters (e.g. @vol is not valid).
|
|
*/
|
|
ATTR_DEF *ntfs_attr_find_in_attrdef(const ntfs_volume *vol,
|
|
const ATTR_TYPES type)
|
|
{
|
|
ATTR_DEF *ad;
|
|
|
|
if (!vol || !vol->attrdef || !type) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s: type=%d", __FUNCTION__, type);
|
|
return NULL;
|
|
}
|
|
for (ad = vol->attrdef; (u8*)ad - (u8*)vol->attrdef <
|
|
vol->attrdef_len && ad->type; ++ad) {
|
|
/* We haven't found it yet, carry on searching. */
|
|
if (le32_to_cpu(ad->type) < le32_to_cpu(type))
|
|
continue;
|
|
/* We found the attribute; return it. */
|
|
if (ad->type == type)
|
|
return ad;
|
|
/* We have gone too far already. No point in continuing. */
|
|
break;
|
|
}
|
|
errno = ENOENT;
|
|
ntfs_log_perror("%s: type=%d", __FUNCTION__, type);
|
|
return NULL;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_size_bounds_check - check a size of an attribute type for validity
|
|
* @vol: ntfs volume to which the attribute belongs
|
|
* @type: attribute type which to check
|
|
* @size: size which to check
|
|
*
|
|
* Check whether the @size in bytes is valid for an attribute of @type on the
|
|
* ntfs volume @vol. This information is obtained from $AttrDef system file.
|
|
*
|
|
* Return 0 if valid and -1 if not valid or an error occurred. On error the
|
|
* error code is stored in errno. The following error codes are defined:
|
|
* ERANGE - @size is not valid for the attribute @type.
|
|
* ENOENT - The attribute @type is not specified in $AttrDef.
|
|
* EINVAL - Invalid parameters (e.g. @size is < 0 or @vol is not valid).
|
|
*/
|
|
int ntfs_attr_size_bounds_check(const ntfs_volume *vol, const ATTR_TYPES type,
|
|
const s64 size)
|
|
{
|
|
ATTR_DEF *ad;
|
|
s64 min_size, max_size;
|
|
|
|
if (size < 0) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s: size=%lld", __FUNCTION__,
|
|
(long long)size);
|
|
return -1;
|
|
}
|
|
|
|
/*
|
|
* $ATTRIBUTE_LIST shouldn't be greater than 0x40000, otherwise
|
|
* Windows would crash. This is not listed in the AttrDef.
|
|
*/
|
|
if (type == AT_ATTRIBUTE_LIST && size > 0x40000) {
|
|
errno = ERANGE;
|
|
ntfs_log_perror("Too large attrlist (%lld)", (long long)size);
|
|
return -1;
|
|
}
|
|
|
|
ad = ntfs_attr_find_in_attrdef(vol, type);
|
|
if (!ad)
|
|
return -1;
|
|
|
|
min_size = sle64_to_cpu(ad->min_size);
|
|
max_size = sle64_to_cpu(ad->max_size);
|
|
|
|
if ((min_size && (size < min_size)) ||
|
|
((max_size > 0) && (size > max_size))) {
|
|
errno = ERANGE;
|
|
ntfs_log_perror("Attr type %d size check failed (min,size,max="
|
|
"%lld,%lld,%lld)", type, (long long)min_size,
|
|
(long long)size, (long long)max_size);
|
|
return -1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_can_be_non_resident - check if an attribute can be non-resident
|
|
* @vol: ntfs volume to which the attribute belongs
|
|
* @type: attribute type to check
|
|
* @name: attribute name to check
|
|
* @name_len: attribute name length
|
|
*
|
|
* Check whether the attribute of @type and @name with name length @name_len on
|
|
* the ntfs volume @vol is allowed to be non-resident. This information is
|
|
* obtained from $AttrDef system file and is augmented by rules imposed by
|
|
* Microsoft (e.g. see http://support.microsoft.com/kb/974729/).
|
|
*
|
|
* Return 0 if the attribute is allowed to be non-resident and -1 if not or an
|
|
* error occurred. On error the error code is stored in errno. The following
|
|
* error codes are defined:
|
|
* EPERM - The attribute is not allowed to be non-resident.
|
|
* ENOENT - The attribute @type is not specified in $AttrDef.
|
|
* EINVAL - Invalid parameters (e.g. @vol is not valid).
|
|
*/
|
|
static int ntfs_attr_can_be_non_resident(const ntfs_volume *vol, const ATTR_TYPES type,
|
|
const ntfschar *name, int name_len)
|
|
{
|
|
ATTR_DEF *ad;
|
|
BOOL allowed;
|
|
|
|
/*
|
|
* Microsoft has decreed that $LOGGED_UTILITY_STREAM attributes with a
|
|
* name of $TXF_DATA must be resident despite the entry for
|
|
* $LOGGED_UTILITY_STREAM in $AttrDef allowing them to be non-resident.
|
|
* Failure to obey this on the root directory mft record of a volume
|
|
* causes Windows Vista and later to see the volume as a RAW volume and
|
|
* thus cannot mount it at all.
|
|
*/
|
|
if ((type == AT_LOGGED_UTILITY_STREAM)
|
|
&& name
|
|
&& ntfs_names_are_equal(TXF_DATA, 9, name, name_len,
|
|
CASE_SENSITIVE, vol->upcase, vol->upcase_len))
|
|
allowed = FALSE;
|
|
else {
|
|
/* Find the attribute definition record in $AttrDef. */
|
|
ad = ntfs_attr_find_in_attrdef(vol, type);
|
|
if (!ad)
|
|
return -1;
|
|
/* Check the flags and return the result. */
|
|
allowed = !(ad->flags & ATTR_DEF_RESIDENT);
|
|
}
|
|
if (!allowed) {
|
|
errno = EPERM;
|
|
ntfs_log_trace("Attribute can't be non-resident\n");
|
|
return -1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_can_be_resident - check if an attribute can be resident
|
|
* @vol: ntfs volume to which the attribute belongs
|
|
* @type: attribute type which to check
|
|
*
|
|
* Check whether the attribute of @type on the ntfs volume @vol is allowed to
|
|
* be resident. This information is derived from our ntfs knowledge and may
|
|
* not be completely accurate, especially when user defined attributes are
|
|
* present. Basically we allow everything to be resident except for index
|
|
* allocation and extended attribute attributes.
|
|
*
|
|
* Return 0 if the attribute is allowed to be resident and -1 if not or an
|
|
* error occurred. On error the error code is stored in errno. The following
|
|
* error codes are defined:
|
|
* EPERM - The attribute is not allowed to be resident.
|
|
* EINVAL - Invalid parameters (e.g. @vol is not valid).
|
|
*
|
|
* Warning: In the system file $MFT the attribute $Bitmap must be non-resident
|
|
* otherwise windows will not boot (blue screen of death)! We cannot
|
|
* check for this here as we don't know which inode's $Bitmap is being
|
|
* asked about so the caller needs to special case this.
|
|
*/
|
|
int ntfs_attr_can_be_resident(const ntfs_volume *vol, const ATTR_TYPES type)
|
|
{
|
|
if (!vol || !vol->attrdef || !type) {
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
if (type != AT_INDEX_ALLOCATION)
|
|
return 0;
|
|
|
|
ntfs_log_trace("Attribute can't be resident\n");
|
|
errno = EPERM;
|
|
return -1;
|
|
}
|
|
|
|
/**
|
|
* ntfs_make_room_for_attr - make room for an attribute inside an mft record
|
|
* @m: mft record
|
|
* @pos: position at which to make space
|
|
* @size: byte size to make available at this position
|
|
*
|
|
* @pos points to the attribute in front of which we want to make space.
|
|
*
|
|
* Return 0 on success or -1 on error. On error the error code is stored in
|
|
* errno. Possible error codes are:
|
|
* ENOSPC - There is not enough space available to complete operation. The
|
|
* caller has to make space before calling this.
|
|
* EINVAL - Input parameters were faulty.
|
|
*/
|
|
int ntfs_make_room_for_attr(MFT_RECORD *m, u8 *pos, u32 size)
|
|
{
|
|
u32 biu;
|
|
|
|
ntfs_log_trace("Entering for pos 0x%d, size %u.\n",
|
|
(int)(pos - (u8*)m), (unsigned) size);
|
|
|
|
/* Make size 8-byte alignment. */
|
|
size = (size + 7) & ~7;
|
|
|
|
/* Rigorous consistency checks. */
|
|
if (!m || !pos || pos < (u8*)m) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s: pos=%p m=%p", __FUNCTION__, pos, m);
|
|
return -1;
|
|
}
|
|
/* The -8 is for the attribute terminator. */
|
|
if (pos - (u8*)m > (int)le32_to_cpu(m->bytes_in_use) - 8) {
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
/* Nothing to do. */
|
|
if (!size)
|
|
return 0;
|
|
|
|
biu = le32_to_cpu(m->bytes_in_use);
|
|
/* Do we have enough space? */
|
|
if (biu + size > le32_to_cpu(m->bytes_allocated) ||
|
|
pos + size > (u8*)m + le32_to_cpu(m->bytes_allocated)) {
|
|
errno = ENOSPC;
|
|
ntfs_log_trace("No enough space in the MFT record\n");
|
|
return -1;
|
|
}
|
|
/* Move everything after pos to pos + size. */
|
|
memmove(pos + size, pos, biu - (pos - (u8*)m));
|
|
/* Update mft record. */
|
|
m->bytes_in_use = cpu_to_le32(biu + size);
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* ntfs_resident_attr_record_add - add resident attribute to inode
|
|
* @ni: opened ntfs inode to which MFT record add attribute
|
|
* @type: type of the new attribute
|
|
* @name: name of the new attribute
|
|
* @name_len: name length of the new attribute
|
|
* @val: value of the new attribute
|
|
* @size: size of new attribute (length of @val, if @val != NULL)
|
|
* @flags: flags of the new attribute
|
|
*
|
|
* Return offset to attribute from the beginning of the mft record on success
|
|
* and -1 on error. On error the error code is stored in errno.
|
|
* Possible error codes are:
|
|
* EINVAL - Invalid arguments passed to function.
|
|
* EEXIST - Attribute of such type and with same name already exists.
|
|
* EIO - I/O error occurred or damaged filesystem.
|
|
*/
|
|
int ntfs_resident_attr_record_add(ntfs_inode *ni, ATTR_TYPES type,
|
|
ntfschar *name, u8 name_len, u8 *val, u32 size,
|
|
ATTR_FLAGS data_flags)
|
|
{
|
|
ntfs_attr_search_ctx *ctx;
|
|
u32 length;
|
|
ATTR_RECORD *a;
|
|
MFT_RECORD *m;
|
|
int err, offset;
|
|
ntfs_inode *base_ni;
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr 0x%x, flags 0x%x.\n",
|
|
(long long) ni->mft_no, (unsigned) type, (unsigned) data_flags);
|
|
|
|
if (!ni || (!name && name_len)) {
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
if (ntfs_attr_can_be_resident(ni->vol, type)) {
|
|
if (errno == EPERM)
|
|
ntfs_log_trace("Attribute can't be resident.\n");
|
|
else
|
|
ntfs_log_trace("ntfs_attr_can_be_resident failed.\n");
|
|
return -1;
|
|
}
|
|
|
|
/* Locate place where record should be. */
|
|
ctx = ntfs_attr_get_search_ctx(ni, NULL);
|
|
if (!ctx)
|
|
return -1;
|
|
/*
|
|
* Use ntfs_attr_find instead of ntfs_attr_lookup to find place for
|
|
* attribute in @ni->mrec, not any extent inode in case if @ni is base
|
|
* file record.
|
|
*/
|
|
if (!ntfs_attr_find(type, name, name_len, CASE_SENSITIVE, val, size,
|
|
ctx)) {
|
|
err = EEXIST;
|
|
ntfs_log_trace("Attribute already present.\n");
|
|
goto put_err_out;
|
|
}
|
|
if (errno != ENOENT) {
|
|
err = EIO;
|
|
goto put_err_out;
|
|
}
|
|
a = ctx->attr;
|
|
m = ctx->mrec;
|
|
|
|
/* Make room for attribute. */
|
|
length = offsetof(ATTR_RECORD, resident_end) +
|
|
((name_len * sizeof(ntfschar) + 7) & ~7) +
|
|
((size + 7) & ~7);
|
|
if (ntfs_make_room_for_attr(ctx->mrec, (u8*) ctx->attr, length)) {
|
|
err = errno;
|
|
ntfs_log_trace("Failed to make room for attribute.\n");
|
|
goto put_err_out;
|
|
}
|
|
|
|
/* Setup record fields. */
|
|
offset = ((u8*)a - (u8*)m);
|
|
a->type = type;
|
|
a->length = cpu_to_le32(length);
|
|
a->non_resident = 0;
|
|
a->name_length = name_len;
|
|
a->name_offset = (name_len
|
|
? cpu_to_le16(offsetof(ATTR_RECORD, resident_end))
|
|
: const_cpu_to_le16(0));
|
|
a->flags = data_flags;
|
|
a->instance = m->next_attr_instance;
|
|
a->value_length = cpu_to_le32(size);
|
|
a->value_offset = cpu_to_le16(length - ((size + 7) & ~7));
|
|
if (val)
|
|
memcpy((u8*)a + le16_to_cpu(a->value_offset), val, size);
|
|
else
|
|
memset((u8*)a + le16_to_cpu(a->value_offset), 0, size);
|
|
if (type == AT_FILE_NAME)
|
|
a->resident_flags = RESIDENT_ATTR_IS_INDEXED;
|
|
else
|
|
a->resident_flags = 0;
|
|
if (name_len)
|
|
memcpy((u8*)a + le16_to_cpu(a->name_offset),
|
|
name, sizeof(ntfschar) * name_len);
|
|
m->next_attr_instance =
|
|
cpu_to_le16((le16_to_cpu(m->next_attr_instance) + 1) & 0xffff);
|
|
if (ni->nr_extents == -1)
|
|
base_ni = ni->base_ni;
|
|
else
|
|
base_ni = ni;
|
|
if (type != AT_ATTRIBUTE_LIST && NInoAttrList(base_ni)) {
|
|
if (ntfs_attrlist_entry_add(ni, a)) {
|
|
err = errno;
|
|
ntfs_attr_record_resize(m, a, 0);
|
|
ntfs_log_trace("Failed add attribute entry to "
|
|
"ATTRIBUTE_LIST.\n");
|
|
goto put_err_out;
|
|
}
|
|
}
|
|
if (ni->mrec->flags & MFT_RECORD_IS_DIRECTORY
|
|
? type == AT_INDEX_ROOT && name == NTFS_INDEX_I30
|
|
: type == AT_DATA && name == AT_UNNAMED) {
|
|
ni->data_size = size;
|
|
ni->allocated_size = (size + 7) & ~7;
|
|
set_nino_flag(ni,KnownSize);
|
|
}
|
|
ntfs_inode_mark_dirty(ni);
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return offset;
|
|
put_err_out:
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
errno = err;
|
|
return -1;
|
|
}
|
|
|
|
/**
|
|
* ntfs_non_resident_attr_record_add - add extent of non-resident attribute
|
|
* @ni: opened ntfs inode to which MFT record add attribute
|
|
* @type: type of the new attribute extent
|
|
* @name: name of the new attribute extent
|
|
* @name_len: name length of the new attribute extent
|
|
* @lowest_vcn: lowest vcn of the new attribute extent
|
|
* @dataruns_size: dataruns size of the new attribute extent
|
|
* @flags: flags of the new attribute extent
|
|
*
|
|
* Return offset to attribute from the beginning of the mft record on success
|
|
* and -1 on error. On error the error code is stored in errno.
|
|
* Possible error codes are:
|
|
* EINVAL - Invalid arguments passed to function.
|
|
* EEXIST - Attribute of such type, with same lowest vcn and with same
|
|
* name already exists.
|
|
* EIO - I/O error occurred or damaged filesystem.
|
|
*/
|
|
int ntfs_non_resident_attr_record_add(ntfs_inode *ni, ATTR_TYPES type,
|
|
ntfschar *name, u8 name_len, VCN lowest_vcn, int dataruns_size,
|
|
ATTR_FLAGS flags)
|
|
{
|
|
ntfs_attr_search_ctx *ctx;
|
|
u32 length;
|
|
ATTR_RECORD *a;
|
|
MFT_RECORD *m;
|
|
ntfs_inode *base_ni;
|
|
int err, offset;
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr 0x%x, lowest_vcn %lld, "
|
|
"dataruns_size %d, flags 0x%x.\n",
|
|
(long long) ni->mft_no, (unsigned) type,
|
|
(long long) lowest_vcn, dataruns_size, (unsigned) flags);
|
|
|
|
if (!ni || dataruns_size <= 0 || (!name && name_len)) {
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
if (ntfs_attr_can_be_non_resident(ni->vol, type, name, name_len)) {
|
|
if (errno == EPERM)
|
|
ntfs_log_perror("Attribute can't be non resident");
|
|
else
|
|
ntfs_log_perror("ntfs_attr_can_be_non_resident failed");
|
|
return -1;
|
|
}
|
|
|
|
/* Locate place where record should be. */
|
|
ctx = ntfs_attr_get_search_ctx(ni, NULL);
|
|
if (!ctx)
|
|
return -1;
|
|
/*
|
|
* Use ntfs_attr_find instead of ntfs_attr_lookup to find place for
|
|
* attribute in @ni->mrec, not any extent inode in case if @ni is base
|
|
* file record.
|
|
*/
|
|
if (!ntfs_attr_find(type, name, name_len, CASE_SENSITIVE, NULL, 0,
|
|
ctx)) {
|
|
err = EEXIST;
|
|
ntfs_log_perror("Attribute 0x%x already present", type);
|
|
goto put_err_out;
|
|
}
|
|
if (errno != ENOENT) {
|
|
ntfs_log_perror("ntfs_attr_find failed");
|
|
err = EIO;
|
|
goto put_err_out;
|
|
}
|
|
a = ctx->attr;
|
|
m = ctx->mrec;
|
|
|
|
/* Make room for attribute. */
|
|
dataruns_size = (dataruns_size + 7) & ~7;
|
|
length = offsetof(ATTR_RECORD, compressed_size) + ((sizeof(ntfschar) *
|
|
name_len + 7) & ~7) + dataruns_size +
|
|
((flags & (ATTR_IS_COMPRESSED | ATTR_IS_SPARSE)) ?
|
|
sizeof(a->compressed_size) : 0);
|
|
if (ntfs_make_room_for_attr(ctx->mrec, (u8*) ctx->attr, length)) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to make room for attribute");
|
|
goto put_err_out;
|
|
}
|
|
|
|
/* Setup record fields. */
|
|
a->type = type;
|
|
a->length = cpu_to_le32(length);
|
|
a->non_resident = 1;
|
|
a->name_length = name_len;
|
|
a->name_offset = cpu_to_le16(offsetof(ATTR_RECORD, compressed_size) +
|
|
((flags & (ATTR_IS_COMPRESSED | ATTR_IS_SPARSE)) ?
|
|
sizeof(a->compressed_size) : 0));
|
|
a->flags = flags;
|
|
a->instance = m->next_attr_instance;
|
|
a->lowest_vcn = cpu_to_sle64(lowest_vcn);
|
|
a->mapping_pairs_offset = cpu_to_le16(length - dataruns_size);
|
|
a->compression_unit = (flags & ATTR_IS_COMPRESSED)
|
|
? STANDARD_COMPRESSION_UNIT : 0;
|
|
/* If @lowest_vcn == 0, than setup empty attribute. */
|
|
if (!lowest_vcn) {
|
|
a->highest_vcn = cpu_to_sle64(-1);
|
|
a->allocated_size = 0;
|
|
a->data_size = 0;
|
|
a->initialized_size = 0;
|
|
/* Set empty mapping pairs. */
|
|
*((u8*)a + le16_to_cpu(a->mapping_pairs_offset)) = 0;
|
|
}
|
|
if (name_len)
|
|
memcpy((u8*)a + le16_to_cpu(a->name_offset),
|
|
name, sizeof(ntfschar) * name_len);
|
|
m->next_attr_instance =
|
|
cpu_to_le16((le16_to_cpu(m->next_attr_instance) + 1) & 0xffff);
|
|
if (ni->nr_extents == -1)
|
|
base_ni = ni->base_ni;
|
|
else
|
|
base_ni = ni;
|
|
if (type != AT_ATTRIBUTE_LIST && NInoAttrList(base_ni)) {
|
|
if (ntfs_attrlist_entry_add(ni, a)) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed add attr entry to attrlist");
|
|
ntfs_attr_record_resize(m, a, 0);
|
|
goto put_err_out;
|
|
}
|
|
}
|
|
ntfs_inode_mark_dirty(ni);
|
|
/*
|
|
* Locate offset from start of the MFT record where new attribute is
|
|
* placed. We need relookup it, because record maybe moved during
|
|
* update of attribute list.
|
|
*/
|
|
ntfs_attr_reinit_search_ctx(ctx);
|
|
if (ntfs_attr_lookup(type, name, name_len, CASE_SENSITIVE,
|
|
lowest_vcn, NULL, 0, ctx)) {
|
|
ntfs_log_perror("%s: attribute lookup failed", __FUNCTION__);
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return -1;
|
|
|
|
}
|
|
offset = (u8*)ctx->attr - (u8*)ctx->mrec;
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return offset;
|
|
put_err_out:
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
errno = err;
|
|
return -1;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_record_rm - remove attribute extent
|
|
* @ctx: search context describing the attribute which should be removed
|
|
*
|
|
* If this function succeed, user should reinit search context if he/she wants
|
|
* use it anymore.
|
|
*
|
|
* Return 0 on success and -1 on error. On error the error code is stored in
|
|
* errno. Possible error codes are:
|
|
* EINVAL - Invalid arguments passed to function.
|
|
* EIO - I/O error occurred or damaged filesystem.
|
|
*/
|
|
int ntfs_attr_record_rm(ntfs_attr_search_ctx *ctx)
|
|
{
|
|
ntfs_inode *base_ni, *ni;
|
|
ATTR_TYPES type;
|
|
|
|
if (!ctx || !ctx->ntfs_ino || !ctx->mrec || !ctx->attr) {
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr 0x%x.\n",
|
|
(long long) ctx->ntfs_ino->mft_no,
|
|
(unsigned) le32_to_cpu(ctx->attr->type));
|
|
type = ctx->attr->type;
|
|
ni = ctx->ntfs_ino;
|
|
if (ctx->base_ntfs_ino)
|
|
base_ni = ctx->base_ntfs_ino;
|
|
else
|
|
base_ni = ctx->ntfs_ino;
|
|
|
|
/* Remove attribute itself. */
|
|
if (ntfs_attr_record_resize(ctx->mrec, ctx->attr, 0)) {
|
|
ntfs_log_trace("Couldn't remove attribute record. Bug or damaged MFT "
|
|
"record.\n");
|
|
if (NInoAttrList(base_ni) && type != AT_ATTRIBUTE_LIST)
|
|
if (ntfs_attrlist_entry_add(ni, ctx->attr))
|
|
ntfs_log_trace("Rollback failed. Leaving inconstant "
|
|
"metadata.\n");
|
|
errno = EIO;
|
|
return -1;
|
|
}
|
|
ntfs_inode_mark_dirty(ni);
|
|
|
|
/*
|
|
* Remove record from $ATTRIBUTE_LIST if present and we don't want
|
|
* delete $ATTRIBUTE_LIST itself.
|
|
*/
|
|
if (NInoAttrList(base_ni) && type != AT_ATTRIBUTE_LIST) {
|
|
if (ntfs_attrlist_entry_rm(ctx)) {
|
|
ntfs_log_trace("Couldn't delete record from "
|
|
"$ATTRIBUTE_LIST.\n");
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/* Post $ATTRIBUTE_LIST delete setup. */
|
|
if (type == AT_ATTRIBUTE_LIST) {
|
|
if (NInoAttrList(base_ni) && base_ni->attr_list)
|
|
free(base_ni->attr_list);
|
|
base_ni->attr_list = NULL;
|
|
NInoClearAttrList(base_ni);
|
|
NInoAttrListClearDirty(base_ni);
|
|
}
|
|
|
|
/* Free MFT record, if it doesn't contain attributes. */
|
|
if (le32_to_cpu(ctx->mrec->bytes_in_use) -
|
|
le16_to_cpu(ctx->mrec->attrs_offset) == 8) {
|
|
if (ntfs_mft_record_free(ni->vol, ni)) {
|
|
// FIXME: We need rollback here.
|
|
ntfs_log_trace("Couldn't free MFT record.\n");
|
|
errno = EIO;
|
|
return -1;
|
|
}
|
|
/* Remove done if we freed base inode. */
|
|
if (ni == base_ni)
|
|
return 0;
|
|
}
|
|
|
|
if (type == AT_ATTRIBUTE_LIST || !NInoAttrList(base_ni))
|
|
return 0;
|
|
|
|
/* Remove attribute list if we don't need it any more. */
|
|
if (!ntfs_attrlist_need(base_ni)) {
|
|
ntfs_attr_reinit_search_ctx(ctx);
|
|
if (ntfs_attr_lookup(AT_ATTRIBUTE_LIST, NULL, 0, CASE_SENSITIVE,
|
|
0, NULL, 0, ctx)) {
|
|
/*
|
|
* FIXME: Should we succeed here? Definitely something
|
|
* goes wrong because NInoAttrList(base_ni) returned
|
|
* that we have got attribute list.
|
|
*/
|
|
ntfs_log_trace("Couldn't find attribute list. Succeed "
|
|
"anyway.\n");
|
|
return 0;
|
|
}
|
|
/* Deallocate clusters. */
|
|
if (ctx->attr->non_resident) {
|
|
runlist *al_rl;
|
|
|
|
al_rl = ntfs_mapping_pairs_decompress(base_ni->vol,
|
|
ctx->attr, NULL);
|
|
if (!al_rl) {
|
|
ntfs_log_trace("Couldn't decompress attribute list "
|
|
"runlist. Succeed anyway.\n");
|
|
return 0;
|
|
}
|
|
if (ntfs_cluster_free_from_rl(base_ni->vol, al_rl)) {
|
|
ntfs_log_trace("Leaking clusters! Run chkdsk. "
|
|
"Couldn't free clusters from "
|
|
"attribute list runlist.\n");
|
|
}
|
|
free(al_rl);
|
|
}
|
|
/* Remove attribute record itself. */
|
|
if (ntfs_attr_record_rm(ctx)) {
|
|
/*
|
|
* FIXME: Should we succeed here? BTW, chkdsk doesn't
|
|
* complain if it find MFT record with attribute list,
|
|
* but without extents.
|
|
*/
|
|
ntfs_log_trace("Couldn't remove attribute list. Succeed "
|
|
"anyway.\n");
|
|
return 0;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_add - add attribute to inode
|
|
* @ni: opened ntfs inode to which add attribute
|
|
* @type: type of the new attribute
|
|
* @name: name in unicode of the new attribute
|
|
* @name_len: name length in unicode characters of the new attribute
|
|
* @val: value of new attribute
|
|
* @size: size of the new attribute / length of @val (if specified)
|
|
*
|
|
* @val should always be specified for always resident attributes (eg. FILE_NAME
|
|
* attribute), for attributes that can become non-resident @val can be NULL
|
|
* (eg. DATA attribute). @size can be specified even if @val is NULL, in this
|
|
* case data size will be equal to @size and initialized size will be equal
|
|
* to 0.
|
|
*
|
|
* If inode haven't got enough space to add attribute, add attribute to one of
|
|
* it extents, if no extents present or no one of them have enough space, than
|
|
* allocate new extent and add attribute to it.
|
|
*
|
|
* If on one of this steps attribute list is needed but not present, than it is
|
|
* added transparently to caller. So, this function should not be called with
|
|
* @type == AT_ATTRIBUTE_LIST, if you really need to add attribute list call
|
|
* ntfs_inode_add_attrlist instead.
|
|
*
|
|
* On success return 0. On error return -1 with errno set to the error code.
|
|
*/
|
|
int ntfs_attr_add(ntfs_inode *ni, ATTR_TYPES type,
|
|
ntfschar *name, u8 name_len, u8 *val, s64 size)
|
|
{
|
|
u32 attr_rec_size;
|
|
int err, i, offset;
|
|
BOOL is_resident;
|
|
BOOL can_be_non_resident = FALSE;
|
|
ntfs_inode *attr_ni;
|
|
ntfs_attr *na;
|
|
ATTR_FLAGS data_flags;
|
|
|
|
if (!ni || size < 0 || type == AT_ATTRIBUTE_LIST) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s: ni=%p size=%lld", __FUNCTION__, ni,
|
|
(long long)size);
|
|
return -1;
|
|
}
|
|
|
|
ntfs_log_trace("Entering for inode %lld, attr %x, size %lld.\n",
|
|
(long long)ni->mft_no, type, (long long)size);
|
|
|
|
if (ni->nr_extents == -1)
|
|
ni = ni->base_ni;
|
|
|
|
/* Check the attribute type and the size. */
|
|
if (ntfs_attr_size_bounds_check(ni->vol, type, size)) {
|
|
if (errno == ENOENT)
|
|
errno = EIO;
|
|
return -1;
|
|
}
|
|
|
|
/* Sanity checks for always resident attributes. */
|
|
if (ntfs_attr_can_be_non_resident(ni->vol, type, name, name_len)) {
|
|
if (errno != EPERM) {
|
|
err = errno;
|
|
ntfs_log_perror("ntfs_attr_can_be_non_resident failed");
|
|
goto err_out;
|
|
}
|
|
/* @val is mandatory. */
|
|
if (!val) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("val is mandatory for always resident "
|
|
"attributes");
|
|
return -1;
|
|
}
|
|
if (size > ni->vol->mft_record_size) {
|
|
errno = ERANGE;
|
|
ntfs_log_perror("Attribute is too big");
|
|
return -1;
|
|
}
|
|
} else
|
|
can_be_non_resident = TRUE;
|
|
|
|
/*
|
|
* Determine resident or not will be new attribute. We add 8 to size in
|
|
* non resident case for mapping pairs.
|
|
*/
|
|
if (!ntfs_attr_can_be_resident(ni->vol, type)) {
|
|
is_resident = TRUE;
|
|
} else {
|
|
if (errno != EPERM) {
|
|
err = errno;
|
|
ntfs_log_perror("ntfs_attr_can_be_resident failed");
|
|
goto err_out;
|
|
}
|
|
is_resident = FALSE;
|
|
}
|
|
/* Calculate attribute record size. */
|
|
if (is_resident)
|
|
attr_rec_size = offsetof(ATTR_RECORD, resident_end) +
|
|
((name_len * sizeof(ntfschar) + 7) & ~7) +
|
|
((size + 7) & ~7);
|
|
else
|
|
attr_rec_size = offsetof(ATTR_RECORD, non_resident_end) +
|
|
((name_len * sizeof(ntfschar) + 7) & ~7) + 8;
|
|
|
|
/*
|
|
* If we have enough free space for the new attribute in the base MFT
|
|
* record, then add attribute to it.
|
|
*/
|
|
if (le32_to_cpu(ni->mrec->bytes_allocated) -
|
|
le32_to_cpu(ni->mrec->bytes_in_use) >= attr_rec_size) {
|
|
attr_ni = ni;
|
|
goto add_attr_record;
|
|
}
|
|
|
|
/* Try to add to extent inodes. */
|
|
if (ntfs_inode_attach_all_extents(ni)) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to attach all extents to inode");
|
|
goto err_out;
|
|
}
|
|
for (i = 0; i < ni->nr_extents; i++) {
|
|
attr_ni = ni->extent_nis[i];
|
|
if (le32_to_cpu(attr_ni->mrec->bytes_allocated) -
|
|
le32_to_cpu(attr_ni->mrec->bytes_in_use) >=
|
|
attr_rec_size)
|
|
goto add_attr_record;
|
|
}
|
|
|
|
/* There is no extent that contain enough space for new attribute. */
|
|
if (!NInoAttrList(ni)) {
|
|
/* Add attribute list not present, add it and retry. */
|
|
if (ntfs_inode_add_attrlist(ni)) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to add attribute list");
|
|
goto err_out;
|
|
}
|
|
return ntfs_attr_add(ni, type, name, name_len, val, size);
|
|
}
|
|
/* Allocate new extent. */
|
|
attr_ni = ntfs_mft_record_alloc(ni->vol, ni);
|
|
if (!attr_ni) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to allocate extent record");
|
|
goto err_out;
|
|
}
|
|
|
|
add_attr_record:
|
|
if ((ni->flags & FILE_ATTR_COMPRESSED)
|
|
&& (ni->vol->major_ver >= 3)
|
|
&& NVolCompression(ni->vol)
|
|
&& (ni->vol->cluster_size <= MAX_COMPRESSION_CLUSTER_SIZE)
|
|
&& ((type == AT_DATA)
|
|
|| ((type == AT_INDEX_ROOT) && (name == NTFS_INDEX_I30))))
|
|
data_flags = ATTR_IS_COMPRESSED;
|
|
else
|
|
data_flags = const_cpu_to_le16(0);
|
|
if (is_resident) {
|
|
/* Add resident attribute. */
|
|
offset = ntfs_resident_attr_record_add(attr_ni, type, name,
|
|
name_len, val, size, data_flags);
|
|
if (offset < 0) {
|
|
if (errno == ENOSPC && can_be_non_resident)
|
|
goto add_non_resident;
|
|
err = errno;
|
|
ntfs_log_perror("Failed to add resident attribute");
|
|
goto free_err_out;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
add_non_resident:
|
|
/* Add non resident attribute. */
|
|
offset = ntfs_non_resident_attr_record_add(attr_ni, type, name,
|
|
name_len, 0, 8, data_flags);
|
|
if (offset < 0) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to add non resident attribute");
|
|
goto free_err_out;
|
|
}
|
|
|
|
/* If @size == 0, we are done. */
|
|
if (!size)
|
|
return 0;
|
|
|
|
/* Open new attribute and resize it. */
|
|
na = ntfs_attr_open(ni, type, name, name_len);
|
|
if (!na) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to open just added attribute");
|
|
goto rm_attr_err_out;
|
|
}
|
|
/* Resize and set attribute value. */
|
|
if (ntfs_attr_truncate(na, size) ||
|
|
(val && (ntfs_attr_pwrite(na, 0, size, val) != size))) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to initialize just added attribute");
|
|
if (ntfs_attr_rm(na))
|
|
ntfs_log_perror("Failed to remove just added attribute");
|
|
ntfs_attr_close(na);
|
|
goto err_out;
|
|
}
|
|
ntfs_attr_close(na);
|
|
return 0;
|
|
|
|
rm_attr_err_out:
|
|
/* Remove just added attribute. */
|
|
if (ntfs_attr_record_resize(attr_ni->mrec,
|
|
(ATTR_RECORD*)((u8*)attr_ni->mrec + offset), 0))
|
|
ntfs_log_perror("Failed to remove just added attribute #2");
|
|
free_err_out:
|
|
/* Free MFT record, if it doesn't contain attributes. */
|
|
if (le32_to_cpu(attr_ni->mrec->bytes_in_use) -
|
|
le16_to_cpu(attr_ni->mrec->attrs_offset) == 8)
|
|
if (ntfs_mft_record_free(attr_ni->vol, attr_ni))
|
|
ntfs_log_perror("Failed to free MFT record");
|
|
err_out:
|
|
errno = err;
|
|
return -1;
|
|
}
|
|
|
|
/*
|
|
* Change an attribute flag
|
|
*/
|
|
|
|
int ntfs_attr_set_flags(ntfs_inode *ni, ATTR_TYPES type,
|
|
ntfschar *name, u8 name_len, ATTR_FLAGS flags, ATTR_FLAGS mask)
|
|
{
|
|
ntfs_attr_search_ctx *ctx;
|
|
int res;
|
|
|
|
res = -1;
|
|
/* Search for designated attribute */
|
|
ctx = ntfs_attr_get_search_ctx(ni, NULL);
|
|
if (ctx) {
|
|
if (!ntfs_attr_lookup(type, name, name_len,
|
|
CASE_SENSITIVE, 0, NULL, 0, ctx)) {
|
|
/* do the requested change (all small endian le16) */
|
|
ctx->attr->flags = (ctx->attr->flags & ~mask)
|
|
| (flags & mask);
|
|
NInoSetDirty(ni);
|
|
res = 0;
|
|
}
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
}
|
|
return (res);
|
|
}
|
|
|
|
|
|
/**
|
|
* ntfs_attr_rm - remove attribute from ntfs inode
|
|
* @na: opened ntfs attribute to delete
|
|
*
|
|
* Remove attribute and all it's extents from ntfs inode. If attribute was non
|
|
* resident also free all clusters allocated by attribute.
|
|
*
|
|
* Return 0 on success or -1 on error with errno set to the error code.
|
|
*/
|
|
int ntfs_attr_rm(ntfs_attr *na)
|
|
{
|
|
ntfs_attr_search_ctx *ctx;
|
|
int ret = 0;
|
|
|
|
if (!na) {
|
|
ntfs_log_trace("Invalid arguments passed.\n");
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr 0x%x.\n",
|
|
(long long) na->ni->mft_no, na->type);
|
|
|
|
/* Free cluster allocation. */
|
|
if (NAttrNonResident(na)) {
|
|
if (ntfs_attr_map_whole_runlist(na))
|
|
return -1;
|
|
if (ntfs_cluster_free(na->ni->vol, na, 0, -1) < 0) {
|
|
ntfs_log_trace("Failed to free cluster allocation. Leaving "
|
|
"inconstant metadata.\n");
|
|
ret = -1;
|
|
}
|
|
}
|
|
|
|
/* Search for attribute extents and remove them all. */
|
|
ctx = ntfs_attr_get_search_ctx(na->ni, NULL);
|
|
if (!ctx)
|
|
return -1;
|
|
while (!ntfs_attr_lookup(na->type, na->name, na->name_len,
|
|
CASE_SENSITIVE, 0, NULL, 0, ctx)) {
|
|
if (ntfs_attr_record_rm(ctx)) {
|
|
ntfs_log_trace("Failed to remove attribute extent. Leaving "
|
|
"inconstant metadata.\n");
|
|
ret = -1;
|
|
}
|
|
ntfs_attr_reinit_search_ctx(ctx);
|
|
}
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
if (errno != ENOENT) {
|
|
ntfs_log_trace("Attribute lookup failed. Probably leaving inconstant "
|
|
"metadata.\n");
|
|
ret = -1;
|
|
}
|
|
|
|
return ret;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_record_resize - resize an attribute record
|
|
* @m: mft record containing attribute record
|
|
* @a: attribute record to resize
|
|
* @new_size: new size in bytes to which to resize the attribute record @a
|
|
*
|
|
* Resize the attribute record @a, i.e. the resident part of the attribute, in
|
|
* the mft record @m to @new_size bytes.
|
|
*
|
|
* Return 0 on success and -1 on error with errno set to the error code.
|
|
* The following error codes are defined:
|
|
* ENOSPC - Not enough space in the mft record @m to perform the resize.
|
|
* Note that on error no modifications have been performed whatsoever.
|
|
*
|
|
* Warning: If you make a record smaller without having copied all the data you
|
|
* are interested in the data may be overwritten!
|
|
*/
|
|
int ntfs_attr_record_resize(MFT_RECORD *m, ATTR_RECORD *a, u32 new_size)
|
|
{
|
|
u32 old_size, alloc_size, attr_size;
|
|
|
|
old_size = le32_to_cpu(m->bytes_in_use);
|
|
alloc_size = le32_to_cpu(m->bytes_allocated);
|
|
attr_size = le32_to_cpu(a->length);
|
|
|
|
ntfs_log_trace("Sizes: old=%u alloc=%u attr=%u new=%u\n",
|
|
(unsigned)old_size, (unsigned)alloc_size,
|
|
(unsigned)attr_size, (unsigned)new_size);
|
|
|
|
/* Align to 8 bytes, just in case the caller hasn't. */
|
|
new_size = (new_size + 7) & ~7;
|
|
|
|
/* If the actual attribute length has changed, move things around. */
|
|
if (new_size != attr_size) {
|
|
|
|
u32 new_muse = old_size - attr_size + new_size;
|
|
|
|
/* Not enough space in this mft record. */
|
|
if (new_muse > alloc_size) {
|
|
errno = ENOSPC;
|
|
ntfs_log_trace("Not enough space in the MFT record "
|
|
"(%u > %u)\n", new_muse, alloc_size);
|
|
return -1;
|
|
}
|
|
|
|
if (a->type == AT_INDEX_ROOT && new_size > attr_size &&
|
|
new_muse + 120 > alloc_size && old_size + 120 <= alloc_size) {
|
|
errno = ENOSPC;
|
|
ntfs_log_trace("Too big INDEX_ROOT (%u > %u)\n",
|
|
new_muse, alloc_size);
|
|
return STATUS_RESIDENT_ATTRIBUTE_FILLED_MFT;
|
|
}
|
|
|
|
/* Move attributes following @a to their new location. */
|
|
memmove((u8 *)a + new_size, (u8 *)a + attr_size,
|
|
old_size - ((u8 *)a - (u8 *)m) - attr_size);
|
|
|
|
/* Adjust @m to reflect the change in used space. */
|
|
m->bytes_in_use = cpu_to_le32(new_muse);
|
|
|
|
/* Adjust @a to reflect the new size. */
|
|
if (new_size >= offsetof(ATTR_REC, length) + sizeof(a->length))
|
|
a->length = cpu_to_le32(new_size);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* ntfs_resident_attr_value_resize - resize the value of a resident attribute
|
|
* @m: mft record containing attribute record
|
|
* @a: attribute record whose value to resize
|
|
* @new_size: new size in bytes to which to resize the attribute value of @a
|
|
*
|
|
* Resize the value of the attribute @a in the mft record @m to @new_size bytes.
|
|
* If the value is made bigger, the newly "allocated" space is cleared.
|
|
*
|
|
* Return 0 on success and -1 on error with errno set to the error code.
|
|
* The following error codes are defined:
|
|
* ENOSPC - Not enough space in the mft record @m to perform the resize.
|
|
* Note that on error no modifications have been performed whatsoever.
|
|
*/
|
|
int ntfs_resident_attr_value_resize(MFT_RECORD *m, ATTR_RECORD *a,
|
|
const u32 new_size)
|
|
{
|
|
int ret;
|
|
|
|
ntfs_log_trace("Entering for new size %u.\n", (unsigned)new_size);
|
|
|
|
/* Resize the resident part of the attribute record. */
|
|
if ((ret = ntfs_attr_record_resize(m, a, (le16_to_cpu(a->value_offset) +
|
|
new_size + 7) & ~7)) < 0)
|
|
return ret;
|
|
/*
|
|
* If we made the attribute value bigger, clear the area between the
|
|
* old size and @new_size.
|
|
*/
|
|
if (new_size > le32_to_cpu(a->value_length))
|
|
memset((u8*)a + le16_to_cpu(a->value_offset) +
|
|
le32_to_cpu(a->value_length), 0, new_size -
|
|
le32_to_cpu(a->value_length));
|
|
/* Finally update the length of the attribute value. */
|
|
a->value_length = cpu_to_le32(new_size);
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_record_move_to - move attribute record to target inode
|
|
* @ctx: attribute search context describing the attribute record
|
|
* @ni: opened ntfs inode to which move attribute record
|
|
*
|
|
* If this function succeed, user should reinit search context if he/she wants
|
|
* use it anymore.
|
|
*
|
|
* Return 0 on success and -1 on error with errno set to the error code.
|
|
*/
|
|
int ntfs_attr_record_move_to(ntfs_attr_search_ctx *ctx, ntfs_inode *ni)
|
|
{
|
|
ntfs_attr_search_ctx *nctx;
|
|
ATTR_RECORD *a;
|
|
int err;
|
|
|
|
if (!ctx || !ctx->attr || !ctx->ntfs_ino || !ni) {
|
|
ntfs_log_trace("Invalid arguments passed.\n");
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
ntfs_log_trace("Entering for ctx->attr->type 0x%x, ctx->ntfs_ino->mft_no "
|
|
"0x%llx, ni->mft_no 0x%llx.\n",
|
|
(unsigned) le32_to_cpu(ctx->attr->type),
|
|
(long long) ctx->ntfs_ino->mft_no,
|
|
(long long) ni->mft_no);
|
|
|
|
if (ctx->ntfs_ino == ni)
|
|
return 0;
|
|
|
|
if (!ctx->al_entry) {
|
|
ntfs_log_trace("Inode should contain attribute list to use this "
|
|
"function.\n");
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
/* Find place in MFT record where attribute will be moved. */
|
|
a = ctx->attr;
|
|
nctx = ntfs_attr_get_search_ctx(ni, NULL);
|
|
if (!nctx)
|
|
return -1;
|
|
|
|
/*
|
|
* Use ntfs_attr_find instead of ntfs_attr_lookup to find place for
|
|
* attribute in @ni->mrec, not any extent inode in case if @ni is base
|
|
* file record.
|
|
*/
|
|
if (!ntfs_attr_find(a->type, (ntfschar*)((u8*)a + le16_to_cpu(
|
|
a->name_offset)), a->name_length, CASE_SENSITIVE, NULL,
|
|
0, nctx)) {
|
|
ntfs_log_trace("Attribute of such type, with same name already "
|
|
"present in this MFT record.\n");
|
|
err = EEXIST;
|
|
goto put_err_out;
|
|
}
|
|
if (errno != ENOENT) {
|
|
err = errno;
|
|
ntfs_log_debug("Attribute lookup failed.\n");
|
|
goto put_err_out;
|
|
}
|
|
|
|
/* Make space and move attribute. */
|
|
if (ntfs_make_room_for_attr(ni->mrec, (u8*) nctx->attr,
|
|
le32_to_cpu(a->length))) {
|
|
err = errno;
|
|
ntfs_log_trace("Couldn't make space for attribute.\n");
|
|
goto put_err_out;
|
|
}
|
|
memcpy(nctx->attr, a, le32_to_cpu(a->length));
|
|
nctx->attr->instance = nctx->mrec->next_attr_instance;
|
|
nctx->mrec->next_attr_instance = cpu_to_le16(
|
|
(le16_to_cpu(nctx->mrec->next_attr_instance) + 1) & 0xffff);
|
|
ntfs_attr_record_resize(ctx->mrec, a, 0);
|
|
ntfs_inode_mark_dirty(ctx->ntfs_ino);
|
|
ntfs_inode_mark_dirty(ni);
|
|
|
|
/* Update attribute list. */
|
|
ctx->al_entry->mft_reference =
|
|
MK_LE_MREF(ni->mft_no, le16_to_cpu(ni->mrec->sequence_number));
|
|
ctx->al_entry->instance = nctx->attr->instance;
|
|
ntfs_attrlist_mark_dirty(ni);
|
|
|
|
ntfs_attr_put_search_ctx(nctx);
|
|
return 0;
|
|
put_err_out:
|
|
ntfs_attr_put_search_ctx(nctx);
|
|
errno = err;
|
|
return -1;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_record_move_away - move away attribute record from it's mft record
|
|
* @ctx: attribute search context describing the attribute record
|
|
* @extra: minimum amount of free space in the new holder of record
|
|
*
|
|
* New attribute record holder must have free @extra bytes after moving
|
|
* attribute record to it.
|
|
*
|
|
* If this function succeed, user should reinit search context if he/she wants
|
|
* use it anymore.
|
|
*
|
|
* Return 0 on success and -1 on error with errno set to the error code.
|
|
*/
|
|
int ntfs_attr_record_move_away(ntfs_attr_search_ctx *ctx, int extra)
|
|
{
|
|
ntfs_inode *base_ni, *ni;
|
|
MFT_RECORD *m;
|
|
int i;
|
|
|
|
if (!ctx || !ctx->attr || !ctx->ntfs_ino || extra < 0) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s: ctx=%p ctx->attr=%p extra=%d", __FUNCTION__,
|
|
ctx, ctx ? ctx->attr : NULL, extra);
|
|
return -1;
|
|
}
|
|
|
|
ntfs_log_trace("Entering for attr 0x%x, inode %llu\n",
|
|
(unsigned) le32_to_cpu(ctx->attr->type),
|
|
(unsigned long long)ctx->ntfs_ino->mft_no);
|
|
|
|
if (ctx->ntfs_ino->nr_extents == -1)
|
|
base_ni = ctx->base_ntfs_ino;
|
|
else
|
|
base_ni = ctx->ntfs_ino;
|
|
|
|
if (!NInoAttrList(base_ni)) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("Inode %llu has no attrlist",
|
|
(unsigned long long)base_ni->mft_no);
|
|
return -1;
|
|
}
|
|
|
|
if (ntfs_inode_attach_all_extents(ctx->ntfs_ino)) {
|
|
ntfs_log_perror("Couldn't attach extents, inode=%llu",
|
|
(unsigned long long)base_ni->mft_no);
|
|
return -1;
|
|
}
|
|
|
|
/* Walk through all extents and try to move attribute to them. */
|
|
for (i = 0; i < base_ni->nr_extents; i++) {
|
|
ni = base_ni->extent_nis[i];
|
|
m = ni->mrec;
|
|
|
|
if (ctx->ntfs_ino->mft_no == ni->mft_no)
|
|
continue;
|
|
|
|
if (le32_to_cpu(m->bytes_allocated) -
|
|
le32_to_cpu(m->bytes_in_use) <
|
|
le32_to_cpu(ctx->attr->length) + extra)
|
|
continue;
|
|
|
|
/*
|
|
* ntfs_attr_record_move_to can fail if extent with other lowest
|
|
* VCN already present in inode we trying move record to. So,
|
|
* do not return error.
|
|
*/
|
|
if (!ntfs_attr_record_move_to(ctx, ni))
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* Failed to move attribute to one of the current extents, so allocate
|
|
* new extent and move attribute to it.
|
|
*/
|
|
ni = ntfs_mft_record_alloc(base_ni->vol, base_ni);
|
|
if (!ni) {
|
|
ntfs_log_perror("Couldn't allocate MFT record");
|
|
return -1;
|
|
}
|
|
if (ntfs_attr_record_move_to(ctx, ni)) {
|
|
ntfs_log_perror("Couldn't move attribute to MFT record");
|
|
return -1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_make_non_resident - convert a resident to a non-resident attribute
|
|
* @na: open ntfs attribute to make non-resident
|
|
* @ctx: ntfs search context describing the attribute
|
|
*
|
|
* Convert a resident ntfs attribute to a non-resident one.
|
|
*
|
|
* Return 0 on success and -1 on error with errno set to the error code. The
|
|
* following error codes are defined:
|
|
* EPERM - The attribute is not allowed to be non-resident.
|
|
* TODO: others...
|
|
*
|
|
* NOTE to self: No changes in the attribute list are required to move from
|
|
* a resident to a non-resident attribute.
|
|
*
|
|
* Warning: We do not set the inode dirty and we do not write out anything!
|
|
* We expect the caller to do this as this is a fairly low level
|
|
* function and it is likely there will be further changes made.
|
|
*/
|
|
int ntfs_attr_make_non_resident(ntfs_attr *na,
|
|
ntfs_attr_search_ctx *ctx)
|
|
{
|
|
s64 new_allocated_size, bw;
|
|
ntfs_volume *vol = na->ni->vol;
|
|
ATTR_REC *a = ctx->attr;
|
|
runlist *rl;
|
|
int mp_size, mp_ofs, name_ofs, arec_size, err;
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr 0x%x.\n", (unsigned long
|
|
long)na->ni->mft_no, na->type);
|
|
|
|
/* Some preliminary sanity checking. */
|
|
if (NAttrNonResident(na)) {
|
|
ntfs_log_trace("Eeek! Trying to make non-resident attribute "
|
|
"non-resident. Aborting...\n");
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
/* Check that the attribute is allowed to be non-resident. */
|
|
if (ntfs_attr_can_be_non_resident(vol, na->type, na->name, na->name_len))
|
|
return -1;
|
|
|
|
new_allocated_size = (le32_to_cpu(a->value_length) + vol->cluster_size
|
|
- 1) & ~(vol->cluster_size - 1);
|
|
|
|
if (new_allocated_size > 0) {
|
|
if ((a->flags & ATTR_COMPRESSION_MASK)
|
|
== ATTR_IS_COMPRESSED) {
|
|
/* must allocate full compression blocks */
|
|
new_allocated_size = ((new_allocated_size - 1)
|
|
| ((1L << (STANDARD_COMPRESSION_UNIT
|
|
+ vol->cluster_size_bits)) - 1)) + 1;
|
|
}
|
|
/* Start by allocating clusters to hold the attribute value. */
|
|
rl = ntfs_cluster_alloc(vol, 0, new_allocated_size >>
|
|
vol->cluster_size_bits, -1, DATA_ZONE);
|
|
if (!rl)
|
|
return -1;
|
|
} else
|
|
rl = NULL;
|
|
/*
|
|
* Setup the in-memory attribute structure to be non-resident so that
|
|
* we can use ntfs_attr_pwrite().
|
|
*/
|
|
NAttrSetNonResident(na);
|
|
NAttrSetBeingNonResident(na);
|
|
na->rl = rl;
|
|
na->allocated_size = new_allocated_size;
|
|
na->data_size = na->initialized_size = le32_to_cpu(a->value_length);
|
|
/*
|
|
* FIXME: For now just clear all of these as we don't support them when
|
|
* writing.
|
|
*/
|
|
NAttrClearSparse(na);
|
|
NAttrClearEncrypted(na);
|
|
if ((a->flags & ATTR_COMPRESSION_MASK) == ATTR_IS_COMPRESSED) {
|
|
/* set compression writing parameters */
|
|
na->compression_block_size
|
|
= 1 << (STANDARD_COMPRESSION_UNIT + vol->cluster_size_bits);
|
|
na->compression_block_clusters = 1 << STANDARD_COMPRESSION_UNIT;
|
|
}
|
|
|
|
if (rl) {
|
|
/* Now copy the attribute value to the allocated cluster(s). */
|
|
bw = ntfs_attr_pwrite(na, 0, le32_to_cpu(a->value_length),
|
|
(u8*)a + le16_to_cpu(a->value_offset));
|
|
if (bw != le32_to_cpu(a->value_length)) {
|
|
err = errno;
|
|
ntfs_log_debug("Eeek! Failed to write out attribute value "
|
|
"(bw = %lli, errno = %i). "
|
|
"Aborting...\n", (long long)bw, err);
|
|
if (bw >= 0)
|
|
err = EIO;
|
|
goto cluster_free_err_out;
|
|
}
|
|
}
|
|
/* Determine the size of the mapping pairs array. */
|
|
mp_size = ntfs_get_size_for_mapping_pairs(vol, rl, 0, INT_MAX);
|
|
if (mp_size < 0) {
|
|
err = errno;
|
|
ntfs_log_debug("Eeek! Failed to get size for mapping pairs array. "
|
|
"Aborting...\n");
|
|
goto cluster_free_err_out;
|
|
}
|
|
/* Calculate new offsets for the name and the mapping pairs array. */
|
|
if (na->ni->flags & FILE_ATTR_COMPRESSED)
|
|
name_ofs = (sizeof(ATTR_REC) + 7) & ~7;
|
|
else
|
|
name_ofs = (sizeof(ATTR_REC) - sizeof(a->compressed_size) + 7) & ~7;
|
|
mp_ofs = (name_ofs + a->name_length * sizeof(ntfschar) + 7) & ~7;
|
|
/*
|
|
* Determine the size of the resident part of the non-resident
|
|
* attribute record. (Not compressed thus no compressed_size element
|
|
* present.)
|
|
*/
|
|
arec_size = (mp_ofs + mp_size + 7) & ~7;
|
|
|
|
/* Resize the resident part of the attribute record. */
|
|
if (ntfs_attr_record_resize(ctx->mrec, a, arec_size) < 0) {
|
|
err = errno;
|
|
goto cluster_free_err_out;
|
|
}
|
|
|
|
/*
|
|
* Convert the resident part of the attribute record to describe a
|
|
* non-resident attribute.
|
|
*/
|
|
a->non_resident = 1;
|
|
|
|
/* Move the attribute name if it exists and update the offset. */
|
|
if (a->name_length)
|
|
memmove((u8*)a + name_ofs, (u8*)a + le16_to_cpu(a->name_offset),
|
|
a->name_length * sizeof(ntfschar));
|
|
a->name_offset = cpu_to_le16(name_ofs);
|
|
|
|
/* Setup the fields specific to non-resident attributes. */
|
|
a->lowest_vcn = cpu_to_sle64(0);
|
|
a->highest_vcn = cpu_to_sle64((new_allocated_size - 1) >>
|
|
vol->cluster_size_bits);
|
|
|
|
a->mapping_pairs_offset = cpu_to_le16(mp_ofs);
|
|
|
|
/*
|
|
* Update the flags to match the in-memory ones.
|
|
* However cannot change the compression state if we had
|
|
* a fuse_file_info open with a mark for release.
|
|
* The decisions about compression can only be made when
|
|
* creating/recreating the stream, not when making non resident.
|
|
*/
|
|
a->flags &= ~(ATTR_IS_SPARSE | ATTR_IS_ENCRYPTED);
|
|
if ((a->flags & ATTR_COMPRESSION_MASK) == ATTR_IS_COMPRESSED) {
|
|
/* support only ATTR_IS_COMPRESSED compression mode */
|
|
a->compression_unit = STANDARD_COMPRESSION_UNIT;
|
|
a->compressed_size = const_cpu_to_le64(0);
|
|
} else {
|
|
a->compression_unit = 0;
|
|
a->flags &= ~ATTR_COMPRESSION_MASK;
|
|
na->data_flags = a->flags;
|
|
}
|
|
|
|
memset(&a->reserved1, 0, sizeof(a->reserved1));
|
|
|
|
a->allocated_size = cpu_to_sle64(new_allocated_size);
|
|
a->data_size = a->initialized_size = cpu_to_sle64(na->data_size);
|
|
|
|
/* Generate the mapping pairs array in the attribute record. */
|
|
if (ntfs_mapping_pairs_build(vol, (u8*)a + mp_ofs, arec_size - mp_ofs,
|
|
rl, 0, NULL) < 0) {
|
|
// FIXME: Eeek! We need rollback! (AIA)
|
|
ntfs_log_trace("Eeek! Failed to build mapping pairs. Leaving "
|
|
"corrupt attribute record on disk. In memory "
|
|
"runlist is still intact! Error code is %i. "
|
|
"FIXME: Need to rollback instead!\n", errno);
|
|
return -1;
|
|
}
|
|
|
|
/* Done! */
|
|
return 0;
|
|
|
|
cluster_free_err_out:
|
|
if (rl && ntfs_cluster_free(vol, na, 0, -1) < 0)
|
|
ntfs_log_trace("Eeek! Failed to release allocated clusters in error "
|
|
"code path. Leaving inconsistent metadata...\n");
|
|
NAttrClearNonResident(na);
|
|
na->allocated_size = na->data_size;
|
|
na->rl = NULL;
|
|
free(rl);
|
|
errno = err;
|
|
return -1;
|
|
}
|
|
|
|
|
|
static int ntfs_resident_attr_resize(ntfs_attr *na, const s64 newsize);
|
|
|
|
/**
|
|
* ntfs_resident_attr_resize - resize a resident, open ntfs attribute
|
|
* @na: resident ntfs attribute to resize
|
|
* @newsize: new size (in bytes) to which to resize the attribute
|
|
*
|
|
* Change the size of a resident, open ntfs attribute @na to @newsize bytes.
|
|
* Can also be used to force an attribute non-resident. In this case, the
|
|
* size cannot be changed.
|
|
*
|
|
* On success return 0
|
|
* On error return values are:
|
|
* STATUS_RESIDENT_ATTRIBUTE_FILLED_MFT
|
|
* STATUS_ERROR - otherwise
|
|
* The following error codes are defined:
|
|
* ENOMEM - Not enough memory to complete operation.
|
|
* ERANGE - @newsize is not valid for the attribute type of @na.
|
|
* ENOSPC - There is no enough space in base mft to resize $ATTRIBUTE_LIST.
|
|
*/
|
|
static int ntfs_resident_attr_resize_i(ntfs_attr *na, const s64 newsize,
|
|
BOOL force_non_resident)
|
|
{
|
|
ntfs_attr_search_ctx *ctx;
|
|
ntfs_volume *vol;
|
|
ntfs_inode *ni;
|
|
int err, ret = STATUS_ERROR;
|
|
|
|
ntfs_log_trace("Inode 0x%llx attr 0x%x new size %lld\n",
|
|
(unsigned long long)na->ni->mft_no, na->type,
|
|
(long long)newsize);
|
|
|
|
/* Get the attribute record that needs modification. */
|
|
ctx = ntfs_attr_get_search_ctx(na->ni, NULL);
|
|
if (!ctx)
|
|
return -1;
|
|
if (ntfs_attr_lookup(na->type, na->name, na->name_len, 0, 0, NULL, 0,
|
|
ctx)) {
|
|
err = errno;
|
|
ntfs_log_perror("ntfs_attr_lookup failed");
|
|
goto put_err_out;
|
|
}
|
|
vol = na->ni->vol;
|
|
/*
|
|
* Check the attribute type and the corresponding minimum and maximum
|
|
* sizes against @newsize and fail if @newsize is out of bounds.
|
|
*/
|
|
if (ntfs_attr_size_bounds_check(vol, na->type, newsize) < 0) {
|
|
err = errno;
|
|
if (err == ENOENT)
|
|
err = EIO;
|
|
ntfs_log_perror("%s: bounds check failed", __FUNCTION__);
|
|
goto put_err_out;
|
|
}
|
|
/*
|
|
* If @newsize is bigger than the mft record we need to make the
|
|
* attribute non-resident if the attribute type supports it. If it is
|
|
* smaller we can go ahead and attempt the resize.
|
|
*/
|
|
if ((newsize < vol->mft_record_size) && !force_non_resident) {
|
|
/* Perform the resize of the attribute record. */
|
|
if (!(ret = ntfs_resident_attr_value_resize(ctx->mrec, ctx->attr,
|
|
newsize))) {
|
|
/* Update attribute size everywhere. */
|
|
na->data_size = na->initialized_size = newsize;
|
|
na->allocated_size = (newsize + 7) & ~7;
|
|
if ((na->data_flags & ATTR_COMPRESSION_MASK)
|
|
|| NAttrSparse(na))
|
|
na->compressed_size = na->allocated_size;
|
|
if (na->ni->mrec->flags & MFT_RECORD_IS_DIRECTORY
|
|
? na->type == AT_INDEX_ROOT && na->name == NTFS_INDEX_I30
|
|
: na->type == AT_DATA && na->name == AT_UNNAMED) {
|
|
na->ni->data_size = na->data_size;
|
|
if (((na->data_flags & ATTR_COMPRESSION_MASK)
|
|
|| NAttrSparse(na))
|
|
&& NAttrNonResident(na))
|
|
na->ni->allocated_size
|
|
= na->compressed_size;
|
|
else
|
|
na->ni->allocated_size
|
|
= na->allocated_size;
|
|
set_nino_flag(na->ni,KnownSize);
|
|
if (na->type == AT_DATA)
|
|
NInoFileNameSetDirty(na->ni);
|
|
}
|
|
goto resize_done;
|
|
}
|
|
/* Prefer AT_INDEX_ALLOCATION instead of AT_ATTRIBUTE_LIST */
|
|
if (ret == STATUS_RESIDENT_ATTRIBUTE_FILLED_MFT) {
|
|
err = errno;
|
|
goto put_err_out;
|
|
}
|
|
}
|
|
/* There is not enough space in the mft record to perform the resize. */
|
|
|
|
/* Make the attribute non-resident if possible. */
|
|
if (!ntfs_attr_make_non_resident(na, ctx)) {
|
|
ntfs_inode_mark_dirty(ctx->ntfs_ino);
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
/*
|
|
* do not truncate when forcing non-resident, this
|
|
* could cause the attribute to be made resident again,
|
|
* so size changes are not allowed.
|
|
*/
|
|
if (force_non_resident) {
|
|
ret = 0;
|
|
if (newsize != na->data_size) {
|
|
ntfs_log_error("Cannot change size when"
|
|
" forcing non-resident\n");
|
|
errno = EIO;
|
|
ret = STATUS_ERROR;
|
|
}
|
|
return (ret);
|
|
}
|
|
/* Resize non-resident attribute */
|
|
return ntfs_attr_truncate(na, newsize);
|
|
} else if (errno != ENOSPC && errno != EPERM) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to make attribute non-resident");
|
|
goto put_err_out;
|
|
}
|
|
|
|
/* Try to make other attributes non-resident and retry each time. */
|
|
ntfs_attr_init_search_ctx(ctx, NULL, na->ni->mrec);
|
|
while (!ntfs_attr_lookup(AT_UNUSED, NULL, 0, 0, 0, NULL, 0, ctx)) {
|
|
ntfs_attr *tna;
|
|
ATTR_RECORD *a;
|
|
|
|
a = ctx->attr;
|
|
if (a->non_resident)
|
|
continue;
|
|
|
|
/*
|
|
* Check out whether convert is reasonable. Assume that mapping
|
|
* pairs will take 8 bytes.
|
|
*/
|
|
if (le32_to_cpu(a->length) <= offsetof(ATTR_RECORD,
|
|
compressed_size) + ((a->name_length *
|
|
sizeof(ntfschar) + 7) & ~7) + 8)
|
|
continue;
|
|
|
|
tna = ntfs_attr_open(na->ni, a->type, (ntfschar*)((u8*)a +
|
|
le16_to_cpu(a->name_offset)), a->name_length);
|
|
if (!tna) {
|
|
err = errno;
|
|
ntfs_log_perror("Couldn't open attribute");
|
|
goto put_err_out;
|
|
}
|
|
if (ntfs_attr_make_non_resident(tna, ctx)) {
|
|
ntfs_attr_close(tna);
|
|
continue;
|
|
}
|
|
if (((tna->data_flags & ATTR_COMPRESSION_MASK)
|
|
== ATTR_IS_COMPRESSED)
|
|
&& ntfs_attr_pclose(tna)) {
|
|
err = errno;
|
|
ntfs_attr_close(tna);
|
|
goto put_err_out;
|
|
}
|
|
ntfs_inode_mark_dirty(tna->ni);
|
|
ntfs_attr_close(tna);
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return ntfs_resident_attr_resize_i(na, newsize, force_non_resident);
|
|
}
|
|
/* Check whether error occurred. */
|
|
if (errno != ENOENT) {
|
|
err = errno;
|
|
ntfs_log_perror("%s: Attribute lookup failed 1", __FUNCTION__);
|
|
goto put_err_out;
|
|
}
|
|
|
|
/*
|
|
* The standard information and attribute list attributes can't be
|
|
* moved out from the base MFT record, so try to move out others.
|
|
*/
|
|
if (na->type==AT_STANDARD_INFORMATION || na->type==AT_ATTRIBUTE_LIST) {
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
if (ntfs_inode_free_space(na->ni, offsetof(ATTR_RECORD,
|
|
non_resident_end) + 8)) {
|
|
ntfs_log_perror("Could not free space in MFT record");
|
|
return -1;
|
|
}
|
|
return ntfs_resident_attr_resize_i(na, newsize, force_non_resident);
|
|
}
|
|
|
|
/*
|
|
* Move the attribute to a new mft record, creating an attribute list
|
|
* attribute or modifying it if it is already present.
|
|
*/
|
|
|
|
/* Point search context back to attribute which we need resize. */
|
|
ntfs_attr_init_search_ctx(ctx, na->ni, NULL);
|
|
if (ntfs_attr_lookup(na->type, na->name, na->name_len, CASE_SENSITIVE,
|
|
0, NULL, 0, ctx)) {
|
|
ntfs_log_perror("%s: Attribute lookup failed 2", __FUNCTION__);
|
|
err = errno;
|
|
goto put_err_out;
|
|
}
|
|
|
|
/*
|
|
* Check whether attribute is already single in this MFT record.
|
|
* 8 added for the attribute terminator.
|
|
*/
|
|
if (le32_to_cpu(ctx->mrec->bytes_in_use) ==
|
|
le16_to_cpu(ctx->mrec->attrs_offset) +
|
|
le32_to_cpu(ctx->attr->length) + 8) {
|
|
err = ENOSPC;
|
|
ntfs_log_trace("MFT record is filled with one attribute\n");
|
|
ret = STATUS_RESIDENT_ATTRIBUTE_FILLED_MFT;
|
|
goto put_err_out;
|
|
}
|
|
|
|
/* Add attribute list if not present. */
|
|
if (na->ni->nr_extents == -1)
|
|
ni = na->ni->base_ni;
|
|
else
|
|
ni = na->ni;
|
|
if (!NInoAttrList(ni)) {
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
if (ntfs_inode_add_attrlist(ni))
|
|
return -1;
|
|
return ntfs_resident_attr_resize_i(na, newsize, force_non_resident);
|
|
}
|
|
/* Allocate new mft record. */
|
|
ni = ntfs_mft_record_alloc(vol, ni);
|
|
if (!ni) {
|
|
err = errno;
|
|
ntfs_log_perror("Couldn't allocate new MFT record");
|
|
goto put_err_out;
|
|
}
|
|
/* Move attribute to it. */
|
|
if (ntfs_attr_record_move_to(ctx, ni)) {
|
|
err = errno;
|
|
ntfs_log_perror("Couldn't move attribute to new MFT record");
|
|
goto put_err_out;
|
|
}
|
|
/* Update ntfs attribute. */
|
|
if (na->ni->nr_extents == -1)
|
|
na->ni = ni;
|
|
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
/* Try to perform resize once again. */
|
|
return ntfs_resident_attr_resize_i(na, newsize, force_non_resident);
|
|
|
|
resize_done:
|
|
/*
|
|
* Set the inode (and its base inode if it exists) dirty so it is
|
|
* written out later.
|
|
*/
|
|
ntfs_inode_mark_dirty(ctx->ntfs_ino);
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return 0;
|
|
put_err_out:
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
errno = err;
|
|
return ret;
|
|
}
|
|
|
|
static int ntfs_resident_attr_resize(ntfs_attr *na, const s64 newsize)
|
|
{
|
|
int ret;
|
|
|
|
ntfs_log_enter("Entering\n");
|
|
ret = ntfs_resident_attr_resize_i(na, newsize, FALSE);
|
|
ntfs_log_leave("\n");
|
|
return ret;
|
|
}
|
|
|
|
/*
|
|
* Force an attribute to be made non-resident without
|
|
* changing its size.
|
|
*
|
|
* This is particularly needed when the attribute has no data,
|
|
* as the non-resident variant requires more space in the MFT
|
|
* record, and may imply expelling some other attribute.
|
|
*
|
|
* As a consequence the existing ntfs_attr_search_ctx's have to
|
|
* be closed or reinitialized.
|
|
*
|
|
* returns 0 if successful,
|
|
* < 0 if failed, with errno telling why
|
|
*/
|
|
|
|
int ntfs_attr_force_non_resident(ntfs_attr *na)
|
|
{
|
|
int res;
|
|
|
|
res = ntfs_resident_attr_resize_i(na, na->data_size, TRUE);
|
|
if (!res && !NAttrNonResident(na)) {
|
|
res = -1;
|
|
errno = EIO;
|
|
ntfs_log_error("Failed to force non-resident\n");
|
|
}
|
|
return (res);
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_make_resident - convert a non-resident to a resident attribute
|
|
* @na: open ntfs attribute to make resident
|
|
* @ctx: ntfs search context describing the attribute
|
|
*
|
|
* Convert a non-resident ntfs attribute to a resident one.
|
|
*
|
|
* Return 0 on success and -1 on error with errno set to the error code. The
|
|
* following error codes are defined:
|
|
* EINVAL - Invalid arguments passed.
|
|
* EPERM - The attribute is not allowed to be resident.
|
|
* EIO - I/O error, damaged inode or bug.
|
|
* ENOSPC - There is no enough space to perform conversion.
|
|
* EOPNOTSUPP - Requested conversion is not supported yet.
|
|
*
|
|
* Warning: We do not set the inode dirty and we do not write out anything!
|
|
* We expect the caller to do this as this is a fairly low level
|
|
* function and it is likely there will be further changes made.
|
|
*/
|
|
static int ntfs_attr_make_resident(ntfs_attr *na, ntfs_attr_search_ctx *ctx)
|
|
{
|
|
ntfs_volume *vol = na->ni->vol;
|
|
ATTR_REC *a = ctx->attr;
|
|
int name_ofs, val_ofs, err = EIO;
|
|
s64 arec_size, bytes_read;
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr 0x%x.\n", (unsigned long
|
|
long)na->ni->mft_no, na->type);
|
|
|
|
/* Should be called for the first extent of the attribute. */
|
|
if (sle64_to_cpu(a->lowest_vcn)) {
|
|
ntfs_log_trace("Eeek! Should be called for the first extent of the "
|
|
"attribute. Aborting...\n");
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
/* Some preliminary sanity checking. */
|
|
if (!NAttrNonResident(na)) {
|
|
ntfs_log_trace("Eeek! Trying to make resident attribute resident. "
|
|
"Aborting...\n");
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
/* Make sure this is not $MFT/$BITMAP or Windows will not boot! */
|
|
if (na->type == AT_BITMAP && na->ni->mft_no == FILE_MFT) {
|
|
errno = EPERM;
|
|
return -1;
|
|
}
|
|
|
|
/* Check that the attribute is allowed to be resident. */
|
|
if (ntfs_attr_can_be_resident(vol, na->type))
|
|
return -1;
|
|
|
|
if (na->data_flags & ATTR_IS_ENCRYPTED) {
|
|
ntfs_log_trace("Making encrypted streams resident is not "
|
|
"implemented yet.\n");
|
|
errno = EOPNOTSUPP;
|
|
return -1;
|
|
}
|
|
|
|
/* Work out offsets into and size of the resident attribute. */
|
|
name_ofs = 24; /* = sizeof(resident_ATTR_REC); */
|
|
val_ofs = (name_ofs + a->name_length * sizeof(ntfschar) + 7) & ~7;
|
|
arec_size = (val_ofs + na->data_size + 7) & ~7;
|
|
|
|
/* Sanity check the size before we start modifying the attribute. */
|
|
if (le32_to_cpu(ctx->mrec->bytes_in_use) - le32_to_cpu(a->length) +
|
|
arec_size > le32_to_cpu(ctx->mrec->bytes_allocated)) {
|
|
errno = ENOSPC;
|
|
ntfs_log_trace("Not enough space to make attribute resident\n");
|
|
return -1;
|
|
}
|
|
|
|
/* Read and cache the whole runlist if not already done. */
|
|
if (ntfs_attr_map_whole_runlist(na))
|
|
return -1;
|
|
|
|
/* Move the attribute name if it exists and update the offset. */
|
|
if (a->name_length) {
|
|
memmove((u8*)a + name_ofs, (u8*)a + le16_to_cpu(a->name_offset),
|
|
a->name_length * sizeof(ntfschar));
|
|
}
|
|
a->name_offset = cpu_to_le16(name_ofs);
|
|
|
|
/* Resize the resident part of the attribute record. */
|
|
if (ntfs_attr_record_resize(ctx->mrec, a, arec_size) < 0) {
|
|
/*
|
|
* Bug, because ntfs_attr_record_resize should not fail (we
|
|
* already checked that attribute fits MFT record).
|
|
*/
|
|
ntfs_log_error("BUG! Failed to resize attribute record. "
|
|
"Please report to the %s. Aborting...\n",
|
|
NTFS_DEV_LIST);
|
|
errno = EIO;
|
|
return -1;
|
|
}
|
|
|
|
/* Convert the attribute record to describe a resident attribute. */
|
|
a->non_resident = 0;
|
|
a->flags = 0;
|
|
a->value_length = cpu_to_le32(na->data_size);
|
|
a->value_offset = cpu_to_le16(val_ofs);
|
|
/*
|
|
* If a data stream was wiped out, adjust the compression mode
|
|
* to current state of compression flag
|
|
*/
|
|
if (!na->data_size
|
|
&& (na->type == AT_DATA)
|
|
&& (na->ni->vol->major_ver >= 3)
|
|
&& NVolCompression(na->ni->vol)
|
|
&& (na->ni->vol->cluster_size <= MAX_COMPRESSION_CLUSTER_SIZE)
|
|
&& (na->ni->flags & FILE_ATTR_COMPRESSED)) {
|
|
a->flags |= ATTR_IS_COMPRESSED;
|
|
na->data_flags = a->flags;
|
|
}
|
|
/*
|
|
* File names cannot be non-resident so we would never see this here
|
|
* but at least it serves as a reminder that there may be attributes
|
|
* for which we do need to set this flag. (AIA)
|
|
*/
|
|
if (a->type == AT_FILE_NAME)
|
|
a->resident_flags = RESIDENT_ATTR_IS_INDEXED;
|
|
else
|
|
a->resident_flags = 0;
|
|
a->reservedR = 0;
|
|
|
|
/* Sanity fixup... Shouldn't really happen. (AIA) */
|
|
if (na->initialized_size > na->data_size)
|
|
na->initialized_size = na->data_size;
|
|
|
|
/* Copy data from run list to resident attribute value. */
|
|
bytes_read = ntfs_rl_pread(vol, na->rl, 0, na->initialized_size,
|
|
(u8*)a + val_ofs);
|
|
if (bytes_read != na->initialized_size) {
|
|
if (bytes_read < 0)
|
|
err = errno;
|
|
ntfs_log_trace("Eeek! Failed to read attribute data. Leaving "
|
|
"inconstant metadata. Run chkdsk. "
|
|
"Aborting...\n");
|
|
errno = err;
|
|
return -1;
|
|
}
|
|
|
|
/* Clear memory in gap between initialized_size and data_size. */
|
|
if (na->initialized_size < na->data_size)
|
|
memset((u8*)a + val_ofs + na->initialized_size, 0,
|
|
na->data_size - na->initialized_size);
|
|
|
|
/*
|
|
* Deallocate clusters from the runlist.
|
|
*
|
|
* NOTE: We can use ntfs_cluster_free() because we have already mapped
|
|
* the whole run list and thus it doesn't matter that the attribute
|
|
* record is in a transiently corrupted state at this moment in time.
|
|
*/
|
|
if (ntfs_cluster_free(vol, na, 0, -1) < 0) {
|
|
err = errno;
|
|
ntfs_log_perror("Eeek! Failed to release allocated clusters");
|
|
ntfs_log_trace("Ignoring error and leaving behind wasted "
|
|
"clusters.\n");
|
|
}
|
|
|
|
/* Throw away the now unused runlist. */
|
|
free(na->rl);
|
|
na->rl = NULL;
|
|
|
|
/* Update in-memory struct ntfs_attr. */
|
|
NAttrClearNonResident(na);
|
|
NAttrClearSparse(na);
|
|
NAttrClearEncrypted(na);
|
|
na->initialized_size = na->data_size;
|
|
na->allocated_size = na->compressed_size = (na->data_size + 7) & ~7;
|
|
na->compression_block_size = 0;
|
|
na->compression_block_size_bits = na->compression_block_clusters = 0;
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* If we are in the first extent, then set/clean sparse bit,
|
|
* update allocated and compressed size.
|
|
*/
|
|
static int ntfs_attr_update_meta(ATTR_RECORD *a, ntfs_attr *na, MFT_RECORD *m,
|
|
ntfs_attr_search_ctx *ctx)
|
|
{
|
|
int sparse, ret = 0;
|
|
|
|
ntfs_log_trace("Entering for inode 0x%llx, attr 0x%x\n",
|
|
(unsigned long long)na->ni->mft_no, na->type);
|
|
|
|
if (a->lowest_vcn)
|
|
goto out;
|
|
|
|
a->allocated_size = cpu_to_sle64(na->allocated_size);
|
|
|
|
/* Update sparse bit. */
|
|
sparse = ntfs_rl_sparse(na->rl);
|
|
if (sparse == -1) {
|
|
errno = EIO;
|
|
goto error;
|
|
}
|
|
|
|
/* Attribute become sparse. */
|
|
if (sparse && !(a->flags & (ATTR_IS_SPARSE | ATTR_IS_COMPRESSED))) {
|
|
/*
|
|
* Move attribute to another mft record, if attribute is too
|
|
* small to add compressed_size field to it and we have no
|
|
* free space in the current mft record.
|
|
*/
|
|
if ((le32_to_cpu(a->length) -
|
|
le16_to_cpu(a->mapping_pairs_offset) == 8)
|
|
&& !(le32_to_cpu(m->bytes_allocated) -
|
|
le32_to_cpu(m->bytes_in_use))) {
|
|
|
|
if (!NInoAttrList(na->ni)) {
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
if (ntfs_inode_add_attrlist(na->ni))
|
|
goto leave;
|
|
goto retry;
|
|
}
|
|
if (ntfs_attr_record_move_away(ctx, 8)) {
|
|
ntfs_log_perror("Failed to move attribute");
|
|
goto error;
|
|
}
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
goto retry;
|
|
}
|
|
if (!(le32_to_cpu(a->length) - le16_to_cpu(
|
|
a->mapping_pairs_offset))) {
|
|
errno = EIO;
|
|
ntfs_log_perror("Mapping pairs space is 0");
|
|
goto error;
|
|
}
|
|
|
|
NAttrSetSparse(na);
|
|
a->flags |= ATTR_IS_SPARSE;
|
|
a->compression_unit = STANDARD_COMPRESSION_UNIT; /* Windows
|
|
set it so, even if attribute is not actually compressed. */
|
|
|
|
memmove((u8*)a + le16_to_cpu(a->name_offset) + 8,
|
|
(u8*)a + le16_to_cpu(a->name_offset),
|
|
a->name_length * sizeof(ntfschar));
|
|
|
|
a->name_offset = cpu_to_le16(le16_to_cpu(a->name_offset) + 8);
|
|
|
|
a->mapping_pairs_offset =
|
|
cpu_to_le16(le16_to_cpu(a->mapping_pairs_offset) + 8);
|
|
}
|
|
|
|
/* Attribute no longer sparse. */
|
|
if (!sparse && (a->flags & ATTR_IS_SPARSE) &&
|
|
!(a->flags & ATTR_IS_COMPRESSED)) {
|
|
|
|
NAttrClearSparse(na);
|
|
a->flags &= ~ATTR_IS_SPARSE;
|
|
a->compression_unit = 0;
|
|
|
|
memmove((u8*)a + le16_to_cpu(a->name_offset) - 8,
|
|
(u8*)a + le16_to_cpu(a->name_offset),
|
|
a->name_length * sizeof(ntfschar));
|
|
|
|
if (le16_to_cpu(a->name_offset) >= 8)
|
|
a->name_offset = cpu_to_le16(le16_to_cpu(a->name_offset) - 8);
|
|
|
|
a->mapping_pairs_offset =
|
|
cpu_to_le16(le16_to_cpu(a->mapping_pairs_offset) - 8);
|
|
}
|
|
|
|
/* Update compressed size if required. */
|
|
if (sparse || (na->data_flags & ATTR_COMPRESSION_MASK)) {
|
|
s64 new_compr_size;
|
|
|
|
new_compr_size = ntfs_rl_get_compressed_size(na->ni->vol, na->rl);
|
|
if (new_compr_size == -1)
|
|
goto error;
|
|
|
|
na->compressed_size = new_compr_size;
|
|
a->compressed_size = cpu_to_sle64(new_compr_size);
|
|
}
|
|
/*
|
|
* Set FILE_NAME dirty flag, to update sparse bit and
|
|
* allocated size in the index.
|
|
*/
|
|
if (na->type == AT_DATA && na->name == AT_UNNAMED) {
|
|
if (sparse || (na->data_flags & ATTR_COMPRESSION_MASK))
|
|
na->ni->allocated_size = na->compressed_size;
|
|
else
|
|
na->ni->allocated_size = na->allocated_size;
|
|
NInoFileNameSetDirty(na->ni);
|
|
}
|
|
out:
|
|
return ret;
|
|
leave: ret = -1; goto out; /* return -1 */
|
|
retry: ret = -2; goto out;
|
|
error: ret = -3; goto out;
|
|
}
|
|
|
|
#define NTFS_VCN_DELETE_MARK -2
|
|
/**
|
|
* ntfs_attr_update_mapping_pairs_i - see ntfs_attr_update_mapping_pairs
|
|
*/
|
|
static int ntfs_attr_update_mapping_pairs_i(ntfs_attr *na, VCN from_vcn)
|
|
{
|
|
ntfs_attr_search_ctx *ctx;
|
|
ntfs_inode *ni, *base_ni;
|
|
MFT_RECORD *m;
|
|
ATTR_RECORD *a;
|
|
VCN stop_vcn;
|
|
const runlist_element *stop_rl;
|
|
int err, mp_size, cur_max_mp_size, exp_max_mp_size, ret = -1;
|
|
BOOL finished_build;
|
|
BOOL first_updated = FALSE;
|
|
|
|
retry:
|
|
if (!na || !na->rl) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s: na=%p", __FUNCTION__, na);
|
|
return -1;
|
|
}
|
|
|
|
ntfs_log_trace("Entering for inode %llu, attr 0x%x\n",
|
|
(unsigned long long)na->ni->mft_no, na->type);
|
|
|
|
if (!NAttrNonResident(na)) {
|
|
errno = EINVAL;
|
|
ntfs_log_perror("%s: resident attribute", __FUNCTION__);
|
|
return -1;
|
|
}
|
|
|
|
if (na->ni->nr_extents == -1)
|
|
base_ni = na->ni->base_ni;
|
|
else
|
|
base_ni = na->ni;
|
|
|
|
ctx = ntfs_attr_get_search_ctx(base_ni, NULL);
|
|
if (!ctx)
|
|
return -1;
|
|
|
|
/* Fill attribute records with new mapping pairs. */
|
|
stop_vcn = 0;
|
|
stop_rl = na->rl;
|
|
finished_build = FALSE;
|
|
while (!ntfs_attr_lookup(na->type, na->name, na->name_len,
|
|
CASE_SENSITIVE, from_vcn, NULL, 0, ctx)) {
|
|
a = ctx->attr;
|
|
m = ctx->mrec;
|
|
if (!a->lowest_vcn)
|
|
first_updated = TRUE;
|
|
/*
|
|
* If runlist is updating not from the beginning, then set
|
|
* @stop_vcn properly, i.e. to the lowest vcn of record that
|
|
* contain @from_vcn. Also we do not need @from_vcn anymore,
|
|
* set it to 0 to make ntfs_attr_lookup enumerate attributes.
|
|
*/
|
|
if (from_vcn) {
|
|
LCN first_lcn;
|
|
|
|
stop_vcn = sle64_to_cpu(a->lowest_vcn);
|
|
from_vcn = 0;
|
|
/*
|
|
* Check whether the first run we need to update is
|
|
* the last run in runlist, if so, then deallocate
|
|
* all attrubute extents starting this one.
|
|
*/
|
|
first_lcn = ntfs_rl_vcn_to_lcn(na->rl, stop_vcn);
|
|
if (first_lcn == LCN_EINVAL) {
|
|
errno = EIO;
|
|
ntfs_log_perror("Bad runlist");
|
|
goto put_err_out;
|
|
}
|
|
if (first_lcn == LCN_ENOENT ||
|
|
first_lcn == LCN_RL_NOT_MAPPED)
|
|
finished_build = TRUE;
|
|
}
|
|
|
|
/*
|
|
* Check whether we finished mapping pairs build, if so mark
|
|
* extent as need to delete (by setting highest vcn to
|
|
* NTFS_VCN_DELETE_MARK (-2), we shall check it later and
|
|
* delete extent) and continue search.
|
|
*/
|
|
if (finished_build) {
|
|
ntfs_log_trace("Mark attr 0x%x for delete in inode "
|
|
"%lld.\n", (unsigned)le32_to_cpu(a->type),
|
|
(long long)ctx->ntfs_ino->mft_no);
|
|
a->highest_vcn = cpu_to_sle64(NTFS_VCN_DELETE_MARK);
|
|
ntfs_inode_mark_dirty(ctx->ntfs_ino);
|
|
continue;
|
|
}
|
|
|
|
switch (ntfs_attr_update_meta(a, na, m, ctx)) {
|
|
case -1: return -1;
|
|
case -2: goto retry;
|
|
case -3: goto put_err_out;
|
|
}
|
|
|
|
/*
|
|
* Determine maximum possible length of mapping pairs,
|
|
* if we shall *not* expand space for mapping pairs.
|
|
*/
|
|
cur_max_mp_size = le32_to_cpu(a->length) -
|
|
le16_to_cpu(a->mapping_pairs_offset);
|
|
/*
|
|
* Determine maximum possible length of mapping pairs in the
|
|
* current mft record, if we shall expand space for mapping
|
|
* pairs.
|
|
*/
|
|
exp_max_mp_size = le32_to_cpu(m->bytes_allocated) -
|
|
le32_to_cpu(m->bytes_in_use) + cur_max_mp_size;
|
|
/* Get the size for the rest of mapping pairs array. */
|
|
mp_size = ntfs_get_size_for_mapping_pairs(na->ni->vol, stop_rl,
|
|
stop_vcn, exp_max_mp_size);
|
|
if (mp_size <= 0) {
|
|
ntfs_log_perror("%s: get MP size failed", __FUNCTION__);
|
|
goto put_err_out;
|
|
}
|
|
/* Test mapping pairs for fitting in the current mft record. */
|
|
if (mp_size > exp_max_mp_size) {
|
|
/*
|
|
* Mapping pairs of $ATTRIBUTE_LIST attribute must fit
|
|
* in the base mft record. Try to move out other
|
|
* attributes and try again.
|
|
*/
|
|
if (na->type == AT_ATTRIBUTE_LIST) {
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
if (ntfs_inode_free_space(na->ni, mp_size -
|
|
cur_max_mp_size)) {
|
|
ntfs_log_perror("Attribute list is too "
|
|
"big. Defragment the "
|
|
"volume\n");
|
|
return -1;
|
|
}
|
|
goto retry;
|
|
}
|
|
|
|
/* Add attribute list if it isn't present, and retry. */
|
|
if (!NInoAttrList(base_ni)) {
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
if (ntfs_inode_add_attrlist(base_ni)) {
|
|
ntfs_log_perror("Can not add attrlist");
|
|
return -1;
|
|
}
|
|
goto retry;
|
|
}
|
|
|
|
/*
|
|
* Set mapping pairs size to maximum possible for this
|
|
* mft record. We shall write the rest of mapping pairs
|
|
* to another MFT records.
|
|
*/
|
|
mp_size = exp_max_mp_size;
|
|
}
|
|
|
|
/* Change space for mapping pairs if we need it. */
|
|
if (((mp_size + 7) & ~7) != cur_max_mp_size) {
|
|
if (ntfs_attr_record_resize(m, a,
|
|
le16_to_cpu(a->mapping_pairs_offset) +
|
|
mp_size)) {
|
|
errno = EIO;
|
|
ntfs_log_perror("Failed to resize attribute");
|
|
goto put_err_out;
|
|
}
|
|
}
|
|
|
|
/* Update lowest vcn. */
|
|
a->lowest_vcn = cpu_to_sle64(stop_vcn);
|
|
ntfs_inode_mark_dirty(ctx->ntfs_ino);
|
|
if ((ctx->ntfs_ino->nr_extents == -1 ||
|
|
NInoAttrList(ctx->ntfs_ino)) &&
|
|
ctx->attr->type != AT_ATTRIBUTE_LIST) {
|
|
ctx->al_entry->lowest_vcn = cpu_to_sle64(stop_vcn);
|
|
ntfs_attrlist_mark_dirty(ctx->ntfs_ino);
|
|
}
|
|
|
|
/*
|
|
* Generate the new mapping pairs array directly into the
|
|
* correct destination, i.e. the attribute record itself.
|
|
*/
|
|
if (!ntfs_mapping_pairs_build(na->ni->vol, (u8*)a + le16_to_cpu(
|
|
a->mapping_pairs_offset), mp_size, na->rl,
|
|
stop_vcn, &stop_rl))
|
|
finished_build = TRUE;
|
|
if (stop_rl)
|
|
stop_vcn = stop_rl->vcn;
|
|
else
|
|
stop_vcn = 0;
|
|
if (!finished_build && errno != ENOSPC) {
|
|
ntfs_log_perror("Failed to build mapping pairs");
|
|
goto put_err_out;
|
|
}
|
|
a->highest_vcn = cpu_to_sle64(stop_vcn - 1);
|
|
}
|
|
/* Check whether error occurred. */
|
|
if (errno != ENOENT) {
|
|
ntfs_log_perror("%s: Attribute lookup failed", __FUNCTION__);
|
|
goto put_err_out;
|
|
}
|
|
/*
|
|
* If the base extent was skipped in the above process,
|
|
* we still may have to update the sizes.
|
|
*/
|
|
if (!first_updated) {
|
|
le16 spcomp;
|
|
|
|
ntfs_attr_reinit_search_ctx(ctx);
|
|
if (!ntfs_attr_lookup(na->type, na->name, na->name_len,
|
|
CASE_SENSITIVE, 0, NULL, 0, ctx)) {
|
|
a = ctx->attr;
|
|
a->allocated_size = cpu_to_sle64(na->allocated_size);
|
|
spcomp = na->data_flags
|
|
& (ATTR_IS_COMPRESSED | ATTR_IS_SPARSE);
|
|
if (spcomp)
|
|
a->compressed_size = cpu_to_sle64(na->compressed_size);
|
|
if ((na->type == AT_DATA) && (na->name == AT_UNNAMED)) {
|
|
na->ni->allocated_size
|
|
= (spcomp
|
|
? na->compressed_size
|
|
: na->allocated_size);
|
|
NInoFileNameSetDirty(na->ni);
|
|
}
|
|
} else {
|
|
ntfs_log_error("Failed to update sizes in base extent\n");
|
|
goto put_err_out;
|
|
}
|
|
}
|
|
|
|
/* Deallocate not used attribute extents and return with success. */
|
|
if (finished_build) {
|
|
ntfs_attr_reinit_search_ctx(ctx);
|
|
ntfs_log_trace("Deallocate marked extents.\n");
|
|
while (!ntfs_attr_lookup(na->type, na->name, na->name_len,
|
|
CASE_SENSITIVE, 0, NULL, 0, ctx)) {
|
|
if (sle64_to_cpu(ctx->attr->highest_vcn) !=
|
|
NTFS_VCN_DELETE_MARK)
|
|
continue;
|
|
/* Remove unused attribute record. */
|
|
if (ntfs_attr_record_rm(ctx)) {
|
|
ntfs_log_perror("Could not remove unused attr");
|
|
goto put_err_out;
|
|
}
|
|
ntfs_attr_reinit_search_ctx(ctx);
|
|
}
|
|
if (errno != ENOENT) {
|
|
ntfs_log_perror("%s: Attr lookup failed", __FUNCTION__);
|
|
goto put_err_out;
|
|
}
|
|
ntfs_log_trace("Deallocate done.\n");
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
goto ok;
|
|
}
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
ctx = NULL;
|
|
|
|
/* Allocate new MFT records for the rest of mapping pairs. */
|
|
while (1) {
|
|
/* Calculate size of rest mapping pairs. */
|
|
mp_size = ntfs_get_size_for_mapping_pairs(na->ni->vol,
|
|
na->rl, stop_vcn, INT_MAX);
|
|
if (mp_size <= 0) {
|
|
ntfs_log_perror("%s: get mp size failed", __FUNCTION__);
|
|
goto put_err_out;
|
|
}
|
|
/* Allocate new mft record. */
|
|
ni = ntfs_mft_record_alloc(na->ni->vol, base_ni);
|
|
if (!ni) {
|
|
ntfs_log_perror("Could not allocate new MFT record");
|
|
goto put_err_out;
|
|
}
|
|
m = ni->mrec;
|
|
/*
|
|
* If mapping size exceed available space, set them to
|
|
* possible maximum.
|
|
*/
|
|
cur_max_mp_size = le32_to_cpu(m->bytes_allocated) -
|
|
le32_to_cpu(m->bytes_in_use) -
|
|
(offsetof(ATTR_RECORD, compressed_size) +
|
|
(((na->data_flags & ATTR_COMPRESSION_MASK)
|
|
|| NAttrSparse(na)) ?
|
|
sizeof(a->compressed_size) : 0)) -
|
|
((sizeof(ntfschar) * na->name_len + 7) & ~7);
|
|
if (mp_size > cur_max_mp_size)
|
|
mp_size = cur_max_mp_size;
|
|
/* Add attribute extent to new record. */
|
|
err = ntfs_non_resident_attr_record_add(ni, na->type,
|
|
na->name, na->name_len, stop_vcn, mp_size,
|
|
na->data_flags);
|
|
if (err == -1) {
|
|
err = errno;
|
|
ntfs_log_perror("Could not add attribute extent");
|
|
if (ntfs_mft_record_free(na->ni->vol, ni))
|
|
ntfs_log_perror("Could not free MFT record");
|
|
errno = err;
|
|
goto put_err_out;
|
|
}
|
|
a = (ATTR_RECORD*)((u8*)m + err);
|
|
|
|
err = ntfs_mapping_pairs_build(na->ni->vol, (u8*)a +
|
|
le16_to_cpu(a->mapping_pairs_offset), mp_size, na->rl,
|
|
stop_vcn, &stop_rl);
|
|
if (stop_rl)
|
|
stop_vcn = stop_rl->vcn;
|
|
else
|
|
stop_vcn = 0;
|
|
if (err < 0 && errno != ENOSPC) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to build MP");
|
|
if (ntfs_mft_record_free(na->ni->vol, ni))
|
|
ntfs_log_perror("Couldn't free MFT record");
|
|
errno = err;
|
|
goto put_err_out;
|
|
}
|
|
a->highest_vcn = cpu_to_sle64(stop_vcn - 1);
|
|
ntfs_inode_mark_dirty(ni);
|
|
/* All mapping pairs has been written. */
|
|
if (!err)
|
|
break;
|
|
}
|
|
ok:
|
|
ret = 0;
|
|
out:
|
|
return ret;
|
|
put_err_out:
|
|
if (ctx)
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
goto out;
|
|
}
|
|
#undef NTFS_VCN_DELETE_MARK
|
|
|
|
/**
|
|
* ntfs_attr_update_mapping_pairs - update mapping pairs for ntfs attribute
|
|
* @na: non-resident ntfs open attribute for which we need update
|
|
* @from_vcn: update runlist starting this VCN
|
|
*
|
|
* Build mapping pairs from @na->rl and write them to the disk. Also, this
|
|
* function updates sparse bit, allocated and compressed size (allocates/frees
|
|
* space for this field if required).
|
|
*
|
|
* @na->allocated_size should be set to correct value for the new runlist before
|
|
* call to this function. Vice-versa @na->compressed_size will be calculated and
|
|
* set to correct value during this function.
|
|
*
|
|
* FIXME: This function does not update sparse bit and compressed size correctly
|
|
* if called with @from_vcn != 0.
|
|
*
|
|
* FIXME: Rewrite without using NTFS_VCN_DELETE_MARK define.
|
|
*
|
|
* On success return 0 and on error return -1 with errno set to the error code.
|
|
* The following error codes are defined:
|
|
* EINVAL - Invalid arguments passed.
|
|
* ENOMEM - Not enough memory to complete operation.
|
|
* ENOSPC - There is no enough space in base mft to resize $ATTRIBUTE_LIST
|
|
* or there is no free MFT records left to allocate.
|
|
*/
|
|
int ntfs_attr_update_mapping_pairs(ntfs_attr *na, VCN from_vcn)
|
|
{
|
|
int ret;
|
|
|
|
ntfs_log_enter("Entering\n");
|
|
ret = ntfs_attr_update_mapping_pairs_i(na, from_vcn);
|
|
ntfs_log_leave("\n");
|
|
return ret;
|
|
}
|
|
|
|
/**
|
|
* ntfs_non_resident_attr_shrink - shrink a non-resident, open ntfs attribute
|
|
* @na: non-resident ntfs attribute to shrink
|
|
* @newsize: new size (in bytes) to which to shrink the attribute
|
|
*
|
|
* Reduce the size of a non-resident, open ntfs attribute @na to @newsize bytes.
|
|
*
|
|
* On success return 0 and on error return -1 with errno set to the error code.
|
|
* The following error codes are defined:
|
|
* ENOMEM - Not enough memory to complete operation.
|
|
* ERANGE - @newsize is not valid for the attribute type of @na.
|
|
*/
|
|
static int ntfs_non_resident_attr_shrink(ntfs_attr *na, const s64 newsize)
|
|
{
|
|
ntfs_volume *vol;
|
|
ntfs_attr_search_ctx *ctx;
|
|
VCN first_free_vcn;
|
|
s64 nr_freed_clusters;
|
|
int err;
|
|
|
|
ntfs_log_trace("Inode 0x%llx attr 0x%x new size %lld\n", (unsigned long long)
|
|
na->ni->mft_no, na->type, (long long)newsize);
|
|
|
|
vol = na->ni->vol;
|
|
|
|
/*
|
|
* Check the attribute type and the corresponding minimum size
|
|
* against @newsize and fail if @newsize is too small.
|
|
*/
|
|
if (ntfs_attr_size_bounds_check(vol, na->type, newsize) < 0) {
|
|
if (errno == ERANGE) {
|
|
ntfs_log_trace("Eeek! Size bounds check failed. "
|
|
"Aborting...\n");
|
|
} else if (errno == ENOENT)
|
|
errno = EIO;
|
|
return -1;
|
|
}
|
|
|
|
/* The first cluster outside the new allocation. */
|
|
if (na->data_flags & ATTR_COMPRESSION_MASK)
|
|
/*
|
|
* For compressed files we must keep full compressions blocks,
|
|
* but currently we do not decompress/recompress the last
|
|
* block to truncate the data, so we may leave more allocated
|
|
* clusters than really needed.
|
|
*/
|
|
first_free_vcn = (((newsize - 1)
|
|
| (na->compression_block_size - 1)) + 1)
|
|
>> vol->cluster_size_bits;
|
|
else
|
|
first_free_vcn = (newsize + vol->cluster_size - 1) >>
|
|
vol->cluster_size_bits;
|
|
/*
|
|
* Compare the new allocation with the old one and only deallocate
|
|
* clusters if there is a change.
|
|
*/
|
|
if ((na->allocated_size >> vol->cluster_size_bits) != first_free_vcn) {
|
|
if (ntfs_attr_map_whole_runlist(na)) {
|
|
ntfs_log_trace("Eeek! ntfs_attr_map_whole_runlist "
|
|
"failed.\n");
|
|
return -1;
|
|
}
|
|
/* Deallocate all clusters starting with the first free one. */
|
|
nr_freed_clusters = ntfs_cluster_free(vol, na, first_free_vcn,
|
|
-1);
|
|
if (nr_freed_clusters < 0) {
|
|
ntfs_log_trace("Eeek! Freeing of clusters failed. "
|
|
"Aborting...\n");
|
|
return -1;
|
|
}
|
|
|
|
/* Truncate the runlist itself. */
|
|
if (ntfs_rl_truncate(&na->rl, first_free_vcn)) {
|
|
/*
|
|
* Failed to truncate the runlist, so just throw it
|
|
* away, it will be mapped afresh on next use.
|
|
*/
|
|
free(na->rl);
|
|
na->rl = NULL;
|
|
ntfs_log_trace("Eeek! Run list truncation failed.\n");
|
|
return -1;
|
|
}
|
|
|
|
/* Prepare to mapping pairs update. */
|
|
na->allocated_size = first_free_vcn << vol->cluster_size_bits;
|
|
/* Write mapping pairs for new runlist. */
|
|
if (ntfs_attr_update_mapping_pairs(na, 0 /*first_free_vcn*/)) {
|
|
ntfs_log_trace("Eeek! Mapping pairs update failed. "
|
|
"Leaving inconstant metadata. "
|
|
"Run chkdsk.\n");
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/* Get the first attribute record. */
|
|
ctx = ntfs_attr_get_search_ctx(na->ni, NULL);
|
|
if (!ctx)
|
|
return -1;
|
|
|
|
if (ntfs_attr_lookup(na->type, na->name, na->name_len, CASE_SENSITIVE,
|
|
0, NULL, 0, ctx)) {
|
|
err = errno;
|
|
if (err == ENOENT)
|
|
err = EIO;
|
|
ntfs_log_trace("Eeek! Lookup of first attribute extent failed. "
|
|
"Leaving inconstant metadata.\n");
|
|
goto put_err_out;
|
|
}
|
|
|
|
/* Update data and initialized size. */
|
|
na->data_size = newsize;
|
|
ctx->attr->data_size = cpu_to_sle64(newsize);
|
|
if (newsize < na->initialized_size) {
|
|
na->initialized_size = newsize;
|
|
ctx->attr->initialized_size = cpu_to_sle64(newsize);
|
|
}
|
|
/* Update data size in the index. */
|
|
if (na->ni->mrec->flags & MFT_RECORD_IS_DIRECTORY) {
|
|
if (na->type == AT_INDEX_ROOT && na->name == NTFS_INDEX_I30) {
|
|
na->ni->data_size = na->data_size;
|
|
na->ni->allocated_size = na->allocated_size;
|
|
set_nino_flag(na->ni,KnownSize);
|
|
}
|
|
} else {
|
|
if (na->type == AT_DATA && na->name == AT_UNNAMED) {
|
|
na->ni->data_size = na->data_size;
|
|
NInoFileNameSetDirty(na->ni);
|
|
}
|
|
}
|
|
|
|
/* If the attribute now has zero size, make it resident. */
|
|
if (!newsize) {
|
|
if (ntfs_attr_make_resident(na, ctx)) {
|
|
/* If couldn't make resident, just continue. */
|
|
if (errno != EPERM)
|
|
ntfs_log_error("Failed to make attribute "
|
|
"resident. Leaving as is...\n");
|
|
}
|
|
}
|
|
|
|
/* Set the inode dirty so it is written out later. */
|
|
ntfs_inode_mark_dirty(ctx->ntfs_ino);
|
|
/* Done! */
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return 0;
|
|
put_err_out:
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
errno = err;
|
|
return -1;
|
|
}
|
|
|
|
/**
|
|
* ntfs_non_resident_attr_expand - expand a non-resident, open ntfs attribute
|
|
* @na: non-resident ntfs attribute to expand
|
|
* @newsize: new size (in bytes) to which to expand the attribute
|
|
*
|
|
* Expand the size of a non-resident, open ntfs attribute @na to @newsize bytes,
|
|
* by allocating new clusters.
|
|
*
|
|
* On success return 0 and on error return -1 with errno set to the error code.
|
|
* The following error codes are defined:
|
|
* ENOMEM - Not enough memory to complete operation.
|
|
* ERANGE - @newsize is not valid for the attribute type of @na.
|
|
* ENOSPC - There is no enough space in base mft to resize $ATTRIBUTE_LIST.
|
|
*/
|
|
static int ntfs_non_resident_attr_expand_i(ntfs_attr *na, const s64 newsize)
|
|
{
|
|
LCN lcn_seek_from;
|
|
VCN first_free_vcn;
|
|
ntfs_volume *vol;
|
|
ntfs_attr_search_ctx *ctx;
|
|
runlist *rl, *rln;
|
|
s64 org_alloc_size;
|
|
int err;
|
|
|
|
ntfs_log_trace("Inode %lld, attr 0x%x, new size %lld old size %lld\n",
|
|
(unsigned long long)na->ni->mft_no, na->type,
|
|
(long long)newsize, (long long)na->data_size);
|
|
|
|
vol = na->ni->vol;
|
|
|
|
/*
|
|
* Check the attribute type and the corresponding maximum size
|
|
* against @newsize and fail if @newsize is too big.
|
|
*/
|
|
if (ntfs_attr_size_bounds_check(vol, na->type, newsize) < 0) {
|
|
if (errno == ENOENT)
|
|
errno = EIO;
|
|
ntfs_log_perror("%s: bounds check failed", __FUNCTION__);
|
|
return -1;
|
|
}
|
|
|
|
/* Save for future use. */
|
|
org_alloc_size = na->allocated_size;
|
|
/* The first cluster outside the new allocation. */
|
|
first_free_vcn = (newsize + vol->cluster_size - 1) >>
|
|
vol->cluster_size_bits;
|
|
/*
|
|
* Compare the new allocation with the old one and only allocate
|
|
* clusters if there is a change.
|
|
*/
|
|
if ((na->allocated_size >> vol->cluster_size_bits) < first_free_vcn) {
|
|
if (ntfs_attr_map_whole_runlist(na)) {
|
|
ntfs_log_perror("ntfs_attr_map_whole_runlist failed");
|
|
return -1;
|
|
}
|
|
|
|
/*
|
|
* If we extend $DATA attribute on NTFS 3+ volume, we can add
|
|
* sparse runs instead of real allocation of clusters.
|
|
*/
|
|
if (na->type == AT_DATA && vol->major_ver >= 3) {
|
|
rl = ntfs_malloc(0x1000);
|
|
if (!rl)
|
|
return -1;
|
|
|
|
rl[0].vcn = (na->allocated_size >>
|
|
vol->cluster_size_bits);
|
|
rl[0].lcn = LCN_HOLE;
|
|
rl[0].length = first_free_vcn -
|
|
(na->allocated_size >> vol->cluster_size_bits);
|
|
rl[1].vcn = first_free_vcn;
|
|
rl[1].lcn = LCN_ENOENT;
|
|
rl[1].length = 0;
|
|
} else {
|
|
/*
|
|
* Determine first after last LCN of attribute.
|
|
* We will start seek clusters from this LCN to avoid
|
|
* fragmentation. If there are no valid LCNs in the
|
|
* attribute let the cluster allocator choose the
|
|
* starting LCN.
|
|
*/
|
|
lcn_seek_from = -1;
|
|
if (na->rl->length) {
|
|
/* Seek to the last run list element. */
|
|
for (rl = na->rl; (rl + 1)->length; rl++)
|
|
;
|
|
/*
|
|
* If the last LCN is a hole or similar seek
|
|
* back to last valid LCN.
|
|
*/
|
|
while (rl->lcn < 0 && rl != na->rl)
|
|
rl--;
|
|
/*
|
|
* Only set lcn_seek_from it the LCN is valid.
|
|
*/
|
|
if (rl->lcn >= 0)
|
|
lcn_seek_from = rl->lcn + rl->length;
|
|
}
|
|
|
|
rl = ntfs_cluster_alloc(vol, na->allocated_size >>
|
|
vol->cluster_size_bits, first_free_vcn -
|
|
(na->allocated_size >>
|
|
vol->cluster_size_bits), lcn_seek_from,
|
|
DATA_ZONE);
|
|
if (!rl) {
|
|
ntfs_log_perror("Cluster allocation failed "
|
|
"(%lld)",
|
|
(long long)first_free_vcn -
|
|
((long long)na->allocated_size >>
|
|
vol->cluster_size_bits));
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/* Append new clusters to attribute runlist. */
|
|
rln = ntfs_runlists_merge(na->rl, rl);
|
|
if (!rln) {
|
|
/* Failed, free just allocated clusters. */
|
|
err = errno;
|
|
ntfs_log_perror("Run list merge failed");
|
|
ntfs_cluster_free_from_rl(vol, rl);
|
|
free(rl);
|
|
errno = err;
|
|
return -1;
|
|
}
|
|
na->rl = rln;
|
|
|
|
/* Prepare to mapping pairs update. */
|
|
na->allocated_size = first_free_vcn << vol->cluster_size_bits;
|
|
/* Write mapping pairs for new runlist. */
|
|
if (ntfs_attr_update_mapping_pairs(na, 0 /*na->allocated_size >>
|
|
vol->cluster_size_bits*/)) {
|
|
err = errno;
|
|
ntfs_log_perror("Mapping pairs update failed");
|
|
goto rollback;
|
|
}
|
|
}
|
|
|
|
ctx = ntfs_attr_get_search_ctx(na->ni, NULL);
|
|
if (!ctx) {
|
|
err = errno;
|
|
if (na->allocated_size == org_alloc_size) {
|
|
errno = err;
|
|
return -1;
|
|
} else
|
|
goto rollback;
|
|
}
|
|
|
|
if (ntfs_attr_lookup(na->type, na->name, na->name_len, CASE_SENSITIVE,
|
|
0, NULL, 0, ctx)) {
|
|
err = errno;
|
|
ntfs_log_perror("Lookup of first attribute extent failed");
|
|
if (err == ENOENT)
|
|
err = EIO;
|
|
if (na->allocated_size != org_alloc_size) {
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
goto rollback;
|
|
} else
|
|
goto put_err_out;
|
|
}
|
|
|
|
/* Update data size. */
|
|
na->data_size = newsize;
|
|
ctx->attr->data_size = cpu_to_sle64(newsize);
|
|
/* Update data size in the index. */
|
|
if (na->ni->mrec->flags & MFT_RECORD_IS_DIRECTORY) {
|
|
if (na->type == AT_INDEX_ROOT && na->name == NTFS_INDEX_I30) {
|
|
na->ni->data_size = na->data_size;
|
|
na->ni->allocated_size = na->allocated_size;
|
|
set_nino_flag(na->ni,KnownSize);
|
|
}
|
|
} else {
|
|
if (na->type == AT_DATA && na->name == AT_UNNAMED) {
|
|
na->ni->data_size = na->data_size;
|
|
NInoFileNameSetDirty(na->ni);
|
|
}
|
|
}
|
|
/* Set the inode dirty so it is written out later. */
|
|
ntfs_inode_mark_dirty(ctx->ntfs_ino);
|
|
/* Done! */
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return 0;
|
|
rollback:
|
|
/* Free allocated clusters. */
|
|
if (ntfs_cluster_free(vol, na, org_alloc_size >>
|
|
vol->cluster_size_bits, -1) < 0) {
|
|
err = EIO;
|
|
ntfs_log_perror("Leaking clusters");
|
|
}
|
|
/* Now, truncate the runlist itself. */
|
|
if (ntfs_rl_truncate(&na->rl, org_alloc_size >>
|
|
vol->cluster_size_bits)) {
|
|
/*
|
|
* Failed to truncate the runlist, so just throw it away, it
|
|
* will be mapped afresh on next use.
|
|
*/
|
|
free(na->rl);
|
|
na->rl = NULL;
|
|
ntfs_log_perror("Couldn't truncate runlist. Rollback failed");
|
|
} else {
|
|
/* Prepare to mapping pairs update. */
|
|
na->allocated_size = org_alloc_size;
|
|
/* Restore mapping pairs. */
|
|
if (ntfs_attr_update_mapping_pairs(na, 0 /*na->allocated_size >>
|
|
vol->cluster_size_bits*/)) {
|
|
ntfs_log_perror("Failed to restore old mapping pairs");
|
|
}
|
|
}
|
|
errno = err;
|
|
return -1;
|
|
put_err_out:
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
errno = err;
|
|
return -1;
|
|
}
|
|
|
|
|
|
static int ntfs_non_resident_attr_expand(ntfs_attr *na, const s64 newsize)
|
|
{
|
|
int ret;
|
|
|
|
ntfs_log_enter("Entering\n");
|
|
ret = ntfs_non_resident_attr_expand_i(na, newsize);
|
|
ntfs_log_leave("\n");
|
|
return ret;
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_truncate - resize an ntfs attribute
|
|
* @na: open ntfs attribute to resize
|
|
* @newsize: new size (in bytes) to which to resize the attribute
|
|
*
|
|
* Change the size of an open ntfs attribute @na to @newsize bytes. If the
|
|
* attribute is made bigger and the attribute is resident the newly
|
|
* "allocated" space is cleared and if the attribute is non-resident the
|
|
* newly allocated space is marked as not initialised and no real allocation
|
|
* on disk is performed.
|
|
*
|
|
* On success return 0.
|
|
* On error return values are:
|
|
* STATUS_RESIDENT_ATTRIBUTE_FILLED_MFT
|
|
* STATUS_ERROR - otherwise
|
|
* The following error codes are defined:
|
|
* EINVAL - Invalid arguments were passed to the function.
|
|
* EOPNOTSUPP - The desired resize is not implemented yet.
|
|
* EACCES - Encrypted attribute.
|
|
*/
|
|
int ntfs_attr_truncate(ntfs_attr *na, const s64 newsize)
|
|
{
|
|
int ret = STATUS_ERROR;
|
|
s64 fullsize;
|
|
BOOL compressed;
|
|
|
|
if (!na || newsize < 0 ||
|
|
(na->ni->mft_no == FILE_MFT && na->type == AT_DATA)) {
|
|
ntfs_log_trace("Invalid arguments passed.\n");
|
|
errno = EINVAL;
|
|
return STATUS_ERROR;
|
|
}
|
|
|
|
ntfs_log_enter("Entering for inode %lld, attr 0x%x, size %lld\n",
|
|
(unsigned long long)na->ni->mft_no, na->type,
|
|
(long long)newsize);
|
|
|
|
if (na->data_size == newsize) {
|
|
ntfs_log_trace("Size is already ok\n");
|
|
ret = STATUS_OK;
|
|
goto out;
|
|
}
|
|
/*
|
|
* Encrypted attributes are not supported. We return access denied,
|
|
* which is what Windows NT4 does, too.
|
|
*/
|
|
if (na->data_flags & ATTR_IS_ENCRYPTED) {
|
|
errno = EACCES;
|
|
ntfs_log_trace("Cannot truncate encrypted attribute\n");
|
|
goto out;
|
|
}
|
|
/*
|
|
* TODO: Implement making handling of compressed attributes.
|
|
* Currently we can only expand the attribute or delete it,
|
|
* and only for ATTR_IS_COMPRESSED. This is however possible
|
|
* for resident attributes when there is no open fuse context
|
|
* (important case : $INDEX_ROOT:$I30)
|
|
*/
|
|
compressed = (na->data_flags & ATTR_COMPRESSION_MASK)
|
|
!= const_cpu_to_le16(0);
|
|
if (compressed
|
|
&& NAttrNonResident(na)
|
|
&& ((na->data_flags & ATTR_COMPRESSION_MASK) != ATTR_IS_COMPRESSED)) {
|
|
errno = EOPNOTSUPP;
|
|
ntfs_log_perror("Failed to truncate compressed attribute");
|
|
goto out;
|
|
}
|
|
if (NAttrNonResident(na)) {
|
|
/*
|
|
* For compressed data, the last block must be fully
|
|
* allocated, and we do not know the size of compression
|
|
* block until the attribute has been made non-resident.
|
|
* Moreover we can only process a single compression
|
|
* block at a time (from where we are about to write),
|
|
* so we silently do not allocate more.
|
|
*
|
|
* Note : do not request upsizing of compressed files
|
|
* unless being able to face the consequences !
|
|
*/
|
|
if (compressed && newsize && (newsize > na->data_size))
|
|
fullsize = (na->initialized_size
|
|
| (na->compression_block_size - 1)) + 1;
|
|
else
|
|
fullsize = newsize;
|
|
if (fullsize > na->data_size)
|
|
ret = ntfs_non_resident_attr_expand(na, fullsize);
|
|
else
|
|
ret = ntfs_non_resident_attr_shrink(na, fullsize);
|
|
} else
|
|
ret = ntfs_resident_attr_resize(na, newsize);
|
|
out:
|
|
ntfs_log_leave("Return status %d\n", ret);
|
|
return ret;
|
|
}
|
|
|
|
/*
|
|
* Stuff a hole in a compressed file
|
|
*
|
|
* An unallocated hole must be aligned on compression block size.
|
|
* If needed current block and target block are stuffed with zeroes.
|
|
*
|
|
* Returns 0 if succeeded,
|
|
* -1 if it failed (as explained in errno)
|
|
*/
|
|
|
|
static int stuff_hole(ntfs_attr *na, const s64 pos)
|
|
{
|
|
s64 size;
|
|
s64 begin_size;
|
|
s64 end_size;
|
|
char *buf;
|
|
int ret;
|
|
|
|
ret = 0;
|
|
/*
|
|
* If the attribute is resident, the compression block size
|
|
* is not defined yet and we can make no decision.
|
|
* So we first try resizing to the target and if the
|
|
* attribute is still resident, we're done
|
|
*/
|
|
if (!NAttrNonResident(na)) {
|
|
ret = ntfs_resident_attr_resize(na, pos);
|
|
if (!ret && !NAttrNonResident(na))
|
|
na->initialized_size = na->data_size = pos;
|
|
}
|
|
if (!ret && NAttrNonResident(na)) {
|
|
/* does the hole span over several compression block ? */
|
|
if ((pos ^ na->initialized_size)
|
|
& ~(na->compression_block_size - 1)) {
|
|
begin_size = ((na->initialized_size - 1)
|
|
| (na->compression_block_size - 1))
|
|
+ 1 - na->initialized_size;
|
|
end_size = pos & (na->compression_block_size - 1);
|
|
size = (begin_size > end_size ? begin_size : end_size);
|
|
} else {
|
|
/* short stuffing in a single compression block */
|
|
begin_size = size = pos - na->initialized_size;
|
|
end_size = 0;
|
|
}
|
|
if (size)
|
|
buf = (char*)ntfs_malloc(size);
|
|
else
|
|
buf = (char*)NULL;
|
|
if (buf || !size) {
|
|
memset(buf,0,size);
|
|
/* stuff into current block */
|
|
if (begin_size
|
|
&& (ntfs_attr_pwrite(na,
|
|
na->initialized_size, begin_size, buf)
|
|
!= begin_size))
|
|
ret = -1;
|
|
/* create an unstuffed hole */
|
|
if (!ret
|
|
&& ((na->initialized_size + end_size) < pos)
|
|
&& ntfs_non_resident_attr_expand(na,
|
|
pos - end_size))
|
|
ret = -1;
|
|
else
|
|
na->initialized_size
|
|
= na->data_size = pos - end_size;
|
|
/* stuff into the target block */
|
|
if (!ret && end_size
|
|
&& (ntfs_attr_pwrite(na,
|
|
na->initialized_size, end_size, buf)
|
|
!= end_size))
|
|
ret = -1;
|
|
if (buf)
|
|
free(buf);
|
|
} else
|
|
ret = -1;
|
|
}
|
|
/* make absolutely sure we have reached the target */
|
|
if (!ret && (na->initialized_size != pos)) {
|
|
ntfs_log_error("Failed to stuff a compressed file"
|
|
"target %lld reached %lld\n",
|
|
(long long)pos, (long long)na->initialized_size);
|
|
errno = EIO;
|
|
ret = -1;
|
|
}
|
|
return (ret);
|
|
}
|
|
|
|
/**
|
|
* ntfs_attr_readall - read the entire data from an ntfs attribute
|
|
* @ni: open ntfs inode in which the ntfs attribute resides
|
|
* @type: attribute type
|
|
* @name: attribute name in little endian Unicode or AT_UNNAMED or NULL
|
|
* @name_len: length of attribute @name in Unicode characters (if @name given)
|
|
* @data_size: if non-NULL then store here the data size
|
|
*
|
|
* This function will read the entire content of an ntfs attribute.
|
|
* If @name is AT_UNNAMED then look specifically for an unnamed attribute.
|
|
* If @name is NULL then the attribute could be either named or not.
|
|
* In both those cases @name_len is not used at all.
|
|
*
|
|
* On success a buffer is allocated with the content of the attribute
|
|
* and which needs to be freed when it's not needed anymore. If the
|
|
* @data_size parameter is non-NULL then the data size is set there.
|
|
*
|
|
* On error NULL is returned with errno set to the error code.
|
|
*/
|
|
void *ntfs_attr_readall(ntfs_inode *ni, const ATTR_TYPES type,
|
|
ntfschar *name, u32 name_len, s64 *data_size)
|
|
{
|
|
ntfs_attr *na;
|
|
void *data, *ret = NULL;
|
|
s64 size;
|
|
|
|
ntfs_log_enter("Entering\n");
|
|
|
|
na = ntfs_attr_open(ni, type, name, name_len);
|
|
if (!na) {
|
|
ntfs_log_perror("ntfs_attr_open failed");
|
|
goto err_exit;
|
|
}
|
|
data = ntfs_malloc(na->data_size);
|
|
if (!data)
|
|
goto out;
|
|
|
|
size = ntfs_attr_pread(na, 0, na->data_size, data);
|
|
if (size != na->data_size) {
|
|
ntfs_log_perror("ntfs_attr_pread failed");
|
|
free(data);
|
|
goto out;
|
|
}
|
|
ret = data;
|
|
if (data_size)
|
|
*data_size = size;
|
|
out:
|
|
ntfs_attr_close(na);
|
|
err_exit:
|
|
ntfs_log_leave("\n");
|
|
return ret;
|
|
}
|
|
|
|
|
|
|
|
int ntfs_attr_exist(ntfs_inode *ni, const ATTR_TYPES type, ntfschar *name,
|
|
u32 name_len)
|
|
{
|
|
ntfs_attr_search_ctx *ctx;
|
|
int ret;
|
|
|
|
ntfs_log_trace("Entering\n");
|
|
|
|
ctx = ntfs_attr_get_search_ctx(ni, NULL);
|
|
if (!ctx)
|
|
return 0;
|
|
|
|
ret = ntfs_attr_lookup(type, name, name_len, CASE_SENSITIVE, 0, NULL, 0,
|
|
ctx);
|
|
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
|
|
return !ret;
|
|
}
|
|
|
|
int ntfs_attr_remove(ntfs_inode *ni, const ATTR_TYPES type, ntfschar *name,
|
|
u32 name_len)
|
|
{
|
|
ntfs_attr *na;
|
|
int ret;
|
|
|
|
ntfs_log_trace("Entering\n");
|
|
|
|
if (!ni) {
|
|
ntfs_log_error("%s: NULL inode pointer", __FUNCTION__);
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
na = ntfs_attr_open(ni, type, name, name_len);
|
|
if (!na) {
|
|
/* do not log removal of non-existent stream */
|
|
if (type != AT_DATA) {
|
|
ntfs_log_perror("Failed to open attribute 0x%02x of inode "
|
|
"0x%llx", type, (unsigned long long)ni->mft_no);
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
ret = ntfs_attr_rm(na);
|
|
if (ret)
|
|
ntfs_log_perror("Failed to remove attribute 0x%02x of inode "
|
|
"0x%llx", type, (unsigned long long)ni->mft_no);
|
|
ntfs_attr_close(na);
|
|
|
|
return ret;
|
|
}
|
|
|
|
/* Below macros are 32-bit ready. */
|
|
#define BCX(x) ((x) - (((x) >> 1) & 0x77777777) - \
|
|
(((x) >> 2) & 0x33333333) - \
|
|
(((x) >> 3) & 0x11111111))
|
|
#define BITCOUNT(x) (((BCX(x) + (BCX(x) >> 4)) & 0x0F0F0F0F) % 255)
|
|
|
|
static u8 *ntfs_init_lut256(void)
|
|
{
|
|
int i;
|
|
u8 *lut;
|
|
|
|
lut = ntfs_malloc(256);
|
|
if (lut)
|
|
for(i = 0; i < 256; i++)
|
|
*(lut + i) = 8 - BITCOUNT(i);
|
|
return lut;
|
|
}
|
|
|
|
s64 ntfs_attr_get_free_bits(ntfs_attr *na)
|
|
{
|
|
u8 *buf, *lut;
|
|
s64 br = 0;
|
|
s64 total = 0;
|
|
s64 nr_free = 0;
|
|
|
|
lut = ntfs_init_lut256();
|
|
if (!lut)
|
|
return -1;
|
|
|
|
buf = ntfs_malloc(65536);
|
|
if (!buf)
|
|
goto out;
|
|
|
|
while (1) {
|
|
u32 *p;
|
|
br = ntfs_attr_pread(na, total, 65536, buf);
|
|
if (br <= 0)
|
|
break;
|
|
total += br;
|
|
p = (u32 *)buf + br / 4 - 1;
|
|
for (; (u8 *)p >= buf; p--) {
|
|
nr_free += lut[ *p & 255] +
|
|
lut[(*p >> 8) & 255] +
|
|
lut[(*p >> 16) & 255] +
|
|
lut[(*p >> 24) ];
|
|
}
|
|
switch (br % 4) {
|
|
case 3: nr_free += lut[*(buf + br - 3)];
|
|
case 2: nr_free += lut[*(buf + br - 2)];
|
|
case 1: nr_free += lut[*(buf + br - 1)];
|
|
}
|
|
}
|
|
free(buf);
|
|
out:
|
|
free(lut);
|
|
if (!total || br < 0)
|
|
return -1;
|
|
return nr_free;
|
|
}
|