synthemesc-codex 0.0.0

data/tpl.h

@@ -0,0 +1,119 @@
+/*
+Copyright (c) 2005-2009, Troy D. Hanson     http://tpl.sourceforge.net
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions are met:
+
+    * Redistributions of source code must retain the above copyright
+      notice, this list of conditions and the following disclaimer.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
+IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
+TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
+PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
+OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+*/
+
+#ifndef TPL_H
+#define TPL_H 
+
+#include <stddef.h>     /* size_t */
+
+#ifdef _MSC_VER
+typedef unsigned int uint32_t;
+#else
+#include <inttypes.h>   /* uint32_t */
+#endif
+
+#if defined __cplusplus
+extern "C" {
+#endif
+
+#define TPL_API
+
+/* bit flags (external) */
+#define TPL_FILE      (1 << 0)
+#define TPL_MEM       (1 << 1)
+#define TPL_PREALLOCD (1 << 2)
+#define TPL_EXCESS_OK (1 << 3)
+#define TPL_FD        (1 << 4)
+#define TPL_UFREE     (1 << 5)  
+#define TPL_DATAPEEK  (1 << 6)  
+#define TPL_FXLENS    (1 << 7)  
+#define TPL_GETSIZE   (1 << 8)
+/* do not add flags here without renumbering the internal flags! */
+
+/* flags for tpl_gather mode */
+#define TPL_GATHER_BLOCKING    1
+#define TPL_GATHER_NONBLOCKING 2
+#define TPL_GATHER_MEM         3
+
+/* Hooks for error logging, memory allocation functions and fatal */
+typedef int (tpl_print_fcn)(const char *fmt, ...);
+typedef void *(tpl_malloc_fcn)(size_t sz);
+typedef void *(tpl_realloc_fcn)(void *ptr, size_t sz);
+typedef void (tpl_free_fcn)(void *ptr);
+typedef void (tpl_fatal_fcn)(char *fmt, ...);
+
+typedef struct tpl_hook_t {
+    tpl_print_fcn *oops;
+    tpl_malloc_fcn *malloc;
+    tpl_realloc_fcn *realloc;
+    tpl_free_fcn *free;
+    tpl_fatal_fcn *fatal;
+    size_t gather_max;
+} tpl_hook_t;
+
+typedef struct tpl_node {
+    int type;
+    void *addr;
+    void *data;                  /* r:tpl_root_data*. A:tpl_atyp*. ow:szof type */
+    int num;                     /* length of type if its a C array */
+    size_t ser_osz;              /* serialization output size for subtree */
+    struct tpl_node *children;   /* my children; linked-list */
+    struct tpl_node *next,*prev; /* my siblings (next child of my parent) */
+    struct tpl_node *parent;     /* my parent */
+} tpl_node;
+
+/* used when un/packing 'B' type (binary buffers) */
+typedef struct tpl_bin {
+    void *addr;
+    uint32_t sz;
+} tpl_bin;
+
+/* for async/piecemeal reading of tpl images */
+typedef struct tpl_gather_t {
+    char *img;
+    int len;
+} tpl_gather_t;
+
+/* Callback used when tpl_gather has read a full tpl image */
+typedef int (tpl_gather_cb)(void *img, size_t sz, void *data);
+
+/* Prototypes */
+TPL_API tpl_node *tpl_map(char *fmt,...);       /* define tpl using format */
+TPL_API void tpl_free(tpl_node *r);             /* free a tpl map */
+TPL_API int tpl_pack(tpl_node *r, int i);       /* pack the n'th packable */
+TPL_API int tpl_unpack(tpl_node *r, int i);     /* unpack the n'th packable */
+TPL_API int tpl_dump(tpl_node *r, int mode, ...); /* serialize to mem/file */
+TPL_API int tpl_load(tpl_node *r, int mode, ...); /* set mem/file to unpack */
+TPL_API int tpl_Alen(tpl_node *r, int i);      /* array len of packable i */
+TPL_API char* tpl_peek(int mode, ...);         /* sneak peek at format string */
+TPL_API int tpl_gather( int mode, ...);        /* non-blocking image gather */
+TPL_API int tpl_jot(int mode, ...);            /* quick write a simple tpl */
+
+char *calc_field_addr(tpl_node *r, int t, char *addr, int o);
+
+#if defined __cplusplus
+    }
+#endif
+
+#endif /* TPL_H */
+

data/vm.c

