From db16d3b53473a690726a4a42fd957e4f9e9293a5 Mon Sep 17 00:00:00 2001
From: Nat Lasseter <Nat Lasseter nathan@bytemark.co.uk>
Date: Fri, 18 Aug 2017 16:03:46 +0100
Subject: This program really saddens me.
---
type7 | 75 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 75 insertions(+)
create mode 100755 type7
(limited to 'type7')
diff --git a/type7 b/type7
new file mode 100755
index 0000000..db423cb
--- /dev/null
+++ b/type7
@@ -0,0 +1,75 @@
+#!/usr/bin/env ruby
+
+module CiscoType7
+ MAGIC="dsfd;kfoA,.iyewrkldJKDHSUBsgvca69834ncxv9873254k;fg87"
+
+ def CiscoType7.encode(pass, salt = (0..15).to_a.sample)
+ out = "%02d" % salt
+ (0...pass.length).each do |i|
+ j = (i + salt) % 53
+ byte = pass[i].ord ^ MAGIC[j].ord
+ out += "%02X" % byte
+ end
+ return out
+ end
+
+ def CiscoType7.decode(hash)
+ out = ""
+ salt = hash[0..1].to_i
+ pass = hash[2..-1]
+ (0...(pass.length/2)).each do |i|
+ j = (i + salt) % 53
+ byte = pass[(i*2)..((i*2)+1)].to_i(16) ^ MAGIC[j].ord
+ out += byte.chr
+ end
+ return out
+ end
+
+ def CiscoType7.test_equal(hash1, hash2)
+ return decode(hash1) == decode(hash2)
+ end
+end
+
+def mode_looks_like(args)
+ return :equal if args.length == 2
+ return :decode if args[0] =~ /^(0[0-9]|1[0-5])([0-9A-F]{2})+$/
+ return :encode
+end
+
+require 'optparse'
+
+options = {:mode => :magic}
+
+OptionParser.new do |opts|
+ opts.banner = "Usage: type7 [options] ARG1 [ARG2]"
+
+ opts.on("-e", "--encode", "Encode mode") do
+ options[:mode] = :encode
+ end
+
+ opts.on("-d", "--decode", "Decode mode") do
+ options[:mode] = :decode
+ end
+
+ opts.on("-q", "--equal", "Test equality mode") do
+ options[:mode] = :equal
+ end
+
+ opts.on("-h", "--help", "Display help") do
+ puts opts.banner
+ puts opts.summarize
+ puts "The default mode is magic mode, where type7 will work out what you want to do."
+ exit 0
+ end
+end.parse!
+
+options[:mode] = mode_looks_like(ARGV) if options[:mode] == :magic
+
+case options[:mode]
+when :encode
+ puts CiscoType7::encode(ARGV[0])
+when :decode
+ puts CiscoType7::decode(ARGV[0])
+when :equal
+ puts CiscoType7::test_equal(ARGV[0], ARGV[1]) ? "Match" : "Differ"
+end
--
cgit v1.2.3