home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a025 / 6.ddi / PROCSRV.C < prev    next >
Encoding:
C/C++ Source or Header  |  1992-09-15  |  3.4 KB  |  142 lines
  1. // This program is an example of an Open Data Services application. It accepts
  2. // requests from clients to execute stored procedures either as language 
  3. // events or as remote stored procedure calls.
  4.  
  5. #include    <stdlib.h>
  6. #include    <stdio.h>
  7. #include    <string.h>
  8.  
  9. #define INCL_BASE
  10. #include    <os2.h>
  11. #include    <srv.h>
  12.  
  13. // Globals
  14. //
  15. DBCHAR FAR *SrvrName = "PROCSRV";    // Default server name
  16. DBCHAR FAR *PipeName = "PROCSRV\\QUERY";    // Default pipe name
  17.  
  18. // function prototypes
  19. //
  20. void main(int argc, char **argv);
  21.  
  22. void getargs(int argc, char **argv);
  23.  
  24. int SRVAPI init_server(SRV_SERVER FAR *server);
  25.  
  26. void SRVAPI set_remote_server_name(char FAR *name);
  27.  
  28. int chk_err(SRV_SERVER FAR *server, 
  29.             SRV_PROC FAR *srvproc, 
  30.             int srverror,
  31.              BYTE severity, 
  32.             BYTE state, 
  33.             int oserrnum, 
  34.             DBCHAR FAR *errtext,
  35.              int errtextlen, 
  36.             DBCHAR FAR *oserrtext, 
  37.             int oserrtextlen);
  38.  
  39. void main(argc, argv)
  40. int argc;
  41. char *argv[];
  42. {
  43.     SRV_CONFIG FAR *config;    // The configuration structure
  44.     SRV_SERVER FAR *server;    // The service process
  45.     char logfile[12];        // logfile
  46.  
  47.     // Read any command line arguments.
  48.     //
  49.     getargs(argc, argv);
  50.  
  51.     // Send the name retrieved to the procedure server's DLL module
  52.     //
  53.     set_remote_server_name(SrvrName);
  54.  
  55.     // Allocate a configuration structure that is used to initialize
  56.     // the Open Data Services application
  57.     //
  58.     config = srv_config_alloc();
  59.  
  60.     // Allow 20 connections at a time.
  61.     //
  62.     srv_config(config, (DBINT)SRV_CONNECTIONS, "20", SRV_NULLTERM);
  63.  
  64.     // Set the log file.
  65.     //
  66.     sprintf(logfile, "%s.log", SrvrName);
  67.     srv_config(config, (DBINT)SRV_LOGFILE, logfile, SRV_NULLTERM);
  68.  
  69.     // Install the error handler.
  70.     //
  71.     srv_errhandle(chk_err);
  72.  
  73.     // Initialize the procedure server and save the server handle
  74.     // so it can be used in later functions.
  75.     //
  76.     server = srv_init(config, PipeName,    SRV_NULLTERM);
  77.     if (server == NULL) {
  78.         printf("Unable to initialize Procedure Server.  Check log file.\n");
  79.         DosExit(EXIT_PROCESS, 1);
  80.     }
  81.  
  82.     // When starting the procedure server, initialize the remote server structure.
  83.     // This is done in the init_server() function.
  84.     // All the other event handlers are also defined in the init_server()
  85.     // function.
  86.     //
  87.     srv_handle(server, (DBINT)SRV_START, init_server);
  88.  
  89.     // Now everything's ready to go with our procedure server, so we
  90.     // start it and keep it going until we get a stop request.
  91.     //
  92.     srv_log(server, FALSE, " ", SRV_NULLTERM);    // insert blank line
  93.     srv_log(server, TRUE, "Procedure Server Starting", SRV_NULLTERM);
  94.  
  95.     printf("\n%s Starting\n", SrvrName);
  96.  
  97.     srv_run(server);
  98.  
  99. }
  100.  
  101. // GETARGS 
  102. //    Read the command line arguments.
  103. //
  104. // Parameters:
  105. //       argc - int (from "main" entry)
  106. //       argv - pointer to array of char pointers (from "main" entry)
  107. //
  108. // Returns:
  109. //     VOID
  110. //
  111. void getargs(int argc, char *argv[])
  112. {
  113.  
  114.     int i;
  115.     char *ptr;
  116.  
  117.     for (i = 1; i < argc; ++i) {
  118.         if (argv[i][0] != '-' && argv[i][0] != '/') {
  119.             printf("Usage: procsrv [-S<server name> -p<pipe name>]\n");
  120.             exit(1);
  121.         }
  122.         ptr = argv[i];
  123.         switch (ptr[1]) {
  124.         case 'S':
  125.            if (strlen(ptr + 2) > 0) {
  126.                 SrvrName = ptr + 2;
  127.            }
  128.             break;
  129.  
  130.         case 'p':
  131.            if (strlen(ptr + 2) > 0) {
  132.                PipeName = ptr + 2;
  133.            }
  134.             break;
  135.  
  136.         default:
  137.             printf("Usage: procsrv [-S<server name> -p<pipe name>]\n");
  138.             exit(1);
  139.         }
  140.     }
  141. }
  142.