/*

 * File entry functions

 *

 * Copyright (C) 2009-2024, Joachim Metz <joachim.metz@gmail.com>

 *

 * Refer to AUTHORS for acknowledgements.

 *

 * This program is free software: you can redistribute it and/or modify

 * it under the terms of the GNU Lesser General Public License as published by

 * the Free Software Foundation, either version 3 of the License, or

 * (at your option) any later version.

 *

 * This program 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 Lesser General Public License

 * along with this program.  If not, see <https://www.gnu.org/licenses/>.

 */

#include <common.h>

#include <memory.h>

#include <types.h>

#include "libfshfs_allocation_block_stream.h"

#include "libfshfs_attribute_record.h"

#include "libfshfs_compressed_data_header.h"

#include "libfshfs_data_stream.h"

#include "libfshfs_definitions.h"

#include "libfshfs_directory_entry.h"

#include "libfshfs_extended_attribute.h"

#include "libfshfs_extent.h"

#include "libfshfs_file_entry.h"

#include "libfshfs_file_system.h"

#include "libfshfs_fork_descriptor.h"

#include "libfshfs_libcerror.h"

#include "libfshfs_libcnotify.h"

#include "libfshfs_libcthreads.h"

#include "libfshfs_libfdata.h"

#include "libfshfs_libuna.h"

#include "libfshfs_types.h"

/* Creates a file_entry

 * Make sure the value file_entry is referencing, is set to NULL

 * Returns 1 if successful or -1 on error

 */

int libfshfs_file_entry_initialize(

     libfshfs_file_entry_t **file_entry,

     libfshfs_io_handle_t *io_handle,

     libbfio_handle_t *file_io_handle,

     libfshfs_file_system_t *file_system,

     libfshfs_directory_entry_t *directory_entry,

     libcerror_error_t **error )

{

  libfshfs_internal_file_entry_t *internal_file_entry = NULL;

  static char *function                               = "libfshfs_file_entry_initialize";

  uint16_t file_mode                                  = 0;

  if( file_entry == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_INVALID_VALUE,

     "%s: invalid file entry.",

     function );

    return( -1 );

  }

  if( *file_entry != NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_VALUE_ALREADY_SET,

     "%s: invalid file entry value already set.",

     function );

    return( -1 );

  }

  if( directory_entry == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_INVALID_VALUE,

     "%s: invalid directory entry.",

     function );

    return( -1 );

  }

  internal_file_entry = memory_allocate_structure(

                         libfshfs_internal_file_entry_t );

  if( internal_file_entry == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_MEMORY,

     LIBCERROR_MEMORY_ERROR_INSUFFICIENT,

     "%s: unable to create file entry.",

     function );

    goto on_error;

  }

  if( memory_set(

       internal_file_entry,

       0,

       sizeof( libfshfs_internal_file_entry_t ) ) == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_MEMORY,

     LIBCERROR_MEMORY_ERROR_SET_FAILED,

     "%s: unable to clear file entry.",

     function );

    memory_free(

     internal_file_entry );

    return( -1 );

  }

  if( libfshfs_directory_entry_get_identifier(

       directory_entry,

       &( internal_file_entry->identifier ),

       error ) != 1 )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_GET_FAILED,

     "%s: unable to retrieve identifier from directory entry.",

     function );

    goto on_error;

  }

  if( libfshfs_directory_entry_get_parent_identifier(

       directory_entry,

       &( internal_file_entry->parent_identifier ),

       error ) != 1 )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_GET_FAILED,

     "%s: unable to retrieve parent identifier from directory entry.",

     function );

    goto on_error;

  }

  if( libfshfs_directory_entry_get_link_reference(

       directory_entry,

       &( internal_file_entry->link_reference ),

       error ) == -1 )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_GET_FAILED,

     "%s: unable to retrieve link reference from directory entry.",

     function );

    goto on_error;

  }

  if( internal_file_entry->link_reference > 2 )

  {

    internal_file_entry->link_identifier = internal_file_entry->identifier;

    internal_file_entry->identifier      = internal_file_entry->link_reference;

  }

  /* Traditional HFS does not have a file mode so we derive it from the record type

   */

  if( directory_entry->record_type == LIBFSHFS_RECORD_TYPE_HFS_DIRECTORY_RECORD )

  {

    file_mode = LIBFSHFS_FILE_TYPE_DIRECTORY;

  }

  else if( directory_entry->record_type == LIBFSHFS_RECORD_TYPE_HFS_FILE_RECORD )

  {

    file_mode = LIBFSHFS_FILE_TYPE_REGULAR_FILE;

  }

  else if( libfshfs_directory_entry_get_file_mode(

            directory_entry,

            &file_mode,

            error ) != 1 )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_GET_FAILED,

     "%s: unable to retrieve file mode from directory entry.",

     function );

    goto on_error;

  }

  internal_file_entry->io_handle       = io_handle;

  internal_file_entry->file_io_handle  = file_io_handle;

  internal_file_entry->directory_entry = directory_entry;

  internal_file_entry->file_system     = file_system;

  internal_file_entry->file_mode       = file_mode;

  internal_file_entry->data_size       = (size64_t) -1;

