CALLC.C

/**************************************************************************** 
                  Microsoft RPC Version 2.0 
            Copyright Microsoft Corp. 1992, 1993, 1994- 1996 
                      Callback Example 
 
    FILE:       callc.c 
 
    USAGE:      callc  -n network_address 
                       -p protocol_sequence 
                       -e endpoint 
                       -o options 
                       -v value to compute fibonacci number 
 
    PURPOSE:    Client side of RPC distributed application 
 
    FUNCTIONS:  main() - binds to server and calls remote procedure 
 
    COMMENTS:   This sample program generates a Fibonacci number by 
                static callback. 
 
****************************************************************************/ 
 
#include <stdlib.h> 
#include <stdio.h> 
#include <ctype.h> 
#include "call.h"    // header file generated by MIDL compiler 
 
void Usage(char * pszProgramName) 
{ 
    fprintf(stderr, "Usage:  %s\n", pszProgramName); 
    fprintf(stderr, " -p protocol_sequence\n"); 
    fprintf(stderr, " -n network_address\n"); 
    fprintf(stderr, " -e endpoint\n"); 
    fprintf(stderr, " -o options\n"); 
    fprintf(stderr, " -v value_for_Fibonacci\n"); 
    exit(1); 
} 
 
void _CRTAPI1 main(int argc, char **argv) 
{ 
    RPC_STATUS status; 
    unsigned char * pszUuid             = NULL; 
    unsigned char * pszProtocolSequence = "ncacn_np"; 
    unsigned char * pszNetworkAddress   = NULL; 
    unsigned char * pszEndpoint         = "\\pipe\\callback"; 
    unsigned char * pszOptions          = NULL; 
    unsigned char * pszStringBinding    = NULL; 
    short sValue                        = 2; 
    short sFibNumber; 
    int i; 
 
    /* allow the user to override settings with command line switches */ 
    for (i = 1; i < argc; i++) { 
        if ((*argv[i] == '-') || (*argv[i] == '/')) { 
            switch (tolower(*(argv[i]+1))) { 
            case 'p':  // protocol sequence 
                pszProtocolSequence = argv[++i]; 
                break; 
            case 'n':  // network address 
                pszNetworkAddress = argv[++i]; 
                break; 
            case 'e': 
                pszEndpoint = argv[++i]; 
                break; 
            case 'o': 
                pszOptions = argv[++i]; 
                break; 
            case 'v': 
                sValue = atoi(argv[++i]); 
                break; 
            case 'h': 
            case '?': 
            default: 
                Usage(argv[0]); 
            } 
        } 
        else 
            Usage(argv[0]); 
    } 
 
    /* Use a convenience function to concatenate the elements of  */ 
    /* the string binding into the proper sequence.               */ 
    status = RpcStringBindingCompose(pszUuid, 
                                     pszProtocolSequence, 
                                     pszNetworkAddress, 
                                     pszEndpoint, 
                                     pszOptions, 
                                     &pszStringBinding); 
    printf("RpcStringBindingCompose returned 0x%x\n", status); 
    printf("pszStringBinding = %s\n", pszStringBinding); 
    if (status) { 
        exit(status); 
    } 
 
    /* Set the binding handle that will be used to bind to the server. */ 
    status = RpcBindingFromStringBinding(pszStringBinding, 
                                         &callback_IfHandle); 
    printf("RpcBindingFromStringBinding returned 0x%x\n", status); 
    if (status) { 
        exit(status); 
    } 
 
    printf("Calling 'Fibonacci(n)' for n = %d\n", sValue); 
 
    RpcTryExcept { 
        sFibNumber = Fibonacci(sValue);  // make call 
        printf("The Fibonacci number of %d = %d\n", sValue, sFibNumber); 
        printf("Calling the remote procedure 'Shutdown'\n"); 
        Shutdown();  // shut down the server side 
    } 
    RpcExcept(1) { 
        printf("Runtime reported exception %ld\n", RpcExceptionCode() ); 
    } 
    RpcEndExcept 
 
    /* The calls to the remote procedures are complete. */ 
    /* Free the string and the binding handle           */ 
    status = RpcStringFree(&pszStringBinding);  // remote calls done; unbind 
    printf("RpcStringFree returned 0x%x\n", status); 
    if (status) { 
        exit(status); 
    } 
 
    status = RpcBindingFree(&callback_IfHandle);  // remote calls done; unbind 
    printf("RpcBindingFree returned 0x%x\n", status); 
    if (status) { 
        exit(status); 
    } 
 
    exit(0); 
 
}  // end main() 
 
/* callback function */ 
short Fibonacci2(short n) 
{ 
    short nsub1, nsub2; 
 
    printf("Callback:  Fibonacci2 called with n = %d\n", n); 
    if ((n == 0) || (n == 1)) 
        return(1); 
    else { 
        nsub1 = n - 1; 
        nsub2 = n - 2; 
        return(Fibonacci(nsub1) + Fibonacci(nsub2)); 
    } 
} 
 
 
/*********************************************************************/ 
/*                 MIDL allocate and free                            */ 
/*********************************************************************/ 
 
void __RPC_FAR * __RPC_USER midl_user_allocate(size_t len) 
{ 
    return(malloc(len)); 
} 
 
void __RPC_USER midl_user_free(void __RPC_FAR * ptr) 
{ 
    free(ptr); 
} 
 
/* end file callc.c */