Draft: Kargin Alexander P3206 Lab_4

.idea/cmake.xml

-<?xml version="1.0" encoding="UTF-8"?>
-<project version="4">
-  <component name="CMakeSharedSettings">
-    <configurations>
-      <configuration PROFILE_NAME="Debug" ENABLED="true" GENERATION_DIR="out/build/debug" CONFIG_NAME="Debug" GENERATION_OPTIONS="-G Ninja -DCMAKE_BUILD_TYPE=Debug" />
-      <configuration PROFILE_NAME="Release" ENABLED="true" GENERATION_DIR="out/build/release" CONFIG_NAME="Release" GENERATION_OPTIONS="-G Ninja -DCMAKE_BUILD_TYPE=Release" />
-      <configuration PROFILE_NAME="ASan" ENABLED="true" GENERATION_DIR="out/build/asan" CONFIG_NAME="ASan" GENERATION_OPTIONS="-G Ninja -DCMAKE_BUILD_TYPE=ASan" />
-      <configuration PROFILE_NAME="LSan" ENABLED="true" GENERATION_DIR="out/build/lsan" CONFIG_NAME="LSan" GENERATION_OPTIONS="-G Ninja -DCMAKE_BUILD_TYPE=LSan" />
-      <configuration PROFILE_NAME="MSan" ENABLED="true" GENERATION_DIR="out/build/msan" CONFIG_NAME="MSan" GENERATION_OPTIONS="-G Ninja -DCMAKE_BUILD_TYPE=MSan" />
-      <configuration PROFILE_NAME="UBSan" ENABLED="true" GENERATION_DIR="out/build/ubsan" CONFIG_NAME="UBSan" GENERATION_OPTIONS="-G Ninja -DCMAKE_BUILD_TYPE=UBSan" />
-    </configurations>
-  </component>
-</project>
\ No newline at end of file

src/CMakeLists.txt

-if(CMAKE_C_COMPILER_ID STREQUAL GNU OR CMAKE_C_COMPILER_ID MATCHES Clang)
-    add_compile_options(-Wall -Werror -Wno-unused -ggdb)
-elseif(MSVC)
-    add_compile_options(/W4 /WX)
-endif()
-
-find_program(CLANG_TIDY clang-tidy)
-message(STATUS "Clang-tidy: ${CLANG_TIDY}")
-if(CLANG_TIDY)
-    file(STRINGS ${PROJECT_SOURCE_DIR}/clang-tidy-checks.txt clang_tidy_checks)
-    list(JOIN clang_tidy_checks "," clang_tidy_checks_str)
-    set(CMAKE_C_CLANG_TIDY
-        ${CLANG_TIDY}
-        -header-filter=${CMAKE_SOURCE_DIR}
-        -checks=${clang_tidy_checks_str}
-        -warnings-as-errors=*
-    )
-endif()
-
-file(GLOB_RECURSE sources CONFIGURE_DEPENDS *.c *.h)
-list(FILTER sources EXCLUDE REGEX main.c)
-
-add_library(memalloc STATIC ${sources})
-target_include_directories(memalloc PUBLIC .)
-
-if(EXISTS main.c)
-    add_executable(memalloc_exe main.c)
-    target_link_libraries(memalloc_exe PRIVATE memalloc)
-    set_target_properties(memalloc_exe PROPERTIES OUTPUT_NAME memalloc)
-endif()

src/mem.c