#if defined( HAVE_LIBFSHFS_MULTI_THREAD_SUPPORT )

  if( libcthreads_read_write_lock_initialize(

       &( internal_file_entry->read_write_lock ),

       error ) != 1 )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_INITIALIZE_FAILED,

     "%s: unable to initialize read/write lock.",

     function );

    goto on_error;

  }

#endif

  *file_entry = (libfshfs_file_entry_t *) internal_file_entry;

  return( 1 );

on_error:

  if( internal_file_entry != NULL )

  {

    memory_free(

     internal_file_entry );

  }

  return( -1 );

}

/* Frees a file_entry

 * Returns 1 if successful or -1 on error

 */

int libfshfs_file_entry_free(

     libfshfs_file_entry_t **file_entry,

     libcerror_error_t **error )

{

  libfshfs_internal_file_entry_t *internal_file_entry = NULL;

  static char *function                               = "libfshfs_file_entry_free";

  int result                                          = 1;

  if( file_entry == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_INVALID_VALUE,

     "%s: invalid file entry.",

     function );

    return( -1 );

  }

  if( *file_entry != NULL )

  {

    internal_file_entry = (libfshfs_internal_file_entry_t *) *file_entry;

    *file_entry         = NULL;

#if defined( HAVE_LIBFSHFS_MULTI_THREAD_SUPPORT )

    if( libcthreads_read_write_lock_free(

         &( internal_file_entry->read_write_lock ),

         error ) != 1 )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_FINALIZE_FAILED,

       "%s: unable to free read/write lock.",

       function );

      result = -1;

    }

