Skip to content

Instantly share code, notes, and snippets.

#!/bin/sh
pw group add -n admin -g 9999
echo vagrant | pw mod user root -h 0
echo vagrant | pw add user vagrant -u 9999 -c "Vagrant User" -k /etc/skel -m -d /home/vagrant -g admin -s /bin/sh -h 0
mkdir /home/vagrant/.ssh
chown vagrant:vagrant /home/vagrant/.ssh
chmod 700 /home/vagrant/.ssh
#!/usr/bin/perl
use strict;
use warnings;
sub fisher_yates_shuffle
{
my $array = shift;
my $i = @$array;
while ( --$i )
_cidr2mask()
{
local i mask=""
local full_octets=$(($1 / 8))
local partial_octet=$(($1 % 8))
for((i = 0; i < 4; i += 1))
do
if [ $i -lt $full_octets ]
then
@skreuzer
skreuzer / freebsd.nki
Created January 13, 2013 02:19
FreeBSD related non kitten items for robotfindskitten
It's a red bikeshed
It's a orange bikeshed
It's a yellow bikeshed
It's a green bikeshed
It's a blue bikeshed
It's a purple bikeshed
It's Jordan Hubbard
It's Marshall Kirk McKusick
It's Alfred Perlstein
It's Robert Watson
@skreuzer
skreuzer / README.md
Last active December 10, 2015 04:38
FreeBSD Port Count by Category

Simple bar chart constructed from a csv file storing the number of ports in each category

#!/usr/local/bin/perl -w

use FreeBSD::Ports;

my @catagories =
(qw/
        accessibility arabic archivers astro audio benchmarks biology
@skreuzer
skreuzer / NaServer.pm
Created August 13, 2012 15:28
Patch to make NaServer.pm work on FreeBSD
--- NaServer.old 2012-02-15 15:56:33.593579000 -0500
+++ NaServer.pm 2012-02-17 10:23:49.242005000 -0500
@@ -26,10 +26,8 @@
use Socket;
use LWP::UserAgent;
use XML::Parser;
-eval "require Net::SSLeay";
-eval "require IO::Select";
+use Data::Dumper;
use NaElement;
@skreuzer
skreuzer / connect.c
Created December 24, 2011 17:33
Make socket connection using SOCKS4/5 and HTTP tunnel
/***********************************************************************
* connect.c -- Make socket connection using SOCKS4/5 and HTTP tunnel.
*
* Copyright (c) 2000-2004 Shun-ichi Goto
* Copyright (c) 2002, J. Grant (English Corrections)
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
@skreuzer
skreuzer / named.conf
Created December 9, 2011 22:03
named logging configuration
logging {
channel server_general {
file "/var/log/named/general.log" versions 5 size 5M;
print-time yes;
severity info;
};
channel server_updates {
file "/var/log/named/update.log" versions 5 size 5M;
-----BEGIN PGP PUBLIC KEY BLOCK-----
Version: PGP Key Server 0.9.6
mQGiBEm+VN4RBACfYJ2U3THLZz/soW+0z18vsGdndRtf/i1FDPxr6gy53/VVOMPx
a1usmGriEtK0En7cwWlPQlr5SdXl/pUNKsIZkClkZnctWPeSM3mYj6zC3HcUyruV
rDNKUYLOYP8dCEtWu7IN0TQKH6xnqLljCFCQYK7lA4zRL7N1S/hExcBsbwCgzT6V
aI0NyeWVcAjs/+t8s4RJkC8D/jNpGb6IuRumkjYZ5GmElelckkmIQvGs2aiBkbE8
IRtDS3VnSUWCN8rWJqqHuwg0QgaDVIHPz5KnMQfv7gbsoGilTx8mTgDEk1P62t4b
Y4YLKJhriaXyrSuQETPinqM3qYvEKysm5bkgiRNEcFHGUZznec2LGtFxPOGAacKn
EwcpA/9UIKdxxsPx8sHCU6L+Teq9DXpeRLRCy/1DJAHXs2BixAGX8kTvvdKnGjNR
@skreuzer
skreuzer / check_incast_socket.sh
Created March 16, 2011 20:58
Nagios plugin to look for incast sockets
#!/bin/sh
SENDQ_SIZE=65536
_parse_netstat()
{
netstat -p tcp -n | awk 'BEGIN { count = 0 }
{
if($6 == "ESTABLISHED" && $3 >= threshold)
{