зеркало из https://github.com/mozilla/pjs.git
857 строки
26 KiB
C
857 строки
26 KiB
C
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
|
|
/*
|
|
* The contents of this file are subject to the Mozilla Public
|
|
* License Version 1.1 (the "License"); you may not use this file
|
|
* except in compliance with the License. You may obtain a copy of
|
|
* the License at http://www.mozilla.org/MPL/
|
|
*
|
|
* Software distributed under the License is distributed on an "AS
|
|
* IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
|
|
* implied. See the License for the specific language governing
|
|
* rights and limitations under the License.
|
|
*
|
|
* The Original Code is the Netscape Portable Runtime (NSPR).
|
|
*
|
|
* The Initial Developer of the Original Code is Netscape
|
|
* Communications Corporation. Portions created by Netscape are
|
|
* Copyright (C) 1998-2000 Netscape Communications Corporation. All
|
|
* Rights Reserved.
|
|
*
|
|
* Contributor(s):
|
|
*
|
|
* Alternatively, the contents of this file may be used under the
|
|
* terms of the GNU General Public License Version 2 or later (the
|
|
* "GPL"), in which case the provisions of the GPL are applicable
|
|
* instead of those above. If you wish to allow use of your
|
|
* version of this file only under the terms of the GPL and not to
|
|
* allow others to use your version of this file under the MPL,
|
|
* indicate your decision by deleting the provisions above and
|
|
* replace them with the notice and other provisions required by
|
|
* the GPL. If you do not delete the provisions above, a recipient
|
|
* may use your version of this file under either the MPL or the
|
|
* GPL.
|
|
*/
|
|
|
|
/*
|
|
** testll.c -- test suite for 64bit integer (longlong) operations
|
|
**
|
|
** Summary: testll [-d] | [-h]
|
|
**
|
|
** Where:
|
|
** -d set debug mode on; displays individual test failures
|
|
** -v verbose mode; displays progress in test, plus -d
|
|
** -h gives usage message.
|
|
**
|
|
** Description:
|
|
** lltest.c tests the functions defined in NSPR 2.0's prlong.h.
|
|
**
|
|
** Successive tests begin to depend on other LL functions working
|
|
** correctly. So, ... Do not change the order of the tests as run
|
|
** from main().
|
|
**
|
|
** Caveats:
|
|
** Do not even begin to think that this is an exhaustive test!
|
|
**
|
|
** These tests try a little of everything, but not all boundary
|
|
** conditions and limits are tested.
|
|
** You want better coverage? ... Add it.
|
|
**
|
|
** ---
|
|
** Author: Lawrence Hardiman <larryh@netscape.com>.
|
|
** ---
|
|
** Revision History:
|
|
** 01-Oct-1997. Original implementation.
|
|
**
|
|
*/
|
|
|
|
#include "nspr.h"
|
|
#include "plgetopt.h"
|
|
|
|
/* --- Local Definitions --- */
|
|
#define ReportProgress(m) if (verboseMode) PR_fprintf(output, (m));
|
|
|
|
|
|
/* --- Global variables --- */
|
|
static PRIntn failedAlready = 0;
|
|
static PRFileDesc* output = NULL;
|
|
static PRBool debugMode = PR_FALSE;
|
|
static PRBool verboseMode = PR_FALSE;
|
|
|
|
/*
|
|
** Constants used in tests.
|
|
*/
|
|
const PRInt64 bigZero = LL_INIT( 0, 0 );
|
|
const PRInt64 bigOne = LL_INIT( 0, 1 );
|
|
const PRInt64 bigTwo = LL_INIT( 0, 2 );
|
|
const PRInt64 bigSixTeen = LL_INIT( 0, 16 );
|
|
const PRInt64 bigThirtyTwo = LL_INIT( 0, 32 );
|
|
const PRInt64 bigMinusOne = LL_INIT( 0xffffffff, 0xffffffff );
|
|
const PRInt64 bigMinusTwo = LL_INIT( 0xffffffff, 0xfffffffe );
|
|
const PRInt64 bigNumber = LL_INIT( 0x7fffffff, 0xffffffff );
|
|
const PRInt64 bigMinusNumber = LL_INIT( 0x80000000, 0x00000001 );
|
|
const PRInt64 bigMaxInt32 = LL_INIT( 0x00000000, 0x7fffffff );
|
|
const PRInt64 big2To31 = LL_INIT( 0x00000000, 0x80000000 );
|
|
const PRUint64 bigZeroFox = LL_INIT( 0x00000000, 0xffffffff );
|
|
const PRUint64 bigFoxFox = LL_INIT( 0xffffffff, 0xffffffff );
|
|
const PRUint64 bigFoxZero = LL_INIT( 0xffffffff, 0x00000000 );
|
|
const PRUint64 bigEightZero = LL_INIT( 0x80000000, 0x00000000 );
|
|
const PRUint64 big64K = LL_INIT( 0x00000000, 0x00010000 );
|
|
const PRInt64 bigInt0 = LL_INIT( 0x01a00000, 0x00001000 );
|
|
const PRInt64 bigInt1 = LL_INIT( 0x01a00000, 0x00001100 );
|
|
const PRInt64 bigInt2 = LL_INIT( 0x01a00000, 0x00000100 );
|
|
const PRInt64 bigInt3 = LL_INIT( 0x01a00001, 0x00001000 );
|
|
const PRInt64 bigInt4 = LL_INIT( 0x01a00001, 0x00001100 );
|
|
const PRInt64 bigInt5 = LL_INIT( 0x01a00001, 0x00000100 );
|
|
const PRInt64 bigInt6 = LL_INIT( 0xb1a00000, 0x00001000 );
|
|
const PRInt64 bigInt7 = LL_INIT( 0xb1a00000, 0x00001100 );
|
|
const PRInt64 bigInt8 = LL_INIT( 0xb1a00000, 0x00000100 );
|
|
const PRInt64 bigInt9 = LL_INIT( 0xb1a00001, 0x00001000 );
|
|
const PRInt64 bigInt10 = LL_INIT( 0xb1a00001, 0x00001100 );
|
|
const PRInt64 bigInt11 = LL_INIT( 0xb1a00001, 0x00000100 );
|
|
const PRInt32 one = 1l;
|
|
const PRInt32 minusOne = -1l;
|
|
const PRInt32 sixteen = 16l;
|
|
const PRInt32 thirtyTwo = 32l;
|
|
const PRInt32 sixtyThree = 63l;
|
|
|
|
/*
|
|
** SetFailed() -- Report individual test failure
|
|
**
|
|
*/
|
|
static void
|
|
SetFailed( char *what, char *how )
|
|
{
|
|
failedAlready = 1;
|
|
if ( debugMode )
|
|
PR_fprintf(output, "%s: failed: %s\n", what, how );
|
|
return;
|
|
}
|
|
|
|
static void
|
|
ResultFailed( char *what, char *how, PRInt64 expected, PRInt64 got)
|
|
{
|
|
if ( debugMode)
|
|
{
|
|
SetFailed( what, how );
|
|
PR_fprintf(output, "Expected: 0x%llx Got: 0x%llx\n", expected, got );
|
|
}
|
|
return;
|
|
}
|
|
|
|
|
|
/*
|
|
** TestAssignment() -- Test the assignment
|
|
*/
|
|
static void TestAssignment( void )
|
|
{
|
|
PRInt64 zero = LL_Zero();
|
|
PRInt64 min = LL_MinInt();
|
|
PRInt64 max = LL_MaxInt();
|
|
if (!LL_EQ(zero, bigZero))
|
|
SetFailed("LL_EQ(zero, bigZero)", "!=");
|
|
if (!LL_CMP(max, >, min))
|
|
SetFailed("LL_CMP(max, >, min)", "!>");
|
|
}
|
|
|
|
/*
|
|
** TestComparisons() -- Test the longlong comparison operations
|
|
*/
|
|
static void
|
|
TestComparisons( void )
|
|
{
|
|
ReportProgress("Testing Comparisons Operations\n");
|
|
|
|
/* test for zero */
|
|
if ( !LL_IS_ZERO( bigZero ))
|
|
SetFailed( "LL_IS_ZERO", "Zero is not zero" );
|
|
|
|
if ( LL_IS_ZERO( bigOne ))
|
|
SetFailed( "LL_IS_ZERO", "One tests as zero" );
|
|
|
|
if ( LL_IS_ZERO( bigMinusOne ))
|
|
SetFailed( "LL_IS_ZERO", "Minus One tests as zero" );
|
|
|
|
/* test equal */
|
|
if ( !LL_EQ( bigZero, bigZero ))
|
|
SetFailed( "LL_EQ", "zero EQ zero");
|
|
|
|
if ( !LL_EQ( bigOne, bigOne ))
|
|
SetFailed( "LL_EQ", "one EQ one" );
|
|
|
|
if ( !LL_EQ( bigNumber, bigNumber ))
|
|
SetFailed( "LL_EQ", "bigNumber EQ bigNumber" );
|
|
|
|
if ( !LL_EQ( bigMinusOne, bigMinusOne ))
|
|
SetFailed( "LL_EQ", "minus one EQ minus one");
|
|
|
|
if ( LL_EQ( bigZero, bigOne ))
|
|
SetFailed( "LL_EQ", "zero EQ one");
|
|
|
|
if ( LL_EQ( bigOne, bigZero ))
|
|
SetFailed( "LL_EQ", "one EQ zero" );
|
|
|
|
if ( LL_EQ( bigMinusOne, bigOne ))
|
|
SetFailed( "LL_EQ", "minus one EQ one");
|
|
|
|
if ( LL_EQ( bigNumber, bigOne ))
|
|
SetFailed( "LL_EQ", "bigNumber EQ one");
|
|
|
|
/* test not equal */
|
|
if ( LL_NE( bigZero, bigZero ))
|
|
SetFailed( "LL_NE", "0 NE 0");
|
|
|
|
if ( LL_NE( bigOne, bigOne ))
|
|
SetFailed( "LL_NE", "1 NE 1");
|
|
|
|
if ( LL_NE( bigMinusOne, bigMinusOne ))
|
|
SetFailed( "LL_NE", "-1 NE -1");
|
|
|
|
if ( LL_NE( bigNumber, bigNumber ))
|
|
SetFailed( "LL_NE", "n NE n");
|
|
|
|
if ( LL_NE( bigMinusNumber, bigMinusNumber ))
|
|
SetFailed( "LL_NE", "-n NE -n");
|
|
|
|
if ( !LL_NE( bigZero, bigOne))
|
|
SetFailed( "LL_NE", "0 NE 1");
|
|
|
|
if ( !LL_NE( bigOne, bigMinusNumber))
|
|
SetFailed( "LL_NE", "1 NE -n");
|
|
|
|
/* Greater than or equal to zero */
|
|
if ( !LL_GE_ZERO( bigZero ))
|
|
SetFailed( "LL_GE_ZERO", "0");
|
|
|
|
if ( !LL_GE_ZERO( bigOne ))
|
|
SetFailed( "LL_GE_ZERO", "1");
|
|
|
|
if ( !LL_GE_ZERO( bigNumber ))
|
|
SetFailed( "LL_GE_ZERO", "n");
|
|
|
|
if ( LL_GE_ZERO( bigMinusOne ))
|
|
SetFailed( "LL_GE_ZERO", "-1");
|
|
|
|
if ( LL_GE_ZERO( bigMinusNumber ))
|
|
SetFailed( "LL_GE_ZERO", "-n");
|
|
|
|
/* Algebraic Compare two values */
|
|
if ( !LL_CMP( bigZero, ==, bigZero ))
|
|
SetFailed( "LL_CMP", "0 == 0");
|
|
|
|
if ( LL_CMP( bigZero, >, bigZero ))
|
|
SetFailed( "LL_CMP", "0 > 0");
|
|
|
|
if ( LL_CMP( bigZero, <, bigZero ))
|
|
SetFailed( "LL_CMP", "0 < 0");
|
|
|
|
if ( LL_CMP( bigNumber, <, bigOne ))
|
|
SetFailed( "LL_CMP", "n < 1");
|
|
|
|
if ( !LL_CMP( bigNumber, >, bigOne ))
|
|
SetFailed( "LL_CMP", "n <= 1");
|
|
|
|
if ( LL_CMP( bigOne, >, bigNumber ))
|
|
SetFailed( "LL_CMP", "1 > n");
|
|
|
|
if ( LL_CMP( bigMinusNumber, >, bigNumber ))
|
|
SetFailed( "LL_CMP", "-n > n");
|
|
|
|
if ( LL_CMP( bigNumber, !=, bigNumber))
|
|
SetFailed( "LL_CMP", "n != n");
|
|
|
|
if ( !LL_CMP( bigMinusOne, >, bigMinusTwo ))
|
|
SetFailed( "LL_CMP", "-1 <= -2");
|
|
|
|
if ( !LL_CMP( bigMaxInt32, <, big2To31 ))
|
|
SetFailed( "LL_CMP", "Max 32-bit signed int >= 2^31");
|
|
|
|
/* Two positive numbers */
|
|
if ( !LL_CMP( bigInt0, <=, bigInt0 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( !LL_CMP( bigInt0, <=, bigInt1 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( LL_CMP( bigInt0, <=, bigInt2 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( !LL_CMP( bigInt0, <=, bigInt3 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( !LL_CMP( bigInt0, <=, bigInt4 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( !LL_CMP( bigInt0, <=, bigInt5 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
/* Two negative numbers */
|
|
if ( !LL_CMP( bigInt6, <=, bigInt6 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( !LL_CMP( bigInt6, <=, bigInt7 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( LL_CMP( bigInt6, <=, bigInt8 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( !LL_CMP( bigInt6, <=, bigInt9 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( !LL_CMP( bigInt6, <=, bigInt10 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( !LL_CMP( bigInt6, <=, bigInt11 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
/* One positive, one negative */
|
|
if ( LL_CMP( bigInt0, <=, bigInt6 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( LL_CMP( bigInt0, <=, bigInt7 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
if ( LL_CMP( bigInt0, <=, bigInt8 ))
|
|
SetFailed( "LL_CMP", "LL_CMP(<=) failed");
|
|
|
|
/* Bitwise Compare two numbers */
|
|
if ( !LL_UCMP( bigZero, ==, bigZero ))
|
|
SetFailed( "LL_UCMP", "0 == 0");
|
|
|
|
if ( LL_UCMP( bigZero, >, bigZero ))
|
|
SetFailed( "LL_UCMP", "0 > 0");
|
|
|
|
if ( LL_UCMP( bigZero, <, bigZero ))
|
|
SetFailed( "LL_UCMP", "0 < 0");
|
|
|
|
if ( LL_UCMP( bigNumber, <, bigOne ))
|
|
SetFailed( "LL_UCMP", "n < 1");
|
|
|
|
if ( !LL_UCMP( bigNumber, >, bigOne ))
|
|
SetFailed( "LL_UCMP", "n < 1");
|
|
|
|
if ( LL_UCMP( bigOne, >, bigNumber ))
|
|
SetFailed( "LL_UCMP", "1 > n");
|
|
|
|
if ( LL_UCMP( bigMinusNumber, <, bigNumber ))
|
|
SetFailed( "LL_UCMP", "-n < n");
|
|
|
|
/* Two positive numbers */
|
|
if ( !LL_UCMP( bigInt0, <=, bigInt0 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( !LL_UCMP( bigInt0, <=, bigInt1 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( LL_UCMP( bigInt0, <=, bigInt2 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( !LL_UCMP( bigInt0, <=, bigInt3 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( !LL_UCMP( bigInt0, <=, bigInt4 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( !LL_UCMP( bigInt0, <=, bigInt5 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
/* Two negative numbers */
|
|
if ( !LL_UCMP( bigInt6, <=, bigInt6 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( !LL_UCMP( bigInt6, <=, bigInt7 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( LL_UCMP( bigInt6, <=, bigInt8 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( !LL_UCMP( bigInt6, <=, bigInt9 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( !LL_UCMP( bigInt6, <=, bigInt10 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( !LL_UCMP( bigInt6, <=, bigInt11 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
/* One positive, one negative */
|
|
if ( !LL_UCMP( bigInt0, <=, bigInt6 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( !LL_UCMP( bigInt0, <=, bigInt7 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
if ( !LL_UCMP( bigInt0, <=, bigInt8 ))
|
|
SetFailed( "LL_UCMP", "LL_UCMP(<=) failed");
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
** TestLogicalOperations() -- Tests for AND, OR, ...
|
|
**
|
|
*/
|
|
static void
|
|
TestLogicalOperations( void )
|
|
{
|
|
PRUint64 result, result2;
|
|
|
|
ReportProgress("Testing Logical Operations\n");
|
|
|
|
/* Test AND */
|
|
LL_AND( result, bigZero, bigZero );
|
|
if ( !LL_IS_ZERO( result ))
|
|
ResultFailed( "LL_AND", "0 & 0", bigZero, result );
|
|
|
|
LL_AND( result, bigOne, bigOne );
|
|
if ( LL_IS_ZERO( result ))
|
|
ResultFailed( "LL_AND", "1 & 1", bigOne, result );
|
|
|
|
LL_AND( result, bigZero, bigOne );
|
|
if ( !LL_IS_ZERO( result ))
|
|
ResultFailed( "LL_AND", "1 & 1", bigZero, result );
|
|
|
|
LL_AND( result, bigMinusOne, bigMinusOne );
|
|
if ( !LL_UCMP( result, ==, bigMinusOne ))
|
|
ResultFailed( "LL_AND", "-1 & -1", bigMinusOne, result );
|
|
|
|
/* test OR */
|
|
LL_OR( result, bigZero, bigZero );
|
|
if ( !LL_IS_ZERO( result ))
|
|
ResultFailed( "LL_OR", "0 | 1", bigZero, result);
|
|
|
|
LL_OR( result, bigZero, bigOne );
|
|
if ( LL_IS_ZERO( result ))
|
|
ResultFailed( "LL_OR", "0 | 1", bigOne, result );
|
|
|
|
LL_OR( result, bigZero, bigMinusNumber );
|
|
if ( !LL_UCMP( result, ==, bigMinusNumber ))
|
|
ResultFailed( "LL_OR", "0 | -n", bigMinusNumber, result);
|
|
|
|
LL_OR( result, bigMinusNumber, bigZero );
|
|
if ( !LL_UCMP( result, ==, bigMinusNumber ))
|
|
ResultFailed( "LL_OR", "-n | 0", bigMinusNumber, result );
|
|
|
|
/* test XOR */
|
|
LL_XOR( result, bigZero, bigZero );
|
|
if ( LL_UCMP( result, !=, bigZero ))
|
|
ResultFailed( "LL_XOR", "0 ^ 0", bigZero, result);
|
|
|
|
LL_XOR( result, bigOne, bigZero );
|
|
if ( LL_UCMP( result, !=, bigOne ))
|
|
ResultFailed( "LL_XOR", "1 ^ 0", bigZero, result );
|
|
|
|
LL_XOR( result, bigMinusNumber, bigZero );
|
|
if ( LL_UCMP( result, !=, bigMinusNumber ))
|
|
ResultFailed( "LL_XOR", "-n ^ 0", bigMinusNumber, result );
|
|
|
|
LL_XOR( result, bigMinusNumber, bigMinusNumber );
|
|
if ( LL_UCMP( result, !=, bigZero ))
|
|
ResultFailed( "LL_XOR", "-n ^ -n", bigMinusNumber, result);
|
|
|
|
/* test OR2. */
|
|
result = bigZero;
|
|
LL_OR2( result, bigOne );
|
|
if ( LL_UCMP( result, !=, bigOne ))
|
|
ResultFailed( "LL_OR2", "(r=0) |= 1", bigOne, result);
|
|
|
|
result = bigOne;
|
|
LL_OR2( result, bigNumber );
|
|
if ( LL_UCMP( result, !=, bigNumber ))
|
|
ResultFailed( "LL_OR2", "(r=1) |= n", bigNumber, result);
|
|
|
|
result = bigMinusNumber;
|
|
LL_OR2( result, bigMinusNumber );
|
|
if ( LL_UCMP( result, !=, bigMinusNumber ))
|
|
ResultFailed( "LL_OR2", "(r=-n) |= -n", bigMinusNumber, result);
|
|
|
|
/* test NOT */
|
|
LL_NOT( result, bigMinusNumber);
|
|
LL_NOT( result2, result);
|
|
if ( LL_UCMP( result2, !=, bigMinusNumber ))
|
|
ResultFailed( "LL_NOT", "r != ~(~-n)", bigMinusNumber, result);
|
|
|
|
/* test Negation */
|
|
LL_NEG( result, bigMinusNumber );
|
|
LL_NEG( result2, result );
|
|
if ( LL_CMP( result2, !=, bigMinusNumber ))
|
|
ResultFailed( "LL_NEG", "r != -(-(-n))", bigMinusNumber, result);
|
|
|
|
return;
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
** TestConversion() -- Test Conversion Operations
|
|
**
|
|
*/
|
|
static void
|
|
TestConversion( void )
|
|
{
|
|
PRInt64 result;
|
|
PRInt64 resultU;
|
|
PRInt32 result32;
|
|
PRUint32 resultU32;
|
|
float resultF;
|
|
PRFloat64 resultD;
|
|
|
|
ReportProgress("Testing Conversion Operations\n");
|
|
|
|
/* LL_L2I -- Convert to signed 32bit */
|
|
LL_L2I(result32, bigOne );
|
|
if ( result32 != one )
|
|
SetFailed( "LL_L2I", "r != 1");
|
|
|
|
LL_L2I(result32, bigMinusOne );
|
|
if ( result32 != minusOne )
|
|
SetFailed( "LL_L2I", "r != -1");
|
|
|
|
/* LL_L2UI -- Convert 64bit to unsigned 32bit */
|
|
LL_L2UI( resultU32, bigMinusOne );
|
|
if ( resultU32 != (PRUint32) minusOne )
|
|
SetFailed( "LL_L2UI", "r != -1");
|
|
|
|
LL_L2UI( resultU32, bigOne );
|
|
if ( resultU32 != (PRUint32) one )
|
|
SetFailed( "LL_L2UI", "r != 1");
|
|
|
|
/* LL_L2F -- Convert to 32bit floating point */
|
|
LL_L2F( resultF, bigOne );
|
|
if ( resultF != 1.0 )
|
|
SetFailed( "LL_L2F", "r != 1.0");
|
|
|
|
LL_L2F( resultF, bigMinusOne );
|
|
if ( resultF != -1.0 )
|
|
SetFailed( "LL_L2F", "r != 1.0");
|
|
|
|
/* LL_L2D -- Convert to 64bit floating point */
|
|
LL_L2D( resultD, bigOne );
|
|
if ( resultD != 1.0L )
|
|
SetFailed( "LL_L2D", "r != 1.0");
|
|
|
|
LL_L2D( resultD, bigMinusOne );
|
|
if ( resultD != -1.0L )
|
|
SetFailed( "LL_L2D", "r != -1.0");
|
|
|
|
/* LL_I2L -- Convert 32bit signed to 64bit signed */
|
|
LL_I2L( result, one );
|
|
if ( LL_CMP(result, !=, bigOne ))
|
|
SetFailed( "LL_I2L", "r != 1");
|
|
|
|
LL_I2L( result, minusOne );
|
|
if ( LL_CMP(result, !=, bigMinusOne ))
|
|
SetFailed( "LL_I2L", "r != -1");
|
|
|
|
/* LL_UI2L -- Convert 32bit unsigned to 64bit unsigned */
|
|
LL_UI2L( resultU, (PRUint32) one );
|
|
if ( LL_CMP(resultU, !=, bigOne ))
|
|
SetFailed( "LL_UI2L", "r != 1");
|
|
|
|
/* [lth.] This did not behave as expected, but it is correct
|
|
*/
|
|
LL_UI2L( resultU, (PRUint32) minusOne );
|
|
if ( LL_CMP(resultU, !=, bigZeroFox ))
|
|
ResultFailed( "LL_UI2L", "r != -1", bigZeroFox, resultU);
|
|
|
|
/* LL_F2L -- Convert 32bit float to 64bit signed */
|
|
LL_F2L( result, 1.0 );
|
|
if ( LL_CMP(result, !=, bigOne ))
|
|
SetFailed( "LL_F2L", "r != 1");
|
|
|
|
LL_F2L( result, -1.0 );
|
|
if ( LL_CMP(result, !=, bigMinusOne ))
|
|
SetFailed( "LL_F2L", "r != -1");
|
|
|
|
/* LL_D2L -- Convert 64bit Float to 64bit signed */
|
|
LL_D2L( result, 1.0L );
|
|
if ( LL_CMP(result, !=, bigOne ))
|
|
SetFailed( "LL_D2L", "r != 1");
|
|
|
|
LL_D2L( result, -1.0L );
|
|
if ( LL_CMP(result, !=, bigMinusOne ))
|
|
SetFailed( "LL_D2L", "r != -1");
|
|
|
|
return;
|
|
}
|
|
|
|
static void ShiftCompileOnly()
|
|
{
|
|
/*
|
|
** This function is only compiled, never called.
|
|
** The real test is to see if it compiles w/o
|
|
** warnings. This is no small feat, by the way.
|
|
*/
|
|
PRInt64 ia, ib;
|
|
PRUint64 ua, ub;
|
|
LL_SHR(ia, ib, 32);
|
|
LL_SHL(ia, ib, 32);
|
|
|
|
LL_USHR(ua, ub, 32);
|
|
LL_ISHL(ia, 49, 32);
|
|
|
|
} /* ShiftCompileOnly */
|
|
|
|
|
|
/*
|
|
** TestShift() -- Test Shifting Operations
|
|
**
|
|
*/
|
|
static void
|
|
TestShift( void )
|
|
{
|
|
static const PRInt64 largeTwoZero = LL_INIT( 0x00000002, 0x00000000 );
|
|
PRInt64 result;
|
|
PRUint64 resultU;
|
|
|
|
ReportProgress("Testing Shifting Operations\n");
|
|
|
|
/* LL_SHL -- Shift left algebraic */
|
|
LL_SHL( result, bigOne, one );
|
|
if ( LL_CMP( result, !=, bigTwo ))
|
|
ResultFailed( "LL_SHL", "r != 2", bigOne, result );
|
|
|
|
LL_SHL( result, bigTwo, thirtyTwo );
|
|
if ( LL_CMP( result, !=, largeTwoZero ))
|
|
ResultFailed( "LL_SHL", "r != twoZero", largeTwoZero, result);
|
|
|
|
/* LL_SHR -- Shift right algebraic */
|
|
LL_SHR( result, bigFoxZero, thirtyTwo );
|
|
if ( LL_CMP( result, !=, bigMinusOne ))
|
|
ResultFailed( "LL_SHR", "r != -1", bigMinusOne, result);
|
|
|
|
LL_SHR( result, bigTwo, one );
|
|
if ( LL_CMP( result, !=, bigOne ))
|
|
ResultFailed( "LL_SHR", "r != 1", bigOne, result);
|
|
|
|
LL_SHR( result, bigFoxFox, thirtyTwo );
|
|
if ( LL_CMP( result, !=, bigMinusOne ))
|
|
ResultFailed( "LL_SHR", "r != -1 (was ff,ff)", bigMinusOne, result);
|
|
|
|
/* LL_USHR -- Logical shift right */
|
|
LL_USHR( resultU, bigZeroFox, thirtyTwo );
|
|
if ( LL_UCMP( resultU, !=, bigZero ))
|
|
ResultFailed( "LL_USHR", "r != 0 ", bigZero, result);
|
|
|
|
LL_USHR( resultU, bigFoxFox, thirtyTwo );
|
|
if ( LL_UCMP( resultU, !=, bigZeroFox ))
|
|
ResultFailed( "LL_USHR", "r != 0 ", bigZeroFox, result);
|
|
|
|
/* LL_ISHL -- Shift a 32bit integer into a 64bit result */
|
|
LL_ISHL( resultU, minusOne, thirtyTwo );
|
|
if ( LL_UCMP( resultU, !=, bigFoxZero ))
|
|
ResultFailed( "LL_ISHL", "r != ff,00 ", bigFoxZero, result);
|
|
|
|
LL_ISHL( resultU, one, sixtyThree );
|
|
if ( LL_UCMP( resultU, !=, bigEightZero ))
|
|
ResultFailed( "LL_ISHL", "r != 80,00 ", bigEightZero, result);
|
|
|
|
LL_ISHL( resultU, one, sixteen );
|
|
if ( LL_UCMP( resultU, !=, big64K ))
|
|
ResultFailed( "LL_ISHL", "r != 64K ", big64K, resultU);
|
|
|
|
return;
|
|
}
|
|
|
|
|
|
/*
|
|
** TestArithmetic() -- Test arithmetic operations.
|
|
**
|
|
*/
|
|
static void
|
|
TestArithmetic( void )
|
|
{
|
|
PRInt64 largeVal = LL_INIT( 0x00000001, 0xffffffff );
|
|
PRInt64 largeValPlusOne = LL_INIT( 0x00000002, 0x00000000 );
|
|
PRInt64 largeValTimesTwo = LL_INIT( 0x00000003, 0xfffffffe );
|
|
PRInt64 largeMultCand = LL_INIT( 0x00000000, 0x7fffffff );
|
|
PRInt64 largeMinusMultCand = LL_INIT( 0xffffffff, 0x10000001 );
|
|
PRInt64 largeMultCandx64K = LL_INIT( 0x00007fff, 0xffff0000 );
|
|
PRInt64 largeNumSHL5 = LL_INIT( 0x0000001f, 0xffffffe0 );
|
|
PRInt64 result, result2;
|
|
|
|
/* Addition */
|
|
LL_ADD( result, bigOne, bigOne );
|
|
if ( LL_CMP( result, !=, bigTwo ))
|
|
ResultFailed( "LL_ADD", "r != 1 + 1", bigTwo, result);
|
|
|
|
LL_ADD( result, bigMinusOne, bigOne );
|
|
if ( LL_CMP( result, !=, bigZero ))
|
|
ResultFailed( "LL_ADD", "r != -1 + 1", bigOne, result);
|
|
|
|
LL_ADD( result, largeVal, bigOne );
|
|
if ( LL_CMP( result, !=, largeValPlusOne ))
|
|
ResultFailed( "LL_ADD", "lVP1 != lV + 1", largeValPlusOne, result);
|
|
|
|
/* Subtraction */
|
|
LL_SUB( result, bigOne, bigOne );
|
|
if ( LL_CMP( result, !=, bigZero ))
|
|
ResultFailed( "LL_SUB", "r != 1 - 1", bigZero, result);
|
|
|
|
LL_SUB( result, bigTwo, bigOne );
|
|
if ( LL_CMP( result, !=, bigOne ))
|
|
ResultFailed( "LL_SUB", "r != 2 - 1", bigOne, result);
|
|
|
|
LL_SUB( result, largeValPlusOne, bigOne );
|
|
if ( LL_CMP( result, !=, largeVal ))
|
|
ResultFailed( "LL_SUB", "r != lVP1 - 1", largeVal, result);
|
|
|
|
|
|
/* Multiply */
|
|
LL_MUL( result, largeVal, bigTwo );
|
|
if ( LL_CMP( result, !=, largeValTimesTwo ))
|
|
ResultFailed( "LL_MUL", "r != lV*2", largeValTimesTwo, result);
|
|
|
|
LL_MUL( result, largeMultCand, big64K );
|
|
if ( LL_CMP( result, !=, largeMultCandx64K ))
|
|
ResultFailed( "LL_MUL", "r != lV*64K", largeMultCandx64K, result);
|
|
|
|
LL_NEG( result2, largeMultCand );
|
|
LL_MUL( result, largeMultCand, bigMinusOne );
|
|
if ( LL_CMP( result, !=, result2 ))
|
|
ResultFailed( "LL_MUL", "r != -lMC", result2, result);
|
|
|
|
LL_SHL( result2, bigZeroFox, 5);
|
|
LL_MUL( result, bigZeroFox, bigThirtyTwo );
|
|
if ( LL_CMP( result, !=, largeNumSHL5 ))
|
|
ResultFailed( "LL_MUL", "r != 0f<<5", largeNumSHL5, result );
|
|
|
|
|
|
|
|
/* LL_DIV() Division */
|
|
LL_DIV( result, bigOne, bigOne);
|
|
if ( LL_CMP( result, !=, bigOne ))
|
|
ResultFailed( "LL_DIV", "1 != 1", bigOne, result);
|
|
|
|
LL_DIV( result, bigNumber, bigOne );
|
|
if ( LL_CMP( result, !=, bigNumber ))
|
|
ResultFailed( "LL_DIV", "r != n / 1", bigNumber, result);
|
|
|
|
LL_DIV( result, bigNumber, bigMinusOne );
|
|
if ( LL_CMP( result, !=, bigMinusNumber ))
|
|
ResultFailed( "LL_DIV", "r != n / -1", bigMinusNumber, result);
|
|
|
|
LL_DIV( result, bigMinusNumber, bigMinusOne );
|
|
if ( LL_CMP( result, !=, bigNumber ))
|
|
ResultFailed( "LL_DIV", "r != -n / -1", bigNumber, result);
|
|
|
|
LL_SHL( result2, bigZeroFox, 5 );
|
|
LL_DIV( result, result2, bigOne );
|
|
if ( LL_CMP( result, !=, result2 ))
|
|
ResultFailed( "LL_DIV", "0f<<5 != 0f<<5", result2, result);
|
|
|
|
LL_SHL( result2, bigZeroFox, 5 );
|
|
LL_NEG( result2, result2 );
|
|
LL_DIV( result, result2, bigOne );
|
|
if ( LL_CMP( result, !=, result2 ))
|
|
ResultFailed( "LL_DIV", "-0f<<5 != -0f<<5", result2, result);
|
|
|
|
LL_SHL( result2, bigZeroFox, 17 );
|
|
LL_DIV( result, result2, bigMinusOne );
|
|
LL_NEG( result2, result2 );
|
|
if ( LL_CMP( result, !=, result2 ))
|
|
ResultFailed( "LL_DIV", "-0f<<17 != -0f<<17", result2, result);
|
|
|
|
|
|
/* LL_MOD() Modulo Division */
|
|
LL_ADD( result2, bigThirtyTwo, bigOne );
|
|
LL_MOD( result, result2, bigSixTeen );
|
|
if ( LL_CMP( result, !=, bigOne ))
|
|
ResultFailed( "LL_MOD", "r != 1", bigSixTeen, result);
|
|
|
|
|
|
LL_MUL( result2, bigZeroFox, bigThirtyTwo );
|
|
LL_ADD( result2, result2, bigSixTeen);
|
|
LL_MOD( result, result2, bigThirtyTwo );
|
|
if ( LL_CMP( result, !=, bigSixTeen ))
|
|
ResultFailed( "LL_MOD", "r != 16", bigSixTeen, result);
|
|
|
|
/* LL_UDIVMOD */
|
|
LL_DIV( result, bigOne, bigOne);
|
|
if ( LL_CMP( result, !=, bigOne ))
|
|
ResultFailed( "LL_DIV", "r != 16", bigSixTeen, result);
|
|
|
|
|
|
return;
|
|
}
|
|
|
|
static void TestWellknowns(void)
|
|
{
|
|
PRInt64 max = LL_MAXINT, min = LL_MININT, zero = LL_ZERO;
|
|
PRInt64 mmax = LL_MaxInt(), mmin = LL_MinInt(), mzero = LL_Zero();
|
|
if (LL_NE(max, mmax))
|
|
ResultFailed( "max, mmax", "max != mmax", max, mmax);
|
|
if (LL_NE(min, mmin))
|
|
ResultFailed( "min, mmin", "min != mmin", max, mmin);
|
|
if (LL_NE(zero, mzero))
|
|
ResultFailed( "zero, mzero", "zero != mzero", zero, mzero);
|
|
} /* TestWellknowns */
|
|
|
|
/*
|
|
** Initialize() -- Initialize the test case
|
|
**
|
|
** Parse command line options
|
|
**
|
|
*/
|
|
static PRIntn
|
|
Initialize( PRIntn argc, char **argv )
|
|
{
|
|
PLOptState *opt = PL_CreateOptState(argc, argv, "dvh");
|
|
PLOptStatus os;
|
|
|
|
/*
|
|
** Parse command line options
|
|
*/
|
|
while (PL_OPT_EOL != (os = PL_GetNextOpt(opt)))
|
|
{
|
|
if (PL_OPT_BAD == os) continue;
|
|
switch (opt->option)
|
|
{
|
|
case 'd': /* set debug mode */
|
|
debugMode = PR_TRUE;
|
|
break;
|
|
|
|
case 'v': /* set verbose mode */
|
|
verboseMode = PR_TRUE;
|
|
debugMode = PR_TRUE;
|
|
break;
|
|
|
|
case 'h': /* user wants some guidance */
|
|
default:
|
|
PR_fprintf(output, "You get help.\n");
|
|
return(1);
|
|
}
|
|
}
|
|
PL_DestroyOptState(opt);
|
|
return(0);
|
|
}
|
|
|
|
PRIntn main( int argc, char **argv )
|
|
{
|
|
PR_STDIO_INIT();
|
|
output = PR_GetSpecialFD(PR_StandardError);
|
|
|
|
if ( Initialize( argc, argv ))
|
|
return(1);
|
|
|
|
TestAssignment();
|
|
TestComparisons();
|
|
TestLogicalOperations();
|
|
TestConversion();
|
|
TestShift();
|
|
TestArithmetic();
|
|
TestWellknowns();
|
|
|
|
/*
|
|
** That's all folks!
|
|
*/
|
|
if ( failedAlready )
|
|
{
|
|
PR_fprintf(output, "FAIL\n");\
|
|
}
|
|
else
|
|
{
|
|
PR_fprintf(output, "PASS\n");\
|
|
}
|
|
return failedAlready;
|
|
} /* end main() */
|