json_matrix_info_by_path Subroutine

private subroutine json_matrix_info_by_path(json, p, path, is_matrix, found, var_type, n_sets, set_size, name)

Returns matrix information about a json_value, given the path.

See also

Note

If found is present, no exceptions will be thrown if an error occurs. Otherwise, an exception will be thrown if the variable is not found.

Type Bound

json_core

Arguments

Type IntentOptional Attributes Name
class(json_core), intent(inout) :: json
type(json_value), pointer :: p

a JSON linked list
character(kind=CK, len=*), intent(in) :: path

path to the variable
logical(kind=LK), intent(out) :: is_matrix

true if it is a valid matrix
logical(kind=LK), intent(out), optional :: found

true if it was found
integer(kind=IK), intent(out), optional :: var_type

variable type of data in the matrix (if all elements have the same type)
integer(kind=IK), intent(out), optional :: n_sets

number of data sets (i.e., matrix rows if using row-major order)
integer(kind=IK), intent(out), optional :: set_size

size of each data set (i.e., matrix cols if using row-major order)
character(kind=CK, len=:), intent(out), optional, allocatable :: name

variable name

Calls

proc~~json_matrix_info_by_path~~CallsGraph proc~json_matrix_info_by_path json_value_module::json_core%json_matrix_info_by_path none~get json_value_module::json_core%get proc~json_matrix_info_by_path->none~get none~matrix_info json_value_module::json_core%matrix_info proc~json_matrix_info_by_path->none~matrix_info proc~json_clear_exceptions json_value_module::json_core%json_clear_exceptions proc~json_matrix_info_by_path->proc~json_clear_exceptions proc~json_get_alloc_string_vec json_value_module::json_core%json_get_alloc_string_vec none~get->proc~json_get_alloc_string_vec proc~json_get_alloc_string_vec_by_path json_value_module::json_core%json_get_alloc_string_vec_by_path none~get->proc~json_get_alloc_string_vec_by_path proc~json_get_array json_value_module::json_core%json_get_array none~get->proc~json_get_array proc~json_get_array_by_path json_value_module::json_core%json_get_array_by_path none~get->proc~json_get_array_by_path proc~json_get_by_path json_value_module::json_core%json_get_by_path none~get->proc~json_get_by_path proc~json_get_integer json_value_module::json_core%json_get_integer none~get->proc~json_get_integer proc~json_get_integer_by_path json_value_module::json_core%json_get_integer_by_path none~get->proc~json_get_integer_by_path proc~json_get_integer_vec json_value_module::json_core%json_get_integer_vec none~get->proc~json_get_integer_vec proc~json_get_integer_vec_by_path json_value_module::json_core%json_get_integer_vec_by_path none~get->proc~json_get_integer_vec_by_path proc~json_get_logical json_value_module::json_core%json_get_logical none~get->proc~json_get_logical proc~json_get_logical_by_path json_value_module::json_core%json_get_logical_by_path none~get->proc~json_get_logical_by_path proc~json_get_logical_vec json_value_module::json_core%json_get_logical_vec none~get->proc~json_get_logical_vec proc~json_get_logical_vec_by_path json_value_module::json_core%json_get_logical_vec_by_path none~get->proc~json_get_logical_vec_by_path proc~json_get_real json_value_module::json_core%json_get_real none~get->proc~json_get_real proc~json_get_real32 json_value_module::json_core%json_get_real32 none~get->proc~json_get_real32 proc~json_get_real32_by_path json_value_module::json_core%json_get_real32_by_path none~get->proc~json_get_real32_by_path proc~json_get_real32_vec json_value_module::json_core%json_get_real32_vec none~get->proc~json_get_real32_vec proc~json_get_real32_vec_by_path json_value_module::json_core%json_get_real32_vec_by_path none~get->proc~json_get_real32_vec_by_path proc~json_get_real_by_path json_value_module::json_core%json_get_real_by_path none~get->proc~json_get_real_by_path proc~json_get_real_vec json_value_module::json_core%json_get_real_vec none~get->proc~json_get_real_vec proc~json_get_real_vec_by_path json_value_module::json_core%json_get_real_vec_by_path none~get->proc~json_get_real_vec_by_path proc~json_get_string json_value_module::json_core%json_get_string none~get->proc~json_get_string proc~json_get_string_by_path json_value_module::json_core%json_get_string_by_path none~get->proc~json_get_string_by_path proc~json_get_string_vec json_value_module::json_core%json_get_string_vec none~get->proc~json_get_string_vec proc~json_get_string_vec_by_path json_value_module::json_core%json_get_string_vec_by_path none~get->proc~json_get_string_vec_by_path proc~wrap_json_get_alloc_string_vec_by_path json_value_module::json_core%wrap_json_get_alloc_string_vec_by_path none~get->proc~wrap_json_get_alloc_string_vec_by_path proc~wrap_json_get_array_by_path json_value_module::json_core%wrap_json_get_array_by_path none~get->proc~wrap_json_get_array_by_path proc~wrap_json_get_by_path json_value_module::json_core%wrap_json_get_by_path none~get->proc~wrap_json_get_by_path proc~wrap_json_get_integer_by_path json_value_module::json_core%wrap_json_get_integer_by_path none~get->proc~wrap_json_get_integer_by_path proc~wrap_json_get_integer_vec_by_path json_value_module::json_core%wrap_json_get_integer_vec_by_path none~get->proc~wrap_json_get_integer_vec_by_path proc~wrap_json_get_logical_by_path json_value_module::json_core%wrap_json_get_logical_by_path none~get->proc~wrap_json_get_logical_by_path proc~wrap_json_get_logical_vec_by_path json_value_module::json_core%wrap_json_get_logical_vec_by_path none~get->proc~wrap_json_get_logical_vec_by_path proc~wrap_json_get_real32_by_path json_value_module::json_core%wrap_json_get_real32_by_path none~get->proc~wrap_json_get_real32_by_path proc~wrap_json_get_real32_vec_by_path json_value_module::json_core%wrap_json_get_real32_vec_by_path none~get->proc~wrap_json_get_real32_vec_by_path proc~wrap_json_get_real_by_path json_value_module::json_core%wrap_json_get_real_by_path none~get->proc~wrap_json_get_real_by_path proc~wrap_json_get_real_vec_by_path json_value_module::json_core%wrap_json_get_real_vec_by_path none~get->proc~wrap_json_get_real_vec_by_path proc~wrap_json_get_string_by_path json_value_module::json_core%wrap_json_get_string_by_path none~get->proc~wrap_json_get_string_by_path proc~wrap_json_get_string_vec_by_path json_value_module::json_core%wrap_json_get_string_vec_by_path none~get->proc~wrap_json_get_string_vec_by_path none~matrix_info->proc~json_matrix_info_by_path proc~json_matrix_info json_value_module::json_core%json_matrix_info none~matrix_info->proc~json_matrix_info proc~wrap_json_matrix_info_by_path json_value_module::json_core%wrap_json_matrix_info_by_path none~matrix_info->proc~wrap_json_matrix_info_by_path proc~json_get_alloc_string_vec->none~get none~string_info json_value_module::json_core%string_info proc~json_get_alloc_string_vec->none~string_info proc~json_get_alloc_string_vec_by_path->none~get proc~json_get_alloc_string_vec_by_path->proc~json_clear_exceptions none~throw_exception json_value_module::json_core%throw_exception proc~json_get_alloc_string_vec_by_path->none~throw_exception proc~flag_not_found json_value_module::flag_not_found proc~json_get_alloc_string_vec_by_path->proc~flag_not_found proc~json_get_array->none~throw_exception proc~json_get_array_by_path->none~get proc~json_get_array_by_path->proc~json_clear_exceptions proc~json_get_array_by_path->none~throw_exception proc~json_get_by_path->proc~json_clear_exceptions proc~json_get_by_path->none~throw_exception proc~integer_to_string json_string_utilities::integer_to_string proc~json_get_by_path->proc~integer_to_string proc~json_get_by_path_default json_value_module::json_core%json_get_by_path_default proc~json_get_by_path->proc~json_get_by_path_default proc~json_get_by_path_jsonpath_bracket json_value_module::json_core%json_get_by_path_jsonpath_bracket proc~json_get_by_path->proc~json_get_by_path_jsonpath_bracket proc~json_get_by_path_rfc6901 json_value_module::json_core%json_get_by_path_rfc6901 proc~json_get_by_path->proc~json_get_by_path_rfc6901 proc~json_get_integer->none~throw_exception proc~string_to_integer json_string_utilities::string_to_integer proc~json_get_integer->proc~string_to_integer proc~json_get_integer_by_path->none~get proc~json_get_integer_by_path->proc~json_clear_exceptions proc~json_get_integer_by_path->none~throw_exception proc~json_get_integer_by_path->proc~flag_not_found proc~json_get_integer_vec->none~get proc~json_get_integer_vec_by_path->none~get proc~json_get_integer_vec_by_path->proc~json_clear_exceptions proc~json_get_integer_vec_by_path->none~throw_exception proc~json_get_integer_vec_by_path->proc~flag_not_found proc~json_get_logical->none~throw_exception proc~json_get_logical_by_path->none~get proc~json_get_logical_by_path->proc~json_clear_exceptions proc~json_get_logical_by_path->none~throw_exception proc~json_get_logical_by_path->proc~flag_not_found proc~json_get_logical_vec->none~get proc~json_get_logical_vec_by_path->none~get proc~json_get_logical_vec_by_path->proc~json_clear_exceptions proc~json_get_logical_vec_by_path->none~throw_exception proc~json_get_logical_vec_by_path->proc~flag_not_found proc~json_get_real->none~throw_exception proc~string_to_real json_string_utilities::string_to_real proc~json_get_real->proc~string_to_real proc~json_get_real32->none~get proc~json_get_real32_by_path->none~get proc~json_get_real32_vec->none~get proc~json_get_real32_vec_by_path->none~get proc~json_get_real_by_path->none~get proc~json_get_real_by_path->proc~json_clear_exceptions proc~json_get_real_by_path->none~throw_exception proc~json_get_real_by_path->proc~flag_not_found proc~json_get_real_vec->none~get proc~json_get_real_vec_by_path->none~get proc~json_get_real_vec_by_path->proc~json_clear_exceptions proc~json_get_real_vec_by_path->none~throw_exception proc~json_get_real_vec_by_path->proc~flag_not_found proc~json_get_string->none~throw_exception proc~escape_string json_string_utilities::escape_string proc~json_get_string->proc~escape_string proc~json_get_string->proc~integer_to_string proc~real_to_string json_string_utilities::real_to_string proc~json_get_string->proc~real_to_string proc~json_get_string_by_path->none~get proc~json_get_string_by_path->proc~json_clear_exceptions proc~json_get_string_by_path->none~throw_exception proc~json_get_string_by_path->proc~flag_not_found proc~json_get_string_vec->none~get proc~json_get_string_vec_by_path->none~get proc~json_get_string_vec_by_path->proc~json_clear_exceptions proc~json_get_string_vec_by_path->none~throw_exception proc~json_get_string_vec_by_path->proc~flag_not_found none~get_child json_value_module::json_core%get_child proc~json_matrix_info->none~get_child none~info json_value_module::json_core%info proc~json_matrix_info->none~info proc~json_matrix_info->none~throw_exception proc~wrap_json_get_alloc_string_vec_by_path->none~get interface~to_unicode json_string_utilities::to_unicode proc~wrap_json_get_alloc_string_vec_by_path->interface~to_unicode proc~wrap_json_get_array_by_path->none~get proc~wrap_json_get_array_by_path->interface~to_unicode proc~wrap_json_get_by_path->none~get proc~wrap_json_get_by_path->interface~to_unicode proc~wrap_json_get_integer_by_path->none~get proc~wrap_json_get_integer_by_path->interface~to_unicode proc~wrap_json_get_integer_vec_by_path->none~get proc~wrap_json_get_integer_vec_by_path->interface~to_unicode proc~wrap_json_get_logical_by_path->none~get proc~wrap_json_get_logical_by_path->interface~to_unicode proc~wrap_json_get_logical_vec_by_path->none~get proc~wrap_json_get_logical_vec_by_path->interface~to_unicode proc~wrap_json_get_real32_by_path->none~get proc~wrap_json_get_real32_by_path->interface~to_unicode proc~wrap_json_get_real32_vec_by_path->none~get proc~wrap_json_get_real32_vec_by_path->interface~to_unicode proc~wrap_json_get_real_by_path->none~get proc~wrap_json_get_real_by_path->interface~to_unicode proc~wrap_json_get_real_vec_by_path->none~get proc~wrap_json_get_real_vec_by_path->interface~to_unicode proc~wrap_json_get_string_by_path->none~get proc~wrap_json_get_string_by_path->interface~to_unicode proc~wrap_json_get_string_vec_by_path->none~get proc~wrap_json_get_string_vec_by_path->interface~to_unicode proc~wrap_json_matrix_info_by_path->none~matrix_info proc~wrap_json_matrix_info_by_path->interface~to_unicode proc~to_uni json_string_utilities::to_uni interface~to_unicode->proc~to_uni proc~to_uni_vec json_string_utilities::to_uni_vec interface~to_unicode->proc~to_uni_vec proc~json_value_get_child json_value_module::json_core%json_value_get_child none~get_child->proc~json_value_get_child proc~json_value_get_child_by_index json_value_module::json_core%json_value_get_child_by_index none~get_child->proc~json_value_get_child_by_index proc~json_value_get_child_by_name json_value_module::json_core%json_value_get_child_by_name none~get_child->proc~json_value_get_child_by_name proc~wrap_json_value_get_child_by_name json_value_module::json_core%wrap_json_value_get_child_by_name none~get_child->proc~wrap_json_value_get_child_by_name proc~json_info json_value_module::json_core%json_info none~info->proc~json_info proc~json_info_by_path json_value_module::json_core%json_info_by_path none~info->proc~json_info_by_path proc~wrap_json_info_by_path json_value_module::json_core%wrap_json_info_by_path none~info->proc~wrap_json_info_by_path proc~json_string_info json_value_module::json_core%json_string_info none~string_info->proc~json_string_info proc~json_throw_exception json_value_module::json_core%json_throw_exception none~throw_exception->proc~json_throw_exception proc~wrap_json_throw_exception json_value_module::json_core%wrap_json_throw_exception none~throw_exception->proc~wrap_json_throw_exception proc~valid_json_hex json_string_utilities::valid_json_hex proc~escape_string->proc~valid_json_hex proc~json_get_by_path_default->proc~json_clear_exceptions proc~json_get_by_path_default->none~get_child proc~json_get_by_path_default->none~throw_exception proc~json_get_by_path_default->proc~string_to_integer none~add~2 json_value_module::json_core%add proc~json_get_by_path_default->none~add~2 proc~json_value_create json_value_module::json_value_create proc~json_get_by_path_default->proc~json_value_create proc~to_array json_value_module::json_core%to_array proc~json_get_by_path_default->proc~to_array proc~to_null json_value_module::json_core%to_null proc~json_get_by_path_default->proc~to_null proc~to_object json_value_module::json_core%to_object proc~json_get_by_path_default->proc~to_object proc~json_get_by_path_jsonpath_bracket->proc~json_clear_exceptions proc~json_get_by_path_jsonpath_bracket->none~get_child proc~json_get_by_path_jsonpath_bracket->none~throw_exception proc~json_get_by_path_jsonpath_bracket->proc~string_to_integer proc~json_get_by_path_jsonpath_bracket->none~add~2 proc~convert json_value_module::json_core%convert proc~json_get_by_path_jsonpath_bracket->proc~convert proc~json_get_by_path_jsonpath_bracket->proc~json_value_create proc~json_get_by_path_jsonpath_bracket->proc~to_null proc~json_get_by_path_rfc6901->proc~json_clear_exceptions proc~json_get_by_path_rfc6901->none~get_child proc~json_get_by_path_rfc6901->none~throw_exception proc~json_get_by_path_rfc6901->proc~string_to_integer proc~decode_rfc6901 json_string_utilities::decode_rfc6901 proc~json_get_by_path_rfc6901->proc~decode_rfc6901 proc~compact_real_string json_string_utilities::compact_real_string proc~real_to_string->proc~compact_real_string proc~json_value_add_string_name_ascii json_value_module::json_core%json_value_add_string_name_ascii none~add~2->proc~json_value_add_string_name_ascii proc~json_value_add_string_val_ascii json_value_module::json_core%json_value_add_string_val_ascii none~add~2->proc~json_value_add_string_val_ascii proc~json_value_add_string_vec_name_ascii json_value_module::json_core%json_value_add_string_vec_name_ascii none~add~2->proc~json_value_add_string_vec_name_ascii proc~json_value_add_string_vec_val_ascii json_value_module::json_core%json_value_add_string_vec_val_ascii none~add~2->proc~json_value_add_string_vec_val_ascii proc~convert->none~info proc~convert->none~throw_exception none~create_array json_value_module::json_core%create_array proc~convert->none~create_array none~create_null json_value_module::json_core%create_null proc~convert->none~create_null none~create_object json_value_module::json_core%create_object proc~convert->none~create_object proc~json_value_replace json_value_module::json_core%json_value_replace proc~convert->proc~json_value_replace proc~replace_string json_string_utilities::replace_string proc~decode_rfc6901->proc~replace_string proc~json_info->none~throw_exception proc~json_info_by_path->none~get proc~json_info_by_path->none~info proc~json_string_info->none~get proc~json_string_info->proc~json_clear_exceptions proc~json_string_info->none~info proc~json_string_info->none~throw_exception proc~json_value_get_child->none~throw_exception proc~json_value_get_child_by_index->proc~json_clear_exceptions proc~json_value_get_child_by_index->none~throw_exception proc~json_value_get_child_by_name->proc~json_clear_exceptions proc~json_value_get_child_by_name->none~throw_exception proc~name_equal json_value_module::json_core%name_equal proc~json_value_get_child_by_name->proc~name_equal proc~destroy_json_data json_value_module::destroy_json_data proc~to_array->proc~destroy_json_data proc~to_null->proc~destroy_json_data proc~to_object->proc~destroy_json_data proc~wrap_json_info_by_path->interface~to_unicode proc~wrap_json_info_by_path->none~info proc~wrap_json_throw_exception->interface~to_unicode proc~wrap_json_throw_exception->none~throw_exception proc~wrap_json_value_get_child_by_name->none~get proc~wrap_json_value_get_child_by_name->interface~to_unicode proc~json_value_create_array json_value_module::json_core%json_value_create_array none~create_array->proc~json_value_create_array proc~wrap_json_value_create_array json_value_module::json_core%wrap_json_value_create_array none~create_array->proc~wrap_json_value_create_array proc~json_value_create_null json_value_module::json_core%json_value_create_null none~create_null->proc~json_value_create_null proc~wrap_json_value_create_null json_value_module::json_core%wrap_json_value_create_null none~create_null->proc~wrap_json_value_create_null proc~json_value_create_object json_value_module::json_core%json_value_create_object none~create_object->proc~json_value_create_object proc~wrap_json_value_create_object json_value_module::json_core%wrap_json_value_create_object none~create_object->proc~wrap_json_value_create_object proc~json_value_add_string_name_ascii->interface~to_unicode proc~json_value_add_string_name_ascii->none~add~2 proc~json_value_add_string_val_ascii->interface~to_unicode proc~json_value_add_string_val_ascii->none~add~2 proc~json_value_add_string_vec_name_ascii->interface~to_unicode proc~json_value_add_string_vec_name_ascii->none~add~2 proc~json_value_add_string_vec_val_ascii->interface~to_unicode proc~json_value_add_string_vec_val_ascii->none~add~2 none~insert_after json_value_module::json_core%insert_after proc~json_value_replace->none~insert_after proc~json_value_remove json_value_module::json_core%json_value_remove proc~json_value_replace->proc~json_value_remove proc~name_strings_equal json_value_module::json_core%name_strings_equal proc~name_equal->proc~name_strings_equal proc~json_value_insert_after json_value_module::json_core%json_value_insert_after none~insert_after->proc~json_value_insert_after proc~json_value_insert_after_child_by_index json_value_module::json_core%json_value_insert_after_child_by_index none~insert_after->proc~json_value_insert_after_child_by_index proc~json_value_create_array->proc~json_value_create proc~json_value_create_array->proc~to_array proc~json_value_create_null->proc~json_value_create proc~json_value_create_null->proc~to_null proc~json_value_create_object->proc~json_value_create proc~json_value_create_object->proc~to_object none~destroy json_value_module::json_core%destroy proc~json_value_remove->none~destroy proc~lowercase_string json_string_utilities::lowercase_string proc~name_strings_equal->proc~lowercase_string proc~wrap_json_value_create_array->interface~to_unicode proc~wrap_json_value_create_array->none~create_array proc~wrap_json_value_create_null->interface~to_unicode proc~wrap_json_value_create_null->none~create_null proc~wrap_json_value_create_object->interface~to_unicode proc~wrap_json_value_create_object->none~create_object proc~destroy_json_core json_value_module::json_core%destroy_json_core none~destroy->proc~destroy_json_core proc~json_value_destroy json_value_module::json_core%json_value_destroy none~destroy->proc~json_value_destroy proc~json_value_insert_after_child_by_index->none~get_child proc~json_value_insert_after_child_by_index->none~insert_after proc~json_value_destroy->proc~destroy_json_data proc~json_value_destroy->none~destroy

