[Arsperl-devel] ARSperl/infra exsi.pl,1.5,1.6

[jeff m. <jef...@us...>]

Update of /cvsroot/arsperl/ARSperl/infra
In directory sfp-cvsdas-1.v30.ch3.sourceforge.com:/tmp/cvs-serv13515/infra

Modified Files:
	exsi.pl 
Log Message:
more fiddling with exsi.pl: removed skip of MAX_ATTACH_SIZE, reworded warning

Index: exsi.pl
===================================================================
RCS file: /cvsroot/arsperl/ARSperl/infra/exsi.pl,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** exsi.pl	14 Dec 2009 17:25:34 -0000	1.5
--- exsi.pl	14 Dec 2009 17:30:56 -0000	1.6
***************
*** 16,19 ****
--- 16,22 ----
  #
  # $Log$
+ # Revision 1.6  2009/12/14 17:30:56  jeffmurphy
+ # more fiddling with exsi.pl: removed skip of MAX_ATTACH_SIZE, reworded warning
+ #
  # Revision 1.5  2009/12/14 17:25:34  jeffmurphy
  # changed die to warn. due to watch serverinfotypehints is searched, shouldnt affect anything if theres a gap. sf bug id 2914262
***************
*** 50,56 ****
  	# name value type type2
  
! 	if(/AR_SERVER_INFO_MAX_ATTACH_SIZE/) {
! 		next;
! 	}elsif(/\#define\s+(AR_SERVER_INFO_\S+)\s+(\d+)\s*\/\*\s*(\S+)\s+(\S+)?/) {
  		($sin, $siv, $sit, $sit2) = ($1, $2, $3, $4);
  	}elsif(/\#define\s+(AR_SERVER_INFO_\S+)\s+(\d+)\s*$/){
--- 53,57 ----
  	# name value type type2
  
! 	if(/\#define\s+(AR_SERVER_INFO_\S+)\s+(\d+)\s*\/\*\s*(\S+)\s+(\S+)?/) {
  		($sin, $siv, $sit, $sit2) = ($1, $2, $3, $4);
  	}elsif(/\#define\s+(AR_SERVER_INFO_\S+)\s+(\d+)\s*$/){
***************
*** 65,69 ****
  		print "sin $sin siv $siv sit $sit\n" if $D;
  		++$ct;
! 		warn "!!! ERROR: Cannot determine type for AR_SERVER_INFO constant $ct !!!" if $siv != $ct;
  
  		next if $sit eq 'deprecated';
--- 66,73 ----
  		print "sin $sin siv $siv sit $sit\n" if $D;
  		++$ct;
! 		if ($siv != $ct) {
! 			warn "warning: gap in enumeration for $sin expected $ct got $siv. it's OK to ignore this." if $siv != $ct;
! 			$ct = $siv;
! 		}
  
  		next if $sit eq 'deprecated';
***************
*** 85,88 ****
--- 89,93 ----
  
  		$sit = "int" if $sin eq "AR_SERVER_INFO_MAX_AUDIT_LOG_FILE_SIZE";
+ 		$sit = "int" if $sin eq "AR_SERVER_INFO_MAX_ATTACH_SIZE";
  		$sit = "char" if $sin eq "AR_SERVER_INFO_MESSAGE_CAT_SCHEMA";
  		$sit = "unsigned long" if $sit eq "ARInternalId";