191 lines
6.4 KiB
Rust
191 lines
6.4 KiB
Rust
#![crate_type = "staticlib"]
|
|
#![feature(c_variadic)]
|
|
#![feature(cfg_select)]
|
|
|
|
use std::ffi::{CStr, CString, VaList, VaListImpl, c_char, c_double, c_int, c_long, c_longlong};
|
|
|
|
macro_rules! continue_if {
|
|
($cond:expr) => {
|
|
if !($cond) {
|
|
return 0xff;
|
|
}
|
|
};
|
|
}
|
|
|
|
unsafe fn compare_c_str(ptr: *const c_char, val: &str) -> bool {
|
|
let cstr0 = CStr::from_ptr(ptr);
|
|
match CString::new(val) {
|
|
Ok(cstr1) => &*cstr1 == cstr0,
|
|
Err(_) => false,
|
|
}
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
pub unsafe extern "C" fn check_list_0(mut ap: VaList) -> usize {
|
|
continue_if!(ap.arg::<c_longlong>() == 1);
|
|
continue_if!(ap.arg::<c_int>() == 2);
|
|
continue_if!(ap.arg::<c_longlong>() == 3);
|
|
0
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
pub unsafe extern "C" fn check_list_1(mut ap: VaList) -> usize {
|
|
continue_if!(ap.arg::<c_int>() == -1);
|
|
continue_if!(ap.arg::<c_int>() == 'A' as c_int);
|
|
continue_if!(ap.arg::<c_int>() == '4' as c_int);
|
|
continue_if!(ap.arg::<c_int>() == ';' as c_int);
|
|
continue_if!(ap.arg::<c_int>() == 0x32);
|
|
continue_if!(ap.arg::<c_int>() == 0x10000001);
|
|
continue_if!(compare_c_str(ap.arg::<*const c_char>(), "Valid!"));
|
|
0
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
pub unsafe extern "C" fn check_list_2(mut ap: VaList) -> usize {
|
|
continue_if!(ap.arg::<c_double>().floor() == 3.14f64.floor());
|
|
continue_if!(ap.arg::<c_long>() == 12);
|
|
continue_if!(ap.arg::<c_int>() == 'a' as c_int);
|
|
continue_if!(ap.arg::<c_double>().floor() == 6.18f64.floor());
|
|
continue_if!(compare_c_str(ap.arg::<*const c_char>(), "Hello"));
|
|
continue_if!(ap.arg::<c_int>() == 42);
|
|
continue_if!(compare_c_str(ap.arg::<*const c_char>(), "World"));
|
|
0
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
pub unsafe extern "C" fn check_list_copy_0(mut ap: VaList) -> usize {
|
|
continue_if!(ap.arg::<c_double>().floor() == 6.28f64.floor());
|
|
continue_if!(ap.arg::<c_int>() == 16);
|
|
continue_if!(ap.arg::<c_int>() == 'A' as c_int);
|
|
continue_if!(compare_c_str(ap.arg::<*const c_char>(), "Skip Me!"));
|
|
ap.with_copy(
|
|
|mut ap| {
|
|
if compare_c_str(ap.arg::<*const c_char>(), "Correct") { 0 } else { 0xff }
|
|
},
|
|
)
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
pub unsafe extern "C" fn check_varargs_0(_: c_int, mut ap: ...) -> usize {
|
|
continue_if!(ap.arg::<c_int>() == 42);
|
|
continue_if!(compare_c_str(ap.arg::<*const c_char>(), "Hello, World!"));
|
|
0
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
pub unsafe extern "C" fn check_varargs_1(_: c_int, mut ap: ...) -> usize {
|
|
continue_if!(ap.arg::<c_double>().floor() == 3.14f64.floor());
|
|
continue_if!(ap.arg::<c_long>() == 12);
|
|
continue_if!(ap.arg::<c_int>() == 'A' as c_int);
|
|
continue_if!(ap.arg::<c_longlong>() == 1);
|
|
0
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
pub unsafe extern "C" fn check_varargs_2(_: c_int, _ap: ...) -> usize {
|
|
0
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
pub unsafe extern "C" fn check_varargs_3(_: c_int, mut ap: ...) -> usize {
|
|
continue_if!(ap.arg::<c_int>() == 1);
|
|
continue_if!(ap.arg::<c_int>() == 2);
|
|
continue_if!(ap.arg::<c_int>() == 3);
|
|
continue_if!(ap.arg::<c_int>() == 4);
|
|
continue_if!(ap.arg::<c_int>() == 5);
|
|
continue_if!(ap.arg::<c_int>() == 6);
|
|
continue_if!(ap.arg::<c_int>() == 7);
|
|
continue_if!(ap.arg::<c_int>() == 8);
|
|
continue_if!(ap.arg::<c_int>() == 9);
|
|
continue_if!(ap.arg::<c_int>() == 10);
|
|
0
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
pub unsafe extern "C" fn check_varargs_4(_: c_double, mut ap: ...) -> usize {
|
|
continue_if!(ap.arg::<c_double>() == 1.0);
|
|
continue_if!(ap.arg::<c_double>() == 2.0);
|
|
continue_if!(ap.arg::<c_double>() == 3.0);
|
|
continue_if!(ap.arg::<c_double>() == 4.0);
|
|
continue_if!(ap.arg::<c_double>() == 5.0);
|
|
continue_if!(ap.arg::<c_double>() == 6.0);
|
|
continue_if!(ap.arg::<c_double>() == 7.0);
|
|
continue_if!(ap.arg::<c_double>() == 8.0);
|
|
continue_if!(ap.arg::<c_double>() == 9.0);
|
|
continue_if!(ap.arg::<c_double>() == 10.0);
|
|
continue_if!(ap.arg::<c_double>() == 11.0);
|
|
continue_if!(ap.arg::<c_double>() == 12.0);
|
|
continue_if!(ap.arg::<c_double>() == 13.0);
|
|
0
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
pub unsafe extern "C" fn check_varargs_5(_: c_int, mut ap: ...) -> usize {
|
|
continue_if!(ap.arg::<c_double>() == 1.0);
|
|
continue_if!(ap.arg::<c_int>() == 1);
|
|
continue_if!(ap.arg::<c_double>() == 2.0);
|
|
continue_if!(ap.arg::<c_int>() == 2);
|
|
continue_if!(ap.arg::<c_double>() == 3.0);
|
|
continue_if!(ap.arg::<c_int>() == 3);
|
|
continue_if!(ap.arg::<c_double>() == 4.0);
|
|
continue_if!(ap.arg::<c_int>() == 4);
|
|
continue_if!(ap.arg::<c_int>() == 5);
|
|
continue_if!(ap.arg::<c_double>() == 5.0);
|
|
continue_if!(ap.arg::<c_int>() == 6);
|
|
continue_if!(ap.arg::<c_double>() == 6.0);
|
|
continue_if!(ap.arg::<c_int>() == 7);
|
|
continue_if!(ap.arg::<c_double>() == 7.0);
|
|
continue_if!(ap.arg::<c_int>() == 8);
|
|
continue_if!(ap.arg::<c_double>() == 8.0);
|
|
continue_if!(ap.arg::<c_int>() == 9);
|
|
continue_if!(ap.arg::<c_double>() == 9.0);
|
|
continue_if!(ap.arg::<c_int>() == 10);
|
|
continue_if!(ap.arg::<c_double>() == 10.0);
|
|
continue_if!(ap.arg::<c_int>() == 11);
|
|
continue_if!(ap.arg::<c_double>() == 11.0);
|
|
continue_if!(ap.arg::<c_int>() == 12);
|
|
continue_if!(ap.arg::<c_double>() == 12.0);
|
|
continue_if!(ap.arg::<c_int>() == 13);
|
|
continue_if!(ap.arg::<c_double>() == 13.0);
|
|
0
|
|
}
|
|
|
|
unsafe extern "C" {
|
|
fn test_variadic(_: c_int, ...) -> usize;
|
|
fn test_va_list_by_value(_: VaList) -> usize;
|
|
fn test_va_list_by_pointer(_: *mut VaListImpl) -> usize;
|
|
fn test_va_list_by_pointer_pointer(_: *mut *mut VaListImpl) -> usize;
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
extern "C" fn run_test_variadic() -> usize {
|
|
return unsafe { test_variadic(0, 1 as c_longlong, 2 as c_int, 3 as c_longlong) };
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
extern "C" fn run_test_va_list_by_value() -> usize {
|
|
unsafe extern "C" fn helper(mut ap: ...) -> usize {
|
|
unsafe { test_va_list_by_value(ap.as_va_list()) }
|
|
}
|
|
|
|
unsafe { helper(1 as c_longlong, 2 as c_int, 3 as c_longlong) }
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
extern "C" fn run_test_va_list_by_pointer() -> usize {
|
|
unsafe extern "C" fn helper(mut ap: ...) -> usize {
|
|
unsafe { test_va_list_by_pointer(&mut ap) }
|
|
}
|
|
|
|
unsafe { helper(1 as c_longlong, 2 as c_int, 3 as c_longlong) }
|
|
}
|
|
|
|
#[unsafe(no_mangle)]
|
|
extern "C" fn run_test_va_list_by_pointer_pointer() -> usize {
|
|
unsafe extern "C" fn helper(mut ap: ...) -> usize {
|
|
unsafe { test_va_list_by_pointer_pointer(&mut (&mut ap as *mut _)) }
|
|
}
|
|
|
|
unsafe { helper(1 as c_longlong, 2 as c_int, 3 as c_longlong) }
|
|
}
|