schizm 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 6f84ad79aced293697aa2a4377ef3e2e441c437e
+  data.tar.gz: 28a1c9d028c5de7ca4e1c73894d5c04ab860810d
+SHA512:
+  metadata.gz: c305dee798979981a5eba2ffc1c2609d945afa2b5aea5da14fc134935c8494ea27e29eeb67ed01c114ee474b831cca81683b1c5268591d3ca232f775769eeb9a
+  data.tar.gz: 4a10c89712aa6365cf1e4e31053a12f42231f6aac038b9ee74d403c314734d6511a28d30424cf1acc6d169c22e3e6d91dd1fc2ea1abbd999b7a989121bf0081c

data/bin/schizm

@@ -0,0 +1,36 @@
+#!/usr/bin/ruby
+
+require_relative "../lib/schizm/env.rb"
+require_relative "../lib/schizm/chunk.rb"
+require_relative "../lib/schizm/match.rb"
+require_relative "../lib/schizm/parse.rb"
+require_relative "../lib/schizm/markup.rb"
+require_relative "../lib/schizm/string.rb"
+
+case ARGV.shift
+when "init"
+  Schizm::Env::Opts.init.order!
+  Schizm::Env.init
+when "build"
+  Schizm::Env::Opts.build.order!
+  Schizm::Env.build
+when "install-path"
+  puts Schizm::Env.home
+  exit 0
+when "info"
+  # TODO
+  exit 0
+else
+  puts <<HELP
+Usage: schizm MODE [OPTIONS]
+`schizm init [OPTIONS]` 
+\tNew project in working directory.
+`schizm build [OPTIONS]` 
+\tBuild project in working directory.
+`schizm install-path`
+\tDisplay schizm's install directory.
+`schizm info`
+\tDisplay additional information.
+HELP
+  exit 0
+end

data/lib/schizm/chunk.rb

