Octopus
messages_oct_m Module Reference

Data Types

interface  get_signal_description
 from signals.c More...
 
interface  messages_print_var_option
 
interface  messages_print_var_value
 Prints out to iunit a message in the form: ["InputVariable" = value] where "InputVariable" is given by var. Since the variable can be integer, real, logical, or string we need a generic interface. More...
 
interface  messages_write
 
interface  trap_segfault
 

Functions/Subroutines

subroutine, public messages_init ()
 
subroutine, public messages_end ()
 
integer function messages_get_unit (namespace)
 
subroutine, public messages_update_mpi_grp (namespace, mpigrp)
 
type(mpi_grp_t) function messages_get_mpi_grp (namespace)
 
subroutine, public messages_fatal (no_lines, only_root_writes, namespace)
 
subroutine, public messages_warning (no_lines, all_nodes, namespace)
 
subroutine, public messages_info (no_lines, iunit, verbose_limit, stress, all_nodes, namespace)
 
subroutine, public messages_switch_status (status)
 create status file for asynchronous communication More...
 
subroutine, public alloc_error (size, file, line)
 
subroutine, public dealloc_error (size, file, line)
 
subroutine, public messages_input_error (namespace, var, details, row, column)
 
subroutine messages_print_var_valuei (var, val, iunit, namespace)
 
subroutine messages_print_var_values (var, val, iunit, namespace)
 
subroutine messages_print_var_valuer (var, val, unit, iunit, namespace)
 
subroutine messages_print_var_valuel (var, val, iunit, namespace)
 
subroutine messages_print_var_valuear (var, val, unit, iunit, namespace)
 
subroutine, public messages_print_var_info (var, iunit, namespace)
 
subroutine messages_print_var_option_8 (var, option, pre, iunit, namespace)
 
subroutine messages_print_var_option_4 (var, option, pre, iunit, namespace)
 
subroutine, public messages_print_with_emphasis (msg, iunit, namespace)
 
subroutine flush_msg (str, iunit, adv)
 
subroutine, public print_date (str)
 
subroutine, public time_sum (sec1, usec1, sec2, usec2)
 Computes t2 <- t1+t2. Parameters as in time_diff Assert: t1,2 <= 0. More...
 
subroutine, public push_sub (sub_name)
 
subroutine, public pop_sub (sub_name)
 
subroutine, public messages_obsolete_variable (namespace, name, rep)
 
subroutine, public messages_variable_is_block (namespace, name)
 
subroutine, public messages_experimental (name, namespace)
 
subroutine, public messages_not_implemented (feature, namespace)
 
subroutine messages_reset_lines ()
 
subroutine, public messages_new_line ()
 
subroutine messages_write_float (val, fmt, new_line, units, align_left, print_units)
 
subroutine messages_write_integer8 (val, fmt, new_line, units, print_units)
 
subroutine messages_write_integer (val, fmt, new_line, units, print_units)
 
subroutine messages_write_str (val, fmt, new_line)
 
subroutine messages_write_logical (val, new_line)
 
character(len=max_path_len) function, public messages_clean_path (filename)
 
subroutine, public messages_dump_stack (isignal)
 

Variables

integer, parameter max_lines = 20
 
character(len=256), dimension(max_lines), public message
 to be output by fatal, warning More...
 
character(len=68), parameter, public hyphens = '--------------------------------------------------------------------'
 
character(len=69), parameter, public shyphens = '*'
 
character(len=512), private msg
 
integer, parameter, private sleepytime_all = 1
 
integer, parameter, private sleepytime_nonwriters = 60
 seconds More...
 
character(len=64), private oct_status = 'undefined'
 start with an undefined status More...
 
type(sihash_t), private namespace_unit
 
type(sphash_t), private namespace_mpi_grp
 
integer warnings
 
integer experimentals
 
integer current_line
 

Function/Subroutine Documentation

◆ messages_init()

subroutine, public messages_oct_m::messages_init

