src/mc/mc_snapshot.c

   1 /* Copyright (c) 2014. The SimGrid Team.
   2  * All rights reserved.                                                     */
   3
   4 /* This program is free software; you can redistribute it and/or modify it
   5  * under the terms of the license (GNU LGPL) which comes with this package. */
   6
   7 #include "mc_private.h"
   8 #include "mc_mmu.h"
   9
  10 mc_mem_region_t mc_get_snapshot_region(void* addr, mc_snapshot_t snapshot)
  11 {
  12   for (size_t i = 0; i != NB_REGIONS; ++i) {
  13     mc_mem_region_t region = snapshot->regions[i];
  14     void* start = region->start_addr;
  15     void* end = (char*) start + region->size;
  16
  17     if (addr >= start && addr < end) {
  18       return region;
  19     }
  20   }
  21
  22   return NULL;
  23 }
  24
  25 void* mc_translate_address_region(uintptr_t addr, mc_mem_region_t region)
  26 {
  27   if (!region) {
  28     return (void *) addr;
  29   }
  30
  31   // Flat snapshot:
  32   else if (region->data) {
  33     uintptr_t offset = addr - (uintptr_t) region->start_addr;
  34     return (void *) ((uintptr_t) region->data + offset);
  35   }
  36
  37   // Per-page snapshot:
  38   else if (region->page_numbers) {
  39     size_t pageno = mc_page_number(region->start_addr, (void*) addr);
  40     size_t snapshot_pageno = region->page_numbers[pageno];
  41     const void* snapshot_page = mc_page_store_get_page(mc_model_checker->pages, snapshot_pageno);
  42     return (char*) snapshot_page + mc_page_offset((void*) addr);
  43   }
  44
  45   else {
  46     xbt_die("No data for this memory region");
  47   }
  48 }
  49
  50 void* mc_translate_address(uintptr_t addr, mc_snapshot_t snapshot)
  51 {
  52
  53   // If not in a process state/clone:
  54   if (!snapshot) {
  55     return (uintptr_t *) addr;
  56   }
  57
  58   mc_mem_region_t region = mc_get_snapshot_region((void*) addr, snapshot);
  59   return mc_translate_address_region(addr, region);
  60 }
  61
  62 /** @brief Read memory from a snapshot region broken across fragmented pages
  63  *
  64  *  @param addr    Process (non-snapshot) address of the data
  65  *  @param region  Snapshot memory region where the data is located
  66  *  @param target  Buffer to store the value
  67  *  @param size    Size of the data to read in bytes
  68  *  @return Pointer where the data is located (target buffer of original location)
  69  */
  70 static void* mc_snapshot_read_fragmented(void* addr, mc_mem_region_t region, void* target, size_t size)
  71 {
  72   void* end = (char*) addr + size - 1;
  73   size_t page_end = mc_page_number(NULL, end);
  74
  75   // Read each page:
  76   while (mc_page_number(NULL, addr) != page_end) {
  77     void* snapshot_addr = mc_translate_address_region((uintptr_t) addr, region);
  78     void* next_page = mc_page_from_number(NULL, mc_page_number(NULL, addr) + 1);
  79     size_t readable = (char*) next_page - (char*) addr;
  80     memcpy(target, snapshot_addr, readable);
  81     addr = (char*) addr + readable;
  82     target = (char*) target + readable;
  83     size -= readable;
  84   }
  85
  86   // Read the end:
  87   void* snapshot_addr = mc_translate_address_region((uintptr_t)addr, region);
  88   memcpy(target, snapshot_addr, size);
  89
  90   return target;
  91 }
  92
  93 /** @brief Read memory from a snapshot region
  94  *
  95  *  @param addr    Process (non-snapshot) address of the data
  96  *  @param region  Snapshot memory region where the data is located
  97  *  @param target  Buffer to store the value
  98  *  @param size    Size of the data to read in bytes
  99  *  @return Pointer where the data is located (target buffer of original location)
 100  */
 101 void* mc_snapshot_read_region(void* addr, mc_mem_region_t region, void* target, size_t size)
 102 {
 103   uintptr_t offset = (uintptr_t) addr - (uintptr_t) region->start_addr;
 104
 105   if (addr < region->start_addr || (char*) addr+size >= (char*)region->start_addr+region->size) {
 106     xbt_die("Trying to read out of the region boundary.");
 107   }
 108
 109   // Linear memory region:
 110   if (region->data) {
 111     return (void*) ((uintptr_t) region->data + offset);
 112   }
 113
 114   // Fragmented memory region:
 115   else if (region->page_numbers) {
 116     void* end = (char*) addr + size - 1;
 117     if( mc_same_page(addr, end) ) {
 118       // The memory is contained in a single page:
 119       return mc_translate_address_region((uintptr_t) addr, region);
 120     } else {
 121       // The memory spans several pages:
 122       return mc_snapshot_read_fragmented(addr, region, target, size);
 123     }
 124   }
 125
 126   else {
 127     xbt_die("No data available for this region");
 128   }
 129 }
 130
 131 /** @brief Read memory from a snapshot
 132  *
 133  *  @param addr     Process (non-snapshot) address of the data
 134  *  @param snapshot Snapshot (or NULL is no snapshot)
 135  *  @param target   Buffer to store the value
 136  *  @param size     Size of the data to read in bytes
 137  *  @return Pointer where the data is located (target buffer of original location)
 138  */
 139 void* mc_snapshot_read(void* addr, mc_snapshot_t snapshot, void* target, size_t size)
 140 {
 141   if (snapshot) {
 142     mc_mem_region_t region = mc_get_snapshot_region(addr, snapshot);
 143     return mc_snapshot_read_region(addr, region, target, size);
 144   } else {
 145     return addr;
 146   }
 147 }
 148
 149 int mc_snapshot_memcp(
 150   void* addr1, mc_snapshot_t snapshot1,
 151   void* addr2, mc_snapshot_t snapshot2, size_t size)
 152 {
 153   void* buffer1 = mc_snapshot_read(addr1, snapshot1, alloca(size), size);
 154   void* buffer2 = mc_snapshot_read(addr2, snapshot2, alloca(size), size);
 155   if (buffer1 == buffer2) {
 156     return 0;
 157   }
 158   return memcmp(buffer1, buffer2, size);
 159 }