[prev in list] [next in list] [prev in thread] [next in thread] 

List:       prelude-cvslog
Subject:    [prelude-cvslog] r3515 - in trunk/libpreludedb: . bindings/perl
From:       noreply () prelude-ids ! org
Date:       2004-03-24 22:28:42
Message-ID: 20040324222842.1D2DE7DED0 () mail ! prelude-ids ! org
[Download RAW message or body]

Author: nicolas
Date: 2004-03-24 23:28:42 +0100 (Wed, 24 Mar 2004)
New Revision: 3515

Modified:
   trunk/libpreludedb/bindings/perl/PreludeDB.pm
   trunk/libpreludedb/bindings/python/preludedb.py
   trunk/libpreludedb/configure.in
Log:
	* libpreludedb/configure.in:
	fix wrong installation paths for libpreludedb (bindings
	were installed in libprelude path instead of libpreludedb)

	* libpreludedb/bindings/python/preludedb.py:
	* libpreludedb/bindings/perl/PreludeDB.pm:
	support of db message insertion for perl and python bindings



Modified: trunk/libpreludedb/bindings/perl/PreludeDB.pm
===================================================================
--- trunk/libpreludedb/bindings/perl/PreludeDB.pm	2004-03-24 18:19:49 UTC (rev 3514)
+++ trunk/libpreludedb/bindings/perl/PreludeDB.pm	2004-03-24 22:28:42 UTC (rev 3515)
@@ -304,6 +304,14 @@
     (shift)->delete_message(\&PreludeDB::prelude_db_interface_delete_heartbeat, @_);
 }
 
+sub	insert
+{
+    my	$self = shift;
+    my	$message = shift;
+
+    return (\&PreludeDB::prelude_db_interface_insert_idmef_message($$self, $$message) < 0) ? 0 : 1;
+}
+
 sub	get_values
 {
     my	$self = shift;

Modified: trunk/libpreludedb/bindings/python/preludedb.py
===================================================================
--- trunk/libpreludedb/bindings/python/preludedb.py	2004-03-24 18:19:49 UTC (rev 3514)
+++ trunk/libpreludedb/bindings/python/preludedb.py	2004-03-24 22:28:42 UTC (rev 3515)
@@ -269,6 +269,11 @@
         """Delete a heartbeat."""
         self.__delete_message(analyzerid, ident, prelude_db_interface_delete_heartbeat)
 
+    def insert(self, message):
+        "Insert an IDMEF message in the db."
+        if _preludedb.prelude_db_interface_insert_idmef_message(self.res, message.res) < 0:
+            raise DBError(self)
+
     def get_values(self, selection, criteria=None, distinct=0, limit=-1, offset=-1):
         """Get object values from the database."""
         selection_handle = _preludedb.prelude_db_object_selection_new()

Modified: trunk/libpreludedb/configure.in
===================================================================
--- trunk/libpreludedb/configure.in	2004-03-24 18:19:49 UTC (rev 3514)
+++ trunk/libpreludedb/configure.in	2004-03-24 22:28:42 UTC (rev 3515)
@@ -163,7 +163,7 @@
    if test -w $perl_privlib; then
         perl_dir=$perl_privlib
    else
-	perl_dir=$libdir/libprelude/bindings/perl
+	perl_dir=$libdir/libpreludedb/bindings/perl
    fi
 
    PERL_CFLAGS="-I$perl_includedir"
@@ -201,7 +201,7 @@
    if test -w $python_lib_path; then
         python_dir=$python_lib_path
    else
-	python_dir=$libdir/libprelude/bindings/python 
+	python_dir=$libdir/libpreludedb/bindings/python 
    fi
 
    PYTHON_CFLAGS="-I$python_includedir"


[prev in list] [next in list] [prev in thread] [next in thread]