+2008-06-03, Version 4.4.1
+ * collectd: Fix the `DataSource' option within `Type' blocks. Thanks
+ to kyrone for reporting this.
+ * collectd: Fixed min/max output in notifications generated by
+ threshold checking.
+ * collectd-nagios: Fix the protocol used to communicate with the
+ daemon.
+ * perl plugin: Fail noisily, but don't shutdown the daemon, if
+ initialization has errors. An issue with Perl 5.10 has been fixed.
+ * teamspeak2 plugin: Fixed an out of bounce array access. Thanks to
+ René Rebe and Siegmund Gorr for reporting this.
+
2008-05-06, Version 4.4.0
* collectd: Internal code cleanups.
* collectd: Added support for a `Flush' command in the unixsock and
# collectd - Collectd.pm
-# Copyright (C) 2007 Sebastian Harl
+# Copyright (C) 2007, 2008 Sebastian Harl
#
# This program is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by the
my $sock = Collectd::Unixsock->new($path);
my $cmds = {
+ HELP => \&cmd_help,
PUTVAL => \&putval,
GETVAL => \&getval,
FLUSH => \&flush,
=over 4
+=item B<HELP>
+
+=cut
+
+sub cmd_help {
+ print <<HELP;
+Available commands:
+ HELP
+ PUTVAL
+ GETVAL
+ FLUSH
+ LISTVAL
+
+See the embedded Perldoc documentation for details. To do that, run:
+ perldoc $0
+HELP
+ return 1;
+} # cmd_help
+
=item B<GETVAL> I<Identifier>
=cut
# IgnoreSelected false
#</Plugin>
-#<Plugin df>
+#<Plugin disk>
# Disk "/^[hs]d[a-f][0-9]?$/"
# IgnoreSelected false
#</Plugin>
aTHX = t->interp;
- if (NULL != base) {
+ if ((NULL != base) && (NULL != PL_endav)) {
av_clear (PL_endav);
av_undef (PL_endav);
PL_endav = Nullav;
log_err ("init_pi: pthread_key_create failed");
/* this must not happen - cowardly giving up if it does */
- exit (1);
+ return -1;
}
#ifdef __FreeBSD__
if (0 != perl_parse (aTHX_ xs_init, argc, argv, NULL)) {
log_err ("init_pi: Unable to bootstrap Collectd.");
- exit (1);
+
+ perl_destruct (perl_threads->head->interp);
+ perl_free (perl_threads->head->interp);
+ sfree (perl_threads);
+
+ pthread_key_delete (perl_thr_key);
+ return -1;
}
/* Set $0 to "collectd" because perl_parse() has to set it to "-e". */
return (1);
}
- init_pi (perl_argc, perl_argv);
+ if (0 != init_pi (perl_argc, perl_argv))
+ return -1;
+
assert (NULL != perl_threads);
assert (NULL != perl_threads->head);
#!/bin/sh
-DEFAULT_VERSION="4.4.0.git"
+DEFAULT_VERSION="4.4.1.git"
VERSION="$( git describe 2> /dev/null | sed -e 's/^collectd-//' )"