dm_system Module

Abstraction layers over system calls.


Uses

  • module~~dm_system~~UsesGraph module~dm_system dm_system module~dm_error dm_error module~dm_system->module~dm_error module~dm_kind dm_kind module~dm_system->module~dm_kind module~dm_platform dm_platform module~dm_system->module~dm_platform unix unix module~dm_system->unix module~dm_error->module~dm_kind module~dm_ascii dm_ascii module~dm_error->module~dm_ascii iso_fortran_env iso_fortran_env module~dm_kind->iso_fortran_env

Used by

  • module~~dm_system~~UsedByGraph module~dm_system dm_system module~dmpack dmpack module~dmpack->module~dm_system proc~dm_test_run dm_test_run proc~dm_test_run->module~dm_system

Derived Types

type, public ::  uname_type

Operating system information type.

Components

Type Visibility Attributes Name Initial
character(len=UNAME_LEN), public :: system_name = ' '

OS name.
character(len=UNAME_LEN), public :: node_name = ' '

Host name.
character(len=UNAME_LEN), public :: release = ' '

OS release.
character(len=UNAME_LEN), public :: version = ' '

OS version.
character(len=UNAME_LEN), public :: machine = ' '

Platform.

Functions

public function dm_system_daemonize(command) result(rc)

Turns current running program into a daemon. On FreeBSD, it is probably easier to run the process through daemon(8) instead.

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: command

Return Value integer

public function dm_system_error_message(error) result(string)

Returns system error string from strerror(3). If error is not passed, this function uses errno(2) as error code.

Arguments

Type IntentOptional Attributes Name
integer, intent(in), optional :: error

System error code.

Return Value character(len=:), allocatable

Error message.

public function dm_system_cpu_cores(ncore) result(rc)

Returns number of CPU cores of first processor on Linux and FreeBSD in ncore. On error, argument ncore will be 0.

Read more…

Arguments

Type IntentOptional Attributes Name
integer, intent(out) :: ncore

Number of CPU cores.

Return Value integer

public function dm_system_cpu_temperature(temperature) result(rc)

Returns CPU temperature in °C of first processor on Linux and FreeBSD in temperature. On error, argument temperature is set to 0.0.

Read more…

Arguments

Type IntentOptional Attributes Name
real, intent(out) :: temperature

Temperature [°C]

Return Value integer

public function dm_system_cpu_model(model) result(rc)

Returns model name of first CPU in model from /proc/cpuinfo on Linux and from sysctl(8) on FreeBSD, for instance:

Read more…

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(inout) :: model

Hardware model.

Return Value integer

public function dm_system_disk_free(path, file_system, size, used, available, capacity, mounted_on) result(rc)

Returns free disk space of file or directory. Argument path must be a file or directory, for example, / or .. For security reasons, path must not be a file system or ZFS pool. The function calls df(1) internally and expects sizes in 512K (FreeBSD) or 1024K (Linux) blocks.

Read more…

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: path

File or directory.
character(len=*), intent(inout), optional :: file_system

File system path (device, ZFS pool).
integer(kind=i8), intent(out), optional :: size

Size [byte].
integer(kind=i8), intent(out), optional :: used

Used space [byte].
integer(kind=i8), intent(out), optional :: available

Available space [byte]
integer, intent(out), optional :: capacity

Capacity [%]
character(len=*), intent(inout), optional :: mounted_on

Mount point.

Return Value integer

public function dm_system_host_name(name) result(rc)

Returns host name from uname in name. The argument must be large enough to hold the name. On error, argument name will be empty.

Read more…

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(inout) :: name

Host name.

Return Value integer

public function dm_system_load_average(avg1, avg5, avg15) result(rc)

Returns load averages from uptime(1) (FreeBSD) or /proc/loadavg (Linux). On error, the arguments will be set to 0.0.

Read more…

Arguments

Type IntentOptional Attributes Name
real, intent(out), optional :: avg1

Average, 1 min.
real, intent(out), optional :: avg5

Average, 5 min.
real, intent(out), optional :: avg15

Average, 15 min.

Return Value integer

public function dm_system_wait(pid) result(rc)

Waits for child process sets PID. Returns E_SYSTEM on error.

Arguments

Type IntentOptional Attributes Name
integer, intent(out) :: pid

Process id.

Return Value integer


Subroutines

public subroutine dm_system_fork(pid)

Forks process and returns PID.

Arguments

Type IntentOptional Attributes Name
integer, intent(out) :: pid

Process id.

public subroutine dm_system_path(path)

Returns the relative path of the executable. The argument must be large enough to hold the path.

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(inout) :: path

Returned path.

public subroutine dm_system_pid(pid)

Returns the process id (PID).

Arguments

Type IntentOptional Attributes Name
integer, intent(out) :: pid

Process id.

public subroutine dm_system_uname(uname, error)

Returns uname information (operating system, hostname, …). On error, argument error is set to E_SYSTEM.

Arguments

Type IntentOptional Attributes Name
type(uname_type), intent(out) :: uname

Uname type.
integer, intent(out), optional :: error

Error code.

public subroutine dm_system_uptime(uptime, error)

Returns system uptime in uptime [sec]. On error, argument error is set to E_SYSTEM and uptime to 0.

Arguments

Type IntentOptional Attributes Name
integer(kind=i8), intent(out) :: uptime

Uptime [sec].
integer, intent(out), optional :: error

Error code.