TIniFile Class

module: IniObjects file: IniObjects
Generics
  • Read
    Procedures:
    • Ini_Read_Real_Change
    • Ini_Read_Double_Change
    • Ini_Read_Int_Change
    • Ini_Read_Logical_Change
    • Ini_Read_String_Change
Subroutines
  • Close(this)
  • EmptyCheckDefault(this, Key, Default)
    • TIniFile   :: this
    • character(LEN=*) intent(in) :: Key
    • class(*) optional, intent(in) :: Default
  • Ini_Read_Double_Change(this, Key, Current, min, max)
    • TIniFile   :: this
    • character(LEN=*) intent(IN) :: Key
    • double precision intent(inout) :: Current
    • double precision optional, intent(IN) :: min
    • double precision optional, intent(IN) :: max
  • Ini_Read_Int_Change(this, Key, Current, min, max)
    • TIniFile   :: this
    • character(LEN=*) intent(IN) :: Key
    • integer intent(inout) :: Current
    • integer optional, intent(IN) :: min
    • integer optional, intent(IN) :: max
  • Ini_Read_Logical_Change(this, Key, Current)
    • TIniFile   :: this
    • character(LEN=*) intent(IN) :: Key
    • logical intent(inout) :: Current
  • Ini_Read_Real_Change(this, Key, Current, min, max)
    • TIniFile   :: this
    • character(LEN=*) intent(IN) :: Key
    • real intent(inout) :: Current
    • real optional, intent(IN) :: min
    • real optional, intent(IN) :: max
  • Ini_Read_String_Change(this, Key, Current)
    • TIniFile   :: this
    • character(LEN=*) intent(IN) :: Key
    • character(LEN=:) allocatable, intent(inout) :: Current
  • NameValue_AddLine(this, AInLine, only_if_undefined)
    • TIniFile   :: this
    • character (LEN=*) intent(IN) :: AInLine
    • logical optional, intent(in) :: only_if_undefined
  • Open(this, filename, error, slash_comments, append, only_if_undefined)
    • TIniFile   :: this
    • character (LEN=*) intent(IN) :: filename
    • logical intent(OUT), optional :: error
    • logical optional, intent(IN) :: slash_comments
    • logical optional, intent(in) :: append
    • logical optional, intent(in) :: only_if_undefined
  • Open_Fromlines(this, NumLines, Lines, slash_comments)
    • TIniFile   :: this
    • integer intent(IN) :: NumLines
    • character (LEN=*) dimension(NumLines), intent(IN) :: Lines
    • logical intent(IN), optional :: slash_comments
  • Read_Enumeration_List(this, Key, Names, Enums, Default, nvalues, max_enums)
    • TIniFile   :: this
    • character(LEN=*) intent(in) :: Key
    • character(LEN=Ini_Enumeration_Len) intent(in) :: Names(:)
    • integer allocatable, intent(out) :: Enums(:)
    • character(LEN=*) optional, intent(in) :: Default
    • integer intent(in), optional :: nvalues
    • integer intent(in), optional :: max_enums
  • SaveReadValues(this, afile)
    • TIniFile   :: this
    • character(LEN=*) intent(in) :: afile
