nameOption19.pl

#
# Copyright (c) 2009, 2019 IBM Corp. and others
#
# This program and the accompanying materials are made available under
# the terms of the Eclipse Public License 2.0 which accompanies this
# distribution and is available at https://www.eclipse.org/legal/epl-2.0/
# or the Apache License, Version 2.0 which accompanies this distribution and
# is available at https://www.apache.org/licenses/LICENSE-2.0.
#
# This Source Code may also be made available under the following
# Secondary Licenses when the conditions for such availability set
# forth in the Eclipse Public License, v. 2.0 are satisfied: GNU
# General Public License, version 2 with the GNU Classpath
# Exception [1] and GNU General Public License, version 2 with the
# OpenJDK Assembly Exception [2].
#
# [1] https://www.gnu.org/software/classpath/license.html
# [2] http://openjdk.java.net/legal/assembly-exception.html
#
# SPDX-License-Identifier: EPL-2.0 OR Apache-2.0 OR GPL-2.0 WITH Classpath-exception-2.0 OR LicenseRef-GPL-2.0 WITH Assembly-exception
#

# @test 1.0
# @outputpassed
# rem @author Radhakrishnan Thangamuthu
# rem @summary check if a cache is not created with a length  
# rem @summary greater than the allowed length. The cache name used for testing contains %u

use lib ".";
require "sharedClassesUtil.pl";

use strict;
use warnings;

sub nameOption19test{
	my ($java_exe, $cache_max_len_string)=@_;
	my $test_name = "nameOption19";
	my $append_token=get_short_string_for_group();
#   expanded_token contains the expansion of chars stored in append_token
	my $expanded_token="";
	my $error_msg = "";
	my $new_cache_len = ($cache_max_len_string + 0 ) + 1;
	my $new_cache_len_string = $new_cache_len . ' ';
	
	if (is_windows_OS( )){
		$error_msg = long_cache_name_err_msg( );
		$expanded_token= "  "; #  dummy string with the same length as append_token
		long_cache_name_fail_cases_test($java_exe, $test_name, $new_cache_len_string, $error_msg,
			$append_token, $expanded_token);
	} else {
		my $group_name=get_group_name();
		$expanded_token=$group_name;
		$error_msg=copy_groupname_err_msg( ); 
		long_cache_name_fail_cases_test($java_exe, $test_name, $new_cache_len_string, $error_msg,
			$append_token, $expanded_token);
	}
}			
	
nameOption19test((@ARGV));