-#define _DEFAULT_SOURCE
-
-#include <assert.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <unistd.h>
-
-#include "mem_internals.h"
-#include "mem.h"
-#include "util.h"
-
-void debug_block(struct block_header* b, const char* fmt, ... );
-void debug(const char* fmt, ... );
-
-extern inline block_size size_from_capacity( block_capacity cap );
-extern inline block_capacity capacity_from_size( block_size sz );
-
-static bool            block_is_big_enough( size_t query, struct block_header* block ) { return block->capacity.bytes >= query; }
-static size_t          pages_count   ( size_t mem )                      { return mem / getpagesize() + ((mem % getpagesize()) > 0); }
-static size_t          round_pages   ( size_t mem )                      { return getpagesize() * pages_count( mem ) ; }
-
-static void block_init( void* restrict addr, block_size block_sz, void* restrict next ) {
-  *((struct block_header*)addr) = (struct block_header) {
-    .next = next,
-    .capacity = capacity_from_size(block_sz),
-    .is_free = true
-  };
-}
-
-static size_t region_actual_size( size_t query ) { return size_max( round_pages( query ), REGION_MIN_SIZE ); }
-
-extern inline bool region_is_invalid( const struct region* r );
-
-
-
-static void* map_pages(void const* addr, size_t length, int additional_flags) {
-  return mmap( (void*) addr, length, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS | additional_flags , -1, 0 );
-}
-
-/*  аллоцировать регион памяти и инициализировать его блоком */
-static struct region alloc_region  ( void const * addr, size_t query ) {
-  /*  ??? */
-}
-
-static void* block_after( struct block_header const* block )         ;
-
-void* heap_init( size_t initial ) {
-  const struct region region = alloc_region( HEAP_START, initial );
-  if ( region_is_invalid(&region) ) return NULL;
-
-  return region.addr;
-}
-
-/*  освободить всю память, выделенную под кучу */
-void heap_term( ) {
-  /*  ??? */
-}
-
-#define BLOCK_MIN_CAPACITY 24
-
-/*  --- Разделение блоков (если найденный свободный блок слишком большой )--- */
-
-static bool block_splittable( struct block_header* restrict block, size_t query) {
-  return block-> is_free && query + offsetof( struct block_header, contents ) + BLOCK_MIN_CAPACITY <= block->capacity.bytes;
-}
-
-static bool split_if_too_big( struct block_header* block, size_t query ) {
-  /*  ??? */
-}
-
-
-/*  --- Слияние соседних свободных блоков --- */
-
-static void* block_after( struct block_header const* block )              {
-  return  (void*) (block->contents + block->capacity.bytes);
-}
-static bool blocks_continuous (
-                               struct block_header const* fst,
-                               struct block_header const* snd ) {
-  return (void*)snd == block_after(fst);
-}
-
-static bool mergeable(struct block_header const* restrict fst, struct block_header const* restrict snd) {
-  return fst->is_free && snd->is_free && blocks_continuous( fst, snd ) ;
-}
-
-static bool try_merge_with_next( struct block_header* block ) {
-  /*  ??? */
-}
-
-
-/*  --- ... ecли размера кучи хватает --- */
-
-struct block_search_result {
-  enum {BSR_FOUND_GOOD_BLOCK, BSR_REACHED_END_NOT_FOUND, BSR_CORRUPTED} type;
-  struct block_header* block;
-};
-
-
-static struct block_search_result find_good_or_last  ( struct block_header* restrict block, size_t sz )    {
-  /*??? */
-}
-
-/*  Попробовать выделить память в куче начиная с блока `block` не пытаясь расширить кучу
- Можно переиспользовать как только кучу расширили. */
-static struct block_search_result try_memalloc_existing ( size_t query, struct block_header* block ) {
-  
-}
-
-
-
-static struct block_header* grow_heap( struct block_header* restrict last, size_t query ) {
-  /*  ??? */
-}
-
-/*  Реализует основную логику malloc и возвращает заголовок выделенного блока */
-static struct block_header* memalloc( size_t query, struct block_header* heap_start) {
-
-  /*  ??? */
-
-}
-
-void* _malloc( size_t query ) {
-  struct block_header* const addr = memalloc( query, (struct block_header*) HEAP_START );
-  if (addr) return addr->contents;
-  else return NULL;
-}
-
-static struct block_header* block_get_header(void* contents) {
-  return (struct block_header*) (((uint8_t*)contents)-offsetof(struct block_header, contents));
-}
-
-void _free( void* mem ) {
-  if (!mem) return ;
-  struct block_header* header = block_get_header( mem );
-  header->is_free = true;
-  /*  ??? */
-}

src/mem_debug.c

-#include <stdarg.h>
-#include <stdio.h>
-
-#include "mem_internals.h"
-#include "mem.h"
-
-void debug_struct_info( FILE* f,
-                                 void const* addr ) {
-
-  struct block_header const* header =  addr;
-  fprintf( f,
-           "%10p %10zu %8s   ",
-           addr,
-           header-> capacity.bytes,
-           header-> is_free? "free" : "taken"
-           );
-  for ( size_t i = 0; i < DEBUG_FIRST_BYTES && i < header -> capacity.bytes; ++i )
-    fprintf( f, "%hhX", header-> contents[i] );
-  fprintf( f, "\n" );
-}
-
-
-void debug_heap( FILE* f,  void const* ptr ) {
-  fprintf( f, " --- Heap ---\n");
-  fprintf( f, "%10s %10s %8s %10s\n", "start", "capacity", "status", "contents" );
-  for(struct block_header const* header =  ptr; header; header = header ->next )
-    debug_struct_info( f, header );
-}
-
-void debug_block(struct block_header* b, const char* fmt, ... ) {
-  #ifdef DEBUG
-
-  va_list args;
-  va_start (args, fmt);
-  vfprintf(stderr, fmt, args);
-  debug_struct_info( stderr, b );
-  va_end (args);
-
-  #else
-  (void) b; (void) fmt;
-  #endif
-}
-
-void debug(const char* fmt, ... ) {
-#ifdef DEBUG
-
-  va_list args;
-  va_start (args, fmt);
-  vfprintf(stderr, fmt, args);
-  va_end (args);
-
-#else
-  (void) fmt;
-#endif
-}

[Andrey Zhdanov]

Принята в !86 (closed)