m0rb

begin 664 STRYKER.PATCH
M0E-$249&-#!6`````````*TN````````M"4!``````!"6F@Y,4%9)E-9-?&,
MWP``*?G4?=P``(0```$``,``0``$``"`(``Q3)B9!D8,DT#30T#1VT7=[4SI
MW)(&4`9"=2"H%VLHO3"<;WOB[DBG"A(&OC&;X$)::#DQ05DF4UFG+V^Q``2P
M_____________________________________________^`>NRT;7F;M8]NW
M=QMM1-O@````#WSTO=M]N)V\[.O>9:NYZ]XW=G;W7==[R][;SN>ZVVMZG=W;
MS=[WE[WEZJ76=4][6QUKE>]MW-N][RZ[NWO7O/>KL94]H`$,0T-&@T-)DTVB
M83$RG@!,*?JGIDP3`33331-/(P"1F`F@(_0D\H]!DI^3!3TPF`C3$QH#4:83
M:`)DP,@F`U,5#*GD9`T9)Z-#4VC2GF0)Z:3:-":G@U)O30`AFID&F(VA&*>$
M>IJ8-4_30:,!D-$\@R&@J?FA&#34]":I[29HU/3)@F(PIZ:GDQ-'J::-3R:H

m0rb

#!/usr/bin/env perl
# pipe me a stray cat
use strict;
use warnings;
use Net::DNS::Packet;
use MIME::Base64 qw(decode_base64);
while (<>) {
       chomp;
       my $s = $_;$s =~ s/(^.*\?.*=| HTTP.*)//;
       my $q = decode_base64($s);

m0rb

#!/usr/bin/env perl
# dumb perl download accelerator
# 10/13/21 - morb_commat_misentropic_dot_commercial
use warnings;
use strict;
use Getopt::Long;
use File::Basename;
use LWP::UserAgent;
use Parallel::ForkManager;

m0rb

#!/usr/bin/env bash
# dumb parallel downloader
# 10/7/21 morb_at_misentropic_dot_commercial
declare -a FL
CH=16
MP=4

for each in $*
do
case "$1" in

m0rb

#!/usr/bin/env perl
use strict;
use warnings;

use IO::Socket;
use IO::Socket::Socks;
use IO::Socket::SSL;
use Net::DNS::Packet;
use MIME::Base64 qw(encode_base64url);

m0rb

#!/bin/bash 
B=({A..Z} {a..z} {0..9})
I=`perl -pe'$_=unpack"B*"'<<<$*`
for((;${#I}%6;)){ I+=0;}
for((;p<${#I};p+=6)){ O+=${B[2#${I:p:6}]};}
for((;${#O}%4;)){ O+=\=;}
echo $O

m0rb

#!/bin/bash
# lame Catrap / Pit Man (Bootleg) Gameboy password generator

# 12/17/2020 - morb_commat_misentropic_commercial
 
PCHR=({0..9} {A..C} {E..H} {J..N} {P..R} {T..Z})

to_bin() {
	RES=$(printf "obase=2\n$1\n" | bc)
	[ ! -z $2 ] && printf "%0$2d" $RES || printf $RES

m0rb

--- a/Makefile.in
+++ b/Makefile.in
@@ -48,7 +48,7 @@
 	xio-socket.c xio-interface.c xio-listen.c xio-unix.c \
 	xio-ip.c xio-ip4.c xio-ip6.c xio-ipapp.c xio-tcp.c \
 	xio-sctp.c xio-rawip.c \
-	xio-socks.c xio-proxy.c xio-udp.c \
+	xio-socks.c xio-socks5.c xio-proxy.c xio-udp.c \
 	xio-progcall.c xio-exec.c xio-system.c xio-termios.c xio-readline.c \
 	xio-pty.c xio-openssl.c xio-streams.c\

m0rb

#include <stdio.h>
int magic1[] = {275, 341, 547, 745, 395, 846, 172, 598, 785},
    magic2[] = {211, 463, 371, 185, 782, 146, 857, 143, 846},
    magic3[] = {17125, 12417, 14983, 1311, 16985, 13198,
          	12254, 15197, 14365},
    lowers[] = {256, 000, 511, 576, 000, 768, 000, 512, 000},
    uppers[] = {479, 511, 895, 767, 999, 991, 999, 735, 999};

void main(int c, int susp, int suspen) {
   for(c=0;c<9;c++) {

m0rb

#!/usr/bin/perl -w
#
# dumb keygen for coherent unix 4.x serial numbers
# based on:
#   romana/source/4.2.x/etc/RCS/serialno.c
#   romana/source/4.2.x/etc/RCS/serialno.h
# from the coherent source release
#
# 8/21/20 morb_commat_misentropic_commercial