WebService-LogicMonitor

Interact with LogicMonitor's API


Keywords
api-client, convenience-wrappers, logicmonitor, perl, perl-module, perl5
License
Artistic-1.0-Perl

Documentation

NAME

WebService::LogicMonitor - Interact with LogicMonitor's API

VERSION

version 0.153170

SYNOPSIS

use v5.16;
use warnings;
use Try::Tiny;
use WebService::LogicMonitor;

# find a hostgroup by name, iterate through its child groups
# and check the status of a datasource instance

my $lm = WebService::LogicMonitor->new(
    username => $ENV{LOGICMONITOR_USER},
    password => $ENV{LOGICMONITOR_PASS},
    company  => $ENV{LOGICMONITOR_COMPANY},
);

my $top_group_name = shift || die "What group?\n";
my $datasource     = shift || 'Ping';

sub recurse_group {
    my $group = shift;
    foreach my $entity (@{$group->children}) {
        if ($entity->is_group) {
            say 'GROUP: ' . $entity->name;
            recurse_group($entity);
        } elsif ($entity->is_host) {
            say '  HOST: ' . $entity->host_name;
            my $instances = try {
                $entity->get_datasource_instances($datasource);
            } catch {
                say "Failed to retrieve data source instances: " . $_;
                next;
            };

            next unless $instances;
            # assume only one instance
            my $instance = shift @$instances;
            say '    datasource status: '
              . ($instance->enabled ? 'enabled' : 'disabled');
            say '    alert status: '
              . ($instance->alert_enable ? 'enabled' : 'disabled');
        }

    }
}

my $groups = $lm->get_groups(name => $top_group_name);
recurse_group(shift @$groups);

DESCRIPTION

LogicMonitor is a SaaS infrastructure monitoring provider. They provide an RPC API which provides most of functionality of their web GUI (with the unfortunate omission of managing DataSources).

They have recently started a REST API which covers a different set of functionality.

This module puts an OO wrapper around the RPC API in what is a hopefully a much more convenient and user-friendly manner.

HOWEVER the API provided by this module is not considered stable and will almost certainly have some changes before version 1.0.

ATTRIBUTES

company, username, password

The CUP authentication details for your LogicMonitor account. See http://help.logicmonitor.com/developers-guide/authenticating-requests/

METHODS

get_escalation_chains

Returns an arrayref of all available escalation chains.

http://help.logicmonitor.com/developers-guide/manage-escalation-chains/#get1

get_escalation_chain_by_name(Str $name)

Convenience wrapper aroung "get_escalation_chains" which only returns chains where a name eq $name.

get_accounts

Retrieves a complete list of accounts as an arrayref.

http://help.logicmonitor.com/developers-guide/manage-user-accounts/#getAccounts

get_account_by_email(Str $email)

Convenience wrapper aroung "get_accounts" which only returns accounts matching $email.

get_account_by_username(Str $username)

Convenience wrapper aroung "get_accounts" which only returns accounts matching $username.

get_data

get_alerts(...)

Returns an arrayref of alerts or undef if none found.

See http://help.logicmonitor.com/developers-guide/manage-alerts/ for what parameters are available to filter the alerts.

add_host

Creates and returns a new host. Shortcut for WebService::LogicMonitor::Host new and create

delete_host(Str displayname)

Deletes a host identified by its displayname. Convenience wrapper around "get_host" in WebService::LogicMonitor and "delete" in WebService::LogicMonitor::Host.

get_host(Str displayname)

Return a host.

http://help.logicmonitor.com/developers-guide/manage-hosts/#get1

get_hosts(Int hostgroupid)

Return an array of hosts in the group specified by group_id

http://help.logicmonitor.com/developers-guide/manage-hosts/#get1

In scalar context, will return an arrayref of hosts in the group.

In array context, will return the same arrayref plus a hashref of the group.

get_all_hosts

Convenience wrapper around "get_hosts" which returns all hosts. BEWARE This will probably take a while.

get_groups(Str|Regexp filter?)

Returns an arrayref of all host groups.

http://help.logicmonitor.com/developers-guide/manage-host-group/#list

Optionally takes a string or regexp as an argument. Only those hostgroups with names matching the argument will be returned, or undef if there are none. If the arg is a string, it must be an exact match with eq.

get_sdts(Str key?, Int id?)

Returns an array of SDT hashes. With no args, it will return all SDTs in the account. See the LoMo docs for details on what keys are supported.

http://help.logicmonitor.com/developers-guide/schedule-down-time/get-sdt-data/

set_sdt(Str entity, Int|Str id, start = DateTime|Str, end => DateTime|Str, comment => Str?)>

Sets SDT for an entity. Entity can be

Host
HostGroup
HostDataSource
DataSourceInstance
HostDataSourceInstanceGroup
Agent

The id for Host can be either an id number or hostname string.

To simplify calling this we take two keys, start and end which must be either DateTime objects or ISO8601 strings parseable by DateTime::Format::ISO8601.

http://help.logicmonitor.com/developers-guide/schedule-down-time/set-sdt-data/

$lomo->set_sdt(
    Host    => 'somehost',
    start   => '20151101T1000',
    end     => '20151101T1350',
    comment => 'Important maintenance',
);

set_quick_sdt(Str entity, Int|Str id, $hours, ...)

Wrapper around "set_sdt" to quickly set SDT starting immediately. The lenght of the SDT can be specfied as hours, minutes or any other unit supported by https://metacpan.org/pod/DateTime#Adding-a-Duration-to-a-Datetime, but only one unit can be specified.

$lomo->set_quick_sdt(Host => 'somehost', minutes => 30, comment => 'Reboot to annoy support');
$lomo->set_quick_sdt(HostGroup => 456, hours => 6);

SEE ALSO

LogicMonitor

AUTHOR

Ioan Rogers <ioan.rogers@sophos.com>

COPYRIGHT AND LICENSE

This software is copyright (c) 2015 by Sophos Ltd.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.