Desenvolvimento de servidor usando identificadores de contexto

Da perspectiva do desenvolvimento do programa de servidor, um identificador de contexto é um ponteiro não tipado. Os programas de servidor inicializam identificadores de contexto apontando-os para dados na memória ou em alguma outra forma de armazenamento (como arquivos em discos).

Por exemplo, suponha que um cliente use um identificador de contexto para solicitar uma série de atualizações para um registro em um banco de dados. O cliente chama um procedimento remoto no servidor e passa uma chave de pesquisa. O programa de servidor pesquisa o banco de dados para a chave de pesquisa e obtém o número de registro inteiro do registro correspondente. Em seguida, o servidor pode apontar um ponteiro para void em um local de memória que contém o número do registro. Quando ele retorna, o procedimento remoto precisaria retornar o ponteiro como um identificador de contexto por meio de seu valor retornado ou sua lista de parâmetros. O cliente precisaria passar o ponteiro para o servidor sempre que chamasse procedimentos remotos para atualizar o registro. Durante cada uma dessas operações de atualização, o servidor converteria o ponteiro void como um ponteiro para um inteiro.

Depois que o programa de servidor aponta o identificador de contexto em dados de contexto, o identificador é considerado aberto. Identificadores que contêm um valor NULL são fechados. O servidor mantém um identificador de contexto aberto até que o cliente chame um procedimento remoto que o feche. Se a sessão do cliente for encerrada enquanto o identificador estiver aberto, o tempo de execução do RPC chamará a rotina de run down do servidor para liberar o identificador.

O fragmento de código a seguir demonstra como um servidor pode implementar um identificador de contexto. Neste exemplo, o servidor mantém um arquivo de dados no qual o cliente grava usando procedimentos remotos. As informações de contexto são um identificador de arquivo que controla o local atual no arquivo em que o servidor gravará dados. O identificador de arquivo é empacotado como um identificador de contexto na lista de parâmetros para chamadas de procedimento remoto. Uma estrutura contém o nome do arquivo e o identificador de arquivo. A definição de interface para este exemplo é mostrada em Desenvolvimento de Interface usando identificadores de contexto.

/* cxhndlp.c (fragment of file containing remote procedures) */
typedef struct 
{
     FILE* hFile;
     char   achFile[256];
} FILE_CONTEXT_TYPE;

A função RemoteOpen abre um arquivo no servidor:

short RemoteOpen(
    PPCONTEXT_HANDLE_TYPE pphContext,
    unsigned char *pszFileName)
{
    FILE               *hFile;
    FILE_CONTEXT_TYPE  *pFileContext;
 
    if ((hFile = fopen(pszFileName, "r")) == NULL) 
    {
        *pphContext = (PCONTEXT_HANDLE_TYPE) NULL;
        return(-1);
    }
    else 
    {
        pFileContext = (FILE_CONTEXT_TYPE *) 
                       MIDL_user_allocate(sizeof(FILE_CONTEXT_TYPE));
        pFileContext->hFile = hFile;
        // check if pszFileName is longer than 256 and if yes, return
        // an error
        strcpy_s(pFileContext->achFile, srlen(pszFileName), pszFileName);
        *pphContext = (PCONTEXT_HANDLE_TYPE) pFileContext;
        return(0);
    }
}

A função RemoteRead lê um arquivo no servidor.

short RemoteRead(
    PCONTEXT_HANDLE_TYPE phContext, 
    unsigned char *pbBuf, 
    short *pcbBuf) 
{ 
    FILE_CONTEXT_TYPE *pFileContext; 
    printf("in RemoteRead\n"); 
    pFileContext = (FILE_CONTEXT_TYPE *) phContext; 
    *pcbBuf = (short) fread(pbBuf, sizeof(char), 
                            BUFSIZE, 
                            pFileContext->hFile); 
    return(*pcbBuf); 
}

A função RemoteClose fecha um arquivo no servidor. Observe que o aplicativo de servidor precisa atribuir NULL ao identificador de contexto como parte da função close. Isso se comunica com o stub do servidor e a biblioteca de tempo de execução RPC que o identificador de contexto foi excluído. Caso contrário, a conexão será mantida aberta e, eventualmente, ocorrerá um run down de contexto.

void RemoteClose(PPCONTEXT_HANDLE_TYPE pphContext)
{
    FILE_CONTEXT_TYPE *pFileContext;
 
    if (*pphContext == NULL)
    {
        //Log error, client tried to close a NULL handle.
        return;
    }
    pFileContext = (FILE_CONTEXT_TYPE *)*pphContext;
    printf("File %s closed.\n", pFileContext->achFile);
    fclose(pFileConext->hFile);
    MIDL_user_free(pFileContext);
 
    // This tells the run-time, when it is marshalling the out 
    // parameters, that the context handle has been closed normally.
    *pphContext = NULL;
}