Fortran Ansi Colors and Styles Environment

A KISS pure Fortran 2008+ library for easy colorizing and stylizing strings with ANSI escape codes — one function, zero dependencies.

For full documentation (guide, API reference, examples, etc.) see the FACE website.

• Stefano Zaghi — @szaghi

Contributions are welcome — see the Contributing page.

This project is distributed under a multi-licensing system:

• FOSS projects: GPL v3
• Closed source / commercial: BSD 2-Clause, BSD 3-Clause, or MIT

Anyone interested in using, developing, or contributing to this project is welcome — pick the license that best fits your needs.

use face
print '(A)', colorize('Hello', color_fg='red')//colorize(' World', color_fg='blue', style='underline_on')

FACE exposes only 3 procedures:

1. colorize — the main function;
2. colors_samples — prints a sample of all available colors to standard output;
3. styles_samples — prints a sample of all available styles to standard output.

use face
character(len=:), allocatable :: error_message

error_message = colorize('error:', color_fg='red', style='underline_on')//' file not found!'

print '(A)', error_message
print '(A)', colorize('suggestion: check your configuration', color_fg='blue')

call colors_samples ! print samples of all colors available
call styles_samples ! print samples of all styles available

colorize returns an allocatable character with the requested foreground color, background color, and style. All arguments except string are optional.

pure function colorize(string, color_fg, color_bg, style) result(colorized)
  character(len=*), intent(in)           :: string    ! Input string.
  character(len=*), intent(in), optional :: color_fg  ! Foreground color definition.
  character(len=*), intent(in), optional :: color_bg  ! Background color definition.
  character(len=*), intent(in), optional :: style     ! Style definition.
  character(len=:), allocatable          :: colorized ! Colorized string.
end function colorize

Colors and style definitions are case insensitive. No warning is returned for unrecognized values — the color or style is simply not applied.

Standalone — clone, build, and install in one command:

FoBiS.py install szaghi/FACE -mode static-gnu
FoBiS.py install szaghi/FACE -mode static-gnu --prefix /path/to/prefix

As a project dependency — declare PENF in your fobos and run fetch:

[dependencies]
deps_dir = src/third_party
FACE     = https://github.com/szaghi/FACE

FoBiS.py fetch           # fetch and build
FoBiS.py fetch --update  # re-fetch and rebuild

fpm build
fpm test

For dependencies add to your fpm.toml:

[dependencies]
FACE = { git = "https://github.com/szaghi/FACE" }

cmake -B build && cmake --build build

make              # static library
make TESTS=yes    # build and run tests

FACE ships a bash script (install.sh, downloadable from the latest release) that automates download and build:

install.sh --download git --build cmake

Supported download methods: git, wget. Supported build systems: fobis, make, cmake.