home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0020 - 0029 / ibm0020-0029 / ibm0028.tar / ibm0028 / GRLF-C-1.ZIP / GCOMM / ASCHKCNL.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-08-14  |  1.3 KB  |  51 lines
  1. /* aschkcnl.c
  2. *
  3. *  struct PORT_TABLE *_aschkcnl( port )
  4. *  int port;    - Logical port to check, 0 <= port < MAX_PORT
  5. *
  6. * The Greenleaf Comm Library
  7. *
  8. * Copyright (C) 1985-1990 Greenleaf Software Inc.  All Rights Reserved.
  9. *
  10. * DESCRIPTION
  11. *  checks whether or not the logical port has been setup with
  12. *  asifirst().  This is an absolute requirement before any other
  13. *  function can be called.
  14. *
  15. * SIDE EFFECTS
  16. *  none.
  17. *
  18. * RETURNS
  19. *
  20. *       Value           Meaning
  21. *     -------          --------
  22. *       ASSUCCESS       Success (no errors)
  23. *       ASINVPORT       Requested port is out of range
  24. *       ASNOTSETUP      Requested port not setup with asifirst()
  25. *
  26. * MODIFICATIONS
  27. *  10-25-85     New for release 2.0
  28. *  03-FEB-1987  10:47:00.23
  29. *    The range check on port would allow port==16 (MAX_PORT), changed
  30. *    this test to fail if port is >= MAX_PORT.
  31. */
  32. #include <stdio.h>
  33. #include "gf.h"
  34. #include "asiports.h"
  35.  
  36. struct PORT_TABLE * GF_CONV _aschkcnl(port)
  37. int port;
  38. {
  39.         if(port<0 || port>=MAX_PORT) {
  40.                 _aserror = ASINVPORT;
  41.                 return(NULL);
  42.         }
  43.         if(as_chnl==NULL || as_chnl->tblport[port].ptb==NULL) {
  44.                 _aserror = ASNOTSETUP;
  45.                 return(NULL);
  46.         }
  47.         _aserror = ASSUCCESS;
  48.         return(as_chnl->tblport[port].ptb);
  49. }
  50.  
  51.