freespeech 1.0.88 → 1.0.94

data/non_compiled_programs/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/non_compiled_programs/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/other/beautify_html_in_heredocs

@@ -2,6 +2,14 @@
 # frozen_string_literal: true
 
 PROG1 = %w[htmlbeautifier clang-format][1]
+puts PROG1
+print "OK ? "
+response = ""
+response = STDIN.readline.strip while response.empty?
+if response.match /[nN]/
+	abort
+end
+
 PROG2 = "rufo"
 
 require "tempfile"

data/{cleanup → other/cleanup}

@@ -1,5 +1,6 @@
 #!/bin/bash
 
+cd ..
 set -e
 set -x
 export GIT_ASKPASS="$HOME/commit"

data/other/communicate

@@ -0,0 +1,88 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: false
+
+# BSD 2-Clause License
+# 
+# Copyright (c) 2023, Gregory Cohen
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+# 1. Redistributions of source code must retain the above copyright notice, this
+   # list of conditions and the following disclaimer.
+# 
+# 2. Redistributions in binary form must reproduce the above copyright notice,
+   # this list of conditions and the following disclaimer in the documentation
+   # and/or other materials provided with the distribution.
+# 
+# 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 HOLDER 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.
+require 'colored'
+
+str = 'Enter '
+
+$old_str = ''
+def puts__(str, ack = false)
+  # def puts.old_str
+  return unless ENV['C_CODE'].nil?
+  #	if ENV["C_CODE
+  #	if
+  #	requi
+  return if $old_str == str
+
+  str = str.to_s
+  def str.colorify
+    bold.send ''.colors.sample
+  end
+
+  def str.ack
+    ['Thank you. '][0]
+  end
+
+  str.prepend str.ack if ack == true
+  print "#{str.colorify}\n"
+
+  system "echo '#{str}' | flite -voice slt  "
+end
+
+alias :say puts__
+
+count = 0
+# speak str
+
+def $stdin.readline
+  Dir.chdir Dir.home
+  Dir.chdir 'nerd-dictation'
+  res = ''
+  while res.strip == ''
+    res = %x(
+  ./nerd-dictation begin --vosk-model-dir=`printf "%s\n" ./vosk-model-small-en-us* | head -n 1` --timeout 1.0 2>&1  --output STDOUT)
+
+    res = '' if res.downcase.include?('no text')
+    #	STDOUT.print res
+  end
+  res
+end
+
+loop do
+  puts__ ARGV[0], ack = false
+  $text = $stdin.readline
+
+  class Object
+    def eval(*_args)
+      text = $text
+      Kernel.eval to_s
+    end
+  end
+
+  ARGV[1..-1].map(&:eval)
+end

data/other/experimental_code/ABOUT_S

@@ -1,18 +1,9 @@
 This is the entire stock history for the entire toronto stock exchange
 
-
-
 This information is given out very publically from many different sources and websites.
 
-
-
 Use this information for any purpose within reason.
 
-
-
 I do not condone or support any illegal activity.
 
-
-If I should or need to remove this from this repository, then please contact me and I can do so.
-
-
+If I should or need to remove this from this repository, then please contact me and I can do so.

data/other/experimental_code/odi

@@ -1,12 +1,6 @@
 cd
 
