Thanks for sharing Vladimir, love the mascot :)
Cheers.
> Vladimir Melnik wrote:
Dear colleagues,
If you administrating CloudStack installations, you may find it useful.
If you love Perl5, you may consider it interesting.
I'm developing a library and some set of tools for managing
CloudStack-based infrastructure from the command line. It's going to
become a smart system for doing lots of administrative tasks, so it's
only the beginning for now. :-)
But what we have at the moment?
As about tools, we can do such things from UNIX-shell...
For example, let's assume you want to check state of the VM having
a certain IP-address AND being a member of a certain domain:
admin> mm_vm_info has_ipaddress=10.1.1.127 has_domain=A201306
<?xml version="1.0" encoding="UTF-8"?>
<listvirtualmachinesresponse>
<virtualmachine>
<id>99b885d4-70d7-4efc-8a4e-53417893fb19</id>
<name>99b885d4-70d7-4efc-8a4e-53417893fb19</name>
[...]
Or, if you want to, you can get certain parameters of this output:
admin> mm_vm_info has_ipaddress=10.1.1.127 has_domain=A201306 \
-x //state -x //hostname -x //instancename
<state>Running</state>
<hostname>h2.c1.p1.z1.tucha13.net</hostname>
<instancename>i-51-135-VM</instancename>
You can reset the VM found by your desired criterias:
admin> mm_vm_reset has_instancename=i-13-666-VM
Want to listen to someone's network interface? No problem.
admin> mm_vm_tcpdump has_ipaddress=10.1.1.253
tcpdump: WARNING: vnet17: no IPv4 address assigned
tcpdump: verbose output suppressed, use -v or -vv for full protocol decode
listening on vnet17, link-type EN10MB (Ethernet), capture size 65535 bytes
15:21:01.845886 IP 10.1.1.1.36686> 10.1.1.253.imaps: Flags [S], seq 316746440,
win 14600, options [mss 1460,sackOK,TS val 1959872931 ecr 0,nop,wscale 6], length 0
15:21:01.846023 IP 10.1.1.253.imaps> 10.1.1.1.36686: Flags [S.], seq
2234071684, ack 316746441, win 14480, options [mss 1460,sackOK,TS val 2579908884
ecr 1959872931,nop,wscale 6], length 0
^^^ The script have found the hostname and the instance name, logged
into the host, analyzed output of "virsh dumpxml ...", found the
interface's name (vnet17) and launched tcpdump.
And you can use all these things not only from the command-line, as you
can use the object oriented library using all these things from your own
Perl5 scripts.
Let's assume you want to find and load all the information about some
domain:
my $domain = eval { MonkeyMan::CloudStack::Elements::Domain->new(
mm => $mm,
load_dom => {
conditions => {
path => 'ROOT/CUSTOMERS/ZALOOPA'
}
}
)};
if($@) { $log->warn("Can't
MonkeyMan::CloudStack::Elements::Domain->new(): $@"); next; }
Voila, now you have the corresponding object's reference in the $domain
variable. You can do some easy tricks with that domain. It's pretty easy
to get any parameter:
my $domain_id = $domain->get_parameter('id');
unless(defined($domain_id)) {
$log->warn("Can't get the ID of the domain" .
($domain->has_error ? (": " . $domain->error_message) :
undef)
);
next;
}
What if you want to get all volumes belongs to this domain? It's easy:
my $volumz = $domain->find_related_to_me("volume");
$log->logdie($domain->error_message) unless defined($volumz);
No kidding, you have the reference to the list of XML::LibXML documents
who have the<domainid> parameter corresponding to this domain. You can
easily initialize them as objects to do other cool things with these
volumes:
foreach my $volume_dom (@{ $volumz }) {
my $volume = eval {
MonkeyMan::CloudStack::Elements::Volume->new(
mm => $mm,
load_dom => {
dom => $volume_dom # the XML document
}
); };
if($@) { $log->warn("Can't
MonkeyMan::CloudStack::Elements::Volume->new(): $@"); next; }
Oh, well, too much words... :-)
Would you like to use it? You're strongly welcome:
https://github.com/melnik13/monkeyman/
Would you like to develop it with me? Feel free to drop me a line.
A great week to you all!
--
Rohit Yadav
Software Architect, ShapeBlue
M. +91 88 262 30892 | rohit.ya...@shapeblue.com
Blog: bhaisaab.org | Twitter: @_bhaisaab
Find out more about ShapeBlue and our range of CloudStack related services
IaaS Cloud Design & Build<http://shapeblue.com/iaas-cloud-design-and-build//>
CSForge – rapid IaaS deployment framework<http://shapeblue.com/csforge/>
CloudStack Consulting<http://shapeblue.com/cloudstack-consultancy/>
CloudStack Infrastructure
Support<http://shapeblue.com/cloudstack-infrastructure-support/>
CloudStack Bootcamp Training Courses<http://shapeblue.com/cloudstack-training/>
This email and any attachments to it may be confidential and are intended solely
for the use of the individual to whom it is addressed. Any views or opinions
expressed are solely those of the author and do not necessarily represent those of
Shape Blue Ltd or related companies. If you are not the intended recipient of this
email, you must neither take any action based upon its contents, nor copy or show
it to anyone. Please contact the sender if you believe you have received this email
in error. Shape Blue Ltd is a company incorporated in England & Wales.
ShapeBlue Services India LLP is a company incorporated in India and is operated
under license from Shape Blue Ltd. Shape Blue Brasil Consultoria Ltda is a company
incorporated in Brasil and is operated under license from Shape Blue Ltd. ShapeBlue
is a registered trademark.