@@ -0,0 +1,57 @@
+#include <assert.h>
+#include <fcntl.h>
+#include <stdio.h>
+#include <string.h>
+#include <sys/mman.h>
+#include <sys/stat.h>
+#include <sys/types.h>
+#include <unistd.h>
+
+#include "codex.h"
+
+void codex_init(struct codex* sys)
+{
+  /* Make sure map size is sane */
+  assert(sys->size > 0);
+  assert(sys->size > (uint64_t)getpagesize());
+  assert(sys->size < UINT64_MAX);
+
+  assert(sys->offset >= 0);
+  assert((sys->offset + sys->size) < UINT64_MAX);
+
+  sys->filename[sizeof(sys->filename)-1] = '\0';
+
+  assert(sys->filename != NULL);
+  assert(strlen(sys->filename) > 0);
+  assert(strlen(sys->filename) < 256);
+
+  fprintf(stderr, "Minimum size is %llu bytes, responding to 0x%llx.\n", LLU sys->size, LLU sys->offset);
+  fprintf(stderr, "Page size is %llu bytes.\n", LLU getpagesize());
+
+  fprintf(stderr, "Opening %s.. ", sys->filename);
+  assert((sys->descriptor = open(sys->filename, O_RDWR | O_CREAT, S_IRUSR | S_IWUSR)) > 0);
+  fprintf(stderr, "done.\n");
+
+  /* Set permissions to something a little less arbitrary */
+  fprintf(stderr, "Setting 0600.. ");
+  assert(fchmod(sys->descriptor, S_IRUSR | S_IWUSR) == 0);
+  fprintf(stderr, "done.\n");
+
+  /* Stretch if possible by seeking to the position we want and writing a single byte. */
+  fprintf(stderr, "Stretching file to %llu bytes.. ", LLU sys->size);
+  assert(lseek(sys->descriptor, sys->size-1, SEEK_SET) == (sys->size-1)); /* Seek */
+  assert(write(sys->descriptor, "", 1) == 1); /* Write a single byte */
+  assert(lseek(sys->descriptor, 0, SEEK_SET) == 0); /* Rewind */
+  fprintf(stderr, "done.\n");
+
+  /* Grab the file status from our descriptor */
+  assert(fstat(sys->descriptor, &sys->status) == 0);
+
+  fprintf(stderr, "Mapping %llu bytes.. ", LLU sys->size);
+  sys->memory = mmap(NULL, sys->size, PROT_READ | PROT_WRITE, MAP_SHARED, sys->descriptor, 0);
+  assert(sys->memory != NULL);
+  assert(sys->memory != MAP_FAILED);
+  fprintf(stderr, "done.\n");
+
+  return;
+}

data/vm.h

@@ -0,0 +1,35 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+
+#ifndef _VM_H
+#define _VM_H
+
+#include <stdint.h>
+#include <sys/stat.h>
+
+struct instruction_word {
+  uint32_t reserved;
+  uint32_t opcode;
+  uint64_t src;
+  uint64_t arg;
+  uint64_t dst;
+};
+
+#define CONSTANT_COUNT 1
+
+#define REGISTER_COUNT 16
+#define VALID_REGISTER 15
+
+struct codex {
+  int descriptor;
+  char filename[256];
+  struct stat status;
+  uint64_t *memory;
+  uint64_t *limit;
+  uint64_t size;
+  uint64_t offset;
+  uint64_t registers[REGISTER_COUNT];
+};
+
+void codex_init(struct codex* sys);
+
+#endif

metadata

@@ -0,0 +1,71 @@
+--- !ruby/object:Gem::Specification 
+name: synthemesc-codex
+version: !ruby/object:Gem::Version 
+  version: 0.0.0
+platform: ruby
+authors: 
+- Joshua Eckstein
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-08-09 00:00:00 -07:00
+default_executable: 
+dependencies: []
+
+description: 
+email: josh@eksdyne.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README.markdown
+files: 
+- .gitignore
+- Makefile.server
+- README.markdown
+- Rakefile
+- VERSION
+- build.h
+- codex.c
+- codex.gemspec
+- codex.h
+- codex_rb_ext.c
+- extconf.rb
+- format.h
+- lib/codex.rb
+- ptrn2mask
+- tpl.c
+- tpl.h
+- vm.c
+- vm.h
+has_rdoc: false
+homepage: http://github.com/synthemesc/codex
+licenses: 
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Codex network machine
+test_files: []
+