-#include "snapshot-interface.h"
-#include "snapshot.h"
-#include <iostream>
-#include <fstream>
+#include <stdlib.h>
#include <unistd.h>
-#include <sys/types.h>
-#include <sstream>
#include <cstring>
-#include <string>
-#include <cassert>
-#include <vector>
-#include <utility>
#include <inttypes.h>
-#include "common.h"
+#include "snapshot-interface.h"
+#include "snapshot.h"
+#include "common.h"
+#include "mymemory.h"
+/* MYBINARYNAME only works because our pathname usually includes 'model' (e.g.,
+ * /.../model-checker/test/userprog.o) */
#define MYBINARYNAME "model"
#define MYLIBRARYNAME "libmodel.so"
-#define MAPFILE_FORMAT "/proc/%d/maps"
+#define MAPFILE "/proc/self/maps"
+
+struct stackEntry {
+ struct stackEntry *next;
+ snapshot_id snapshotid;
+ int index;
+};
-SnapshotStack * snapshotObject;
+class SnapshotStack {
+ public:
+ SnapshotStack();
+ ~SnapshotStack();
+ int backTrackBeforeStep(int seq_index);
+ void snapshotStep(int seq_index);
+
+ MEMALLOC
+ private:
+ struct stackEntry *stack;
+};
+
+static SnapshotStack *snapshotObject;
#ifdef MAC
/** The SnapshotGlobalSegments function computes the memory regions
* that may contain globals and then configures the snapshotting
* library to snapshot them.
*/
-
-void SnapshotGlobalSegments(){
+static void SnapshotGlobalSegments()
+{
int pid = getpid();
char buf[9000], execname[100];
FILE *map;
sprintf(execname, "vmmap -interleaved %d", pid);
- map=popen(execname, "r");
+ map = popen(execname, "r");
if (!map) {
perror("popen");
void *begin, *end;
//Skip out at the end of the section
- if (buf[0]=='\n')
+ if (buf[0] == '\n')
break;
-
- sscanf(buf, "%22s %p-%p [%5dK] %c%c%c/%c%c%c SM=%3s %200s\n", &type, &begin, &end, &size, &r, &w, &x, &mr, &mw, &mx, smstr, regionname);
+
+ sscanf(buf, "%22s %p-%p [%5dK] %c%c%c/%c%c%c SM=%3s %200s\n", type, &begin, &end, &size, &r, &w, &x, &mr, &mw, &mx, smstr, regionname);
if (w == 'w' && (strstr(regionname, MYBINARYNAME) || strstr(regionname, MYLIBRARYNAME))) {
size_t len = ((uintptr_t)end - (uintptr_t)begin) / PAGESIZE;
if (len != 0)
- addMemoryRegionToSnapShot(begin, len);
- DEBUG("%s\n", buf);
- DEBUG("%45s: %18p - %18p\t%c%c%c%c\n", regionname, begin, end, r, w, x, p);
+ snapshot_add_memory_region(begin, len);
}
}
pclose(map);
}
#else
+
+static void get_binary_name(char *buf, size_t len)
+{
+ if (readlink("/proc/self/exe", buf, len) == -1) {
+ perror("readlink");
+ exit(EXIT_FAILURE);
+ }
+}
+
/** The SnapshotGlobalSegments function computes the memory regions
* that may contain globals and then configures the snapshotting
* library to snapshot them.
*/
-void SnapshotGlobalSegments(){
- int pid = getpid();
- char buf[9000], filename[100];
+static void SnapshotGlobalSegments()
+{
+ char buf[9000];
+ char binary_name[800];
FILE *map;
- sprintf(filename, MAPFILE_FORMAT, pid);
- map = fopen(filename, "r");
+ map = fopen(MAPFILE, "r");
if (!map) {
perror("fopen");
exit(EXIT_FAILURE);
}
+ get_binary_name(binary_name, sizeof(binary_name));
while (fgets(buf, sizeof(buf), map)) {
char regionname[200] = "";
char r, w, x, p;
void *begin, *end;
sscanf(buf, "%p-%p %c%c%c%c %*x %*x:%*x %*u %200s\n", &begin, &end, &r, &w, &x, &p, regionname);
- if (w == 'w' && (strstr(regionname, MYBINARYNAME) || strstr(regionname, MYLIBRARYNAME))) {
+ if (w == 'w' && (strstr(regionname, binary_name) || strstr(regionname, MYLIBRARYNAME))) {
size_t len = ((uintptr_t)end - (uintptr_t)begin) / PAGESIZE;
if (len != 0)
- addMemoryRegionToSnapShot(begin, len);
- DEBUG("%45s: %18p - %18p\t%c%c%c%c\n", regionname, begin, end, r, w, x, p);
+ snapshot_add_memory_region(begin, len);
+ DEBUG("%55s: %18p - %18p\t%c%c%c%c\n", regionname, begin, end, r, w, x, p);
}
}
fclose(map);
}
#endif
-SnapshotStack::SnapshotStack(){
+SnapshotStack::SnapshotStack()
+{
SnapshotGlobalSegments();
- stack=NULL;
+ stack = NULL;
}
-SnapshotStack::~SnapshotStack(){
+SnapshotStack::~SnapshotStack()
+{
}
-
/** This method returns to the last snapshot before the inputted
* sequence number. This function must be called from the model
- * checking thread and not from a snapshotted stack.
- * @param seqindex is the sequence number to rollback before.
+ * checking thread and not from a snapshotted stack.
+ * @param seqindex is the sequence number to rollback before.
* @return is the sequence number we actually rolled back to.
*/
-
-int SnapshotStack::backTrackBeforeStep(int seqindex) {
- while(true) {
- if (stack->index<=seqindex) {
+int SnapshotStack::backTrackBeforeStep(int seqindex)
+{
+ while (true) {
+ if (stack->index <= seqindex) {
//have right entry
- rollBack(stack->snapshotid);
+ snapshot_roll_back(stack->snapshotid);
return stack->index;
}
- struct stackEntry *tmp=stack;
- MYFREE(tmp);
- stack=stack->next;
+ struct stackEntry *tmp = stack;
+ stack = stack->next;
+ model_free(tmp);
}
}
-/** This method takes a snapshot at the given sequence number.
- */
+/** This method takes a snapshot at the given sequence number. */
+void SnapshotStack::snapshotStep(int seqindex)
+{
+ struct stackEntry *tmp = (struct stackEntry *)model_malloc(sizeof(struct stackEntry));
+ tmp->next = stack;
+ tmp->index = seqindex;
+ tmp->snapshotid = take_snapshot();
+ stack = tmp;
+}
+
+
+void snapshot_stack_init()
+{
+ snapshotObject = new SnapshotStack();
+}
+
+void snapshot_record(int seq_index)
+{
+ snapshotObject->snapshotStep(seq_index);
+}
-void SnapshotStack::snapshotStep(int seqindex) {
- struct stackEntry *tmp=(struct stackEntry *)MYMALLOC(sizeof(struct stackEntry));
- tmp->next=stack;
- tmp->index=seqindex;
- tmp->snapshotid=takeSnapshot();
- stack=tmp;
+int snapshot_backtrack_before(int seq_index)
+{
+ return snapshotObject->backTrackBeforeStep(seq_index);
}