#endif

    /* The file_io_handle and file_system references are freed elsewhere

     */

    if( libfshfs_directory_entry_free(

         &( internal_file_entry->directory_entry ),

         error ) != 1 )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_FINALIZE_FAILED,

       "%s: unable to free directory entry.",

       function );

      result = -1;

    }

    if( internal_file_entry->compressed_data_header != NULL )

    {

      if( libfshfs_compressed_data_header_free(

           &( internal_file_entry->compressed_data_header ),

           error ) != 1 )

      {

        libcerror_error_set(

         error,

         LIBCERROR_ERROR_DOMAIN_RUNTIME,

         LIBCERROR_RUNTIME_ERROR_FINALIZE_FAILED,

         "%s: unable to free compressed data header.",

         function );

        result = -1;

      }

    }

    if( internal_file_entry->sub_directory_entries != NULL )

    {

      if( libcdata_array_free(

           &( internal_file_entry->sub_directory_entries ),

           (int (*)(intptr_t **, libcerror_error_t **)) &libfshfs_directory_entry_free,

           error ) != 1 )

      {

        libcerror_error_set(

         error,

         LIBCERROR_ERROR_DOMAIN_RUNTIME,

         LIBCERROR_RUNTIME_ERROR_FINALIZE_FAILED,

         "%s: unable to free sub directory entries array.",

         function );

        result = -1;

      }

    }

    if( internal_file_entry->data_stream != NULL )

    {

      if( libfdata_stream_free(

           &( internal_file_entry->data_stream ),

           error ) != 1 )

      {

        libcerror_error_set(

         error,

         LIBCERROR_ERROR_DOMAIN_RUNTIME,

         LIBCERROR_RUNTIME_ERROR_FINALIZE_FAILED,

         "%s: unable to free data stream.",

         function );

        result = -1;

      }

    }

    if( internal_file_entry->extents_array != NULL )

    {

      if( libcdata_array_free(

           &( internal_file_entry->extents_array ),

           (int (*)(intptr_t **, libcerror_error_t **)) &libfshfs_extent_free,

           error ) != 1 )

      {

        libcerror_error_set(

         error,

         LIBCERROR_ERROR_DOMAIN_RUNTIME,

         LIBCERROR_RUNTIME_ERROR_FINALIZE_FAILED,

         "%s: unable to free extents array.",

         function );

        result = -1;

      }

    }

    if( internal_file_entry->attributes != NULL )

    {

      if( libcdata_array_free(

           &( internal_file_entry->attributes ),

           (int (*)(intptr_t **, libcerror_error_t **)) &libfshfs_attribute_record_free,

           error ) != 1 )

      {

        libcerror_error_set(

         error,

         LIBCERROR_ERROR_DOMAIN_RUNTIME,

         LIBCERROR_RUNTIME_ERROR_FINALIZE_FAILED,

         "%s: unable to free attributes array.",

         function );

        result = -1;

      }

    }

    if( internal_file_entry->symbolic_link_data != NULL )

    {

      memory_free(

       internal_file_entry->symbolic_link_data );

    }

    if( internal_file_entry->indirect_node_directory_entry != NULL )

    {

      if( libfshfs_directory_entry_free(

           &( internal_file_entry->indirect_node_directory_entry ),

           error ) != 1 )

      {

        libcerror_error_set(

         error,

         LIBCERROR_ERROR_DOMAIN_RUNTIME,

         LIBCERROR_RUNTIME_ERROR_FINALIZE_FAILED,

         "%s: unable to free indirect node directory entry.",

         function );

        result = -1;

      }

    }

    memory_free(

     internal_file_entry );

  }

  return( result );

}

/* Retrieves the (active) directory entry

 * Returns 1 if successful or -1 on error

 */

int libfshfs_internal_file_entry_get_directory_entry(

     libfshfs_internal_file_entry_t *internal_file_entry,

     libfshfs_directory_entry_t **directory_entry,

     libcerror_error_t **error )

{

  static char *function = "libfshfs_internal_file_entry_get_directory_entry";

  if( internal_file_entry == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_INVALID_VALUE,

     "%s: invalid file entry.",

     function );

    return( -1 );

  }

  if( directory_entry == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_INVALID_VALUE,

     "%s: invalid directory entry.",

     function );

    return( -1 );

  }

  if( ( internal_file_entry->link_reference > 2 )

   && ( internal_file_entry->indirect_node_directory_entry == NULL ) )

  {

    if( libfshfs_file_system_get_indirect_node_directory_entry_by_identifier(

         internal_file_entry->file_system,

         internal_file_entry->io_handle,

         internal_file_entry->file_io_handle,

         internal_file_entry->link_reference,

         &( internal_file_entry->indirect_node_directory_entry ),

         error ) != 1 )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_GET_FAILED,

       "%s: unable to retrieve indirect node directory entry: %" PRIu32 ".",

       function,

       internal_file_entry->link_reference );

      return( -1 );

    }

  }

  if( internal_file_entry->indirect_node_directory_entry != NULL )

  {

    *directory_entry = internal_file_entry->indirect_node_directory_entry;

  }

  else

  {

    *directory_entry = internal_file_entry->directory_entry;

  }

  return( 1 );

}

/* Retrieves the data stream from a fork descriptor

 * Returns 1 if successful or -1 on error

 */

int libfshfs_internal_file_entry_get_data_stream_from_fork_descriptor(

     libfshfs_internal_file_entry_t *internal_file_entry,

     uint8_t fork_type,

     libfdata_stream_t **data_stream,

     libcerror_error_t **error )

