]> git.saurik.com Git - apple/icu.git/blame - icuSources/test/perf/convperf/convperf_ansi.pl
ICU-64232.0.1.tar.gz
[apple/icu.git] / icuSources / test / perf / convperf / convperf_ansi.pl
CommitLineData
46f4442e 1#!/usr/bin/perl
374ca955 2# ********************************************************************
f3c0d7a5
A
3# * Copyright (C) 2016 and later: Unicode, Inc. and others.
4# * License & terms of use: http://www.unicode.org/copyright.html#License
5# ********************************************************************
6# ********************************************************************
374ca955 7# * COPYRIGHT:
57a6839d 8# * Copyright (c) 2002-2013, International Business Machines Corporation and
374ca955
A
9# * others. All Rights Reserved.
10# ********************************************************************
11
46f4442e
A
12#use strict;
13
14require "../perldriver/Common.pl";
374ca955
A
15
16use lib '../perldriver';
17
18use PerfFramework;
19
46f4442e
A
20# This test only works on Windows.
21if (!$OnWindows) {
22 print "This test only works on Windows.\n";
23 exit(1);
24}
374ca955
A
25
26my $options = {
57a6839d
A
27 "title"=>"Conversion Performance: ICU ".$ICULatestVersion." vs. Windows XP ANSI Interface",
28 "headers"=>"WindowsXP(IMultiLanguage2) ICU".$ICULatestVersion,
29 "operationIs"=>"code point",
30 "passes"=>"10",
31 "time"=>"5",
32 #"outputType"=>"HTML",
33 "dataDir"=>"Not Using Data Files",
34 "outputDir"=>"../results"
35};
374ca955
A
36
37# programs
38# tests will be done for all the programs. Results will be stored and connected
57a6839d 39my $p = "cd ".$ICULatest."/bin && ".$ICUPathLatest."/convperf/$WindowsPlatform/Release/convperf.exe";
374ca955
A
40
41my $tests = {
57a6839d
A
42 "UTF-8 From Unicode", ["$p,TestWinANSI_UTF8_FromUnicode" , "$p,TestICU_UTF8_FromUnicode" ],
43 "UTF-8 To Unicode", ["$p,TestWinANSI_UTF8_ToUnicode" , "$p,TestICU_UTF8_ToUnicode" ],
44 ####
45 "ISO-8859-1 From Unicode", ["$p,TestWinANSI_Latin1_FromUnicode" , "$p,TestICU_Latin1_FromUnicode" ],
46 "ISO-8859-1 To Unicode", ["$p,TestWinANSI_Latin1_ToUnicode" , "$p,TestICU_Latin1_ToUnicode" ],
47 ####
48 "Shift-JIS From Unicode", ["$p,TestWinANSI_SJIS_FromUnicode" , "$p,TestICU_SJIS_FromUnicode" ],
49 "Shift-JIS To Unicode", ["$p,TestWinANSI_SJIS_ToUnicode" , "$p,TestICU_SJIS_ToUnicode" ],
50 ####
51 "EUC-JP From Unicode", ["$p,TestWinANSI_EUCJP_FromUnicode" , "$p,TestICU_EUCJP_FromUnicode" ],
52 "EUC-JP To Unicode", ["$p,TestWinANSI_EUCJP_ToUnicode" , "$p,TestICU_EUCJP_ToUnicode" ],
53 ####
54 "GB2312 From Unicode", ["$p,TestWinANSI_GB2312_FromUnicode" , "$p,TestICU_GB2312_FromUnicode" ],
55 "GB2312 To Unicode", ["$p,TestWinANSI_GB2312_ToUnicode" , "$p,TestICU_GB2312_ToUnicode" ],
56};
374ca955
A
57
58my $dataFiles = "";
59
60runTests($options, $tests, $dataFiles);