ewindisch

#!/usr/bin/env python
#
# Copyright (c) 2012 Eric Windisch <[email protected]>
#
# Permission is hereby granted, free of charge, to any person obtaining a copy
# of this software and associated documentation files (the "Software"), to deal
# in the Software without restriction, including without limitation the rights
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
# copies of the Software, and to permit persons to whom the Software is
# furnished to do so, subject to the following conditions:

ewindisch

print "Importing."
from pprint import pprint
from urllib2 import urlopen

from bs4 import BeautifulSoup

# LinkedIn API code
import re
from ConfigParser import SafeConfigParser
import oauth2 as oauth

ewindisch

# AGPLv3, Eric Windisch. GrokThis.net / VPS Village.com
# This is an snippet / extract from a larger application.
# I don't necessarily expect this to work all on its lonesome.

use Locale::TextDomain ('CloudShell');
our $ginterp;
our %interpcache;
my $prompt;

# Execute main subroutine, unless we're being subclassed...

ewindisch

#!/bin/bash
#% Title: gt-topiosar
#% Author: Eric Windisch
#% License: MIT

# default value...
count=20
#expr="p;"
filter='.'

ewindisch

#!/bin/bash
for i in $(seq 0 1024); do x=$(cut -d/ -f3 <(xenstore-read /local/domain/$i/vm 2>/dev/null)); if [ $x ] && [ $x == $(cat /sys/hypervisor/uuid) ] ; then xenstore-ls /local/domain/$i ; fi ; done

ewindisch

#!/bin/bash
#% Title: gt-topio
#% Author: Eric Windisch
#% License: MIT

# default value...
count=20
filter='.'

set -- `getopt c:d:e: $@` >/dev/null 2>&1

ewindisch

#!/bin/bash
for line in $(iostat $(dmsetup ls | sed -n '/swap/{ s/.*, //; s/)//; s/^/dm-/; p; }') | sed 's/\s\+/,/g'); do
	if (echo $line | grep ^dm- >/dev/null 2>&1); then
		dm=$(echo $line | cut -d, -f1 | cut -d- -f2);
		dname=$(dmsetup info -c --noheadings -j 253 -m $dm | cut -d: -f1);
		echo $line |
			sed "s/^dm-$dm/$dname/; s/,/\t\t/g;";
	else 
		echo "$line" | sed 's/,/\t\t/g;';
	fi