{

  libfshfs_directory_entry_t *directory_entry = NULL;

  libfshfs_fork_descriptor_t *fork_descriptor = NULL;

  static char *function                       = "libfshfs_internal_file_entry_get_data_stream_from_fork_descriptor";

  int result                                  = 0;

  if( internal_file_entry == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_INVALID_VALUE,

     "%s: invalid file entry.",

     function );

    return( -1 );

  }

  if( ( fork_type != LIBFSHFS_FORK_TYPE_DATA )

   && ( fork_type != LIBFSHFS_FORK_TYPE_RESOURCE ) )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_UNSUPPORTED_VALUE,

     "%s: unsupported fork type.",

     function );

    return( -1 );

  }

  if( libfshfs_internal_file_entry_get_directory_entry(

       internal_file_entry,

       &directory_entry,

       error ) != 1 )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_GET_FAILED,

     "%s: unable to retrieve directory entry.",

     function );

    goto on_error;

  }

  if( fork_type == LIBFSHFS_FORK_TYPE_DATA )

  {

    result = libfshfs_directory_entry_get_data_fork_descriptor(

              directory_entry,

              &fork_descriptor,

              error );

  }

  else

  {

    result = libfshfs_directory_entry_get_resource_fork_descriptor(

              directory_entry,

              &fork_descriptor,

              error );

  }

  if( result != 1 )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_GET_FAILED,

     "%s: unable to retrieve fork descriptor from directory entry.",

     function );

    goto on_error;

  }

  if( libfshfs_file_system_get_extents(

       internal_file_entry->file_system,

       internal_file_entry->file_io_handle,

       internal_file_entry->identifier,

       fork_type,

       fork_descriptor,

       &( internal_file_entry->extents_array ),

       error ) != 1 )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_GET_FAILED,

     "%s: unable to retrieve extents of data stream.",

     function );

    goto on_error;

  }

  if( libfshfs_allocation_block_stream_initialize_from_extents(

       data_stream,

       internal_file_entry->io_handle,

       internal_file_entry->extents_array,

       (size64_t) fork_descriptor->size,

       error ) != 1 )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_INITIALIZE_FAILED,

     "%s: unable to create data stream.",

     function );

    goto on_error;

  }

  return( 1 );

on_error:

  if( internal_file_entry->extents_array != NULL )

  {

    libcdata_array_free(

     &( internal_file_entry->extents_array ),

     (int (*)(intptr_t **, libcerror_error_t **)) &libfshfs_extent_free,

     NULL );

  }

  return( -1 );

}

/* Retrieves the data stream

 * Returns 1 if successful or -1 on error

 */

int libfshfs_internal_file_entry_get_data_stream(

     libfshfs_internal_file_entry_t *internal_file_entry,

     libcerror_error_t **error )

