82 lines
No EOL
2 KiB
AutoHotkey
Executable file
82 lines
No EOL
2 KiB
AutoHotkey
Executable file
/**
|
|
* AHK Debug log implementation
|
|
* Copyright (c) 2012 Joshua Fuhs
|
|
*
|
|
* 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/>.
|
|
*
|
|
* @version 8.3.0
|
|
*/
|
|
|
|
Log_debug_level := 0
|
|
|
|
Log_init(name, truncate) {
|
|
Global
|
|
If truncate
|
|
IfExist, %name%
|
|
FileDelete, %name%
|
|
Log_name := name
|
|
}
|
|
|
|
Log_msg( message ) {
|
|
Local CurrentTime
|
|
If Not Log_name
|
|
Return
|
|
FormatTime, CurrentTime, , yyyyMMddHHmmss
|
|
FileAppend, %CurrentTime% %message%`r`n, %Log_name%
|
|
}
|
|
|
|
Log_bare( message ) {
|
|
Local padded_message
|
|
If Not Log_name
|
|
Return
|
|
padded_message := " " . message . "`r`n"
|
|
FileAppend, %padded_message% , %Log_name%
|
|
}
|
|
|
|
Log_incDebugLevel() {
|
|
Global
|
|
If Not Log_name
|
|
Return
|
|
If ( Log_debug_level < 9 )
|
|
{
|
|
Log_debug_level += 1
|
|
Log_msg("Debug logging level incremented to " . Log_debug_level )
|
|
}
|
|
}
|
|
|
|
Log_decDebugLevel() {
|
|
Global
|
|
If Not Log_name
|
|
Return
|
|
If ( Log_debug_level > 0 ) {
|
|
Log_debug_level -= 1
|
|
If ( Log_debug_level = 0 )
|
|
Log_msg("Debug logging is disabled")
|
|
Else
|
|
Log_msg("Debug logging level decremented to " . Log_debug_level)
|
|
}
|
|
}
|
|
|
|
|
|
Log_dbg_msg( level, message ) {
|
|
Global
|
|
If (level > 0 And Log_debug_level >= level)
|
|
Log_msg( "DBG " . level . ": " . message )
|
|
}
|
|
|
|
Log_dbg_bare( level, message ) {
|
|
Global
|
|
If (level > 0 And Log_debug_level >= level)
|
|
Log_bare( "DBG " . level . ": " . message )
|
|
} |