Definition at line 219 of file messages.F90.

◆ messages_end()

subroutine, public messages_oct_m::messages_end

Definition at line 267 of file messages.F90.

◆ messages_get_unit()

integer function messages_oct_m::messages_get_unit ( type(namespace_t), intent(in), optional  namespace)
private

Definition at line 334 of file messages.F90.

◆ messages_update_mpi_grp()

subroutine, public messages_oct_m::messages_update_mpi_grp ( type(namespace_t), intent(in)  namespace,
type(mpi_grp_t), intent(in), target  mpigrp 
)

Definition at line 367 of file messages.F90.

◆ messages_get_mpi_grp()

type(mpi_grp_t) function messages_oct_m::messages_get_mpi_grp ( type(namespace_t), intent(in), optional  namespace)
private

Definition at line 376 of file messages.F90.

◆ messages_fatal()

subroutine, public messages_oct_m::messages_fatal ( integer, intent(in), optional  no_lines,
logical, intent(in), optional  only_root_writes,
type(namespace_t), intent(in), optional  namespace 
)

Definition at line 405 of file messages.F90.

◆ messages_warning()

subroutine, public messages_oct_m::messages_warning ( integer, intent(in), optional  no_lines,
logical, intent(in), optional  all_nodes,
type(namespace_t), intent(in), optional  namespace 
)

Definition at line 529 of file messages.F90.

◆ messages_info()

subroutine, public messages_oct_m::messages_info ( integer, intent(in), optional  no_lines,
integer, intent(in), optional  iunit,
logical, intent(in), optional  verbose_limit,
logical, intent(in), optional  stress,
logical, intent(in), optional  all_nodes,
type(namespace_t), intent(in), optional  namespace 
)

Definition at line 610 of file messages.F90.

◆ messages_switch_status()

subroutine, public messages_oct_m::messages_switch_status ( character(len=*), intent(in)  status)

create status file for asynchronous communication

Definition at line 663 of file messages.F90.

◆ alloc_error()

subroutine, public messages_oct_m::alloc_error ( integer(i8), intent(in)  size,
character(len=*), intent(in)  file,
integer, intent(in)  line 
)

Definition at line 687 of file messages.F90.

◆ dealloc_error()

subroutine, public messages_oct_m::dealloc_error ( integer(i8), intent(in)  size,
character(len=*), intent(in)  file,
integer, intent(in)  line 
)

Definition at line 698 of file messages.F90.

◆ messages_input_error()

subroutine, public messages_oct_m::messages_input_error ( type(namespace_t), intent(in)  namespace,
character(len=*), intent(in)  var,
character(len=*), intent(in), optional  details,
integer, intent(in), optional  row,
integer, intent(in), optional  column 
)

Definition at line 709 of file messages.F90.

◆ messages_print_var_valuei()

subroutine messages_oct_m::messages_print_var_valuei ( character(len=*), intent(in)  var,
integer, intent(in)  val,
integer, intent(in), optional  iunit,
type(namespace_t), intent(in), optional  namespace 
)
private

Definition at line 747 of file messages.F90.

◆ messages_print_var_values()

subroutine messages_oct_m::messages_print_var_values ( character(len=*), intent(in)  var,
character(len=*), intent(in)  val,
integer, intent(in), optional  iunit,
type(namespace_t), intent(in), optional  namespace 
)
private

Definition at line 764 of file messages.F90.

◆ messages_print_var_valuer()

subroutine messages_oct_m::messages_print_var_valuer ( character(len=*), intent(in)  var,
real(8), intent(in)  val,
type(unit_t), intent(in), optional  unit,
integer, intent(in), optional  iunit,
type(namespace_t), intent(in), optional  namespace 
)
private

Definition at line 778 of file messages.F90.

◆ messages_print_var_valuel()

subroutine messages_oct_m::messages_print_var_valuel ( character(len=*), intent(in)  var,
logical, intent(in)  val,
integer, intent(in), optional  iunit,
type(namespace_t), intent(in), optional  namespace 
)
private