-
-for i in Desktop/*; do   gio set -t string "$i"     metadata::caja-icon-position 00,00 ; caja -q &>/dev/null; done
-
-
-
-
-
-
-
-
+for i in Desktop/*; do
+	gio set -t string "$i" metadata::caja-icon-position 00,00
+	caja -q &>/dev/null
+done

data/other/experimental_code/orig

@@ -1,14 +1,13 @@
 #!/usr/bin/env ruby
 
-
-a= ('a' .. 'z').to_a
-a += ('A' .. 'Z').to_a
-a += (0 .. 9).to_a
-foo =  (((0..199).to_a.map do |i|
-	a.sample.to_s
+a = ("a".."z").to_a
+a += ("A".."Z").to_a
+a += (0..9).to_a
+foo = (((0..199).to_a.map do |i|
+  a.sample.to_s
 end).join)
 
-main_text =  <<EOF
+main_text = <<EOF
 From: <gregorycohenvideos@gmail.com>
 To: gregorycohenvideos@gmail.com
 MIME-Version: 1.0
@@ -19,15 +18,11 @@ Content-Type: text/plain; charset=utf-8
 Content-Transfer-Encoding: 7bit\n\nMessage\n
 EOF
 
-
 for arg in ARGV; file_text = File.read arg
-	if file_text == foo
-	raise
+  if file_text == foo
+  raise
 end
-
-
-
-main_text += <<EOF
+  main_text += <<EOF
 
 --#{foo}
 Content-Disposition: attachment; filename="#{arg}"
@@ -35,15 +30,11 @@ Content-Type: text/plain
 
 #{file_text}
 
-EOF
-
-
-end
+EOF end
 
 main_text += "--#{foo}--"
 puts main_text
 
 IO.popen("himalaya send", "w") do |f|
-	f.print main_text.gsub("\n", "\r\n")
+  f.print main_text.gsub("\n", "\r\n")
 end
-

data/other/experimental_code/pr.rb

@@ -1,5 +1,5 @@
 # !/usr/bin/ruby
-b = Dir.glob '*' # 0
+b = Dir.glob "*" # 0
 
 def out(*a)
   print a.join(" ")

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

data/src/color_tools/black.c

@@ -42,11 +42,11 @@
 #define FIRST_COLOR "\e[30m"
 #define SECOND_COLOR "\e[0m"
 
-int main(int argc, char** argv) {
-  fputs(FIRST_COLOR, stdout);
 
-  
+int main(int argc, char** argv) {
   if (argc != 1) {
+    fputs(FIRST_COLOR, stdout);
+    
     for (int i = 1; i < argc; ++i) {
       if (!strcmp(argv[i], "-h") || !strcmp(argv[i], "--help")) {
         fputs(HELP_STR, stdout);
@@ -57,22 +57,19 @@ int main(int argc, char** argv) {
     }
 
     putchar('\n');
-
-    goto end;
+    
+    fputs(SECOND_COLOR, stdout);
+    return 0;
   }
+  
+  fputs(FIRST_COLOR, stdout);
 
   for (;;) {
     const int c = getchar();
 
-    if (c == EOF) goto end;
-
+    if (c == EOF) { fputs(SECOND_COLOR, stdout); return 0; }
     putchar(c);
   }
-
-
-end:
-  fputs(SECOND_COLOR, stdout);
-  return 0;
 }
 
 

data/src/color_tools/black_bold.c

@@ -42,11 +42,11 @@
 #define FIRST_COLOR "\e[1m\e[30m"
 #define SECOND_COLOR "\e[0m\e[0m"
 
-int main(int argc, char** argv) {
-  fputs(FIRST_COLOR, stdout);
 
-  
+int main(int argc, char** argv) {
   if (argc != 1) {
+    fputs(FIRST_COLOR, stdout);
+    
     for (int i = 1; i < argc; ++i) {
       if (!strcmp(argv[i], "-h") || !strcmp(argv[i], "--help")) {
         fputs(HELP_STR, stdout);
@@ -57,22 +57,19 @@ int main(int argc, char** argv) {
     }
 
     putchar('\n');
-
-    goto end;
+    
+    fputs(SECOND_COLOR, stdout);
+    return 0;
   }
+  
+  fputs(FIRST_COLOR, stdout);
 
   for (;;) {
     const int c = getchar();
 
-    if (c == EOF) goto end;
-
+    if (c == EOF) { fputs(SECOND_COLOR, stdout); return 0; }
     putchar(c);
   }
-
-
-end:
-  fputs(SECOND_COLOR, stdout);
-  return 0;
 }