Michael Bell wrote:
Tiller, Robert wrote:


Hello,
When I try to export the configuration from the CA using the RC1 tarball,
I get a stream of certs in pem format that I've got to manually
cancel. Any ideas? Here is the output...


Exporting valid CA_CERTIFICATE ...

cee9da74a16417e96edd29c24a262322.pem

Please forget my last mail. I have to many CAs. I installed a new DBM one and started an old PosgreSQL one. I found the error and fixed it. There was a wrong input state detection and wrong error handling in getNextItem and getPreviousItem. The fixed code is available in CVS and I created a new snapshot (20031219). This snapshot is subject of change if we make other essential fixes today too.


#####begin of openca-cvsdev#####
===================================================================
RCS file: /cvsroot/openca/openca-0.9/src/modules/openca-db/DB.pm,v
retrieving revision 1.38
retrieving revision 1.39
diff -C2 -d -r1.38 -r1.39
*** DB.pm       22 Jul 2003 14:39:57 -0000      1.38
--- DB.pm       19 Dec 2003 09:45:40 -0000      1.39
***************
*** 590,593 ****
--- 590,594 ----
        my $val;
        if ( ($self->{dbms}->seq($key, $val, R_CURSOR) != 0) or
+              not exists $keys->{KEY} or
             ($keys->{KEY} != $key) ) {
                ## the key doesn't exist
***************
*** 599,604 ****
        }

!       return undef
!               if ($dbstat < 0);

        ## Return object (if any)
--- 600,605 ----
        }

!       return undef if ($dbstat < 0);  ## real error
!       return undef if ($dbstat == 1); ## R_NEXT or R_FIRST does not exist

        ## Return object (if any)
***************
*** 624,627 ****
--- 625,629 ----
        if ( ($key == -1) or
             ($self->{dbms}->seq($key, $val, R_CURSOR) != 0) or
+              not exists $keys->{KEY} or
             ($keys->{KEY} != $key) ) {
                ## the key doesn't exist
***************
*** 633,638 ****
        }

!       return undef
!               if ($dbstat < 0);

        ## Return object (if any)
--- 635,640 ----
        }

!       return undef if ($dbstat < 0);  ## real error
!       return undef if ($dbstat == 1); ## R_PREV or R_LAST does not exist

        ## Return object (if any)
####end of openca-cvsdev#####

Michael
--
-------------------------------------------------------------------
Michael Bell                   Email: [EMAIL PROTECTED]
ZE Computer- und Medienservice            Tel.: +49 (0)30-2093 2482
(Computing Centre)                        Fax:  +49 (0)30-2093 2704
Humboldt-University of Berlin
Unter den Linden 6
10099 Berlin                   Email (private): [EMAIL PROTECTED]
Germany                                       http://www.openca.org



-------------------------------------------------------
This SF.net email is sponsored by: IBM Linux Tutorials.
Become an expert in LINUX or just sharpen your skills.  Sign up for IBM's
Free Linux Tutorials.  Learn everything from the bash shell to sys admin.
Click now! http://ads.osdn.com/?ad_id=1278&alloc_id=3371&op=click
_______________________________________________
Openca-Users mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/openca-users

Reply via email to