Definition at line 801 of file messages.F90.

◆ messages_print_var_valuear()

subroutine messages_oct_m::messages_print_var_valuear ( character(len=*), intent(in)  var,
real(8), dimension(:), intent(in)  val,
type(unit_t), intent(in), optional  unit,
integer, intent(in), optional  iunit,
type(namespace_t), intent(in), optional  namespace 
)
private

Definition at line 822 of file messages.F90.

◆ messages_print_var_info()

subroutine, public messages_oct_m::messages_print_var_info ( character(len=*), intent(in)  var,
integer, intent(in), optional  iunit,
type(namespace_t), intent(in), optional  namespace 
)

Definition at line 851 of file messages.F90.

◆ messages_print_var_option_8()

subroutine messages_oct_m::messages_print_var_option_8 ( character(len=*), intent(in)  var,
integer(i8), intent(in)  option,
character(len=*), intent(in), optional  pre,
integer, intent(in), optional  iunit,
type(namespace_t), intent(in), optional  namespace 
)
private

Definition at line 875 of file messages.F90.

◆ messages_print_var_option_4()

subroutine messages_oct_m::messages_print_var_option_4 ( character(len=*), intent(in)  var,
integer(i4), intent(in)  option,
character(len=*), intent(in), optional  pre,
integer, intent(in), optional  iunit,
type(namespace_t), intent(in), optional  namespace 
)
private

Definition at line 903 of file messages.F90.

◆ messages_print_with_emphasis()

subroutine, public messages_oct_m::messages_print_with_emphasis ( character(len=*), intent(in), optional  msg,
integer, intent(in), optional  iunit,
type(namespace_t), intent(in), optional  namespace 
)

Definition at line 917 of file messages.F90.

◆ flush_msg()

subroutine messages_oct_m::flush_msg ( character(len = *), intent(in)  str,
integer, intent(in)  iunit,
character(len = *), intent(in), optional  adv 
)
private

Definition at line 989 of file messages.F90.

◆ print_date()

subroutine, public messages_oct_m::print_date ( character(len = *), intent(in)  str)

Definition at line 1004 of file messages.F90.

◆ time_sum()

subroutine, public messages_oct_m::time_sum ( integer, intent(in)  sec1,
integer, intent(in)  usec1,
integer, intent(inout)  sec2,
integer, intent(inout)  usec2 
)

Computes t2 <- t1+t2. Parameters as in time_diff Assert: t1,2 <= 0.

Definition at line 1023 of file messages.F90.

◆ push_sub()

subroutine, public messages_oct_m::push_sub ( character(len=*), intent(in)  sub_name)

Definition at line 1045 of file messages.F90.

◆ pop_sub()

subroutine, public messages_oct_m::pop_sub ( character(len=*), intent(in)  sub_name)

Definition at line 1100 of file messages.F90.

◆ messages_obsolete_variable()

subroutine, public messages_oct_m::messages_obsolete_variable ( type(namespace_t), intent(in)  namespace,
character(len=*), intent(in)  name,
character(len=*), intent(in), optional  rep 
)

Definition at line 1167 of file messages.F90.

◆ messages_variable_is_block()

subroutine, public messages_oct_m::messages_variable_is_block ( type(namespace_t), intent(in)  namespace,
character(len=*), intent(in)  name 
)

Definition at line 1191 of file messages.F90.

◆ messages_experimental()

subroutine, public messages_oct_m::messages_experimental ( character(len=*), intent(in)  name,
type(namespace_t), intent(in), optional  namespace 
)

Definition at line 1207 of file messages.F90.

◆ messages_not_implemented()

subroutine, public messages_oct_m::messages_not_implemented ( character(len=*), intent(in)  feature,
type(namespace_t), intent(in), optional  namespace 
)

Definition at line 1235 of file messages.F90.

◆ messages_reset_lines()

