-/* This file is part of the program psim.
+/* The common simulator framework for GDB, the GNU Debugger.
- Copyright (C) 1994-1996, Andrew Cagney <cagney@highland.com.au>
- Copyright (C) 1997, Free Software Foundation, Inc.
+ Copyright 2002-2020 Free Software Foundation, Inc.
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
+ Contributed by Andrew Cagney and Red Hat.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-
- */
+ This file is part of GDB.
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 3 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with this program. If not, see <http://www.gnu.org/licenses/>. */
#ifndef N
#error "N must be #defined"
#endif
+#include "symcat.h"
+
+#if defined(__STDC__) && defined(signed)
+/* If signed were defined to be say __signed (ie, some versions of Linux),
+ then the signedN macro would not work correctly. If we have a standard
+ compiler, we have signed. */
+#undef signed
+#endif
+
/* NOTE: See end of file for #undef */
#define unsignedN XCONCAT2(unsigned,N)
#define signedN XCONCAT2(signed,N)
-#define MASKEDn XCONCAT2(MASKED,N)
-#define MASKn XCONCAT2(MASK,N)
+#define LSMASKn XCONCAT2(LSMASK,N)
+#define MSMASKn XCONCAT2(MSMASK,N)
#define LSMASKEDn XCONCAT2(LSMASKED,N)
-#define EXTRACTEDn XCONCAT2(EXTRACTED,N)
-#define INSERTEDn XCONCAT2(INSERTED,N)
+#define MSMASKEDn XCONCAT2(MSMASKED,N)
+#define LSEXTRACTEDn XCONCAT2(LSEXTRACTED,N)
+#define MSEXTRACTEDn XCONCAT2(MSEXTRACTED,N)
+#define LSINSERTEDn XCONCAT2(LSINSERTED,N)
+#define MSINSERTEDn XCONCAT2(MSINSERTED,N)
#define ROTn XCONCAT2(ROT,N)
#define ROTLn XCONCAT2(ROTL,N)
#define ROTRn XCONCAT2(ROTR,N)
-#define SEXTn XCONCAT2(SEXT,N)
+#define MSSEXTn XCONCAT2(MSSEXT,N)
+#define LSSEXTn XCONCAT2(LSSEXT,N)
+/* TAGS: LSMASKED16 LSMASKED32 LSMASKED64 */
INLINE_SIM_BITS\
(unsignedN)
-MASKEDn(unsignedN word,
- unsigned start,
- unsigned stop)
+LSMASKEDn (unsignedN word,
+ int start,
+ int stop)
{
- return (word & MASKn(start, stop));
+ word &= LSMASKn (start, stop);
+ return word;
}
+/* TAGS: MSMASKED16 MSMASKED32 MSMASKED64 */
INLINE_SIM_BITS\
(unsignedN)
-LSMASKEDn(unsignedN word,
- unsigned nr_bits)
+MSMASKEDn (unsignedN word,
+ int start,
+ int stop)
{
- return (word & MASKn(N - nr_bits, N - 1));
+ word &= MSMASKn (start, stop);
+ return word;
}
+/* TAGS: LSEXTRACTED16 LSEXTRACTED32 LSEXTRACTED64 */
INLINE_SIM_BITS\
(unsignedN)
-EXTRACTEDn(unsignedN val,
- unsigned start,
- unsigned stop)
+LSEXTRACTEDn (unsignedN val,
+ int start,
+ int stop)
{
- return LSMASKEDn((((unsignedN)(val)) >> (N - stop - 1)),
- stop - start + 1);
+ val <<= (N - 1 - start); /* drop high bits */
+ val >>= (N - 1 - start) + (stop); /* drop low bits */
+ return val;
}
+/* TAGS: MSEXTRACTED16 MSEXTRACTED32 MSEXTRACTED64 */
INLINE_SIM_BITS\
(unsignedN)
-INSERTEDn(unsignedN val,
- unsigned start,
- unsigned stop)
+MSEXTRACTEDn (unsignedN val,
+ int start,
+ int stop)
{
- return (((unsignedN)(val)
- << _MAKE_SHIFT(N, stop))
- & MASKn(start, stop));
+ val <<= (start); /* drop high bits */
+ val >>= (start) + (N - 1 - stop); /* drop low bits */
+ return val;
}
+/* TAGS: LSINSERTED16 LSINSERTED32 LSINSERTED64 */
INLINE_SIM_BITS\
(unsignedN)
-ROTn(unsignedN val,
- int shift)
+LSINSERTEDn (unsignedN val,
+ int start,
+ int stop)
+{
+ val <<= stop;
+ val &= LSMASKn (start, stop);
+ return val;
+}
+
+/* TAGS: MSINSERTED16 MSINSERTED32 MSINSERTED64 */
+
+INLINE_SIM_BITS\
+(unsignedN)
+MSINSERTEDn (unsignedN val,
+ int start,
+ int stop)
+{
+ val <<= ((N - 1) - stop);
+ val &= MSMASKn (start, stop);
+ return val;
+}
+
+/* TAGS: ROT16 ROT32 ROT64 */
+
+INLINE_SIM_BITS\
+(unsignedN)
+ROTn (unsignedN val,
+ int shift)
{
- unsignedN result;
if (shift > 0)
- return ROTRn(val, shift);
+ return ROTRn (val, shift);
else if (shift < 0)
- return ROTLn(val, -shift);
+ return ROTLn (val, -shift);
else
return val;
}
+/* TAGS: ROTL16 ROTL32 ROTL64 */
INLINE_SIM_BITS\
(unsignedN)
-ROTLn(unsignedN val,
- unsigned shift)
+ROTLn (unsignedN val,
+ int shift)
{
unsignedN result;
- ASSERT(shift <= N);
+ ASSERT (shift <= N);
result = (((val) << (shift)) | ((val) >> ((N)-(shift))));
return result;
}
+/* TAGS: ROTR16 ROTR32 ROTR64 */
INLINE_SIM_BITS\
(unsignedN)
-ROTRn(unsignedN val,
- unsigned shift)
+ROTRn (unsignedN val,
+ int shift)
{
unsignedN result;
- ASSERT(shift <= N);
+ ASSERT (shift <= N);
result = (((val) >> (shift)) | ((val) << ((N)-(shift))));
return result;
}
+/* TAGS: LSSEXT16 LSSEXT32 LSSEXT64 */
+
+INLINE_SIM_BITS\
+(unsignedN)
+LSSEXTn (signedN val,
+ int sign_bit)
+{
+ int shift;
+ /* make the sign-bit most significant and then smear it back into
+ position */
+ ASSERT (sign_bit < N);
+ shift = ((N - 1) - sign_bit);
+ val <<= shift;
+ val >>= shift;
+ return val;
+}
+
+/* TAGS: MSSEXT16 MSSEXT32 MSSEXT64 */
INLINE_SIM_BITS\
(unsignedN)
-SEXTn(signedN val,
- unsigned sign_bit)
+MSSEXTn (signedN val,
+ int sign_bit)
{
/* make the sign-bit most significant and then smear it back into
position */
- ASSERT(sign_bit < N);
- return (val << sign_bit) >> sign_bit;
+ ASSERT (sign_bit < N);
+ val <<= sign_bit;
+ val >>= sign_bit;
+ return val;
}
/* NOTE: See start of file for #define */
-#undef SEXTn
+#undef LSSEXTn
+#undef MSSEXTn
#undef ROTLn
#undef ROTRn
#undef ROTn
-#undef INSERTEDn
-#undef EXTRACTEDn
+#undef LSINSERTEDn
+#undef MSINSERTEDn
+#undef LSEXTRACTEDn
+#undef MSEXTRACTEDn
#undef LSMASKEDn
-#undef MASKn
-#undef MASKEDn
+#undef LSMASKn
+#undef MSMASKEDn
+#undef MSMASKn
#undef signedN
#undef unsignedN