mirror of
https://github.com/wiidev/usbloadergx.git
synced 2024-09-08 08:33:19 +02:00
2302 lines
64 KiB
C
2302 lines
64 KiB
C
/**
|
|
* dir.c - Directory handling code. Originated from the Linux-NTFS project.
|
|
*
|
|
* Copyright (c) 2002-2005 Anton Altaparmakov
|
|
* Copyright (c) 2004-2005 Richard Russon
|
|
* Copyright (c) 2004-2008 Szabolcs Szakacsits
|
|
* Copyright (c) 2005-2007 Yura Pakhuchiy
|
|
* Copyright (c) 2008-2009 Jean-Pierre Andre
|
|
*
|
|
* 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_STDLIB_H
|
|
#include <stdlib.h>
|
|
#endif
|
|
#ifdef HAVE_ERRNO_H
|
|
#include <errno.h>
|
|
#endif
|
|
#ifdef HAVE_STRING_H
|
|
#include <string.h>
|
|
#endif
|
|
#ifdef HAVE_SYS_STAT_H
|
|
#include <sys/stat.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_SYS_SYSMACROS_H
|
|
#include <sys/sysmacros.h>
|
|
#endif
|
|
|
|
#include "types.h"
|
|
#include "debug.h"
|
|
#include "attrib.h"
|
|
#include "inode.h"
|
|
#include "dir.h"
|
|
#include "volume.h"
|
|
#include "mft.h"
|
|
#include "index.h"
|
|
#include "ntfstime.h"
|
|
#include "lcnalloc.h"
|
|
#include "logging.h"
|
|
#include "misc.h"
|
|
#include "security.h"
|
|
#include "reparse.h"
|
|
|
|
#ifdef HAVE_SETXATTR
|
|
#include <sys/xattr.h>
|
|
#endif
|
|
|
|
/*
|
|
* The little endian Unicode strings "$I30", "$SII", "$SDH", "$O"
|
|
* and "$Q" as global constants.
|
|
*/
|
|
ntfschar NTFS_INDEX_I30[5] = { const_cpu_to_le16('$'), const_cpu_to_le16('I'),
|
|
const_cpu_to_le16('3'), const_cpu_to_le16('0'),
|
|
const_cpu_to_le16('\0') };
|
|
ntfschar NTFS_INDEX_SII[5] = { const_cpu_to_le16('$'), const_cpu_to_le16('S'),
|
|
const_cpu_to_le16('I'), const_cpu_to_le16('I'),
|
|
const_cpu_to_le16('\0') };
|
|
ntfschar NTFS_INDEX_SDH[5] = { const_cpu_to_le16('$'), const_cpu_to_le16('S'),
|
|
const_cpu_to_le16('D'), const_cpu_to_le16('H'),
|
|
const_cpu_to_le16('\0') };
|
|
ntfschar NTFS_INDEX_O[3] = { const_cpu_to_le16('$'), const_cpu_to_le16('O'),
|
|
const_cpu_to_le16('\0') };
|
|
ntfschar NTFS_INDEX_Q[3] = { const_cpu_to_le16('$'), const_cpu_to_le16('Q'),
|
|
const_cpu_to_le16('\0') };
|
|
ntfschar NTFS_INDEX_R[3] = { const_cpu_to_le16('$'), const_cpu_to_le16('R'),
|
|
const_cpu_to_le16('\0') };
|
|
|
|
#if CACHE_INODE_SIZE
|
|
|
|
/*
|
|
* Pathname comparing for entering/fetching from cache
|
|
*/
|
|
|
|
static int inode_cache_compare(const struct CACHED_GENERIC *cached,
|
|
const struct CACHED_GENERIC *wanted)
|
|
{
|
|
return (!cached->variable
|
|
|| strcmp(cached->variable, wanted->variable));
|
|
}
|
|
|
|
/*
|
|
* Pathname comparing for invalidating entries in cache
|
|
*
|
|
* A partial path is compared in order to invalidate all paths
|
|
* related to a renamed directory
|
|
* inode numbers are also checked, as deleting a long name may
|
|
* imply deleting a short name and conversely
|
|
*/
|
|
|
|
static int inode_cache_inv_compare(const struct CACHED_GENERIC *cached,
|
|
const struct CACHED_GENERIC *wanted)
|
|
{
|
|
int len;
|
|
|
|
len = strlen(wanted->variable);
|
|
return (!cached->variable
|
|
|| ((((const struct CACHED_INODE*)wanted)->inum
|
|
!= MREF(((const struct CACHED_INODE*)cached)->inum))
|
|
&& (strncmp((const char*)cached->variable,
|
|
(const char*)wanted->variable,len)
|
|
|| ((((const char*)cached->variable)[len] != '\0')
|
|
&& (((const char*)cached->variable)[len] != '/')))));
|
|
}
|
|
|
|
#endif
|
|
|
|
/**
|
|
* ntfs_inode_lookup_by_name - find an inode in a directory given its name
|
|
* @dir_ni: ntfs inode of the directory in which to search for the name
|
|
* @uname: Unicode name for which to search in the directory
|
|
* @uname_len: length of the name @uname in Unicode characters
|
|
*
|
|
* Look for an inode with name @uname in the directory with inode @dir_ni.
|
|
* ntfs_inode_lookup_by_name() walks the contents of the directory looking for
|
|
* the Unicode name. If the name is found in the directory, the corresponding
|
|
* inode number (>= 0) is returned as a mft reference in cpu format, i.e. it
|
|
* is a 64-bit number containing the sequence number.
|
|
*
|
|
* On error, return -1 with errno set to the error code. If the inode is is not
|
|
* found errno is ENOENT.
|
|
*
|
|
* Note, @uname_len does not include the (optional) terminating NULL character.
|
|
*
|
|
* Note, we look for a case sensitive match first but we also look for a case
|
|
* insensitive match at the same time. If we find a case insensitive match, we
|
|
* save that for the case that we don't find an exact match, where we return
|
|
* the mft reference of the case insensitive match.
|
|
*
|
|
* If the volume is mounted with the case sensitive flag set, then we only
|
|
* allow exact matches.
|
|
*/
|
|
u64 ntfs_inode_lookup_by_name(ntfs_inode *dir_ni, const ntfschar *uname,
|
|
const int uname_len)
|
|
{
|
|
VCN vcn;
|
|
u64 mref = 0;
|
|
s64 br;
|
|
ntfs_volume *vol = dir_ni->vol;
|
|
ntfs_attr_search_ctx *ctx;
|
|
INDEX_ROOT *ir;
|
|
INDEX_ENTRY *ie;
|
|
INDEX_ALLOCATION *ia;
|
|
u8 *index_end;
|
|
ntfs_attr *ia_na;
|
|
int eo, rc;
|
|
u32 index_block_size, index_vcn_size;
|
|
u8 index_vcn_size_bits;
|
|
|
|
ntfs_log_trace("Entering\n");
|
|
|
|
if (!dir_ni || !dir_ni->mrec || !uname || uname_len <= 0) {
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
ctx = ntfs_attr_get_search_ctx(dir_ni, NULL);
|
|
if (!ctx)
|
|
return -1;
|
|
|
|
/* Find the index root attribute in the mft record. */
|
|
if (ntfs_attr_lookup(AT_INDEX_ROOT, NTFS_INDEX_I30, 4, CASE_SENSITIVE, 0, NULL,
|
|
0, ctx)) {
|
|
ntfs_log_perror("Index root attribute missing in directory inode "
|
|
"%lld", (unsigned long long)dir_ni->mft_no);
|
|
goto put_err_out;
|
|
}
|
|
/* Get to the index root value. */
|
|
ir = (INDEX_ROOT*)((u8*)ctx->attr +
|
|
le16_to_cpu(ctx->attr->value_offset));
|
|
index_block_size = le32_to_cpu(ir->index_block_size);
|
|
if (index_block_size < NTFS_BLOCK_SIZE ||
|
|
index_block_size & (index_block_size - 1)) {
|
|
ntfs_log_error("Index block size %u is invalid.\n",
|
|
(unsigned)index_block_size);
|
|
goto put_err_out;
|
|
}
|
|
index_end = (u8*)&ir->index + le32_to_cpu(ir->index.index_length);
|
|
/* The first index entry. */
|
|
ie = (INDEX_ENTRY*)((u8*)&ir->index +
|
|
le32_to_cpu(ir->index.entries_offset));
|
|
/*
|
|
* Loop until we exceed valid memory (corruption case) or until we
|
|
* reach the last entry.
|
|
*/
|
|
for (;; ie = (INDEX_ENTRY*)((u8*)ie + le16_to_cpu(ie->length))) {
|
|
/* Bounds checks. */
|
|
if ((u8*)ie < (u8*)ctx->mrec || (u8*)ie +
|
|
sizeof(INDEX_ENTRY_HEADER) > index_end ||
|
|
(u8*)ie + le16_to_cpu(ie->key_length) >
|
|
index_end) {
|
|
ntfs_log_error("Index entry out of bounds in inode %lld"
|
|
"\n", (unsigned long long)dir_ni->mft_no);
|
|
goto put_err_out;
|
|
}
|
|
/*
|
|
* The last entry cannot contain a name. It can however contain
|
|
* a pointer to a child node in the B+tree so we just break out.
|
|
*/
|
|
if (ie->ie_flags & INDEX_ENTRY_END)
|
|
break;
|
|
|
|
if (!le16_to_cpu(ie->length)) {
|
|
ntfs_log_error("Zero length index entry in inode %lld"
|
|
"\n", (unsigned long long)dir_ni->mft_no);
|
|
goto put_err_out;
|
|
}
|
|
/*
|
|
* Not a perfect match, need to do full blown collation so we
|
|
* know which way in the B+tree we have to go.
|
|
*/
|
|
rc = ntfs_names_collate(uname, uname_len,
|
|
(ntfschar*)&ie->key.file_name.file_name,
|
|
ie->key.file_name.file_name_length, 1,
|
|
IGNORE_CASE, vol->upcase, vol->upcase_len);
|
|
/*
|
|
* If uname collates before the name of the current entry, there
|
|
* is definitely no such name in this index but we might need to
|
|
* descend into the B+tree so we just break out of the loop.
|
|
*/
|
|
if (rc == -1)
|
|
break;
|
|
/* The names are not equal, continue the search. */
|
|
if (rc)
|
|
continue;
|
|
/*
|
|
* Names match with case insensitive comparison, now try the
|
|
* case sensitive comparison, which is required for proper
|
|
* collation.
|
|
*/
|
|
rc = ntfs_names_collate(uname, uname_len,
|
|
(ntfschar*)&ie->key.file_name.file_name,
|
|
ie->key.file_name.file_name_length, 1,
|
|
CASE_SENSITIVE, vol->upcase, vol->upcase_len);
|
|
if (rc == -1)
|
|
break;
|
|
if (rc)
|
|
continue;
|
|
/*
|
|
* Perfect match, this will never happen as the
|
|
* ntfs_are_names_equal() call will have gotten a match but we
|
|
* still treat it correctly.
|
|
*/
|
|
mref = le64_to_cpu(ie->indexed_file);
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return mref;
|
|
}
|
|
/*
|
|
* We have finished with this index without success. Check for the
|
|
* presence of a child node and if not present return error code
|
|
* ENOENT, unless we have got the mft reference of a matching name
|
|
* cached in mref in which case return mref.
|
|
*/
|
|
if (!(ie->ie_flags & INDEX_ENTRY_NODE)) {
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
if (mref)
|
|
return mref;
|
|
ntfs_log_debug("Entry not found.\n");
|
|
errno = ENOENT;
|
|
return -1;
|
|
} /* Child node present, descend into it. */
|
|
|
|
/* Open the index allocation attribute. */
|
|
ia_na = ntfs_attr_open(dir_ni, AT_INDEX_ALLOCATION, NTFS_INDEX_I30, 4);
|
|
if (!ia_na) {
|
|
ntfs_log_perror("Failed to open index allocation (inode %lld)",
|
|
(unsigned long long)dir_ni->mft_no);
|
|
goto put_err_out;
|
|
}
|
|
|
|
/* Allocate a buffer for the current index block. */
|
|
ia = ntfs_malloc(index_block_size);
|
|
if (!ia) {
|
|
ntfs_attr_close(ia_na);
|
|
goto put_err_out;
|
|
}
|
|
|
|
/* Determine the size of a vcn in the directory index. */
|
|
if (vol->cluster_size <= index_block_size) {
|
|
index_vcn_size = vol->cluster_size;
|
|
index_vcn_size_bits = vol->cluster_size_bits;
|
|
} else {
|
|
index_vcn_size = vol->sector_size;
|
|
index_vcn_size_bits = vol->sector_size_bits;
|
|
}
|
|
|
|
/* Get the starting vcn of the index_block holding the child node. */
|
|
vcn = sle64_to_cpup((u8*)ie + le16_to_cpu(ie->length) - 8);
|
|
|
|
descend_into_child_node:
|
|
|
|
/* Read the index block starting at vcn. */
|
|
br = ntfs_attr_mst_pread(ia_na, vcn << index_vcn_size_bits, 1,
|
|
index_block_size, ia);
|
|
if (br != 1) {
|
|
if (br != -1)
|
|
errno = EIO;
|
|
ntfs_log_perror("Failed to read vcn 0x%llx",
|
|
(unsigned long long)vcn);
|
|
goto close_err_out;
|
|
}
|
|
|
|
if (sle64_to_cpu(ia->index_block_vcn) != vcn) {
|
|
ntfs_log_error("Actual VCN (0x%llx) of index buffer is different "
|
|
"from expected VCN (0x%llx).\n",
|
|
(long long)sle64_to_cpu(ia->index_block_vcn),
|
|
(long long)vcn);
|
|
errno = EIO;
|
|
goto close_err_out;
|
|
}
|
|
if (le32_to_cpu(ia->index.allocated_size) + 0x18 != index_block_size) {
|
|
ntfs_log_error("Index buffer (VCN 0x%llx) of directory inode 0x%llx "
|
|
"has a size (%u) differing from the directory "
|
|
"specified size (%u).\n", (long long)vcn,
|
|
(unsigned long long)dir_ni->mft_no,
|
|
(unsigned) le32_to_cpu(ia->index.allocated_size) + 0x18,
|
|
(unsigned)index_block_size);
|
|
errno = EIO;
|
|
goto close_err_out;
|
|
}
|
|
index_end = (u8*)&ia->index + le32_to_cpu(ia->index.index_length);
|
|
if (index_end > (u8*)ia + index_block_size) {
|
|
ntfs_log_error("Size of index buffer (VCN 0x%llx) of directory inode "
|
|
"0x%llx exceeds maximum size.\n",
|
|
(long long)vcn, (unsigned long long)dir_ni->mft_no);
|
|
errno = EIO;
|
|
goto close_err_out;
|
|
}
|
|
|
|
/* The first index entry. */
|
|
ie = (INDEX_ENTRY*)((u8*)&ia->index +
|
|
le32_to_cpu(ia->index.entries_offset));
|
|
/*
|
|
* Iterate similar to above big loop but applied to index buffer, thus
|
|
* loop until we exceed valid memory (corruption case) or until we
|
|
* reach the last entry.
|
|
*/
|
|
for (;; ie = (INDEX_ENTRY*)((u8*)ie + le16_to_cpu(ie->length))) {
|
|
/* Bounds check. */
|
|
if ((u8*)ie < (u8*)ia || (u8*)ie +
|
|
sizeof(INDEX_ENTRY_HEADER) > index_end ||
|
|
(u8*)ie + le16_to_cpu(ie->key_length) >
|
|
index_end) {
|
|
ntfs_log_error("Index entry out of bounds in directory "
|
|
"inode %lld.\n",
|
|
(unsigned long long)dir_ni->mft_no);
|
|
errno = EIO;
|
|
goto close_err_out;
|
|
}
|
|
/*
|
|
* The last entry cannot contain a name. It can however contain
|
|
* a pointer to a child node in the B+tree so we just break out.
|
|
*/
|
|
if (ie->ie_flags & INDEX_ENTRY_END)
|
|
break;
|
|
|
|
if (!le16_to_cpu(ie->length)) {
|
|
errno = EIO;
|
|
ntfs_log_error("Zero length index entry in inode %lld"
|
|
"\n", (unsigned long long)dir_ni->mft_no);
|
|
goto close_err_out;
|
|
}
|
|
/*
|
|
* Not a perfect match, need to do full blown collation so we
|
|
* know which way in the B+tree we have to go.
|
|
*/
|
|
rc = ntfs_names_collate(uname, uname_len,
|
|
(ntfschar*)&ie->key.file_name.file_name,
|
|
ie->key.file_name.file_name_length, 1,
|
|
IGNORE_CASE, vol->upcase, vol->upcase_len);
|
|
/*
|
|
* If uname collates before the name of the current entry, there
|
|
* is definitely no such name in this index but we might need to
|
|
* descend into the B+tree so we just break out of the loop.
|
|
*/
|
|
if (rc == -1)
|
|
break;
|
|
/* The names are not equal, continue the search. */
|
|
if (rc)
|
|
continue;
|
|
/*
|
|
* Names match with case insensitive comparison, now try the
|
|
* case sensitive comparison, which is required for proper
|
|
* collation.
|
|
*/
|
|
rc = ntfs_names_collate(uname, uname_len,
|
|
(ntfschar*)&ie->key.file_name.file_name,
|
|
ie->key.file_name.file_name_length, 1,
|
|
CASE_SENSITIVE, vol->upcase, vol->upcase_len);
|
|
if (rc == -1)
|
|
break;
|
|
if (rc)
|
|
continue;
|
|
|
|
mref = le64_to_cpu(ie->indexed_file);
|
|
free(ia);
|
|
ntfs_attr_close(ia_na);
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return mref;
|
|
}
|
|
/*
|
|
* We have finished with this index buffer without success. Check for
|
|
* the presence of a child node.
|
|
*/
|
|
if (ie->ie_flags & INDEX_ENTRY_NODE) {
|
|
if ((ia->index.ih_flags & NODE_MASK) == LEAF_NODE) {
|
|
ntfs_log_error("Index entry with child node found in a leaf "
|
|
"node in directory inode %lld.\n",
|
|
(unsigned long long)dir_ni->mft_no);
|
|
errno = EIO;
|
|
goto close_err_out;
|
|
}
|
|
/* Child node present, descend into it. */
|
|
vcn = sle64_to_cpup((u8*)ie + le16_to_cpu(ie->length) - 8);
|
|
if (vcn >= 0)
|
|
goto descend_into_child_node;
|
|
ntfs_log_error("Negative child node vcn in directory inode "
|
|
"0x%llx.\n", (unsigned long long)dir_ni->mft_no);
|
|
errno = EIO;
|
|
goto close_err_out;
|
|
}
|
|
free(ia);
|
|
ntfs_attr_close(ia_na);
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
/*
|
|
* No child node present, return error code ENOENT, unless we have got
|
|
* the mft reference of a matching name cached in mref in which case
|
|
* return mref.
|
|
*/
|
|
if (mref)
|
|
return mref;
|
|
ntfs_log_debug("Entry not found.\n");
|
|
errno = ENOENT;
|
|
return -1;
|
|
put_err_out:
|
|
eo = EIO;
|
|
ntfs_log_debug("Corrupt directory. Aborting lookup.\n");
|
|
eo_put_err_out:
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
errno = eo;
|
|
return -1;
|
|
close_err_out:
|
|
eo = errno;
|
|
free(ia);
|
|
ntfs_attr_close(ia_na);
|
|
goto eo_put_err_out;
|
|
}
|
|
|
|
/**
|
|
* ntfs_pathname_to_inode - Find the inode which represents the given pathname
|
|
* @vol: An ntfs volume obtained from ntfs_mount
|
|
* @parent: A directory inode to begin the search (may be NULL)
|
|
* @pathname: Pathname to be located
|
|
*
|
|
* Take an ASCII pathname and find the inode that represents it. The function
|
|
* splits the path and then descends the directory tree. If @parent is NULL,
|
|
* then the root directory '.' will be used as the base for the search.
|
|
*
|
|
* Return: inode Success, the pathname was valid
|
|
* NULL Error, the pathname was invalid, or some other error occurred
|
|
*/
|
|
ntfs_inode *ntfs_pathname_to_inode(ntfs_volume *vol, ntfs_inode *parent,
|
|
const char *pathname)
|
|
{
|
|
u64 inum;
|
|
int len, err = 0;
|
|
char *p, *q;
|
|
ntfs_inode *ni;
|
|
ntfs_inode *result = NULL;
|
|
ntfschar *unicode = NULL;
|
|
char *ascii = NULL;
|
|
#if CACHE_INODE_SIZE
|
|
struct CACHED_INODE item;
|
|
struct CACHED_INODE *cached;
|
|
char *fullname;
|
|
#endif
|
|
|
|
if (!vol || !pathname) {
|
|
errno = EINVAL;
|
|
return NULL;
|
|
}
|
|
|
|
ntfs_log_trace("path: '%s'\n", pathname);
|
|
|
|
ascii = strdup(pathname);
|
|
if (!ascii) {
|
|
ntfs_log_error("Out of memory.\n");
|
|
err = ENOMEM;
|
|
goto out;
|
|
}
|
|
|
|
p = ascii;
|
|
/* Remove leading /'s. */
|
|
while (p && *p && *p == PATH_SEP)
|
|
p++;
|
|
#if CACHE_INODE_SIZE
|
|
fullname = p;
|
|
if (p[0] && (p[strlen(p)-1] == PATH_SEP))
|
|
ntfs_log_error("Unnormalized path %s\n",ascii);
|
|
#endif
|
|
if (parent) {
|
|
ni = parent;
|
|
} else {
|
|
#if CACHE_INODE_SIZE
|
|
/*
|
|
* fetch inode for full path from cache
|
|
*/
|
|
if (*fullname) {
|
|
item.pathname = fullname;
|
|
item.varsize = strlen(fullname) + 1;
|
|
cached = (struct CACHED_INODE*)ntfs_fetch_cache(
|
|
vol->xinode_cache, GENERIC(&item),
|
|
inode_cache_compare);
|
|
} else
|
|
cached = (struct CACHED_INODE*)NULL;
|
|
if (cached) {
|
|
/*
|
|
* return opened inode if found in cache
|
|
*/
|
|
inum = MREF(cached->inum);
|
|
ni = ntfs_inode_open(vol, inum);
|
|
if (!ni) {
|
|
ntfs_log_debug("Cannot open inode %llu: %s.\n",
|
|
(unsigned long long)inum, p);
|
|
err = EIO;
|
|
}
|
|
result = ni;
|
|
goto out;
|
|
}
|
|
#endif
|
|
ni = ntfs_inode_open(vol, FILE_root);
|
|
if (!ni) {
|
|
ntfs_log_debug("Couldn't open the inode of the root "
|
|
"directory.\n");
|
|
err = EIO;
|
|
result = (ntfs_inode*)NULL;
|
|
goto out;
|
|
}
|
|
}
|
|
|
|
while (p && *p) {
|
|
/* Find the end of the first token. */
|
|
q = strchr(p, PATH_SEP);
|
|
if (q != NULL) {
|
|
*q = '\0';
|
|
/* q++; JPA */
|
|
}
|
|
|
|
len = ntfs_mbstoucs(p, &unicode);
|
|
if (len < 0) {
|
|
ntfs_log_perror("Could not convert filename to Unicode:"
|
|
" '%s'", p);
|
|
err = errno;
|
|
goto close;
|
|
} else if (len > NTFS_MAX_NAME_LEN) {
|
|
err = ENAMETOOLONG;
|
|
goto close;
|
|
}
|
|
#if CACHE_INODE_SIZE
|
|
/*
|
|
* fetch inode for partial path from cache
|
|
* if not available, compute and store into cache
|
|
*/
|
|
if (parent)
|
|
inum = ntfs_inode_lookup_by_name(ni, unicode, len);
|
|
else {
|
|
item.pathname = fullname;
|
|
item.varsize = strlen(fullname) + 1;
|
|
cached = (struct CACHED_INODE*)ntfs_fetch_cache(
|
|
vol->xinode_cache, GENERIC(&item),
|
|
inode_cache_compare);
|
|
if (cached) {
|
|
inum = cached->inum;
|
|
} else {
|
|
inum = ntfs_inode_lookup_by_name(ni, unicode, len);
|
|
if (inum != (u64) -1) {
|
|
item.inum = inum;
|
|
ntfs_enter_cache(vol->xinode_cache,
|
|
GENERIC(&item),
|
|
inode_cache_compare);
|
|
}
|
|
}
|
|
}
|
|
#else
|
|
inum = ntfs_inode_lookup_by_name(ni, unicode, len);
|
|
#endif
|
|
if (inum == (u64) -1) {
|
|
ntfs_log_debug("Couldn't find name '%s' in pathname "
|
|
"'%s'.\n", p, pathname);
|
|
err = ENOENT;
|
|
goto close;
|
|
}
|
|
|
|
if (ni != parent)
|
|
if (ntfs_inode_close(ni)) {
|
|
err = errno;
|
|
goto out;
|
|
}
|
|
|
|
inum = MREF(inum);
|
|
ni = ntfs_inode_open(vol, inum);
|
|
if (!ni) {
|
|
ntfs_log_debug("Cannot open inode %llu: %s.\n",
|
|
(unsigned long long)inum, p);
|
|
err = EIO;
|
|
goto close;
|
|
}
|
|
|
|
free(unicode);
|
|
unicode = NULL;
|
|
|
|
if (q) *q++ = PATH_SEP; /* JPA */
|
|
p = q;
|
|
while (p && *p && *p == PATH_SEP)
|
|
p++;
|
|
}
|
|
|
|
result = ni;
|
|
ni = NULL;
|
|
close:
|
|
if (ni && (ni != parent))
|
|
if (ntfs_inode_close(ni) && !err)
|
|
err = errno;
|
|
out:
|
|
free(ascii);
|
|
free(unicode);
|
|
if (err)
|
|
errno = err;
|
|
return result;
|
|
}
|
|
|
|
/*
|
|
* The little endian Unicode string ".." for ntfs_readdir().
|
|
*/
|
|
static const ntfschar dotdot[3] = { const_cpu_to_le16('.'),
|
|
const_cpu_to_le16('.'),
|
|
const_cpu_to_le16('\0') };
|
|
|
|
/*
|
|
* union index_union -
|
|
* More helpers for ntfs_readdir().
|
|
*/
|
|
typedef union {
|
|
INDEX_ROOT *ir;
|
|
INDEX_ALLOCATION *ia;
|
|
} index_union __attribute__((__transparent_union__));
|
|
|
|
/**
|
|
* enum INDEX_TYPE -
|
|
* More helpers for ntfs_readdir().
|
|
*/
|
|
typedef enum {
|
|
INDEX_TYPE_ROOT, /* index root */
|
|
INDEX_TYPE_ALLOCATION, /* index allocation */
|
|
} INDEX_TYPE;
|
|
|
|
/**
|
|
* ntfs_filldir - ntfs specific filldir method
|
|
* @dir_ni: ntfs inode of current directory
|
|
* @pos: current position in directory
|
|
* @ivcn_bits: log(2) of index vcn size
|
|
* @index_type: specifies whether @iu is an index root or an index allocation
|
|
* @iu: index root or index block to which @ie belongs
|
|
* @ie: current index entry
|
|
* @dirent: context for filldir callback supplied by the caller
|
|
* @filldir: filldir callback supplied by the caller
|
|
*
|
|
* Pass information specifying the current directory entry @ie to the @filldir
|
|
* callback.
|
|
*/
|
|
static int ntfs_filldir(ntfs_inode *dir_ni, s64 *pos, u8 ivcn_bits,
|
|
const INDEX_TYPE index_type, index_union iu, INDEX_ENTRY *ie,
|
|
void *dirent, ntfs_filldir_t filldir)
|
|
{
|
|
FILE_NAME_ATTR *fn = &ie->key.file_name;
|
|
unsigned dt_type;
|
|
|
|
ntfs_log_trace("Entering.\n");
|
|
|
|
/* Advance the position even if going to skip the entry. */
|
|
if (index_type == INDEX_TYPE_ALLOCATION)
|
|
*pos = (u8*)ie - (u8*)iu.ia + (sle64_to_cpu(
|
|
iu.ia->index_block_vcn) << ivcn_bits) +
|
|
dir_ni->vol->mft_record_size;
|
|
else /* if (index_type == INDEX_TYPE_ROOT) */
|
|
*pos = (u8*)ie - (u8*)iu.ir;
|
|
/* Skip root directory self reference entry. */
|
|
if (MREF_LE(ie->indexed_file) == FILE_root)
|
|
return 0;
|
|
if (ie->key.file_name.file_attributes & FILE_ATTR_I30_INDEX_PRESENT)
|
|
dt_type = NTFS_DT_DIR;
|
|
else if (fn->file_attributes & FILE_ATTR_SYSTEM)
|
|
dt_type = NTFS_DT_UNKNOWN;
|
|
else
|
|
dt_type = NTFS_DT_REG;
|
|
return filldir(dirent, fn->file_name, fn->file_name_length,
|
|
fn->file_name_type, *pos,
|
|
le64_to_cpu(ie->indexed_file), dt_type);
|
|
}
|
|
|
|
/**
|
|
* ntfs_mft_get_parent_ref - find mft reference of parent directory of an inode
|
|
* @ni: ntfs inode whose parent directory to find
|
|
*
|
|
* Find the parent directory of the ntfs inode @ni. To do this, find the first
|
|
* file name attribute in the mft record of @ni and return the parent mft
|
|
* reference from that.
|
|
*
|
|
* Note this only makes sense for directories, since files can be hard linked
|
|
* from multiple directories and there is no way for us to tell which one is
|
|
* being looked for.
|
|
*
|
|
* Technically directories can have hard links, too, but we consider that as
|
|
* illegal as Linux/UNIX do not support directory hard links.
|
|
*
|
|
* Return the mft reference of the parent directory on success or -1 on error
|
|
* with errno set to the error code.
|
|
*/
|
|
static MFT_REF ntfs_mft_get_parent_ref(ntfs_inode *ni)
|
|
{
|
|
MFT_REF mref;
|
|
ntfs_attr_search_ctx *ctx;
|
|
FILE_NAME_ATTR *fn;
|
|
int eo;
|
|
|
|
ntfs_log_trace("Entering.\n");
|
|
|
|
if (!ni) {
|
|
errno = EINVAL;
|
|
return ERR_MREF(-1);
|
|
}
|
|
|
|
ctx = ntfs_attr_get_search_ctx(ni, NULL);
|
|
if (!ctx)
|
|
return ERR_MREF(-1);
|
|
if (ntfs_attr_lookup(AT_FILE_NAME, AT_UNNAMED, 0, 0, 0, NULL, 0, ctx)) {
|
|
ntfs_log_error("No file name found in inode %lld\n",
|
|
(unsigned long long)ni->mft_no);
|
|
goto err_out;
|
|
}
|
|
if (ctx->attr->non_resident) {
|
|
ntfs_log_error("File name attribute must be resident (inode "
|
|
"%lld)\n", (unsigned long long)ni->mft_no);
|
|
goto io_err_out;
|
|
}
|
|
fn = (FILE_NAME_ATTR*)((u8*)ctx->attr +
|
|
le16_to_cpu(ctx->attr->value_offset));
|
|
if ((u8*)fn + le32_to_cpu(ctx->attr->value_length) >
|
|
(u8*)ctx->attr + le32_to_cpu(ctx->attr->length)) {
|
|
ntfs_log_error("Corrupt file name attribute in inode %lld.\n",
|
|
(unsigned long long)ni->mft_no);
|
|
goto io_err_out;
|
|
}
|
|
mref = le64_to_cpu(fn->parent_directory);
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return mref;
|
|
io_err_out:
|
|
errno = EIO;
|
|
err_out:
|
|
eo = errno;
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
errno = eo;
|
|
return ERR_MREF(-1);
|
|
}
|
|
|
|
/**
|
|
* ntfs_readdir - read the contents of an ntfs directory
|
|
* @dir_ni: ntfs inode of current directory
|
|
* @pos: current position in directory
|
|
* @dirent: context for filldir callback supplied by the caller
|
|
* @filldir: filldir callback supplied by the caller
|
|
*
|
|
* Parse the index root and the index blocks that are marked in use in the
|
|
* index bitmap and hand each found directory entry to the @filldir callback
|
|
* supplied by the caller.
|
|
*
|
|
* Return 0 on success or -1 on error with errno set to the error code.
|
|
*
|
|
* Note: Index blocks are parsed in ascending vcn order, from which follows
|
|
* that the directory entries are not returned sorted.
|
|
*/
|
|
int ntfs_readdir(ntfs_inode *dir_ni, s64 *pos,
|
|
void *dirent, ntfs_filldir_t filldir)
|
|
{
|
|
s64 i_size, br, ia_pos, bmp_pos, ia_start;
|
|
ntfs_volume *vol;
|
|
ntfs_attr *ia_na, *bmp_na = NULL;
|
|
ntfs_attr_search_ctx *ctx = NULL;
|
|
u8 *index_end, *bmp = NULL;
|
|
INDEX_ROOT *ir;
|
|
INDEX_ENTRY *ie;
|
|
INDEX_ALLOCATION *ia = NULL;
|
|
int rc, ir_pos, bmp_buf_size, bmp_buf_pos, eo;
|
|
u32 index_block_size, index_vcn_size;
|
|
u8 index_block_size_bits, index_vcn_size_bits;
|
|
|
|
ntfs_log_trace("Entering.\n");
|
|
|
|
if (!dir_ni || !pos || !filldir) {
|
|
errno = EINVAL;
|
|
return -1;
|
|
}
|
|
|
|
if (!(dir_ni->mrec->flags & MFT_RECORD_IS_DIRECTORY)) {
|
|
errno = ENOTDIR;
|
|
return -1;
|
|
}
|
|
|
|
vol = dir_ni->vol;
|
|
|
|
ntfs_log_trace("Entering for inode %lld, *pos 0x%llx.\n",
|
|
(unsigned long long)dir_ni->mft_no, (long long)*pos);
|
|
|
|
/* Open the index allocation attribute. */
|
|
ia_na = ntfs_attr_open(dir_ni, AT_INDEX_ALLOCATION, NTFS_INDEX_I30, 4);
|
|
if (!ia_na) {
|
|
if (errno != ENOENT) {
|
|
ntfs_log_perror("Failed to open index allocation attribute. "
|
|
"Directory inode %lld is corrupt or bug",
|
|
(unsigned long long)dir_ni->mft_no);
|
|
return -1;
|
|
}
|
|
i_size = 0;
|
|
} else
|
|
i_size = ia_na->data_size;
|
|
|
|
rc = 0;
|
|
|
|
/* Are we at end of dir yet? */
|
|
if (*pos >= i_size + vol->mft_record_size)
|
|
goto done;
|
|
|
|
/* Emulate . and .. for all directories. */
|
|
if (!*pos) {
|
|
rc = filldir(dirent, dotdot, 1, FILE_NAME_POSIX, *pos,
|
|
MK_MREF(dir_ni->mft_no,
|
|
le16_to_cpu(dir_ni->mrec->sequence_number)),
|
|
NTFS_DT_DIR);
|
|
if (rc)
|
|
goto err_out;
|
|
++*pos;
|
|
}
|
|
if (*pos == 1) {
|
|
MFT_REF parent_mref;
|
|
|
|
parent_mref = ntfs_mft_get_parent_ref(dir_ni);
|
|
if (parent_mref == ERR_MREF(-1)) {
|
|
ntfs_log_perror("Parent directory not found");
|
|
goto dir_err_out;
|
|
}
|
|
|
|
rc = filldir(dirent, dotdot, 2, FILE_NAME_POSIX, *pos,
|
|
parent_mref, NTFS_DT_DIR);
|
|
if (rc)
|
|
goto err_out;
|
|
++*pos;
|
|
}
|
|
|
|
ctx = ntfs_attr_get_search_ctx(dir_ni, NULL);
|
|
if (!ctx)
|
|
goto err_out;
|
|
|
|
/* Get the offset into the index root attribute. */
|
|
ir_pos = (int)*pos;
|
|
/* Find the index root attribute in the mft record. */
|
|
if (ntfs_attr_lookup(AT_INDEX_ROOT, NTFS_INDEX_I30, 4, CASE_SENSITIVE, 0, NULL,
|
|
0, ctx)) {
|
|
ntfs_log_perror("Index root attribute missing in directory inode "
|
|
"%lld", (unsigned long long)dir_ni->mft_no);
|
|
goto dir_err_out;
|
|
}
|
|
/* Get to the index root value. */
|
|
ir = (INDEX_ROOT*)((u8*)ctx->attr +
|
|
le16_to_cpu(ctx->attr->value_offset));
|
|
|
|
/* Determine the size of a vcn in the directory index. */
|
|
index_block_size = le32_to_cpu(ir->index_block_size);
|
|
if (index_block_size < NTFS_BLOCK_SIZE ||
|
|
index_block_size & (index_block_size - 1)) {
|
|
ntfs_log_error("Index block size %u is invalid.\n",
|
|
(unsigned)index_block_size);
|
|
goto dir_err_out;
|
|
}
|
|
index_block_size_bits = ffs(index_block_size) - 1;
|
|
if (vol->cluster_size <= index_block_size) {
|
|
index_vcn_size = vol->cluster_size;
|
|
index_vcn_size_bits = vol->cluster_size_bits;
|
|
} else {
|
|
index_vcn_size = vol->sector_size;
|
|
index_vcn_size_bits = vol->sector_size_bits;
|
|
}
|
|
|
|
/* Are we jumping straight into the index allocation attribute? */
|
|
if (*pos >= vol->mft_record_size) {
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
ctx = NULL;
|
|
goto skip_index_root;
|
|
}
|
|
|
|
index_end = (u8*)&ir->index + le32_to_cpu(ir->index.index_length);
|
|
/* The first index entry. */
|
|
ie = (INDEX_ENTRY*)((u8*)&ir->index +
|
|
le32_to_cpu(ir->index.entries_offset));
|
|
/*
|
|
* Loop until we exceed valid memory (corruption case) or until we
|
|
* reach the last entry or until filldir tells us it has had enough
|
|
* or signals an error (both covered by the rc test).
|
|
*/
|
|
for (;; ie = (INDEX_ENTRY*)((u8*)ie + le16_to_cpu(ie->length))) {
|
|
ntfs_log_debug("In index root, offset %d.\n", (int)((u8*)ie - (u8*)ir));
|
|
/* Bounds checks. */
|
|
if ((u8*)ie < (u8*)ctx->mrec || (u8*)ie +
|
|
sizeof(INDEX_ENTRY_HEADER) > index_end ||
|
|
(u8*)ie + le16_to_cpu(ie->key_length) >
|
|
index_end)
|
|
goto dir_err_out;
|
|
/* The last entry cannot contain a name. */
|
|
if (ie->ie_flags & INDEX_ENTRY_END)
|
|
break;
|
|
|
|
if (!le16_to_cpu(ie->length))
|
|
goto dir_err_out;
|
|
|
|
/* Skip index root entry if continuing previous readdir. */
|
|
if (ir_pos > (u8*)ie - (u8*)ir)
|
|
continue;
|
|
/*
|
|
* Submit the directory entry to ntfs_filldir(), which will
|
|
* invoke the filldir() callback as appropriate.
|
|
*/
|
|
rc = ntfs_filldir(dir_ni, pos, index_vcn_size_bits,
|
|
INDEX_TYPE_ROOT, ir, ie, dirent, filldir);
|
|
if (rc) {
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
ctx = NULL;
|
|
goto err_out;
|
|
}
|
|
}
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
ctx = NULL;
|
|
|
|
/* If there is no index allocation attribute we are finished. */
|
|
if (!ia_na)
|
|
goto EOD;
|
|
|
|
/* Advance *pos to the beginning of the index allocation. */
|
|
*pos = vol->mft_record_size;
|
|
|
|
skip_index_root:
|
|
|
|
if (!ia_na)
|
|
goto done;
|
|
|
|
/* Allocate a buffer for the current index block. */
|
|
ia = ntfs_malloc(index_block_size);
|
|
if (!ia)
|
|
goto err_out;
|
|
|
|
bmp_na = ntfs_attr_open(dir_ni, AT_BITMAP, NTFS_INDEX_I30, 4);
|
|
if (!bmp_na) {
|
|
ntfs_log_perror("Failed to open index bitmap attribute");
|
|
goto dir_err_out;
|
|
}
|
|
|
|
/* Get the offset into the index allocation attribute. */
|
|
ia_pos = *pos - vol->mft_record_size;
|
|
|
|
bmp_pos = ia_pos >> index_block_size_bits;
|
|
if (bmp_pos >> 3 >= bmp_na->data_size) {
|
|
ntfs_log_error("Current index position exceeds index bitmap "
|
|
"size.\n");
|
|
goto dir_err_out;
|
|
}
|
|
|
|
bmp_buf_size = min(bmp_na->data_size - (bmp_pos >> 3), 4096);
|
|
bmp = ntfs_malloc(bmp_buf_size);
|
|
if (!bmp)
|
|
goto err_out;
|
|
|
|
br = ntfs_attr_pread(bmp_na, bmp_pos >> 3, bmp_buf_size, bmp);
|
|
if (br != bmp_buf_size) {
|
|
if (br != -1)
|
|
errno = EIO;
|
|
ntfs_log_perror("Failed to read from index bitmap attribute");
|
|
goto err_out;
|
|
}
|
|
|
|
bmp_buf_pos = 0;
|
|
/* If the index block is not in use find the next one that is. */
|
|
while (!(bmp[bmp_buf_pos >> 3] & (1 << (bmp_buf_pos & 7)))) {
|
|
find_next_index_buffer:
|
|
bmp_pos++;
|
|
bmp_buf_pos++;
|
|
/* If we have reached the end of the bitmap, we are done. */
|
|
if (bmp_pos >> 3 >= bmp_na->data_size)
|
|
goto EOD;
|
|
ia_pos = bmp_pos << index_block_size_bits;
|
|
if (bmp_buf_pos >> 3 < bmp_buf_size)
|
|
continue;
|
|
/* Read next chunk from the index bitmap. */
|
|
bmp_buf_pos = 0;
|
|
if ((bmp_pos >> 3) + bmp_buf_size > bmp_na->data_size)
|
|
bmp_buf_size = bmp_na->data_size - (bmp_pos >> 3);
|
|
br = ntfs_attr_pread(bmp_na, bmp_pos >> 3, bmp_buf_size, bmp);
|
|
if (br != bmp_buf_size) {
|
|
if (br != -1)
|
|
errno = EIO;
|
|
ntfs_log_perror("Failed to read from index bitmap attribute");
|
|
goto err_out;
|
|
}
|
|
}
|
|
|
|
ntfs_log_debug("Handling index block 0x%llx.\n", (long long)bmp_pos);
|
|
|
|
/* Read the index block starting at bmp_pos. */
|
|
br = ntfs_attr_mst_pread(ia_na, bmp_pos << index_block_size_bits, 1,
|
|
index_block_size, ia);
|
|
if (br != 1) {
|
|
if (br != -1)
|
|
errno = EIO;
|
|
ntfs_log_perror("Failed to read index block");
|
|
goto err_out;
|
|
}
|
|
|
|
ia_start = ia_pos & ~(s64)(index_block_size - 1);
|
|
if (sle64_to_cpu(ia->index_block_vcn) != ia_start >>
|
|
index_vcn_size_bits) {
|
|
ntfs_log_error("Actual VCN (0x%llx) of index buffer is different "
|
|
"from expected VCN (0x%llx) in inode 0x%llx.\n",
|
|
(long long)sle64_to_cpu(ia->index_block_vcn),
|
|
(long long)ia_start >> index_vcn_size_bits,
|
|
(unsigned long long)dir_ni->mft_no);
|
|
goto dir_err_out;
|
|
}
|
|
if (le32_to_cpu(ia->index.allocated_size) + 0x18 != index_block_size) {
|
|
ntfs_log_error("Index buffer (VCN 0x%llx) of directory inode %lld "
|
|
"has a size (%u) differing from the directory "
|
|
"specified size (%u).\n", (long long)ia_start >>
|
|
index_vcn_size_bits,
|
|
(unsigned long long)dir_ni->mft_no,
|
|
(unsigned) le32_to_cpu(ia->index.allocated_size)
|
|
+ 0x18, (unsigned)index_block_size);
|
|
goto dir_err_out;
|
|
}
|
|
index_end = (u8*)&ia->index + le32_to_cpu(ia->index.index_length);
|
|
if (index_end > (u8*)ia + index_block_size) {
|
|
ntfs_log_error("Size of index buffer (VCN 0x%llx) of directory inode "
|
|
"%lld exceeds maximum size.\n",
|
|
(long long)ia_start >> index_vcn_size_bits,
|
|
(unsigned long long)dir_ni->mft_no);
|
|
goto dir_err_out;
|
|
}
|
|
/* The first index entry. */
|
|
ie = (INDEX_ENTRY*)((u8*)&ia->index +
|
|
le32_to_cpu(ia->index.entries_offset));
|
|
/*
|
|
* Loop until we exceed valid memory (corruption case) or until we
|
|
* reach the last entry or until ntfs_filldir tells us it has had
|
|
* enough or signals an error (both covered by the rc test).
|
|
*/
|
|
for (;; ie = (INDEX_ENTRY*)((u8*)ie + le16_to_cpu(ie->length))) {
|
|
ntfs_log_debug("In index allocation, offset 0x%llx.\n",
|
|
(long long)ia_start + ((u8*)ie - (u8*)ia));
|
|
/* Bounds checks. */
|
|
if ((u8*)ie < (u8*)ia || (u8*)ie +
|
|
sizeof(INDEX_ENTRY_HEADER) > index_end ||
|
|
(u8*)ie + le16_to_cpu(ie->key_length) >
|
|
index_end) {
|
|
ntfs_log_error("Index entry out of bounds in directory inode "
|
|
"%lld.\n", (unsigned long long)dir_ni->mft_no);
|
|
goto dir_err_out;
|
|
}
|
|
/* The last entry cannot contain a name. */
|
|
if (ie->ie_flags & INDEX_ENTRY_END)
|
|
break;
|
|
|
|
if (!le16_to_cpu(ie->length))
|
|
goto dir_err_out;
|
|
|
|
/* Skip index entry if continuing previous readdir. */
|
|
if (ia_pos - ia_start > (u8*)ie - (u8*)ia)
|
|
continue;
|
|
/*
|
|
* Submit the directory entry to ntfs_filldir(), which will
|
|
* invoke the filldir() callback as appropriate.
|
|
*/
|
|
rc = ntfs_filldir(dir_ni, pos, index_vcn_size_bits,
|
|
INDEX_TYPE_ALLOCATION, ia, ie, dirent, filldir);
|
|
if (rc)
|
|
goto err_out;
|
|
}
|
|
goto find_next_index_buffer;
|
|
EOD:
|
|
/* We are finished, set *pos to EOD. */
|
|
*pos = i_size + vol->mft_record_size;
|
|
done:
|
|
free(ia);
|
|
free(bmp);
|
|
if (bmp_na)
|
|
ntfs_attr_close(bmp_na);
|
|
if (ia_na)
|
|
ntfs_attr_close(ia_na);
|
|
ntfs_log_debug("EOD, *pos 0x%llx, returning 0.\n", (long long)*pos);
|
|
return 0;
|
|
dir_err_out:
|
|
errno = EIO;
|
|
err_out:
|
|
eo = errno;
|
|
ntfs_log_trace("failed.\n");
|
|
if (ctx)
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
free(ia);
|
|
free(bmp);
|
|
if (bmp_na)
|
|
ntfs_attr_close(bmp_na);
|
|
if (ia_na)
|
|
ntfs_attr_close(ia_na);
|
|
errno = eo;
|
|
return -1;
|
|
}
|
|
|
|
|
|
/**
|
|
* __ntfs_create - create object on ntfs volume
|
|
* @dir_ni: ntfs inode for directory in which create new object
|
|
* @securid: id of inheritable security descriptor, 0 if none
|
|
* @name: unicode name of new object
|
|
* @name_len: length of the name in unicode characters
|
|
* @type: type of the object to create
|
|
* @dev: major and minor device numbers (obtained from makedev())
|
|
* @target: target in unicode (only for symlinks)
|
|
* @target_len: length of target in unicode characters
|
|
*
|
|
* Internal, use ntfs_create{,_device,_symlink} wrappers instead.
|
|
*
|
|
* @type can be:
|
|
* S_IFREG to create regular file
|
|
* S_IFDIR to create directory
|
|
* S_IFBLK to create block device
|
|
* S_IFCHR to create character device
|
|
* S_IFLNK to create symbolic link
|
|
* S_IFIFO to create FIFO
|
|
* S_IFSOCK to create socket
|
|
* other values are invalid.
|
|
*
|
|
* @dev is used only if @type is S_IFBLK or S_IFCHR, in other cases its value
|
|
* ignored.
|
|
*
|
|
* @target and @target_len are used only if @type is S_IFLNK, in other cases
|
|
* their value ignored.
|
|
*
|
|
* Return opened ntfs inode that describes created object on success or NULL
|
|
* on error with errno set to the error code.
|
|
*/
|
|
static ntfs_inode *__ntfs_create(ntfs_inode *dir_ni, le32 securid,
|
|
ntfschar *name, u8 name_len, mode_t type, dev_t dev,
|
|
ntfschar *target, int target_len)
|
|
{
|
|
ntfs_inode *ni;
|
|
int rollback_data = 0, rollback_sd = 0;
|
|
FILE_NAME_ATTR *fn = NULL;
|
|
STANDARD_INFORMATION *si = NULL;
|
|
int err, fn_len, si_len;
|
|
|
|
ntfs_log_trace("Entering.\n");
|
|
|
|
/* Sanity checks. */
|
|
if (!dir_ni || !name || !name_len) {
|
|
ntfs_log_error("Invalid arguments.\n");
|
|
errno = EINVAL;
|
|
return NULL;
|
|
}
|
|
|
|
if (dir_ni->flags & FILE_ATTR_REPARSE_POINT) {
|
|
errno = EOPNOTSUPP;
|
|
return NULL;
|
|
}
|
|
|
|
ni = ntfs_mft_record_alloc(dir_ni->vol, NULL);
|
|
if (!ni)
|
|
return NULL;
|
|
/*
|
|
* Create STANDARD_INFORMATION attribute.
|
|
* JPA Depending on available inherited security descriptor,
|
|
* Write STANDARD_INFORMATION v1.2 (no inheritance) or v3
|
|
*/
|
|
if (securid)
|
|
si_len = sizeof(STANDARD_INFORMATION);
|
|
else
|
|
si_len = offsetof(STANDARD_INFORMATION, v1_end);
|
|
si = ntfs_calloc(si_len);
|
|
if (!si) {
|
|
err = errno;
|
|
goto err_out;
|
|
}
|
|
si->creation_time = utc2ntfs(ni->creation_time);
|
|
si->last_data_change_time = utc2ntfs(ni->last_data_change_time);
|
|
si->last_mft_change_time = utc2ntfs(ni->last_mft_change_time);
|
|
si->last_access_time = utc2ntfs(ni->last_access_time);
|
|
if (securid) {
|
|
set_nino_flag(ni, v3_Extensions);
|
|
ni->owner_id = si->owner_id = 0;
|
|
ni->security_id = si->security_id = securid;
|
|
ni->quota_charged = si->quota_charged = const_cpu_to_le64(0);
|
|
ni->usn = si->usn = const_cpu_to_le64(0);
|
|
} else
|
|
clear_nino_flag(ni, v3_Extensions);
|
|
if (!S_ISREG(type) && !S_ISDIR(type)) {
|
|
si->file_attributes = FILE_ATTR_SYSTEM;
|
|
ni->flags = FILE_ATTR_SYSTEM;
|
|
}
|
|
if ((dir_ni->flags & FILE_ATTR_COMPRESSED)
|
|
&& (S_ISREG(type) || S_ISDIR(type)))
|
|
ni->flags |= FILE_ATTR_COMPRESSED;
|
|
/* Add STANDARD_INFORMATION to inode. */
|
|
if (ntfs_attr_add(ni, AT_STANDARD_INFORMATION, AT_UNNAMED, 0,
|
|
(u8*)si, si_len)) {
|
|
err = errno;
|
|
ntfs_log_error("Failed to add STANDARD_INFORMATION "
|
|
"attribute.\n");
|
|
goto err_out;
|
|
}
|
|
|
|
if (!securid) {
|
|
if (ntfs_sd_add_everyone(ni)) {
|
|
err = errno;
|
|
goto err_out;
|
|
}
|
|
}
|
|
rollback_sd = 1;
|
|
|
|
if (S_ISDIR(type)) {
|
|
INDEX_ROOT *ir = NULL;
|
|
INDEX_ENTRY *ie;
|
|
int ir_len, index_len;
|
|
|
|
/* Create INDEX_ROOT attribute. */
|
|
index_len = sizeof(INDEX_HEADER) + sizeof(INDEX_ENTRY_HEADER);
|
|
ir_len = offsetof(INDEX_ROOT, index) + index_len;
|
|
ir = ntfs_calloc(ir_len);
|
|
if (!ir) {
|
|
err = errno;
|
|
goto err_out;
|
|
}
|
|
ir->type = AT_FILE_NAME;
|
|
ir->collation_rule = COLLATION_FILE_NAME;
|
|
ir->index_block_size = cpu_to_le32(ni->vol->indx_record_size);
|
|
if (ni->vol->cluster_size <= ni->vol->indx_record_size)
|
|
ir->clusters_per_index_block =
|
|
ni->vol->indx_record_size >>
|
|
ni->vol->cluster_size_bits;
|
|
else
|
|
ir->clusters_per_index_block =
|
|
ni->vol->indx_record_size >>
|
|
ni->vol->sector_size_bits;
|
|
ir->index.entries_offset = cpu_to_le32(sizeof(INDEX_HEADER));
|
|
ir->index.index_length = cpu_to_le32(index_len);
|
|
ir->index.allocated_size = cpu_to_le32(index_len);
|
|
ie = (INDEX_ENTRY*)((u8*)ir + sizeof(INDEX_ROOT));
|
|
ie->length = cpu_to_le16(sizeof(INDEX_ENTRY_HEADER));
|
|
ie->key_length = 0;
|
|
ie->ie_flags = INDEX_ENTRY_END;
|
|
/* Add INDEX_ROOT attribute to inode. */
|
|
if (ntfs_attr_add(ni, AT_INDEX_ROOT, NTFS_INDEX_I30, 4,
|
|
(u8*)ir, ir_len)) {
|
|
err = errno;
|
|
free(ir);
|
|
ntfs_log_error("Failed to add INDEX_ROOT attribute.\n");
|
|
goto err_out;
|
|
}
|
|
free(ir);
|
|
} else {
|
|
INTX_FILE *data;
|
|
int data_len;
|
|
|
|
switch (type) {
|
|
case S_IFBLK:
|
|
case S_IFCHR:
|
|
data_len = offsetof(INTX_FILE, device_end);
|
|
data = ntfs_malloc(data_len);
|
|
if (!data) {
|
|
err = errno;
|
|
goto err_out;
|
|
}
|
|
data->major = cpu_to_le64(major(dev));
|
|
data->minor = cpu_to_le64(minor(dev));
|
|
if (type == S_IFBLK)
|
|
data->magic = INTX_BLOCK_DEVICE;
|
|
if (type == S_IFCHR)
|
|
data->magic = INTX_CHARACTER_DEVICE;
|
|
break;
|
|
case S_IFLNK:
|
|
data_len = sizeof(INTX_FILE_TYPES) +
|
|
target_len * sizeof(ntfschar);
|
|
data = ntfs_malloc(data_len);
|
|
if (!data) {
|
|
err = errno;
|
|
goto err_out;
|
|
}
|
|
data->magic = INTX_SYMBOLIC_LINK;
|
|
memcpy(data->target, target,
|
|
target_len * sizeof(ntfschar));
|
|
break;
|
|
case S_IFSOCK:
|
|
data = NULL;
|
|
data_len = 1;
|
|
break;
|
|
default: /* FIFO or regular file. */
|
|
data = NULL;
|
|
data_len = 0;
|
|
break;
|
|
}
|
|
/* Add DATA attribute to inode. */
|
|
if (ntfs_attr_add(ni, AT_DATA, AT_UNNAMED, 0, (u8*)data,
|
|
data_len)) {
|
|
err = errno;
|
|
ntfs_log_error("Failed to add DATA attribute.\n");
|
|
free(data);
|
|
goto err_out;
|
|
}
|
|
rollback_data = 1;
|
|
free(data);
|
|
}
|
|
/* Create FILE_NAME attribute. */
|
|
fn_len = sizeof(FILE_NAME_ATTR) + name_len * sizeof(ntfschar);
|
|
fn = ntfs_calloc(fn_len);
|
|
if (!fn) {
|
|
err = errno;
|
|
goto err_out;
|
|
}
|
|
fn->parent_directory = MK_LE_MREF(dir_ni->mft_no,
|
|
le16_to_cpu(dir_ni->mrec->sequence_number));
|
|
fn->file_name_length = name_len;
|
|
fn->file_name_type = FILE_NAME_POSIX;
|
|
if (S_ISDIR(type))
|
|
fn->file_attributes = FILE_ATTR_I30_INDEX_PRESENT;
|
|
if (!S_ISREG(type) && !S_ISDIR(type))
|
|
fn->file_attributes = FILE_ATTR_SYSTEM;
|
|
else
|
|
fn->file_attributes |= ni->flags & FILE_ATTR_COMPRESSED;
|
|
fn->creation_time = utc2ntfs(ni->creation_time);
|
|
fn->last_data_change_time = utc2ntfs(ni->last_data_change_time);
|
|
fn->last_mft_change_time = utc2ntfs(ni->last_mft_change_time);
|
|
fn->last_access_time = utc2ntfs(ni->last_access_time);
|
|
fn->data_size = cpu_to_sle64(ni->data_size);
|
|
fn->allocated_size = cpu_to_sle64(ni->allocated_size);
|
|
memcpy(fn->file_name, name, name_len * sizeof(ntfschar));
|
|
/* Add FILE_NAME attribute to inode. */
|
|
if (ntfs_attr_add(ni, AT_FILE_NAME, AT_UNNAMED, 0, (u8*)fn, fn_len)) {
|
|
err = errno;
|
|
ntfs_log_error("Failed to add FILE_NAME attribute.\n");
|
|
goto err_out;
|
|
}
|
|
/* Add FILE_NAME attribute to index. */
|
|
if (ntfs_index_add_filename(dir_ni, fn, MK_MREF(ni->mft_no,
|
|
le16_to_cpu(ni->mrec->sequence_number)))) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to add entry to the index");
|
|
goto err_out;
|
|
}
|
|
/* Set hard links count and directory flag. */
|
|
ni->mrec->link_count = cpu_to_le16(1);
|
|
if (S_ISDIR(type))
|
|
ni->mrec->flags |= MFT_RECORD_IS_DIRECTORY;
|
|
ntfs_inode_mark_dirty(ni);
|
|
/* Done! */
|
|
free(fn);
|
|
free(si);
|
|
ntfs_log_trace("Done.\n");
|
|
return ni;
|
|
err_out:
|
|
ntfs_log_trace("Failed.\n");
|
|
|
|
if (rollback_sd)
|
|
ntfs_attr_remove(ni, AT_SECURITY_DESCRIPTOR, AT_UNNAMED, 0);
|
|
|
|
if (rollback_data)
|
|
ntfs_attr_remove(ni, AT_DATA, AT_UNNAMED, 0);
|
|
/*
|
|
* Free extent MFT records (should not exist any with current
|
|
* ntfs_create implementation, but for any case if something will be
|
|
* changed in the future).
|
|
*/
|
|
while (ni->nr_extents)
|
|
if (ntfs_mft_record_free(ni->vol, *(ni->extent_nis))) {
|
|
err = errno;
|
|
ntfs_log_error("Failed to free extent MFT record. "
|
|
"Leaving inconsistent metadata.\n");
|
|
}
|
|
if (ntfs_mft_record_free(ni->vol, ni))
|
|
ntfs_log_error("Failed to free MFT record. "
|
|
"Leaving inconsistent metadata. Run chkdsk.\n");
|
|
free(fn);
|
|
free(si);
|
|
errno = err;
|
|
return NULL;
|
|
}
|
|
|
|
/**
|
|
* Some wrappers around __ntfs_create() ...
|
|
*/
|
|
|
|
ntfs_inode *ntfs_create(ntfs_inode *dir_ni, le32 securid, ntfschar *name,
|
|
u8 name_len, mode_t type)
|
|
{
|
|
if (type != S_IFREG && type != S_IFDIR && type != S_IFIFO &&
|
|
type != S_IFSOCK) {
|
|
ntfs_log_error("Invalid arguments.\n");
|
|
return NULL;
|
|
}
|
|
return __ntfs_create(dir_ni, securid, name, name_len, type, 0, NULL, 0);
|
|
}
|
|
|
|
ntfs_inode *ntfs_create_device(ntfs_inode *dir_ni, le32 securid,
|
|
ntfschar *name, u8 name_len, mode_t type, dev_t dev)
|
|
{
|
|
if (type != S_IFCHR && type != S_IFBLK) {
|
|
ntfs_log_error("Invalid arguments.\n");
|
|
return NULL;
|
|
}
|
|
return __ntfs_create(dir_ni, securid, name, name_len, type, dev, NULL, 0);
|
|
}
|
|
|
|
ntfs_inode *ntfs_create_symlink(ntfs_inode *dir_ni, le32 securid,
|
|
ntfschar *name, u8 name_len, ntfschar *target, int target_len)
|
|
{
|
|
if (!target || !target_len) {
|
|
ntfs_log_error("%s: Invalid argument (%p, %d)\n", __FUNCTION__,
|
|
target, target_len);
|
|
return NULL;
|
|
}
|
|
return __ntfs_create(dir_ni, securid, name, name_len, S_IFLNK, 0,
|
|
target, target_len);
|
|
}
|
|
|
|
int ntfs_check_empty_dir(ntfs_inode *ni)
|
|
{
|
|
ntfs_attr *na;
|
|
int ret = 0;
|
|
|
|
if (!(ni->mrec->flags & MFT_RECORD_IS_DIRECTORY))
|
|
return 0;
|
|
|
|
na = ntfs_attr_open(ni, AT_INDEX_ROOT, NTFS_INDEX_I30, 4);
|
|
if (!na) {
|
|
errno = EIO;
|
|
ntfs_log_perror("Failed to open directory");
|
|
return -1;
|
|
}
|
|
|
|
/* Non-empty directory? */
|
|
if ((na->data_size != sizeof(INDEX_ROOT) + sizeof(INDEX_ENTRY_HEADER))){
|
|
/* Both ENOTEMPTY and EEXIST are ok. We use the more common. */
|
|
errno = ENOTEMPTY;
|
|
ntfs_log_debug("Directory is not empty\n");
|
|
ret = -1;
|
|
}
|
|
|
|
ntfs_attr_close(na);
|
|
return ret;
|
|
}
|
|
|
|
static int ntfs_check_unlinkable_dir(ntfs_inode *ni, FILE_NAME_ATTR *fn)
|
|
{
|
|
int link_count = le16_to_cpu(ni->mrec->link_count);
|
|
int ret;
|
|
|
|
ret = ntfs_check_empty_dir(ni);
|
|
if (!ret || errno != ENOTEMPTY)
|
|
return ret;
|
|
/*
|
|
* Directory is non-empty, so we can unlink only if there is more than
|
|
* one "real" hard link, i.e. links aren't different DOS and WIN32 names
|
|
*/
|
|
if ((link_count == 1) ||
|
|
(link_count == 2 && fn->file_name_type == FILE_NAME_DOS)) {
|
|
errno = ENOTEMPTY;
|
|
ntfs_log_debug("Non-empty directory without hard links\n");
|
|
goto no_hardlink;
|
|
}
|
|
|
|
ret = 0;
|
|
no_hardlink:
|
|
return ret;
|
|
}
|
|
|
|
/**
|
|
* ntfs_delete - delete file or directory from ntfs volume
|
|
* @ni: ntfs inode for object to delte
|
|
* @dir_ni: ntfs inode for directory in which delete object
|
|
* @name: unicode name of the object to delete
|
|
* @name_len: length of the name in unicode characters
|
|
*
|
|
* @ni is always closed after the call to this function (even if it failed),
|
|
* user does not need to call ntfs_inode_close himself.
|
|
*
|
|
* Return 0 on success or -1 on error with errno set to the error code.
|
|
*/
|
|
int ntfs_delete(ntfs_volume *vol, const char *pathname,
|
|
ntfs_inode *ni, ntfs_inode *dir_ni, ntfschar *name, u8 name_len)
|
|
{
|
|
ntfs_attr_search_ctx *actx = NULL;
|
|
FILE_NAME_ATTR *fn = NULL;
|
|
BOOL looking_for_dos_name = FALSE, looking_for_win32_name = FALSE;
|
|
BOOL case_sensitive_match = TRUE;
|
|
int err = 0;
|
|
#if CACHE_INODE_SIZE
|
|
struct CACHED_INODE item;
|
|
const char *p;
|
|
u64 inum = (u64)-1;
|
|
int count;
|
|
#endif
|
|
|
|
ntfs_log_trace("Entering.\n");
|
|
|
|
if (!ni || !dir_ni || !name || !name_len) {
|
|
ntfs_log_error("Invalid arguments.\n");
|
|
errno = EINVAL;
|
|
goto err_out;
|
|
}
|
|
if (ni->nr_extents == -1)
|
|
ni = ni->base_ni;
|
|
if (dir_ni->nr_extents == -1)
|
|
dir_ni = dir_ni->base_ni;
|
|
/*
|
|
* Search for FILE_NAME attribute with such name. If it's in POSIX or
|
|
* WIN32_AND_DOS namespace, then simply remove it from index and inode.
|
|
* If filename in DOS or in WIN32 namespace, then remove DOS name first,
|
|
* only then remove WIN32 name.
|
|
*/
|
|
actx = ntfs_attr_get_search_ctx(ni, NULL);
|
|
if (!actx)
|
|
goto err_out;
|
|
search:
|
|
while (!ntfs_attr_lookup(AT_FILE_NAME, AT_UNNAMED, 0, CASE_SENSITIVE,
|
|
0, NULL, 0, actx)) {
|
|
char *s;
|
|
BOOL case_sensitive = IGNORE_CASE;
|
|
|
|
errno = 0;
|
|
fn = (FILE_NAME_ATTR*)((u8*)actx->attr +
|
|
le16_to_cpu(actx->attr->value_offset));
|
|
s = ntfs_attr_name_get(fn->file_name, fn->file_name_length);
|
|
ntfs_log_trace("name: '%s' type: %d dos: %d win32: %d "
|
|
"case: %d\n", s, fn->file_name_type,
|
|
looking_for_dos_name, looking_for_win32_name,
|
|
case_sensitive_match);
|
|
ntfs_attr_name_free(&s);
|
|
if (looking_for_dos_name) {
|
|
if (fn->file_name_type == FILE_NAME_DOS)
|
|
break;
|
|
else
|
|
continue;
|
|
}
|
|
if (looking_for_win32_name) {
|
|
if (fn->file_name_type == FILE_NAME_WIN32)
|
|
break;
|
|
else
|
|
continue;
|
|
}
|
|
|
|
/* Ignore hard links from other directories */
|
|
if (dir_ni->mft_no != MREF_LE(fn->parent_directory)) {
|
|
ntfs_log_debug("MFT record numbers don't match "
|
|
"(%llu != %llu)\n",
|
|
(long long unsigned)dir_ni->mft_no,
|
|
(long long unsigned)MREF_LE(fn->parent_directory));
|
|
continue;
|
|
}
|
|
|
|
if (fn->file_name_type == FILE_NAME_POSIX || case_sensitive_match)
|
|
case_sensitive = CASE_SENSITIVE;
|
|
|
|
if (ntfs_names_are_equal(fn->file_name, fn->file_name_length,
|
|
name, name_len, case_sensitive,
|
|
ni->vol->upcase, ni->vol->upcase_len)){
|
|
|
|
if (fn->file_name_type == FILE_NAME_WIN32) {
|
|
looking_for_dos_name = TRUE;
|
|
ntfs_attr_reinit_search_ctx(actx);
|
|
continue;
|
|
}
|
|
if (fn->file_name_type == FILE_NAME_DOS)
|
|
looking_for_dos_name = TRUE;
|
|
break;
|
|
}
|
|
}
|
|
if (errno) {
|
|
/*
|
|
* If case sensitive search failed, then try once again
|
|
* ignoring case.
|
|
*/
|
|
if (errno == ENOENT && case_sensitive_match) {
|
|
case_sensitive_match = FALSE;
|
|
ntfs_attr_reinit_search_ctx(actx);
|
|
goto search;
|
|
}
|
|
goto err_out;
|
|
}
|
|
|
|
if (ntfs_check_unlinkable_dir(ni, fn) < 0)
|
|
goto err_out;
|
|
|
|
if (ntfs_index_remove(dir_ni, ni, fn, le32_to_cpu(actx->attr->value_length)))
|
|
goto err_out;
|
|
|
|
if (ntfs_attr_record_rm(actx))
|
|
goto err_out;
|
|
|
|
ni->mrec->link_count = cpu_to_le16(le16_to_cpu(
|
|
ni->mrec->link_count) - 1);
|
|
|
|
ntfs_inode_mark_dirty(ni);
|
|
if (looking_for_dos_name) {
|
|
looking_for_dos_name = FALSE;
|
|
looking_for_win32_name = TRUE;
|
|
ntfs_attr_reinit_search_ctx(actx);
|
|
goto search;
|
|
}
|
|
/* TODO: Update object id, quota and securiry indexes if required. */
|
|
/*
|
|
* If hard link count is not equal to zero then we are done. In other
|
|
* case there are no reference to this inode left, so we should free all
|
|
* non-resident attributes and mark all MFT record as not in use.
|
|
*/
|
|
#if CACHE_INODE_SIZE
|
|
inum = ni->mft_no;
|
|
#endif
|
|
if (ni->mrec->link_count) {
|
|
ntfs_inode_update_times(ni, NTFS_UPDATE_CTIME);
|
|
goto ok;
|
|
}
|
|
if (ntfs_delete_reparse_index(ni)) {
|
|
/*
|
|
* Failed to remove the reparse index : proceed anyway
|
|
* This is not a critical error, the entry is useless
|
|
* because of sequence_number, and stopping file deletion
|
|
* would be much worse as the file is not referenced now.
|
|
*/
|
|
err = errno;
|
|
}
|
|
ntfs_attr_reinit_search_ctx(actx);
|
|
while (!ntfs_attrs_walk(actx)) {
|
|
if (actx->attr->non_resident) {
|
|
runlist *rl;
|
|
|
|
rl = ntfs_mapping_pairs_decompress(ni->vol, actx->attr,
|
|
NULL);
|
|
if (!rl) {
|
|
err = errno;
|
|
ntfs_log_error("Failed to decompress runlist. "
|
|
"Leaving inconsistent metadata.\n");
|
|
continue;
|
|
}
|
|
if (ntfs_cluster_free_from_rl(ni->vol, rl)) {
|
|
err = errno;
|
|
ntfs_log_error("Failed to free clusters. "
|
|
"Leaving inconsistent metadata.\n");
|
|
continue;
|
|
}
|
|
free(rl);
|
|
}
|
|
}
|
|
if (errno != ENOENT) {
|
|
err = errno;
|
|
ntfs_log_error("Attribute enumeration failed. "
|
|
"Probably leaving inconsistent metadata.\n");
|
|
}
|
|
/* All extents should be attached after attribute walk. */
|
|
while (ni->nr_extents)
|
|
if (ntfs_mft_record_free(ni->vol, *(ni->extent_nis))) {
|
|
err = errno;
|
|
ntfs_log_error("Failed to free extent MFT record. "
|
|
"Leaving inconsistent metadata.\n");
|
|
}
|
|
if (ntfs_mft_record_free(ni->vol, ni)) {
|
|
err = errno;
|
|
ntfs_log_error("Failed to free base MFT record. "
|
|
"Leaving inconsistent metadata.\n");
|
|
}
|
|
ni = NULL;
|
|
ok:
|
|
ntfs_inode_update_times(dir_ni, NTFS_UPDATE_MCTIME);
|
|
out:
|
|
if (actx)
|
|
ntfs_attr_put_search_ctx(actx);
|
|
if (ntfs_inode_close(dir_ni) && !err)
|
|
err = errno;
|
|
if (ntfs_inode_close(ni) && !err)
|
|
err = errno;
|
|
#if CACHE_INODE_SIZE
|
|
if (pathname) {
|
|
/* invalide cache entry, even if there was an error */
|
|
/* Remove leading /'s. */
|
|
p = pathname;
|
|
while (*p == PATH_SEP)
|
|
p++;
|
|
if (p[0] && (p[strlen(p)-1] == PATH_SEP))
|
|
ntfs_log_error("Unnormalized path %s\n",pathname);
|
|
item.pathname = p;
|
|
item.inum = inum;
|
|
count = ntfs_invalidate_cache(vol->xinode_cache, GENERIC(&item),
|
|
inode_cache_inv_compare);
|
|
if (!count)
|
|
ntfs_log_error("Could not delete inode cache entry for %s\n",
|
|
pathname);
|
|
}
|
|
#endif
|
|
if (err) {
|
|
errno = err;
|
|
ntfs_log_debug("Could not delete file: %s\n", strerror(errno));
|
|
return -1;
|
|
}
|
|
ntfs_log_trace("Done.\n");
|
|
return 0;
|
|
err_out:
|
|
err = errno;
|
|
goto out;
|
|
}
|
|
|
|
/**
|
|
* ntfs_link - create hard link for file or directory
|
|
* @ni: ntfs inode for object to create hard link
|
|
* @dir_ni: ntfs inode for directory in which new link should be placed
|
|
* @name: unicode name of the new link
|
|
* @name_len: length of the name in unicode characters
|
|
*
|
|
* NOTE: At present we allow creating hardlinks to directories, we use them
|
|
* in a temporary state during rename. But it's defenitely bad idea to have
|
|
* hard links to directories as a result of operation.
|
|
* FIXME: Create internal __ntfs_link that allows hard links to a directories
|
|
* and external ntfs_link that do not. Write ntfs_rename that uses __ntfs_link.
|
|
*
|
|
* Return 0 on success or -1 on error with errno set to the error code.
|
|
*/
|
|
static int ntfs_link_i(ntfs_inode *ni, ntfs_inode *dir_ni, ntfschar *name,
|
|
u8 name_len, FILE_NAME_TYPE_FLAGS nametype)
|
|
{
|
|
FILE_NAME_ATTR *fn = NULL;
|
|
int fn_len, err;
|
|
|
|
ntfs_log_trace("Entering.\n");
|
|
|
|
if (!ni || !dir_ni || !name || !name_len ||
|
|
ni->mft_no == dir_ni->mft_no) {
|
|
err = EINVAL;
|
|
ntfs_log_perror("ntfs_link wrong arguments");
|
|
goto err_out;
|
|
}
|
|
|
|
if ((ni->flags & FILE_ATTR_REPARSE_POINT)
|
|
&& !ntfs_possible_symlink(ni)) {
|
|
err = EOPNOTSUPP;
|
|
goto err_out;
|
|
}
|
|
|
|
/* Create FILE_NAME attribute. */
|
|
fn_len = sizeof(FILE_NAME_ATTR) + name_len * sizeof(ntfschar);
|
|
fn = ntfs_calloc(fn_len);
|
|
if (!fn) {
|
|
err = errno;
|
|
goto err_out;
|
|
}
|
|
fn->parent_directory = MK_LE_MREF(dir_ni->mft_no,
|
|
le16_to_cpu(dir_ni->mrec->sequence_number));
|
|
fn->file_name_length = name_len;
|
|
fn->file_name_type = nametype;
|
|
fn->file_attributes = ni->flags;
|
|
if (ni->mrec->flags & MFT_RECORD_IS_DIRECTORY)
|
|
fn->file_attributes |= FILE_ATTR_I30_INDEX_PRESENT;
|
|
fn->allocated_size = cpu_to_sle64(ni->allocated_size);
|
|
fn->data_size = cpu_to_sle64(ni->data_size);
|
|
fn->creation_time = utc2ntfs(ni->creation_time);
|
|
fn->last_data_change_time = utc2ntfs(ni->last_data_change_time);
|
|
fn->last_mft_change_time = utc2ntfs(ni->last_mft_change_time);
|
|
fn->last_access_time = utc2ntfs(ni->last_access_time);
|
|
memcpy(fn->file_name, name, name_len * sizeof(ntfschar));
|
|
/* Add FILE_NAME attribute to index. */
|
|
if (ntfs_index_add_filename(dir_ni, fn, MK_MREF(ni->mft_no,
|
|
le16_to_cpu(ni->mrec->sequence_number)))) {
|
|
err = errno;
|
|
ntfs_log_perror("Failed to add filename to the index");
|
|
goto err_out;
|
|
}
|
|
/* Add FILE_NAME attribute to inode. */
|
|
if (ntfs_attr_add(ni, AT_FILE_NAME, AT_UNNAMED, 0, (u8*)fn, fn_len)) {
|
|
ntfs_log_error("Failed to add FILE_NAME attribute.\n");
|
|
err = errno;
|
|
/* Try to remove just added attribute from index. */
|
|
if (ntfs_index_remove(dir_ni, ni, fn, fn_len))
|
|
goto rollback_failed;
|
|
goto err_out;
|
|
}
|
|
/* Increment hard links count. */
|
|
ni->mrec->link_count = cpu_to_le16(le16_to_cpu(
|
|
ni->mrec->link_count) + 1);
|
|
/* Done! */
|
|
ntfs_inode_mark_dirty(ni);
|
|
free(fn);
|
|
ntfs_log_trace("Done.\n");
|
|
return 0;
|
|
rollback_failed:
|
|
ntfs_log_error("Rollback failed. Leaving inconsistent metadata.\n");
|
|
err_out:
|
|
free(fn);
|
|
errno = err;
|
|
return -1;
|
|
}
|
|
|
|
int ntfs_link(ntfs_inode *ni, ntfs_inode *dir_ni, ntfschar *name, u8 name_len)
|
|
{
|
|
return (ntfs_link_i(ni, dir_ni, name, name_len, FILE_NAME_POSIX));
|
|
}
|
|
|
|
#ifdef HAVE_SETXATTR
|
|
|
|
#define MAX_DOS_NAME_LENGTH 12
|
|
|
|
/*
|
|
* Get a DOS name for a file in designated directory
|
|
*
|
|
* Returns size if found
|
|
* 0 if not found
|
|
* -1 if there was an error (described by errno)
|
|
*/
|
|
|
|
static int get_dos_name(ntfs_inode *ni, u64 dnum, ntfschar *dosname)
|
|
{
|
|
size_t outsize = 0;
|
|
FILE_NAME_ATTR *fn;
|
|
ntfs_attr_search_ctx *ctx;
|
|
|
|
/* find the name in the attributes */
|
|
ctx = ntfs_attr_get_search_ctx(ni, NULL);
|
|
if (!ctx)
|
|
return -1;
|
|
|
|
while (!ntfs_attr_lookup(AT_FILE_NAME, AT_UNNAMED, 0, CASE_SENSITIVE,
|
|
0, NULL, 0, ctx)) {
|
|
/* We know this will always be resident. */
|
|
fn = (FILE_NAME_ATTR*)((u8*)ctx->attr +
|
|
le16_to_cpu(ctx->attr->value_offset));
|
|
|
|
if ((fn->file_name_type & FILE_NAME_DOS)
|
|
&& (MREF_LE(fn->parent_directory) == dnum)) {
|
|
/*
|
|
* Found a DOS or WIN32+DOS name for the entry
|
|
* copy name, after truncation for safety
|
|
*/
|
|
outsize = fn->file_name_length;
|
|
/* TODO : reject if name is too long ? */
|
|
if (outsize > MAX_DOS_NAME_LENGTH)
|
|
outsize = MAX_DOS_NAME_LENGTH;
|
|
memcpy(dosname,fn->file_name,outsize*sizeof(ntfschar));
|
|
}
|
|
}
|
|
ntfs_attr_put_search_ctx(ctx);
|
|
return (outsize);
|
|
}
|
|
|
|
|
|
/*
|
|
* Get the ntfs DOS name into an extended attribute
|
|
*/
|
|
|
|
int ntfs_get_ntfs_dos_name(const char *path,
|
|
char *value, size_t size, ntfs_inode *ni)
|
|
{
|
|
int outsize = 0;
|
|
char *outname = (char*)NULL;
|
|
ntfs_inode *dir_ni = NULL;
|
|
u64 dnum;
|
|
char *dirname;
|
|
const char *rdirname;
|
|
char *p;
|
|
int doslen;
|
|
ntfschar dosname[MAX_DOS_NAME_LENGTH];
|
|
|
|
/* get the parent directory */
|
|
dirname = strdup(path);
|
|
if (dirname) {
|
|
p = strrchr(dirname,'/');
|
|
if (p) {
|
|
*p++ = 0;
|
|
rdirname = (dirname[0] ? dirname : "/");
|
|
dir_ni = ntfs_pathname_to_inode(ni->vol, NULL, rdirname);
|
|
dnum = dir_ni->mft_no;
|
|
free(dirname);
|
|
}
|
|
}
|
|
if (dir_ni) {
|
|
doslen = get_dos_name(ni, dnum, dosname);
|
|
if (doslen > 0) {
|
|
/*
|
|
* Found a DOS name for the entry, make
|
|
* uppercase and encode into the buffer
|
|
* if there is enough space
|
|
*/
|
|
ntfs_name_upcase(dosname, doslen,
|
|
ni->vol->upcase, ni->vol->upcase_len);
|
|
if (ntfs_ucstombs(dosname, doslen, &outname, size) < 0) {
|
|
ntfs_log_error("Cannot represent dosname in current locale.\n");
|
|
outsize = -errno;
|
|
} else {
|
|
outsize = strlen(outname);
|
|
if (value && (outsize <= (int)size))
|
|
memcpy(value, outname, outsize);
|
|
else
|
|
if (size && (outsize > (int)size))
|
|
outsize = -ERANGE;
|
|
free(outname);
|
|
}
|
|
} else {
|
|
if (doslen == 0)
|
|
errno = ENODATA;
|
|
outsize = -errno;
|
|
}
|
|
ntfs_inode_close(dir_ni);
|
|
} else
|
|
outsize = -errno;
|
|
return (outsize);
|
|
}
|
|
|
|
/*
|
|
* Change the name space of an existing file or directory
|
|
*
|
|
* Returns the old namespace if successful
|
|
* -1 if an error occurred (described by errno)
|
|
*/
|
|
|
|
static int set_namespace(ntfs_inode *ni, ntfs_inode *dir_ni,
|
|
ntfschar *name, int len,
|
|
FILE_NAME_TYPE_FLAGS nametype)
|
|
{
|
|
ntfs_attr_search_ctx *actx;
|
|
ntfs_index_context *icx;
|
|
FILE_NAME_ATTR *fnx;
|
|
FILE_NAME_ATTR *fn = NULL;
|
|
BOOL found;
|
|
int lkup;
|
|
int ret;
|
|
|
|
ret = -1;
|
|
actx = ntfs_attr_get_search_ctx(ni, NULL);
|
|
if (actx) {
|
|
found = FALSE;
|
|
do {
|
|
lkup = ntfs_attr_lookup(AT_FILE_NAME, AT_UNNAMED, 0,
|
|
CASE_SENSITIVE, 0, NULL, 0, actx);
|
|
if (!lkup) {
|
|
fn = (FILE_NAME_ATTR*)((u8*)actx->attr +
|
|
le16_to_cpu(actx->attr->value_offset));
|
|
found = (MREF_LE(fn->parent_directory)
|
|
== dir_ni->mft_no)
|
|
&& !memcmp(fn->file_name, name,
|
|
len*sizeof(ntfschar));
|
|
}
|
|
} while (!lkup && !found);
|
|
if (found) {
|
|
icx = ntfs_index_ctx_get(dir_ni, NTFS_INDEX_I30, 4);
|
|
if (icx) {
|
|
lkup = ntfs_index_lookup((char*)fn, len, icx);
|
|
if (!lkup && icx->data && icx->data_len) {
|
|
fnx = (FILE_NAME_ATTR*)icx->data;
|
|
ret = fn->file_name_type;
|
|
fn->file_name_type = nametype;
|
|
fnx->file_name_type = nametype;
|
|
ntfs_inode_mark_dirty(ni);
|
|
ntfs_index_entry_mark_dirty(icx);
|
|
}
|
|
ntfs_index_ctx_put(icx);
|
|
}
|
|
}
|
|
ntfs_attr_put_search_ctx(actx);
|
|
}
|
|
return (ret);
|
|
}
|
|
|
|
/*
|
|
* Set a DOS name to a file and adjust name spaces
|
|
*
|
|
* If the new names are collapsible (same uppercased chars) :
|
|
*
|
|
* - the existing DOS name or DOS+Win32 name is made Posix
|
|
* - if it was a real DOS name, the existing long name is made DOS+Win32
|
|
* and the existing DOS name is deleted
|
|
* - finally the existing long name is made DOS+Win32 unless already done
|
|
*
|
|
* If the new names are not collapsible :
|
|
*
|
|
* - insert the short name as a DOS name
|
|
* - delete the old long name or existing short name
|
|
* - insert the new long name (as a Win32 or DOS+Win32 name)
|
|
*
|
|
* Deleting the old long name will not delete the file
|
|
* provided the old name was in the Posix name space,
|
|
* because the alternate name has been set before.
|
|
*
|
|
* The inodes of file and parent directory are always closed
|
|
*
|
|
* Returns 0 if successful
|
|
* -1 if failed
|
|
*/
|
|
|
|
static int set_dos_name(ntfs_inode *ni, ntfs_inode *dir_ni,
|
|
const char *fullpath,
|
|
ntfschar *shortname, int shortlen,
|
|
ntfschar *longname, int longlen,
|
|
ntfschar *deletename, int deletelen, BOOL existed)
|
|
{
|
|
unsigned int linkcount;
|
|
ntfs_volume *vol;
|
|
BOOL collapsible;
|
|
BOOL deleted;
|
|
BOOL done;
|
|
FILE_NAME_TYPE_FLAGS oldnametype;
|
|
u64 dnum;
|
|
u64 fnum;
|
|
int res;
|
|
|
|
res = -1;
|
|
vol = ni->vol;
|
|
dnum = dir_ni->mft_no;
|
|
fnum = ni->mft_no;
|
|
/* save initial link count */
|
|
linkcount = le16_to_cpu(ni->mrec->link_count);
|
|
|
|
/* check whether the same name may be used as DOS and WIN32 */
|
|
collapsible = ntfs_collapsible_chars(ni->vol, shortname, shortlen,
|
|
longname, longlen);
|
|
if (collapsible) {
|
|
deleted = FALSE;
|
|
done = FALSE;
|
|
if (existed) {
|
|
oldnametype = set_namespace(ni, dir_ni, deletename,
|
|
deletelen, FILE_NAME_POSIX);
|
|
if (oldnametype == FILE_NAME_DOS) {
|
|
if (set_namespace(ni, dir_ni, longname, longlen,
|
|
FILE_NAME_WIN32_AND_DOS) >= 0) {
|
|
if (!ntfs_delete(vol,
|
|
(const char*)NULL, ni, dir_ni,
|
|
deletename, deletelen))
|
|
res = 0;
|
|
deleted = TRUE;
|
|
} else
|
|
done = TRUE;
|
|
}
|
|
}
|
|
if (!deleted) {
|
|
if (!done && (set_namespace(ni, dir_ni,
|
|
longname, longlen,
|
|
FILE_NAME_WIN32_AND_DOS) >= 0))
|
|
res = 0;
|
|
ntfs_inode_close(ni);
|
|
ntfs_inode_close(dir_ni);
|
|
}
|
|
} else
|
|
if (!ntfs_link_i(ni, dir_ni, shortname, shortlen,
|
|
FILE_NAME_DOS)
|
|
/* make sure a new link was recorded */
|
|
&& (le16_to_cpu(ni->mrec->link_count) > linkcount)) {
|
|
/* delete the existing long name or short name */
|
|
if (!ntfs_delete(vol, fullpath, ni, dir_ni,
|
|
deletename, deletelen)) {
|
|
/* delete closes the inodes, so have to open again */
|
|
dir_ni = ntfs_inode_open(vol, dnum);
|
|
if (dir_ni) {
|
|
ni = ntfs_inode_open(vol, fnum);
|
|
if (ni) {
|
|
if (!ntfs_link_i(ni, dir_ni,
|
|
longname, longlen,
|
|
FILE_NAME_WIN32))
|
|
res = 0;
|
|
ntfs_inode_close(ni);
|
|
}
|
|
ntfs_inode_close(dir_ni);
|
|
}
|
|
}
|
|
} else {
|
|
ntfs_inode_close(ni);
|
|
ntfs_inode_close(dir_ni);
|
|
}
|
|
return (res);
|
|
}
|
|
|
|
|
|
/*
|
|
* Set the ntfs DOS name into an extended attribute
|
|
*
|
|
* The DOS name will be added as another file name attribute
|
|
* using the existing file name information from the original
|
|
* name or overwriting the DOS Name if one exists.
|
|
*
|
|
* The inode of the file is always closed
|
|
*/
|
|
|
|
int ntfs_set_ntfs_dos_name(const char *path, const char *value, size_t size,
|
|
int flags, ntfs_inode *ni)
|
|
{
|
|
int res = 0;
|
|
int longlen = 0;
|
|
int shortlen = 0;
|
|
char newname[MAX_DOS_NAME_LENGTH + 1];
|
|
ntfschar oldname[MAX_DOS_NAME_LENGTH];
|
|
int oldlen;
|
|
ntfs_volume *vol;
|
|
u64 fnum;
|
|
u64 dnum;
|
|
BOOL closed = FALSE;
|
|
ntfschar *shortname = NULL;
|
|
ntfschar *longname = NULL;
|
|
ntfs_inode *dir_ni = NULL;
|
|
char *dirname = (char*)NULL;
|
|
const char *rdirname;
|
|
char *p;
|
|
|
|
vol = ni->vol;
|
|
fnum = ni->mft_no;
|
|
/* convert the string to the NTFS wide chars */
|
|
if (size > MAX_DOS_NAME_LENGTH)
|
|
size = MAX_DOS_NAME_LENGTH;
|
|
strncpy(newname, value, size);
|
|
newname[size] = 0;
|
|
shortlen = ntfs_mbstoucs(newname, &shortname);
|
|
/* make sure the short name has valid chars */
|
|
if ((shortlen < 0) || ntfs_forbidden_chars(shortname,shortlen)) {
|
|
ntfs_inode_close(ni);
|
|
res = -errno;
|
|
return res;
|
|
}
|
|
/* get the parent directory */
|
|
dirname = strdup(path);
|
|
if (dirname) {
|
|
p = strrchr(dirname,'/');
|
|
if (p) {
|
|
*p++ = 0;
|
|
longlen = ntfs_mbstoucs(p, &longname);
|
|
/* make sure the long name had valid chars */
|
|
if (!ntfs_forbidden_chars(longname,longlen)) {
|
|
rdirname = (dirname[0] ? dirname : "/");
|
|
dir_ni = ntfs_pathname_to_inode(vol, NULL, rdirname);
|
|
}
|
|
}
|
|
}
|
|
if (dir_ni) {
|
|
dnum = dir_ni->mft_no;
|
|
oldlen = get_dos_name(ni, dnum, oldname);
|
|
if (oldlen >= 0) {
|
|
if (oldlen > 0) {
|
|
if (flags & XATTR_CREATE) {
|
|
res = -1;
|
|
errno = EEXIST;
|
|
} else
|
|
if ((shortlen == oldlen)
|
|
&& !memcmp(shortname,oldname,
|
|
oldlen*sizeof(ntfschar)))
|
|
/* already set, done */
|
|
res = 0;
|
|
else {
|
|
res = set_dos_name(ni, dir_ni,
|
|
path,
|
|
shortname, shortlen,
|
|
longname, longlen,
|
|
oldname, oldlen, TRUE);
|
|
closed = TRUE;
|
|
}
|
|
} else {
|
|
if (flags & XATTR_REPLACE) {
|
|
res = -1;
|
|
errno = ENODATA;
|
|
} else {
|
|
res = set_dos_name(ni, dir_ni, path,
|
|
shortname, shortlen,
|
|
longname, longlen,
|
|
longname, longlen, FALSE);
|
|
closed = TRUE;
|
|
}
|
|
}
|
|
} else
|
|
res = -1;
|
|
if (!closed)
|
|
ntfs_inode_close(dir_ni);
|
|
} else {
|
|
res = -1;
|
|
errno = EINVAL;
|
|
}
|
|
free(dirname);
|
|
free(longname);
|
|
free(shortname);
|
|
if (!closed)
|
|
ntfs_inode_close(ni);
|
|
return (res ? -1 : 0);
|
|
}
|
|
|
|
/*
|
|
* Delete the ntfs DOS name
|
|
*/
|
|
|
|
int ntfs_remove_ntfs_dos_name(const char *path, ntfs_inode *ni)
|
|
{
|
|
int res;
|
|
int oldnametype;
|
|
int longlen = 0;
|
|
int shortlen;
|
|
u64 dnum;
|
|
ntfs_volume *vol;
|
|
BOOL deleted = FALSE;
|
|
ntfschar shortname[MAX_DOS_NAME_LENGTH];
|
|
ntfschar *longname = NULL;
|
|
ntfs_inode *dir_ni = NULL;
|
|
char *dirname = (char*)NULL;
|
|
const char *rdirname;
|
|
char *p;
|
|
|
|
res = -1;
|
|
vol = ni->vol;
|
|
/* get the parent directory */
|
|
dirname = strdup(path);
|
|
if (dirname) {
|
|
p = strrchr(dirname,'/');
|
|
if (p) {
|
|
*p++ = 0;
|
|
longlen = ntfs_mbstoucs(p, &longname);
|
|
rdirname = (dirname[0] ? dirname : "/");
|
|
dir_ni = ntfs_pathname_to_inode(vol, NULL, rdirname);
|
|
}
|
|
}
|
|
if (dir_ni) {
|
|
dnum = dir_ni->mft_no;
|
|
shortlen = get_dos_name(ni, dnum, shortname);
|
|
if (shortlen >= 0) {
|
|
/* migrate the long name as Posix */
|
|
oldnametype = set_namespace(ni,dir_ni,longname,longlen,
|
|
FILE_NAME_POSIX);
|
|
switch (oldnametype) {
|
|
case FILE_NAME_WIN32_AND_DOS :
|
|
/* name was Win32+DOS : done */
|
|
res = 0;
|
|
break;
|
|
case FILE_NAME_DOS :
|
|
/* name was DOS, make it back to DOS */
|
|
set_namespace(ni,dir_ni,longname,longlen,
|
|
FILE_NAME_DOS);
|
|
errno = ENOENT;
|
|
break;
|
|
case FILE_NAME_WIN32 :
|
|
/* name was Win32, make it Posix and delete */
|
|
if (set_namespace(ni,dir_ni,shortname,shortlen,
|
|
FILE_NAME_POSIX) >= 0) {
|
|
if (!ntfs_delete(vol,
|
|
(const char*)NULL, ni,
|
|
dir_ni, shortname,
|
|
shortlen))
|
|
res = 0;
|
|
deleted = TRUE;
|
|
} else {
|
|
/*
|
|
* DOS name has been found, but cannot
|
|
* migrate to Posix : something bad
|
|
* has happened
|
|
*/
|
|
errno = EIO;
|
|
ntfs_log_error("Could not change"
|
|
" DOS name of %s to Posix\n",
|
|
path);
|
|
}
|
|
break;
|
|
default :
|
|
/* name was Posix or not found : error */
|
|
errno = ENOENT;
|
|
break;
|
|
}
|
|
}
|
|
if (!deleted)
|
|
ntfs_inode_close(dir_ni);
|
|
}
|
|
if (!deleted)
|
|
ntfs_inode_close(ni);
|
|
free(longname);
|
|
free(dirname);
|
|
return (res);
|
|
}
|
|
|
|
#endif
|