#
# Copyright 2006-2008 Floréal Morandat <morandat@lirmm.fr>
# Copyright 2008 Jean Privat <jean@pryen.org>
+# Copyright 2009 Jean-Sebastien Gelinas <calestar@gmail.com>
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
import metamodel
import opts
+import location
+
+class Message
+special Comparable
+ redef type OTHER: Message
+
+ readable var _location: nullable Location
+ readable var _text: String
+
+ redef fun <(other: OTHER): Bool do
+ if location == null then return true
+ if other.location == null then return false
+
+ return location.as(not null) < other.location.as(not null)
+ end
+
+ redef fun to_s: String do
+ if location == null then
+ return text
+ else
+ return "{location}: {text}"
+ end
+ end
+end
# Global context for tools
class ToolContext
special MMContext
# Number of errors
- readable var _error_count: Int = 0
+ readable var _error_count: Int = 0
# Number of warnings
readable var _warning_count: Int = 0
+ # Messages
+ var _messages: Array[Message] = new Array[Message]
+ var _message_sorter: ComparableSorter[Message] = new ComparableSorter[Message]
+
+ fun check_errors
+ do
+ if _messages.length > 0 then
+ _message_sorter.sort(_messages)
+
+ for m in _messages do
+ stderr.write("{m}\n")
+ end
+
+ _messages.clear
+ end
+
+ if error_count > 0 then exit(1)
+ end
+
# Display an error
- fun error(s: String)
+ fun error(l: nullable Location, s: String)
do
- stderr.write("{s}\n")
+ _messages.add(new Message(l,s))
_error_count = _error_count + 1
end
+ # Add an error, show errors and quit
+ fun fatal_error(l: nullable Location, s: String)
+ do
+ error(l,s)
+ check_errors
+ end
+
# Display a warning
- fun warning(s: String)
+ fun warning(l: nullable Location, s: String)
do
if _opt_warn.value == 0 then return
- stderr.write("{s}\n")
+ _messages.add(new Message(l,s))
if _opt_warn.value == 1 then
_warning_count = _warning_count + 1
else
end
# Display an info
- meth info(s: String, level: Int)
+ fun info(s: String, level: Int)
do
if level <= verbose_level then
print "{s}"
var full_name = dir.full_name_for(module_name)
if _processing_modules.has(full_name) then
# FIXME: Generate better error
- error("Error: Dependency loop for module {full_name}")
- exit(1)
- abort
+ fatal_error(null, "Error: Dependency loop for module {full_name}")
end
_processing_modules.add(full_name)
var m = l.load_and_process_module(self, module_name, dir)
end
if not filename.file_exists then
- error("Error: File {filename} not found.")
- exit(1)
+ fatal_error(null, "Error: File {filename} not found.")
abort
end
var m = try_to_load(module_name, dir)
if m != null then return m
- error("Error: {filename} is not a NIT source module.")
- exit(1)
+ fatal_error(null, "Error: {filename} is not a NIT source module.")
abort
end
# If the module is already loaded, just return it without further processing.
fun get_module(module_name: Symbol, from: nullable MMModule): MMModule
do
- var m: MMModule
if from != null then
var dir: nullable MMDirectory = from.directory
while dir != null do
if m != null then return m
end
# FIXME: Generate better error
- error("Error: No ressource found for module {module_name}.")
- exit(1)
+ fatal_error(null, "Error: No ressource found for module {module_name}.")
abort
end
end
if file.eof then
- context.error("Error: Problem in opening file {filename}")
- exit(1)
- abort
+ context.fatal_error(null, "Error: Problem in opening file {filename}")
end
var m = parse_file(context, file, filename, module_name, dir)
if file != stdin then file.close