@@ -0,0 +1,130 @@
+require_relative 'env'
+require_relative 'string'
+require_relative 'match'
+
+module Schizm
+
+  class Chunk
+
+    def initialize where, label
+      @where = String.new where
+      @label = String.new label
+      @share = Env.var[:share] if Env.var? :share
+      @target = nil
+      @blocks = Array.new
+      @labels = Array.new
+      @params = Hash.new
+    end
+
+    attr_reader :where
+    attr_reader :label
+    attr_accessor :share
+    attr_accessor :target
+    attr_accessor :blocks
+
+    # Boolean reader for +@share+.
+    def share?
+      case
+      when (@share == true) then return true
+      when (@share != true) then return false
+      end
+    end
+
+    # Boolean reader for +@target+.
+    def target?
+      return false unless @target.is_a? ::String
+      return false unless @target != ""
+      return true
+    end
+
+    # Hash organizing active chunks by +@where+ and +@label+.
+    @@hash =
+      Hash.new do |hash, where|
+      hash[where] =
+        Hash.new do |hash, label|
+        hash[label] = Chunk.new where, label
+        end
+      end
+
+    # Hash reader.
+    def self.hash
+      @@hash
+    end
+
+    # Hash iteration interface.
+    def self.each
+      @@hash.each do |where, hash|
+        hash.each do |label, chunk|
+          yield chunk
+        end
+      end
+    end
+
+    # Push a code block.
+    def push block, label = nil
+      block = String.new block
+      label = String.new label if label
+      @blocks.push block
+      @labels.push label
+    end
+
+    # Find a chunk relative to +self+. That is, consider only
+    # chunks defined in the same file, plus chunks shared with the
+    # entire project.
+    def find label
+      Chunk.each do |chunk|
+        if chunk.label == label and
+          (chunk.where == @where or chunk.share?)
+          return chunk
+        end
+      end
+      nil
+    end
+
+    # Resolve chunk references to generate the final source string.
+    def to_s *trace
+      if trace.include? @label
+        raise "Infinite recursion!"
+      end
+      total = String.new(@blocks.join "\n\n")
+      total.trim!
+      while true
+        unless (total.sub! CHUNK_LABEL do
+            if (chunk = find $1)
+              replace = chunk.to_s *trace, @label
+              replace.gsub /(?<=\n)/, " " * String.new($`).find_indent
+            else
+              "/* " + $1 + " ... */"
+            end
+            end)
+          break
+        end
+      end
+      if target?
+        if Env.var? :guard and @target =~ HEADER_PATH
+          guardify = String.new(@target).guardify
+          if Env.var? :title
+            guardify.prepend "_"
+            guardify.prepend String.new(Env.var[:title]).guardify
+          end
+          total.prepend "\#define #{guardify}\n\n"
+          total.prepend "\#ifndef #{guardify}\n"
+          total.concat "\n\n"
+          total.concat "\#endif /* \#ifndef #{guardify} */"
+        end
+        if File.file? "LICENSE"
+          total.prepend "\n"
+          total.prepend String.new(File.read("LICENSE")).comment
+        end
+      end
+      total
+    end
+
+    # Identifier for a particular block.
+    def id block = @blocks.size
+      "#{@label.slugify}-#{block}"
+    end
+
+  end
+
+end

data/lib/schizm/env.rb

@@ -0,0 +1,421 @@
+require 'etc'
+require 'optparse'
+require 'pathname'
+require 'tempfile'
+require 'sass'
+require_relative 'env_colors'
+
+module Schizm
+
+module Env
+
+  @@var = {}
+
+  def self.var
+    return @@var
+  end
+
+  def self.var? key
+    return true if @@var.has_key?(key) and 
+      @@var[key] != nil and @@var[key] != false
+    return false
+  end
+
+  # Prompt yes/no question.
+  def self.yes? string, backup
+    backup = backup.downcase[0]
+    print "#{string} [Y/n] " if backup == "y"
+    print "#{string} [y/N] " if backup == "n"
+    answer = gets.strip.downcase[0]
+    return answer == "y" if answer != ""
+    return backup == "y"
+  end
+
+  def self.write target, string
+    if (not File.file? target or 
+        var? :rewrite or 
+        yes? "Rewrite '#{target}'?", "n")
+      puts "Writing '#{target}'" if var? :verbose
+      file = File.open target, "wb"
+      file.write string.to_s
+      file.close
+    end
+  end
+
+  # Current user's name.
+  def self.thisuser
+    return Etc.getpwnam(Etc.getlogin).gecos.split(/,/).first
+  end
+
+  # Current user's working directory.
+  def self.thisdirname
+    return File.basename(Dir.pwd)
+  end
+
+  # Current project title.
+  def self.title
+    return var[:title] if var? :title
+    return thisdirname
+  end
+
+  # Current project brief.
+  def self.brief
+    return var[:brief] if var? :brief
+    return ""
+  end
+
+  # Current project author.
+  def self.author
+    return var[:author] if var? :author
+    return thisuser
+  end
+
+  # Current project year.
+  def self.year
+    return var[:year] if var? :year
+    return Time.new.year.to_s
+  end
+
+  # Schizm install directory.
+  def self.home
+    path = File.dirname __FILE__    # $HOME/lib/schizm
+    path = File.dirname path        # $HOME/lib
+    path = File.dirname path        # $HOME
+    return File.absolute_path path
+  end
+
+  # Load resource from Schizm install directory.
+  def self.resource *args
+    return File.read File.join(home, "res", *args)
+  end
+
+  def self.init
+    dirnames = [
+      "src",
+      "zrc",
+      "docs",
+      "docs/assets",
+      "docs/assets/css",
+      "docs/assets/fonts",
+      "docs/assets/js",
+      "docs/_includes",
+      "docs/_layouts",
+      "docs/_plugins",
+      "docs/_posts",
+      "docs/_docs",
+      "docs/_site"
+    ]
+    dirnames.each do |dirname|
+      unless File.directory? dirname
+        Dir.mkdir dirname
+      end
+    end
+    license = ""
+    if var? :license
+      license = var[:license]
+      content = "Copyright (c) "
+      content << "#{author} #{year}\n\n"
+      content << "#{resource("license", license)}"
+      write "LICENSE", content
+    end
+    write "README.md", <<README
+# #{title}
+README
+    write "Makefile", <<MAKEFILE
+SHELL := /bin/bash
+MKDIR := mkdir -p
+RMDIR := rm -r -f
+
+SCHIZM := schizm
+ZFLAGS := --input zrc
+ZFLAGS += --output-src src
+ZFLAGS += --output-doc docs/_docs
+ZFLAGS += --rewrite
+ZFLAGS += --verbose
+ZFLAGS += --title "#{title}"
+ZFLAGS += --brief "#{brief}"
+ZFLAGS += --author "#{author}"
+ZFLAGS += --year "#{year}"
+
+doc:
+\t@$(SCHIZM) build --only-doc $(ZFLAGS)
+
+src:
+\t@$(SCHIZM) build --only-src $(ZFLAGS)
+
+.PHONY: doc
+
+.PHONY: src
+
+clean:
+\t@$(RMDIR) src docs/_docs docs/_site
+\t@$(MKDIR) src docs/_docs docs/_site
+
+.PHONY: clean
+MAKEFILE
+    write ".gitignore", <<GITIGNORE
+*.swp
+*.tmp
+docs/_site
+GITIGNORE
+    write "docs/_config.yaml", <<YAMLCONFIG
+source: .
+destination: _site
+plugins_dir: _plugins
+layouts_dir: _layouts
+includes_dir: _includes
+collections:
+  posts:
+    output: true
+  docs:
+    output: true
+encoding: "utf-8"
+markdown: kramdown
+markdown_ext: "markdown,md"
+author: "#{author}"
+title: "#{title}"
+brief: "#{brief}"
+YAMLCONFIG
+    assets = {
+      "schizm.liquid" => "docs/_layouts",
+      "schizm.js" => "docs/assets/js",
+      "fonts/fira-code.css" => "docs/assets/fonts",
+      "fonts/fira-code-light.otf" => "docs/assets/fonts",
+      "fonts/fira-code-regular.otf" => "docs/assets/fonts",
+      "fonts/fira-code-medium.otf" => "docs/assets/fonts",
+      "fonts/fira-code-bold.otf" => "docs/assets/fonts",
+      "fonts/genericons-neue.css" => "docs/assets/fonts",
+      "fonts/genericons-neue.eot" => "docs/assets/fonts",
+      "fonts/genericons-neue.ttf" => "docs/assets/fonts",
+      "fonts/genericons-neue.woff2" => "docs/assets/fonts",
+      "fonts/social-logos.css" => "docs/assets/fonts",
+      "fonts/social-logos.eot" => "docs/assets/fonts",
+      "fonts/social-logos.ttf" => "docs/assets/fonts",
+      "fonts/social-logos.woff2" => "docs/assets/fonts"
+    }
+    assets.each do |from, to|
+      write File.join(to, File.basename(from)), resource(from)
+    end
+    color1 = "purple"
+    color2 = "teal"
+    color1 = var[:primary_color].downcase if var? :primary_color
+    color2 = var[:secondary_color].downcase if var? :secondary_color
+    sass_source = <<SASS
+#{sass_colors color1, "primary"}
+#{sass_colors color2, "secondary"}
+#{resource "scss/fonts.scss"}
+#{resource "scss/mixin.scss"}
+#{resource "scss/style.scss"}
+SASS
+    sass_options = { 
+      :syntax => :scss,
+      :sourcemap => :none,
+      :style => :nested,
+      :cache => false 
+    }
+    write "docs/assets/css/schizm.css", Sass::Engine.new(sass_source, sass_options).render
+  end
+
+  def self.delete dir
+    if Dir.exist? dir
+      Dir.foreach dir do |ent|
+        next if ent == '.'
+        next if ent == '..'
+        path = File.join dir, ent
+        File.delete path if File.file? path
+        self.delete path if File.directory? path
+      end
+    end
+  end
+
+  def self.blaze path
+    dir = ''
+    path = File.dirname path
+    path = File.absolute_path path
+    dirs = path.split File::SEPARATOR
+    dirs.each do |sub|
+      dir = File.join dir, sub
+      Dir.mkdir dir unless Dir.exist? dir
+    end
+  end
+
+  def self.path_from from, dest
+    from = Pathname.new from
+    dest = Pathname.new dest
+    dest.relative_path_from(from).to_s
+  end
+
+  def self.path_href path
+    "/docs/#{path_from var[:output_doc], path}"
+  end
+
+  def self.build
+    zrc_root = var[:input]
+    doc_root = var[:output_doc]
+    src_root = var[:output_src]
+    zrc_globs = []
+    zrc_globs.push File.join(zrc_root, "*.zrc")
+    zrc_globs.push File.join(zrc_root, "*/*.zrc")
+    zrc_paths = Dir.glob zrc_globs
+    raise "No input files." if zrc_paths.empty?
+    delete doc_root if var? :clean_doc
+    delete src_root if var? :clean_src
+    blaze doc_root
+    blaze src_root
+    zrc_paths.each do |path|
+      where = path_from zrc_root, path
+      where = File.join doc_root, where.chomp(".zrc").concat(".html")
+      input = File.read path
+      Parse.hash[where] = 
+      Parse.page_elems where, input
+    end
+    unless Env.var? :only_src
+      Parse.hash.each do |where, parse|
+        blaze where
+        write where, <<PARSE
+---
+layout: schizm
+author: "#{author}"
+title: "#{parse.guess_title}"
+description: "#{parse.guess_description}"
+#{parse.guess_parts}
+---
+#{parse.to_s}
+PARSE
+      end
+    end
+    unless Env.var? :only_doc
+      Chunk.each do |chunk|
+        if chunk.target?
+          blaze where = File.join(src_root, chunk.target)
+          write where, chunk
+        end
+      end
+    end
+  end
+
+  module Opts
+
+    def self.init
+      OptionParser.new do |optparse|
+        optparse.banner = "Usage: schizm init [OPTIONS]"
+        optparse.on "-v", "--verbose", "Verbose messages?" do
+          Env.var[:verbose] = true
+        end
+        optparse.on "-r", "--rewrite", "Rewrite files without asking?" do
+          Env.var[:rewrite] = true
+        end
+        optparse.on "-t", "--title STR", "Set project title." do |str|
+          Env.var[:title] = str
+        end
+        optparse.on "-b", "--brief STR", "Set project brief." do |str|
+          Env.var[:brief] = str
+        end
+        optparse.on "-a", "--author STR", "Specify project author(s)." do |str|
+          Env.var[:author] = str
+        end
+        optparse.on "-y", "--year STR", "Specify project year(s)." do |str|
+          Env.var[:year] = str
+        end
+        license_enum = [
+          "BSD-2-Clause",
+          "BSD-3-Clause",
+          "GPL-2.0",
+          "GPL-3.0",
+          "LGPL-2.1",
+          "LGPL-3.0",
+          "MIT",
+          "MPL-2.0"
+        ]
+        license_help = <<LIC
+Select license, none by default.
+\t"BSD-2-Clause" ... the 2-clause BSD License
+\t"BSD-3-Clause" ... the 3-clause BSD License
+\t"GPL-2.0" ........ the GNU General Public License v2.0
+\t"GPL-3.0" ........ the GNU General Public License v3.0
+\t"LGPL-2.1" ....... the GNU Lesser General Public License v2.1
+\t"LGPL-3.0" ....... the GNU Lesser General Public License v3.0
+\t"MIT" ............ the MIT License
+\t"MPL-2.0" ........ the Mozilla Public License v2.0
+LIC
+        optparse.on "-l", "--license ENUM",
+            license_enum,
+            license_help do |str|
+          Env.var[:license] = str
+        end
+        optparse.on "-p", "--primary-color ENUM", Env::COLORS.keys,
+          "Specify primary color." do |str|
+          Env.var[:primary_color] = str
+        end
+        optparse.on "-s", "--secondary-color ENUM", Env::COLORS.keys,
+          "Specify secondary color." do |str|
+          Env.var[:secondary_color] = str
+        end
+        optparse.on_tail "-h", "--help", "Display this help." do
+          puts optparse
+          exit 0
+        end
+      end
+    end
+
+    def self.build
+      Env.var[:input] = "zrc"
+      Env.var[:output_doc] = "./docs/_docs"
+      Env.var[:output_src] = "./src"
+      Env.var[:guard] = true
+      OptionParser.new do |optparse|
+        optparse.banner = "Usage: schizm build [OPTIONS]"
+        optparse.on "-v", "--verbose", "Verbose messages?" do
+          Env.var[:verbose] = true
+        end
+        optparse.on "-r", "--rewrite", "Rewrite files without asking?" do
+          Env.var[:rewrite] = true
+        end
+        optparse.on "-t", "--title STR", "Set project title." do |str|
+          Env.var[:title] = str
+        end
+        optparse.on "-b", "--brief STR", "Set project brief." do |str|
+          Env.var[:brief] = str
+        end
+        optparse.on "-a", "--author STR", "Specify project author(s)." do |str|
+          Env.var[:author] = str
+        end
+        optparse.on "-y", "--year STR", "Specify project year(s)." do |str|
+          Env.var[:year] = str
+        end
+        optparse.on "--input STR",
+          "Where to look for input files." do |str|
+          Env.var[:input] = str
+        end
+        optparse.on "--output-doc STR",
+          "Where to write documentation files." do |str|
+          Env.var[:output_doc] = str
+        end
+        optparse.on "--output-src STR",
+          "Where to write source files." do |str|
+          Env.var[:output_src] = str
+        end
+        optparse.on "--only-doc", "Build only documention files?" do
+          Env.var[:only_doc] = true
+        end
+        optparse.on "--only-src", "Build only source files?" do
+          Env.var[:only_src] = true
+        end
+        optparse.on "--[no-]guard", "Guard output headers?" do |ans|
+          Env.var[:guard] = ans
+        end
+        optparse.on "--[no-]share", "Share chunks by default?" do |ans|
+          Env.var[:share] = ans
+        end
+        optparse.on_tail "-h", "--help", "Display this help." do
+          puts optparse
+          exit 0
+        end
+      end
+    end
+
+  end # module Opts
+
+end # module Env
+
+end # module Schizm