tyler.durden
/
centreon-plugins
mirror of https://github.com/centreon/centreon-plugins.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

enh office365 graphapi custom mode

This commit is contained in:
Colin Gagnaire 2018-12-24 16:31:10 +01:00
parent 30d16e83ef
commit e202ece0ee
1 changed files with 35 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
cloud/microsoft/office365/custom/graphapi.pm
View File

@ -226,7 +226,7 @@ sub request_api_csv {
my $content = $self->{http}->request(%options);
my $response = $self->{http}->get_response();
if ($response->code() != 200) {
my $decoded;
eval {
@ -260,7 +260,6 @@ sub request_api_csv {
open my $fh, '<', \$decoded;
my $csv = Text::CSV->new({ binary => 1 });
$csv->column_names($csv->getline($fh));
my $dummy = <$fh>;
while (my $row = $csv->getline_hr($fh)) {
push @rows, $row;
}
@ -291,6 +290,40 @@ sub office_get_sharepoint_site_usage {
return $response;
}
sub office_get_sharepoint_activity_set_url {
my ($self, %options) = @_;
my $url = $self->{graph_endpoint} . "/v1.0/reports/getSharePointActivityUserDetail(period='D7')";
return $url;
}
sub office_get_sharepoint_activity {
my ($self, %options) = @_;
my $full_url = $self->office_get_sharepoint_activity_set_url(%options);
my $response = $self->request_api_csv(method => 'GET', full_url => $full_url, hostname => '');
return $response;
}
sub office_get_onedrive_usage_set_url {
my ($self, %options) = @_;
my $url = $self->{graph_endpoint} . "/v1.0/reports/getOneDriveUsageAccountDetail(period='D7')";
return $url;
}
sub office_get_onedrive_usage {
my ($self, %options) = @_;
my $full_url = $self->office_get_onedrive_usage_set_url(%options);
my $response = $self->request_api_csv(method => 'GET', full_url => $full_url, hostname => '');
return $response;
}
1;
__END__