luaur-vm 0.1.3

The Luau register virtual machine and standard library (Rust).
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57

use crate::macros::getstr::getstr;
use crate::type_aliases::t_string::TString;

#[allow(non_snake_case)]
pub fn lua_v_strcmp(ls: *const TString, rs: *const TString) -> core::ffi::c_int {
    if ls == rs {
        return 0;
    }

    unsafe {
        let l = getstr(ls);
        let r = getstr(rs);

        // always safe to read one character because even empty strings are nul terminated
        let bl = *l as u8;
        let br = *r as u8;

        if bl != br {
            return (bl as core::ffi::c_int) - (br as core::ffi::c_int);
        }

        let ll = (*ls).len as usize;
        let lr = (*rs).len as usize;
        let lmin = if ll < lr { ll } else { lr };

        let res = libc::memcmp(
            l as *const core::ffi::c_void,
            r as *const core::ffi::c_void,
            lmin,
        );

        if res != 0 {
            return res;
        }

        if ll == lr {
            0
        } else if ll < lr {
            -1
        } else {
            1
        }
    }
}

mod libc {
    extern "C" {
        pub fn memcmp(
            s1: *const core::ffi::c_void,
            s2: *const core::ffi::c_void,
            n: usize,
        ) -> core::ffi::c_int;
    }
}

#[allow(non_snake_case)]
pub use lua_v_strcmp as luaV_strcmp;