Called by

proc~~json_matrix_info_by_path~~CalledByGraph proc~json_matrix_info_by_path json_value_module::json_core%json_matrix_info_by_path none~matrix_info json_value_module::json_core%matrix_info proc~json_matrix_info_by_path->none~matrix_info none~matrix_info->proc~json_matrix_info_by_path proc~wrap_json_matrix_info_by_path json_value_module::json_core%wrap_json_matrix_info_by_path none~matrix_info->proc~wrap_json_matrix_info_by_path proc~json_file_variable_matrix_info json_file_module::json_file%json_file_variable_matrix_info proc~json_file_variable_matrix_info->none~matrix_info proc~wrap_json_matrix_info_by_path->none~matrix_info none~matrix_info~2 json_file_module::json_file%matrix_info none~matrix_info~2->proc~json_file_variable_matrix_info proc~wrap_json_file_variable_matrix_info json_file_module::json_file%wrap_json_file_variable_matrix_info none~matrix_info~2->proc~wrap_json_file_variable_matrix_info proc~wrap_json_file_variable_matrix_info->none~matrix_info~2

Source Code

    subroutine json_matrix_info_by_path(json,p,path,is_matrix,found,&
                                        var_type,n_sets,set_size,name)

    implicit none

    class(json_core),intent(inout)      :: json
    type(json_value),pointer            :: p         !! a JSON linked list
    character(kind=CK,len=*),intent(in) :: path      !! path to the variable
    logical(LK),intent(out)             :: is_matrix !! true if it is a valid matrix
    logical(LK),intent(out),optional    :: found     !! true if it was found
    integer(IK),intent(out),optional    :: var_type  !! variable type of data in
                                                     !! the matrix (if all elements have
                                                     !! the same type)
    integer(IK),intent(out),optional    :: n_sets    !! number of data sets (i.e., matrix
                                                     !! rows if using row-major order)
    integer(IK),intent(out),optional    :: set_size  !! size of each data set (i.e., matrix
                                                     !! cols if using row-major order)
    character(kind=CK,len=:),allocatable,intent(out),optional :: name !! variable name

    type(json_value),pointer :: p_var
    logical(LK) :: ok
#if defined __GFORTRAN__
    character(kind=CK,len=:),allocatable :: p_name  !! temporary variable for getting name
#endif

    call json%get(p,path,p_var,found)

    !check if it was found:
    if (present(found)) then
        ok = found
    else
        ok = .not. json%exception_thrown
    end if

    if (.not. ok) then
        if (present(var_type)) var_type = json_unknown
        if (present(n_sets))   n_sets   = 0
        if (present(set_size)) set_size = 0
        if (present(name))     name     = CK_''
    else

        !get info about the variable:
#if defined __GFORTRAN__
        call json%matrix_info(p_var,is_matrix,var_type,n_sets,set_size)
        if (present(name)) then !workaround for gfortran bug
            if (allocated(p_var%name)) then
                p_name = p_var%name
                name = p_name
            else
                name = CK_''
            end if
        end if
#else
        call json%matrix_info(p_var,is_matrix,var_type,n_sets,set_size,name)
#endif
        if (json%exception_thrown .and. present(found)) then
            found = .false.
            call json%clear_exceptions()
        end if
    end if

    end subroutine json_matrix_info_by_path