subroutine messages_oct_m::messages_reset_lines
private

Definition at line 1248 of file messages.F90.

◆ messages_new_line()

subroutine, public messages_oct_m::messages_new_line

Definition at line 1256 of file messages.F90.

◆ messages_write_float()

subroutine messages_oct_m::messages_write_float ( real(8), intent(in)  val,
character(len=*), intent(in), optional  fmt,
logical, intent(in), optional  new_line,
type(unit_t), intent(in), optional  units,
logical, intent(in), optional  align_left,
logical, intent(in), optional  print_units 
)
private

Definition at line 1266 of file messages.F90.

◆ messages_write_integer8()

subroutine messages_oct_m::messages_write_integer8 ( integer(i8), intent(in)  val,
character(len=*), intent(in), optional  fmt,
logical, intent(in), optional  new_line,
type(unit_t), intent(in), optional  units,
logical, intent(in), optional  print_units 
)
private

Definition at line 1302 of file messages.F90.

◆ messages_write_integer()

subroutine messages_oct_m::messages_write_integer ( integer(i4), intent(in)  val,
character(len=*), intent(in), optional  fmt,
logical, intent(in), optional  new_line,
type(unit_t), intent(in), optional  units,
logical, intent(in), optional  print_units 
)
private

Definition at line 1345 of file messages.F90.

◆ messages_write_str()

subroutine messages_oct_m::messages_write_str ( character(len=*), intent(in)  val,
character(len=*), intent(in), optional  fmt,
logical, intent(in), optional  new_line 
)
private

Definition at line 1357 of file messages.F90.

◆ messages_write_logical()

subroutine messages_oct_m::messages_write_logical ( logical, intent(in)  val,
logical, intent(in), optional  new_line 
)
private

Definition at line 1380 of file messages.F90.

◆ messages_clean_path()

character(len=max_path_len) function, public messages_oct_m::messages_clean_path ( character(len=*), intent(in)  filename)

Definition at line 1406 of file messages.F90.

◆ messages_dump_stack()

subroutine, public messages_oct_m::messages_dump_stack ( integer, intent(in)  isignal)

Definition at line 1423 of file messages.F90.

Variable Documentation

◆ max_lines

integer, parameter messages_oct_m::max_lines = 20
private

Definition at line 156 of file messages.F90.

◆ message

character(len=256), dimension(max_lines), public messages_oct_m::message

to be output by fatal, warning

Definition at line 157 of file messages.F90.

◆ hyphens

character(len=68), parameter, public messages_oct_m::hyphens = '--------------------------------------------------------------------'

Definition at line 158 of file messages.F90.

◆ shyphens

character(len=69), parameter, public messages_oct_m::shyphens = '*'

Definition at line 160 of file messages.F90.

◆ msg

character(len=512), private messages_oct_m::msg
private

Definition at line 162 of file messages.F90.

◆ sleepytime_all

integer, parameter, private messages_oct_m::sleepytime_all = 1
private

Definition at line 163 of file messages.F90.

◆ sleepytime_nonwriters

integer, parameter, private messages_oct_m::sleepytime_nonwriters = 60
private

seconds

Definition at line 163 of file messages.F90.

◆ oct_status

character(len=64), private messages_oct_m::oct_status = 'undefined'
private

start with an undefined status

Definition at line 164 of file messages.F90.

◆ namespace_unit

type(sihash_t), private messages_oct_m::namespace_unit
private

Definition at line 166 of file messages.F90.

◆ namespace_mpi_grp

type(sphash_t), private messages_oct_m::namespace_mpi_grp
private

Definition at line 167 of file messages.F90.

◆ warnings

integer messages_oct_m::warnings
private

Definition at line 198 of file messages.F90.

◆ experimentals

integer messages_oct_m::experimentals
private

Definition at line 199 of file messages.F90.

◆ current_line

integer messages_oct_m::current_line
private

Definition at line 200 of file messages.F90.