freespeech 1.0.88 → 1.0.94

data/bin/autocorrect

@@ -0,0 +1,312 @@
+#!/usr/bin/ruby
+
+# frozen_string_literal: false
+SPECIAL = {"cmd" => "command", "unix" => "UNIX"}
+
+print "\rAUTOCORRECT\r\n"
+require 'set'
+$ln = Set.new File.read("/usr/share/dict/words").split
+exc = %w[coo verb cad Mar Mao ma Mai Mae wag wan T's Th wad cab mad strep pi goo fob foe yo yon fog fop war i ] # '
+
+exc.each do |i|
+  raise "No #{i}" unless $ln.include?(i)
+end
+
+$ln -= exc
+
+LINES = "\n" << $ln.sort.reverse.join("\n") << "\n"
+
+AMOUNT = 1
+PUNCT = (("!".."@")).map do |i|
+	i.chr
+end.reject do |i|
+("0".."9").include? i
+end
+
+#puts PUNCT.to_a.to_s
+
+def get_word_(word)
+  return word if $ln.include? word
+  return word if $ln.include? word.downcase
+  return word.capitalize if $ln.include? word.capitalize
+
+  special = SPECIAL[word]
+  if special; return special; end
+
+  c = word.chars
+
+  i = c.size
+
+  def get(c, i)
+  	return "" if c.size.zero?
+    while i != 0
+      c.permutation(i).each do |q|
+        #      	if q == first_len
+        #     		i-=1
+        #    		next
+        #   	end
+        q = q.join
+        len = LINES.scan(reg = /\n#{q}[^\n]*/i).map do |i|
+          i[1..-1]
+        end.sort do |a, b|
+          if a[0].downcase? == b[0].downcase?
+            a <=> b
+          else
+            b <=> a
+          end
+        end
+        # puts (len.reject do |i| i.size != 3; end.to_a.to_s)
+
+        #        warn "\n#{q}[^\n]".inspect[1..-2].prepend('/').concat('/')
+        #        warn format('permutation of %s chars of %s len of %s', i, q, len.inspect)
+        #          return len
+        next if len.empty?
+
+        char_size = c.size
+        #            puts char_size, len[0].size, len.to_s
+        #           sleep
+        # puts len.inspect
+
+        len.each do |i|
+          cur_siz = i.size
+          # puts [i, c].to_s
+          next if cur_siz < char_size
+          next if cur_siz > char_size + AMOUNT
+
+          funcs = []
+          q.chars.each do |i|
+            funcs << if ("A".."Z").cover? i
+              :upcase
+            else
+              :downcase
+            end
+          end
+
+          funcs.size.times do |q|
+            i[q] = i[q].send funcs[q]
+          end
+          return i
+        end
+      end
+
+      i -= 1
+    end
+
+    "ERROR text is #{c.join.inspect}"
+  end
+
+  if i > 4
+    max = 0
+    l = $ln
+    maxes = {}
+
+    j = c.join
+
+    #    puts 55
+
+    (c.size - c.size).times do |n|
+      n += 1
+      cont = 0
+      while cont < c.size
+        first = j[0..cont - 1]
+        second = j[cont..cont + n - 1].upcase.clear
+        third = j[n + cont..-1]
+        unless third
+          cont += 1
+          next
+        end
+        first = "" if cont.zero?
+
+        puts first + second + third
+        cont += 1
+      end
+
+      puts "DONE"
+    end
+    #    puts 'DO'
+
+    l.each_with_index do |a, _index|
+      count = 0
+      orig_a = a.dup
+      a = a.dup
+
+      c.each do |char|
+        if a.include? char
+          count += 1
+          a.sub! char, ""
+        end
+      end
+
+      next unless count >= max && count != 0
+
+      #			puts [count, max].to_s
+      maxes[orig_a] = count
+      max = count
+    end
+
+    maxes.select! do |_k, v|
+      v == max
+    end
+
+    l.each do |i_|
+      next if i_.size < c.size
+
+      maxes[i_] = max if i_[0..3] == c.join[0..3]
+    end
+    #puts l.size
+    def foo(a, b, c)
+      p = 0
+      while p < c.size && p < a.size
+        break if c[p] != a[p]
+
+        p += 1
+      end
+      p2 = 0
+      while p2 < c.size && p2 < b.size
+        break if c[p2] != b[p2]
+
+        p2 += 1
+      end
+
+      [p, p2]
+    end
+
+    val = maxes.keys.sort do |a, b|
+      p, p2 = foo(a, b, c)
+
+      if p2 - p >= 1
+        1
+      elsif p2 == p2
+        0
+      elsif p2 - p <= 1
+        -1
+      end
+    end[0..20].sort_by(&:size)[0..10].sort do |a, b|
+      p, p2 = foo(a, b, c)
+
+      if p2 - p >= 1
+        1
+      elsif p2 == p2
+        0
+      elsif p2 - p <= 1
+        -1
+      end
+    end[0]
+
+    raise unless val.class == String
+
+    return val
+  else
+    get(c, i)
+  end
+end
+
+require "io/console"
+
+class String
+  def end?
+    self == "\r" || self == "\n" || self == "\t"
+  end
+
+  def downcase?
+    !!match(/[a-z]/)
+  end
+end
+
+class DoneException < Exception
+end
+
+def _get
+  a = nil
+  $c = ""
+  while a != " "
+    a = $stdin.getc
+    #print a.inspect
+    raise DoneException.new if a == "\x03"
+    if a == "\u007F"
+      $all_text = $all_text[0..-2]
+      $c = $c[0..-2]
+      print "\e[1D \e[1D"
+      next
+    end
+    $c << a
+    $all_text << a
+    putc(a) unless a.end?
+    return nil if a.end?
+  end
+
+  $c.chomp! " "
+#  $c.gsub!(/\e\[[A-Z]/, "")
+
+  #  print c.inspect
+
+  File.open("words", "a") do |f|
+    f.puts c.inspect
+  end if false
+  c = $c
+
+  $c = ""
+  c
+end
+
+str = ""
+$all_text = ""
+
+$stdin.tty? && $stdin.raw do
+last_char = "."
+  loop do
+    qi = _get
+    i=qi&.gsub(/\e\[[A-Z]/, "")
+
+    
+    if i.nil?
+      print "\r\n"
+      next
+    end
+        if i.empty?
+#    	print ' '
+    	next
+    end
+
+#    raise if / |\e/.match?(i)
+
+    new_word = get_word_(i.sub(/[[:punct:]]+/, "")) + i.match(/[[:punct:]]+$/ ).to_s; if PUNCT.include?(last_char); new_word[0]=new_word[0].upcase; end
+    puts new_word.inspect if false
+
+    amount = i.size + 1
+    f = File.open("words", "a") if false
+
+    # if amount == 0
+    #
+    #	text = ""/
+    #else
+    if new_word == i
+    else
+      print "\e[#{amount}D" << new_word << " "
+    end
+
+    $all_text = $all_text[0..-(1 + i.size + " ".size)]
+    $all_text << new_word << " "
+    last_char = new_word[-1]
+    #  	end
+
+    #  puts new_word.inspect
+
+    #print "\u001b[0K"
+
+    #{new_word} "
+  end
+rescue DoneException
+end #rescue DoneException
+
+
+#$all_text << $c
+  #system 'tput reset'
+at=nil
+
+  #puts "\n\nYour story\n\n"
+IO.popen("xclip -selection c", 'w') do |i|
+  i.print at=$all_text.strip
+ end
+  puts "YOUR STORY COPIED"
+print at

data/bin/ctit

@@ -0,0 +1,44 @@
+#!/usr/bin/ruby
+# This is a work in progress.
+
+ROMAN = /^([limcdvx]|[[:punct:]])+$/i
+
+def capitalize(a)
+  a = a.gsub(/\s*(-|–|—|:)(-|–|—|:)*\s*/, "\\1 ")
+  w = a.split
+  not_major = /^(?:to|a|an|the|on|in|of|at|and|or|but|nor|for|yet|so)$/i
+  w = w.map do |i|
+    case i
+    when ROMAN
+      i.upcase
+    when /^(?:not|no|be|is|are|was|were|have|has|had|do|does|did|that|it|my|me|we|our|you|he|his|she|her|they|them|who)$/i
+      i.capitalize
+    when /(-|–|—|:)/
+      i.capitalize
+    when not_major
+      i.downcase
+    else
+      i.capitalize
+    end
+  end
+  w = w.to_a
+  if w.size == 0
+    w = [" "]
+  end
+  if w[0].match(ROMAN)
+    w[0] = w[0].upcase
+  else
+    w[0] = w[0].capitalize
+  end
+  if (w[-1].match(ROMAN))
+    w[-1] = w[-1].upcase
+  else
+    w[-1] = w[-1].capitalize
+  end
+  w = w.join(" ")
+  w = w.gsub "- ", "-"
+  w
+end
+
+
+print (capitalize ARGV.join(" "))

data/documentation/autocorrect

@@ -0,0 +1,3 @@
+Command line offline non-AI free software BSD licensed autocorrect using words file.
+
+Work in progress.

data/documentation/ctit

@@ -0,0 +1,18 @@
+
+
+Capitalize Title
+
+A work in progress.
+
+Capitalizes arguments and treats them like a title.
+
+ctit this is my heading
+==> This Is My Heading for a Document
+
+You can also do
+
+
+ctit .... | copy
+
+To copy the title to your clipboard
+

data/documentation/email

@@ -10,11 +10,11 @@ Modes
 
 email [no arguments]
 
-Email [yourself]
+email [yourself]
 
 email [addr]
 
-Email one email address
+email one email address
 
 email [Subject] [addr] [option more addrs]
 

data/documentation/left_right.exe

@@ -2,8 +2,9 @@ This is a tool to bring sanity to politics.
 
 ![UCA](./images/8.png)
 
-It gets viewpoints from the person that see the good in each political side, left, right, left, right, etc.
+It asks for viewpints from a person that see the good things in each political side--left, right, left, right, etc.
 
-It then presents all of that.
+It then makes a webpage of that and presents all of that.
+
+Hopefully this can make people more sane, and less hyper-partisan.
 
-Hopefully this can make people more sane and less hyper-partisan.

data/documentation/page

@@ -276,6 +276,12 @@ def main
         <h2>All of these programs are mostly self-contained. This is a really good thing. You can use them anywhere without dependencies.</h2>
         <p>My email is <a href=mailto:#{EMAIL}>#{EMAIL}</a> and I really would like to make free and open source software. Everything I have is BSD licensed (free for commerical and non-commerical use).</p>
         <p>HOW TO DOWNLOAD/INSTALL</p>
+        <p><iframe src="https://snapcraft.io/democracy/embedded?button=black" frameborder="0" width="100%" height="300px" style="border: 1px solid #CCC; border-radius: 2px;"></iframe></p>
+
+        <p>With snap (<a href=https://snapcraft.io/democracy>https://snapcraft.io/democracy</a>)</p>
+        <p>sudo snap install democracy or snap install democracy</p>
+        <p>Binaries then would be in /snap/democracy/current/bin, source code is in /snap/democracy</p>
+        <p>With gem command (RubyGems) (preinstalled on Mac)</p>
         <p>gem unpack democracy</p>
         <p>gem install democracy</p>
         <p>work to download or install (gem)</p>
@@ -293,7 +299,8 @@ def main
         <p>On rubygems, there are even fewer results. MY CODE WILL BE FOUND.</p>
         <p>I shared my gem online.</p>
         #{"https://www.rubygems.org/gem/democracy
-        https://www.linkedin.com/in/gregory-cohen-274333261/"}
+        https://twitter.com/democracygem
+        https://www.linkedin.com/in/gregory-cohen-274333261/".strip.list}
         <p>Gems that link to this gem on RubyGems</p>
         #{"
         https://www.rubygems.org/gems/democracy

data/gem_data/README

@@ -1,5 +1,7 @@
 Trying to help with democracy.
 
+https://snapcraft.io/democracy
+
 This is a collection of software that could truly change the world.
 
 All of these programs are mostly self-contained. This is a really good thing.

data/gem_data/VERSION_NUMBER

@@ -1 +1 @@
-87.0
+93.0

data/gem_data/push_snap

@@ -0,0 +1,30 @@
+#!/bin/bash
+
+set -x
+set -e
+
+if [[ $2 = "" ]]; then
+	red_bold_underline OLD
+	nth 3 < *yaml | red_bold
+	red_bold VERSION AND REVISION ARE ARGS
+	exit 1
+fi
+
+rm -rf *snap democracy* 2>/dev/null
+
+
+
+gsubip "1\.0\.\d+" 1.0.$1 snapcraft.yaml
+
+
+cp /home/a/democracy -r             .  &>/dev/null
+cd democracy
+rm -fr .git
+cd ..
+tar cfz democracy.tar.gz democracy
+
+snapcraft
+
+snapcraft push democracy*snap
+
+snapcraft release democracy $2 stable