{

  libfdata_stream_t *compressed_data_stream = NULL;

  static char *function                     = "libfshfs_internal_file_entry_get_data_stream";

  int compression_method                    = 0;

  if( internal_file_entry == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_INVALID_VALUE,

     "%s: invalid file entry.",

     function );

    return( -1 );

  }

  if( internal_file_entry->data_stream != NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_VALUE_ALREADY_SET,

     "%s: invalid file entry - data stream value already set.",

     function );

    return( -1 );

  }

  if( internal_file_entry->compressed_data_header != NULL )

  {

    switch( internal_file_entry->compressed_data_header->compression_method )

    {

      case 3:

      case 4:

        compression_method = LIBFSHFS_COMPRESSION_METHOD_DEFLATE;

        break;

      case 5:

        compression_method = LIBFSHFS_COMPRESSION_METHOD_UNKNOWN5;

        break;

      case 7:

      case 8:

        compression_method = LIBFSHFS_COMPRESSION_METHOD_LZVN;

        break;

      case 11:

      case 12:

        compression_method = LIBFSHFS_COMPRESSION_METHOD_LZFSE;

        break;

      default:

        libcerror_error_set(

         error,

         LIBCERROR_ERROR_DOMAIN_RUNTIME,

         LIBCERROR_RUNTIME_ERROR_UNSUPPORTED_VALUE,

         "%s: unsupported compression method: %d.",

         function,

         internal_file_entry->compressed_data_header->compression_method );

        goto on_error;

    }

    if( ( internal_file_entry->compressed_data_header->compression_method == 4 )

     || ( internal_file_entry->compressed_data_header->compression_method == 8 ) )

    {

      if( libfshfs_internal_file_entry_get_data_stream_from_fork_descriptor(

           internal_file_entry,

           LIBFSHFS_FORK_TYPE_RESOURCE,

           &compressed_data_stream,

           error ) != 1 )

      {

        libcerror_error_set(

         error,

         LIBCERROR_ERROR_DOMAIN_RUNTIME,

         LIBCERROR_RUNTIME_ERROR_INITIALIZE_FAILED,

         "%s: unable to create compressed data stream from fork descriptor.",

         function );

        goto on_error;

      }

    }

    else

    {

      if( libfshfs_allocation_block_stream_initialize_from_data(

           &compressed_data_stream,

           internal_file_entry->compressed_data_attribute_record->inline_data,

           internal_file_entry->compressed_data_attribute_record->inline_data_size,

           error ) != 1 )

      {

        libcerror_error_set(

         error,

         LIBCERROR_ERROR_DOMAIN_RUNTIME,

         LIBCERROR_RUNTIME_ERROR_INITIALIZE_FAILED,

         "%s: unable to create compressed data stream from inline data.",

         function );

        goto on_error;

      }

    }

    if( libfshfs_allocation_block_stream_initialize_from_compressed_stream(

         &( internal_file_entry->data_stream ),

         compressed_data_stream,

         internal_file_entry->compressed_data_header->uncompressed_data_size,

         compression_method,

         error ) != 1 )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_INITIALIZE_FAILED,

       "%s: unable to create data stream.",

       function );

      goto on_error;

    }

  }

  else

  {

    if( libfshfs_internal_file_entry_get_data_stream_from_fork_descriptor(

         internal_file_entry,

         LIBFSHFS_FORK_TYPE_DATA,

         &( internal_file_entry->data_stream ),

         error ) != 1 )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_INITIALIZE_FAILED,

       "%s: unable to create data stream.",

       function );

      goto on_error;

    }

  }

  return( 1 );

on_error:

  if( compressed_data_stream != NULL )

  {

    libfdata_stream_free(

     &compressed_data_stream,

     NULL );

  }

  if( internal_file_entry->data_stream != NULL )

  {

    libfdata_stream_free(

     &( internal_file_entry->data_stream ),

     NULL );

  }

  return( -1 );

}

/* Determines the symbolic link data

 * Returns 1 if successful or -1 on error

 */

int libfshfs_internal_file_entry_get_symbolic_link_data(

     libfshfs_internal_file_entry_t *internal_file_entry,

     libcerror_error_t **error )