Functions
  • integer
    EnumerationValue(this, S, Names)
    • TIniFile   :: this
    • character(LEN=*)  :: S
    • character(LEN=Ini_Enumeration_Len) intent(in) :: Names(:)
  • character(LEN=:) allocatable
    ExpandEnvironment(this, InValue)
    expand $(PLACEHOLDER) with environment variables, as Makefile
    • TIniFile   :: this
    • character(LEN=:) allocatable, intent(in) :: InValue
  • character(LEN=:) allocatable
    Key_To_Arraykey(this, Key, index)
    • TIniFile intent(in)  :: this
    • character (LEN=*) intent(IN) :: Key
    • integer intent(in) :: index
  • double precision
    Read_Double(this, Default, min, max, Key)
    • TIniFile   :: this
    • double precision optional, intent(IN) :: Default
    • double precision optional, intent(IN) :: min
    • double precision optional, intent(IN) :: max
    • character (LEN=*) intent(IN) :: Key
  • double precision
    Read_Double_Array(this, Default, min, max, index, Key)
    Reads Key(1), Key(2), etc.
    • TIniFile   :: this
    • double precision optional, intent(IN) :: Default
    • double precision optional, intent(IN) :: min
    • double precision optional, intent(IN) :: max
    • integer intent(in) :: index
    • character(LEN=*) intent(IN) :: Key
  • integer
    Read_Enumeration(this, Key, Names, Default)
    • TIniFile   :: this
    • character(LEN=*) intent(in) :: Key
    • character(LEN=Ini_Enumeration_Len) intent(in) :: Names(:)
    • integer optional, intent(in) :: Default
  • integer
    Read_Int(this, Default, min, max, OK, Key)
    • TIniFile   :: this
    • integer optional, intent(IN) :: Default
    • integer optional, intent(IN) :: min
    • integer optional, intent(IN) :: max
    • logical intent(out), optional :: OK
    • character(LEN=*) intent(IN) :: Key
  • integer
    Read_Int_Array(this, Default, index, Key)
    Reads Key(1), Key(2), etc.
    • TIniFile   :: this
    • integer optional, intent(IN) :: Default
    • integer intent(in) :: index
    • character(LEN=*) intent(IN) :: Key
  • logical
    Read_Logical(this, Default, Key)
    • TIniFile   :: this
    • logical optional, intent(IN) :: Default
    • character(LEN=*) intent(IN) :: Key
  • real
    Read_Real(this, Default, min, max, Key)
    • TIniFile   :: this
    • real optional, intent(IN) :: Default
    • real optional, intent(IN) :: min
    • real optional, intent(IN) :: max
    • character(LEN=*) intent(IN) :: Key
  • real
    Read_Real_Array(this, Default, min, max, index, Key)
    Reads Key(1), Key(2), etc.
    • TIniFile   :: this
    • real optional, intent(IN) :: Default
    • real optional, intent(IN) :: min
    • real optional, intent(IN) :: max
    • integer intent(in) :: index
    • character(LEN=*) intent(IN) :: Key
  • character(LEN=:) pointer
    Read_String(this, Key, NotFoundFail)
    • TIniFile   :: this
    • character (LEN=*) intent(IN) :: Key
    • logical optional, intent(IN) :: NotFoundFail
  • character(LEN=:) pointer
    Read_String_Array(this, index, Key, NotFoundFail)
    • TIniFile   :: this
    • integer intent(in) :: index
    • character (LEN=*) intent(IN) :: Key
    • logical optional, intent(IN) :: NotFoundFail
  • character(LEN=:) allocatable
    Read_String_Default(this, Key, Default, AllowBlank, EnvDefault)
    Returns from this first; if not found tries environment variable if EnvDefault is true, If not found returns Default (unless not present, in which case gives error) AllBlank specifies whether an empty string counts as a valid result to give instead of Default
    • TIniFile   :: this
    • character (LEN=*) intent(IN) :: Key
    • character (LEN=*) intent(IN), optional :: Default
    • logical intent(in), optional :: AllowBlank
    • logical optional, intent(IN) :: EnvDefault
  • character(LEN=:) allocatable
    ResolveLinkedFile(this, name, thisfilename)
    • TIniFile   :: this
    • character(LEN=*) intent(in) :: name
    • character(LEN=*) intent(in) :: thisfilename
  • logical
    TestEqual(this, Key, value, EmptyOK)
    • TIniFile   :: this
    • character (LEN=*) intent(IN) :: Key
    • character (LEN=*) intent(IN) :: value
    • logical intent(in), optional :: EmptyOK
Properties
  • logical :: SlashComments
  • logical :: Echo_Read
  • logical :: Fail_on_not_found
  • logical :: ExpandEnvironmentVariables
  • character(LEN=:) :: Original_filename allocatable
  • TNameValueList :: ReadValues

Tree Diagrams