X-Git-Url: http://git.indexdata.com/?p=simpleserver-moved-to-github.git;a=blobdiff_plain;f=SimpleServer.pm;h=e77f78aea852d26382f9738297febf2aca83b12c;hp=ca25ac3d991f6ecc6276971b4114f9d4d21ec790;hb=24a62ea74725255f3efd7e426b95f9594440ad3d;hpb=a6e5da3c96c2bc8b77275149cadc2ff194a023a3

diff --git a/SimpleServer.pm b/SimpleServer.pm
index ca25ac3..e77f78a 100644
--- a/SimpleServer.pm
+++ b/SimpleServer.pm
@@ -1,5 +1,5 @@
 ##
-##  Copyright (c) 2000, Index Data.
+##  Copyright (c) 2000-2004, Index Data.
 ##
 ##  Permission to use, copy, modify, distribute, and sell this software and
 ##  its documentation, in whole or in part, for any purpose, is hereby granted,
@@ -26,7 +26,16 @@
 ##
 
 ## $Log: SimpleServer.pm,v $
-## Revision 1.16  2003-01-03 09:01:51  sondberg
+## Revision 1.19  2004-05-13 19:04:32  adam
+## Bump year
+##
+## Revision 1.18  2003/09/09 20:12:38  mike
+## Return diagnostics on Init failure
+##
+## Revision 1.17  2003/09/09 11:40:10  mike
+## (Finally!) support implementation-ID
+##
+## Revision 1.16  2003/01/03 09:01:51  sondberg
 ## Version 0.07.
 ##
 ## Revision 1.15  2002/09/16 14:00:16  sondberg
@@ -84,7 +93,7 @@ require AutoLoader;
 @EXPORT = qw(
 	
 );
-$VERSION = '0.07';
+$VERSION = '0.08';
 
 bootstrap Net::Z3950::SimpleServer $VERSION;
 
@@ -279,9 +288,11 @@ The argument hash passed to the init handler has the form
   $args = {
 				    ## Response parameters:
 
+	     IMP_ID    =>  "",      ## Z39.50 Implementation ID
 	     IMP_NAME  =>  "",      ## Z39.50 Implementation name
 	     IMP_VER   =>  "",      ## Z39.50 Implementation version
 	     ERR_CODE  =>  0,       ## Error code, cnf. Z39.50 manual
+	     ERR_STR   =>  "",      ## Error string (additional info.)
 	     USER      =>  "xxx"    ## If Z39.50 authentication is used,
 	     			    ## this member contains user name
 	     PASS      =>  "yyy"    ## Under same conditions, this member
@@ -298,13 +309,14 @@ result sets or a handle to a back-end search engine of some sort),
 it is always best to store them in a private session structure -
 rather than leaving them in global variables in your script.
 
-The Implementation name and version are only really used by Z39.50
+The Implementation ID, name and version are only really used by Z39.50
 client developers to see what kind of server they're dealing with.
 Filling these in is optional.
 
 The ERR_CODE should be left at 0 (the default value) if you wish to
 accept the connection. Any other value is interpreted as a failure
-and the client will be shown the door.
+and the client will be shown the door, with the code and the
+associated additional information, ERR_STR returned.
 
 =head2 Search handler