{

  libfshfs_directory_entry_t *directory_entry      = NULL;

  libfshfs_fork_descriptor_t *data_fork_descriptor = NULL;

  static char *function                            = "libfshfs_internal_file_entry_get_symbolic_link_data";

  ssize_t read_count                               = 0;

  if( internal_file_entry == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_INVALID_VALUE,

     "%s: invalid file entry.",

     function );

    return( -1 );

  }

  if( internal_file_entry->symbolic_link_data != NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_VALUE_ALREADY_SET,

     "%s: invalid file entry - symbolic link data value already set.",

     function );

    return( -1 );

  }

  if( ( internal_file_entry->file_mode & 0xf000 ) == LIBFSHFS_FILE_TYPE_SYMBOLIC_LINK )

  {

    if( internal_file_entry->data_stream != NULL )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_VALUE_ALREADY_SET,

       "%s: invalid file entry - data stream value already set.",

       function );

      goto on_error;

    }

    if( libfshfs_internal_file_entry_get_directory_entry(

         internal_file_entry,

         &directory_entry,

         error ) != 1 )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_GET_FAILED,

       "%s: unable to retrieve directory entry.",

       function );

      goto on_error;

    }

    if( libfshfs_directory_entry_get_data_fork_descriptor(

         directory_entry,

         &data_fork_descriptor,

         error ) != 1 )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_GET_FAILED,

       "%s: unable to retrieve data fork descriptor from directory entry.",

       function );

      goto on_error;

    }

    if( data_fork_descriptor == NULL )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_VALUE_MISSING,

       "%s: missing data fork descriptor.",

       function );

      goto on_error;

    }

    if( libfshfs_allocation_block_stream_initialize_from_fork_descriptor(

         &( internal_file_entry->data_stream ),

         internal_file_entry->io_handle,

         data_fork_descriptor,

         error ) != 1 )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_GET_FAILED,

       "%s: unable to retrieve data stream.",

       function );

      goto on_error;

    }

    if( ( data_fork_descriptor->size == 0 )

     || ( data_fork_descriptor->size > (size64_t) MEMORY_MAXIMUM_ALLOCATION_SIZE ) )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_RUNTIME,

       LIBCERROR_RUNTIME_ERROR_VALUE_OUT_OF_BOUNDS,

       "%s: invalid data size value out of bounds.",

       function );

      goto on_error;

    }

    internal_file_entry->symbolic_link_data = (uint8_t *) memory_allocate(

                                                           sizeof( uint8_t ) * (size_t) data_fork_descriptor->size );

    if( internal_file_entry->symbolic_link_data == NULL )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_MEMORY,

       LIBCERROR_MEMORY_ERROR_INSUFFICIENT,

       "%s: unable to create symbolic link data.",

       function );

      goto on_error;

    }

    internal_file_entry->symbolic_link_data_size = (size_t) data_fork_descriptor->size;

    read_count = libfdata_stream_read_buffer_at_offset(

                  internal_file_entry->data_stream,

                  (intptr_t *) internal_file_entry->file_io_handle,

                  internal_file_entry->symbolic_link_data,

                  internal_file_entry->symbolic_link_data_size,

                  0,

                  0,

                  error );

    if( read_count != (ssize_t) internal_file_entry->symbolic_link_data_size )

    {

      libcerror_error_set(

       error,

       LIBCERROR_ERROR_DOMAIN_IO,

       LIBCERROR_IO_ERROR_READ_FAILED,

       "%s: unable to read from data stream.",

       function );

      goto on_error;

    }

#if defined( HAVE_DEBUG_OUTPUT )

    if( libcnotify_verbose != 0 )

    {

      libcnotify_printf(

       "%s: symbolic link data:\n",

       function );

      libcnotify_print_data(

       internal_file_entry->symbolic_link_data,

       internal_file_entry->symbolic_link_data_size,

       LIBCNOTIFY_PRINT_DATA_FLAG_GROUP_DATA );

    }

#endif

  }

  return( 1 );

on_error:

  if( internal_file_entry->symbolic_link_data != NULL )

  {

    memory_free(

     internal_file_entry->symbolic_link_data );

    internal_file_entry->symbolic_link_data = NULL;

  }

  internal_file_entry->symbolic_link_data_size = 0;

  return( -1 );

}

/* Retrieves the identifier (or catalog node identifier (CNID))

 * Returns 1 if successful or -1 on error

 */

int libfshfs_file_entry_get_identifier(

     libfshfs_file_entry_t *file_entry,

     uint32_t *identifier,

     libcerror_error_t **error )

{

  libfshfs_internal_file_entry_t *internal_file_entry = NULL;

  static char *function                               = "libfshfs_file_entry_get_identifier";

  if( file_entry == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_INVALID_VALUE,

     "%s: invalid file entry.",

     function );

    return( -1 );

  }

  internal_file_entry = (libfshfs_internal_file_entry_t *) file_entry;

  if( identifier == NULL )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_ARGUMENTS,

     LIBCERROR_ARGUMENT_ERROR_INVALID_VALUE,

     "%s: invalid identifier.",

     function );

    return( -1 );

  }

#if defined( HAVE_LIBFSHFS_MULTI_THREAD_SUPPORT )

  if( libcthreads_read_write_lock_grab_for_read(

       internal_file_entry->read_write_lock,

       error ) != 1 )

  {

    libcerror_error_set(

     error,

     LIBCERROR_ERROR_DOMAIN_RUNTIME,

     LIBCERROR_RUNTIME_ERROR_SET_FAILED,

     "%s: unable to grab read/write lock for reading.",

     function );