AbstractDirectoryService Derived Type

type, public, abstract :: AbstractDirectoryService


Inherited by

type~~abstractdirectoryservice~~InheritedByGraph type~abstractdirectoryservice AbstractDirectoryService type~directoryservice DirectoryService type~directoryservice->type~abstractdirectoryservice type~directoryservicepointer DirectoryServicePointer type~directoryservicepointer->type~abstractdirectoryservice dsPtr type~directoryservicepointer~2 DirectoryServicePointer type~directoryservicepointer~2->type~abstractdirectoryservice dsPtr type~servermanager ServerManager type~servermanager->type~directoryservice directory_service type~extdatadriver ExtDataDriver type~extdatadriver->type~servermanager cap_server type~mapl_cap MAPL_Cap type~mapl_cap->type~servermanager cap_server

Type-Bound Procedures

procedure(connect_to_client), public, deferred :: connect_to_client

  • subroutine connect_to_client(this, port_name, server, rc) Prototype

    Arguments

    Type IntentOptional Attributes Name
    class(AbstractDirectoryService), intent(inout), target :: this
    character(len=*), intent(in) :: port_name
    class(BaseServer), intent(inout), target :: server
    integer, intent(out), optional :: rc

procedure(connect_to_server), public, deferred :: connect_to_server

  • subroutine connect_to_server(this, port_name, client, client_comm, unusable, server_size, rc) Prototype

    Arguments

    Type IntentOptional Attributes Name
    class(AbstractDirectoryService), intent(inout), target :: this
    character(len=*), intent(in) :: port_name
    class(ClientThread), intent(inout), target :: client
    integer, intent(in) :: client_comm
    class(KeywordEnforcer), intent(in), optional :: unusable
    integer, intent(out), optional :: server_size
    integer, intent(out), optional :: rc

procedure(free_directory_resources), public, deferred :: free_directory_resources

  • subroutine free_directory_resources(this, rc) Prototype

    Arguments

    Type IntentOptional Attributes Name
    class(AbstractDirectoryService), intent(inout) :: this
    integer, intent(out), optional :: rc

procedure(publish), public, deferred :: publish

  • subroutine publish(this, port, server, rc) Prototype

    Arguments

    Type IntentOptional Attributes Name
    class(AbstractDirectoryService), intent(inout), target :: this
    type(PortInfo), intent(in), target :: port
    class(BaseServer), intent(in) :: server
    integer, intent(out), optional :: rc

Source Code

   type,abstract :: AbstractDirectoryService
   contains
      procedure(connect_to_server), deferred :: connect_to_server
      procedure(connect_to_client), deferred :: connect_to_client
      procedure(publish),deferred :: publish
      procedure(free_directory_resources), deferred :: free_directory_resources
   end type AbstractDirectoryService