Icinga-core 1.4.0
next gen monitoring
contrib/new_mini_epn.c File Reference
#include <EXTERN.h>
#include <perl.h>
#include "epn_icinga.h"

Go to the source code of this file.

Defines

#define DO_CLEAN   "0"
#define MAX_INPUT_CHARS   1024
#define DO_READLINE
#define INIT_TERM_READLINE

Functions

void run_plugin (char *command_line)
SV * my_eval_pv (char *pv)
char * get_command_line (void)
void init_term_readline (void)
void init_embedded_perl (void)
void deinit_embedded_perl (void)
int main (int argc, char **argv, char **env)

Define Documentation

#define DO_CLEAN   "0"

Definition at line 14 of file new_mini_epn.c.

#define DO_READLINE
Value:
"$_ = defined($term) "                              \
    "        ? $term->readline($prompt) "               \
    "        : do    { "                                \
    "                    print $prompt; "               \
    "                    chomp($_ = <>); "              \
    "                    $_; "                          \
    "                }; "                               \
    "die qq(That's all folks.\\n) "                     \
    "    unless $_ && ! /^\\s*$/ ; "                    \
    "$_; "

Definition at line 27 of file new_mini_epn.c.

#define INIT_TERM_READLINE
Value:
"use vars qw($term $prompt $OUT); "                 \
                                                        \
    "eval { require Term::ReadLine; }; "                \
    "unless ($@) { "                                    \
    "    $term = new Term::ReadLine 'new_mini_epn'; "   \
    "} else { "                                         \
    "    warn qq(Install Term::ReadLine for arrow key access to history, filename completion etc.); " \
    "} "                                                \
                                                        \
    "$OUT = $term->OUT "                                \
    "    if defined($term); "                           \
    "$prompt = 'plugin command line: '; "

Definition at line 39 of file new_mini_epn.c.

#define MAX_INPUT_CHARS   1024

Definition at line 15 of file new_mini_epn.c.


Function Documentation

void deinit_embedded_perl ( void  )

Definition at line 211 of file new_mini_epn.c.

char* get_command_line ( void  )

Definition at line 160 of file new_mini_epn.c.

void init_embedded_perl ( void  )

Definition at line 178 of file new_mini_epn.c.

void init_term_readline ( void  )

Definition at line 174 of file new_mini_epn.c.

int main ( int  argc,
char **  argv,
char **  env 
)

Definition at line 219 of file new_mini_epn.c.

SV* my_eval_pv ( char *  pv)

Definition at line 149 of file new_mini_epn.c.

void run_plugin ( char *  command_line)

Definition at line 53 of file new_mini_epn.c.

 All Data Structures Files Functions Variables Typedefs Defines