130 lines
4.1 KiB
C#
130 lines
4.1 KiB
C#
using System;
|
|
using System.ComponentModel;
|
|
|
|
using NLua;
|
|
|
|
// ReSharper disable UnusedMember.Global
|
|
namespace BizHawk.Client.Common
|
|
{
|
|
[Description("A library for performing standard bitwise operations.")]
|
|
public sealed class BitLuaLibrary : LuaLibraryBase
|
|
{
|
|
public BitLuaLibrary(Lua lua)
|
|
: base(lua) { }
|
|
|
|
public BitLuaLibrary(Lua lua, Action<string> logOutputCallback)
|
|
: base(lua, logOutputCallback) { }
|
|
|
|
public override string Name => "bit";
|
|
|
|
[LuaMethodExample("local uibitban = bit.band( 1000, 4 );")]
|
|
[LuaMethod("band", "Bitwise AND of 'val' against 'amt'")]
|
|
public static uint Band(uint val, uint amt)
|
|
{
|
|
return val & amt;
|
|
}
|
|
|
|
[LuaMethodExample("local uibitbno = bit.bnot( 1000 );")]
|
|
[LuaMethod("bnot", "Bitwise NOT of 'val' against 'amt'")]
|
|
public static uint Bnot(uint val)
|
|
{
|
|
return ~val;
|
|
}
|
|
|
|
[LuaMethodExample("local uibitbor = bit.bor( 1000, 4 );")]
|
|
[LuaMethod("bor", "Bitwise OR of 'val' against 'amt'")]
|
|
public static uint Bor(uint val, uint amt)
|
|
{
|
|
return val | amt;
|
|
}
|
|
|
|
[LuaMethodExample("local uibitbxo = bit.bxor( 1000, 4 );")]
|
|
[LuaMethod("bxor", "Bitwise XOR of 'val' against 'amt'")]
|
|
public static uint Bxor(uint val, uint amt)
|
|
{
|
|
return val ^ amt;
|
|
}
|
|
|
|
[LuaMethodExample("local uibitlsh = bit.lshift( 1000, 4 );")]
|
|
[LuaMethod("lshift", "Logical shift left of 'val' by 'amt' bits")]
|
|
public static uint Lshift(uint val, int amt)
|
|
{
|
|
return val << amt;
|
|
}
|
|
|
|
[LuaMethodExample("local uibitrol = bit.rol( 1000, 4 );")]
|
|
[LuaMethod("rol", "Left rotate 'val' by 'amt' bits")]
|
|
public static uint Rol(uint val, int amt)
|
|
{
|
|
return (val << amt) | (val >> (32 - amt));
|
|
}
|
|
|
|
[LuaMethodExample("local uibitror = bit.ror( 1000, 4 );")]
|
|
[LuaMethod("ror", "Right rotate 'val' by 'amt' bits")]
|
|
public static uint Ror(uint val, int amt)
|
|
{
|
|
return (val >> amt) | (val << (32 - amt));
|
|
}
|
|
|
|
[LuaMethodExample("local uibitrsh = bit.rshift( 1000, 4 );")]
|
|
[LuaMethod("rshift", "Logical shift right of 'val' by 'amt' bits")]
|
|
public static uint Rshift(uint val, int amt)
|
|
{
|
|
return (uint)(val >> amt);
|
|
}
|
|
|
|
[LuaMethodExample("local inbitars = bit.arshift( -1000, 4 );")]
|
|
[LuaMethod("arshift", "Arithmetic shift right of 'val' by 'amt' bits")]
|
|
public static int Arshift(int val, int amt)
|
|
{
|
|
return val >> amt;
|
|
}
|
|
|
|
[LuaMethodExample("if ( bit.check( -12345, 35 ) ) then\r\n\tconsole.log( \"Returns result of bit 'pos' being set in 'num'\" );\r\nend;")]
|
|
[LuaMethod("check", "Returns result of bit 'pos' being set in 'num'")]
|
|
public static bool Check(long num, int pos)
|
|
{
|
|
return (num & (1 << pos)) != 0;
|
|
}
|
|
|
|
[LuaMethodExample("local uibitset = bit.set( 25, 35 );")]
|
|
[LuaMethod("set", "Sets the bit 'pos' in 'num'")]
|
|
public static uint Set(uint num, int pos)
|
|
{
|
|
return (uint)(num | (uint)1 << pos);
|
|
}
|
|
|
|
[LuaMethodExample("local lobitcle = bit.clear( 25, 35 );")]
|
|
[LuaMethod("clear", "Clears the bit 'pos' in 'num'")]
|
|
public static long Clear(uint num, int pos)
|
|
{
|
|
return num & ~(1 << pos);
|
|
}
|
|
|
|
[LuaMethodExample("local usbitbyt = bit.byteswap_16( 100 );")]
|
|
[LuaMethod("byteswap_16", "Byte swaps 'short', i.e. bit.byteswap_16(0xFF00) would return 0x00FF")]
|
|
public static ushort Byteswap16(ushort val)
|
|
{
|
|
return (ushort)((val & 0xFFU) << 8 | (val & 0xFF00U) >> 8);
|
|
}
|
|
|
|
[LuaMethodExample("local uibitbyt = bit.byteswap_32( 1000 );")]
|
|
[LuaMethod("byteswap_32", "Byte swaps 'dword'")]
|
|
public static uint Byteswap32(uint val)
|
|
{
|
|
return (val & 0x000000FFU) << 24 | (val & 0x0000FF00U) << 8 |
|
|
(val & 0x00FF0000U) >> 8 | (val & 0xFF000000U) >> 24;
|
|
}
|
|
|
|
[LuaMethodExample("local ulbitbyt = bit.byteswap_64( 10000 );")]
|
|
[LuaMethod("byteswap_64", "Byte swaps 'long'")]
|
|
public static ulong Byteswap64(ulong val)
|
|
{
|
|
return (val & 0x00000000000000FFUL) << 56 | (val & 0x000000000000FF00UL) << 40 |
|
|
(val & 0x0000000000FF0000UL) << 24 | (val & 0x00000000FF000000UL) << 8 |
|
|
(val & 0x000000FF00000000UL) >> 8 | (val & 0x0000FF0000000000UL) >> 24 |
|
|
(val & 0x00FF000000000000UL) >> 40 | (val & 0xFF00000000000000UL) >> 56;
|
|
}
|
|
}
|
|
}
|