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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113

macro_rules! define_log_variant {
	({$dollar:tt} $($name:ident($int_name:ident) = ($($level:tt)*),)*) => {
		$(
			#[macro_export]
			macro_rules! $name {
				(@$dollar self:expr, $dollar($dollar args:tt)*) => {
					$crate::log::$name! { self:$dollar self, $dollar($dollar args)* }
				};
				(self: $dollar self:expr, domain: $dollar log_domain:expr, $dollar format:literal $dollar($dollar args:tt)*) => {
					$crate::log::log! { self:$dollar self, domain: $dollar log_domain, $($level)*, $dollar format $dollar($dollar args)* }
				};
				(self: $dollar self:expr, $dollar format:literal $dollar($dollar args:tt)*) => {
					$crate::log::log! { self:$dollar self, $($level)*, $dollar format $dollar($dollar args)* }
				};
				($dollar format:literal $dollar($dollar args:tt)*) => {
					$crate::log::log! { $($level)*, $dollar format $dollar($dollar args)* }
				};
				(domain: $dollar log_domain:expr, $dollar format:literal $dollar($dollar args:tt)*) => {
					$crate::log::log! { domain: $dollar log_domain, $($level)*, $dollar format $dollar($dollar args)* }
				};
			}
			pub use $name;

			#[allow(unused_macros)]
			macro_rules! $int_name {
				(@$dollar self:expr, $dollar($dollar args:tt)*) => {
					$crate::log::$int_name! { self:$dollar self, $dollar($dollar args)* }
				};
				(self: $dollar self:expr, $dollar($dollar args:tt)*) => {
					$crate::log::$name! { self:$dollar self, domain: $dollar crate::Log::domain(), $dollar($dollar args)* }
				};
				($dollar($dollar args:tt)*) => {
					$crate::log::$name! { domain: $dollar crate::Log::domain(), $dollar($dollar args)* }
				};
			}
			#[allow(unused_imports)]
			pub(crate) use $int_name;
		)*
	};
}

define_log_variant! { {$}
	critical(wp_critical) = ($crate::lib::glib::LogLevelFlags::LEVEL_CRITICAL),
	warning(wp_warning) = ($crate::lib::glib::LogLevelFlags::LEVEL_WARNING),
	message(wp_message) = ($crate::lib::glib::LogLevelFlags::LEVEL_MESSAGE),
	info(wp_info) = ($crate::lib::glib::LogLevelFlags::LEVEL_INFO),
	debug(wp_debug) = ($crate::lib::glib::LogLevelFlags::LEVEL_DEBUG),
	trace(wp_trace) = ($crate::Log::LEVEL_TRACE),
}

#[macro_export]
macro_rules! log {
	(self: $self:expr, domain: $log_domain:expr, $log_level:expr, $format:literal $($args:tt)*) => {
		$crate::log::_log_inner! { $log_domain.into(), $log_level, None, Some($self), $format; $($args)* }
	};
	(self: $self:expr, $log_level:expr, $format:literal $($args:tt)*) => {
		$crate::log::_log_inner! { None, $log_level, None, Some($self), $format; $($args)* }
	};
	(domain: $log_domain:expr, $log_level:expr, $format:literal $($args:tt)*) => {
		$crate::log::_log_inner! { $log_domain.into(), $log_level, None, None::<&$crate::lib::glib::Object>, $format; $($args)* }
	};
	($log_level:expr, $format:literal $($args:tt)*) => {
		$crate::log::_log_inner! { None, $log_level, None, None::<&$crate::lib::glib::Object>, $format; $($args)* }
	};
}
pub use log;

#[doc(hidden)]
#[macro_export]
macro_rules! _log_inner {
	($log_domain:expr, $log_level:expr, $obj_type:expr, $obj:expr, $fmt:expr; $($args:tt)*) => {
		{
			let log_level = $log_level;
			if $crate::log::Log::level_is_enabled(log_level) {
				let object = $obj;
				let log_context = $crate::log::StructuredLogContext {
					domain: $log_domain,
					file: Some(file!()),
					line: Some(line!()),
					function: None, // TODO: this is possible: https://stackoverflow.com/questions/38088067/equivalent-of-func-or-function-in-rust
					object_type: None, // TODO: consider getting the static type from object
					object: object,
				};
				$crate::log::Log::log_args(log_level, log_context, format_args!($fmt $($args)*))
			}
		}
	};
}
pub use _log_inner;

#[cfg(test)]
mod tests {
	use crate::{Core, InitFlags, Log};

	#[test]
	fn log() {
		Core::init_with_flags(InitFlags::SET_GLIB_LOG);
		Log::set_level("8");
		wp_critical!("internal crit");
		wp_warning!("internal warn");
		wp_message!("internal message");
		wp_info!("internal info");
		wp_debug!("internal debug");
		wp_trace!("internal trace");

		critical!("external crit");
		warning!("external warn");
		message!("external message");
		info!("external info");
		debug!("external debug");
		trace!("external trace");
	}
}