home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / BBS / MISC / BSRC_250.ZIP / M7REC.C < prev    next >
Encoding:
C/C++ Source or Header  |  1991-09-15  |  5.9 KB  |  180 lines
  1. /*--------------------------------------------------------------------------*/
  2. /*                                                                          */
  3. /*                                                                          */
  4. /*      ------------         Bit-Bucket Software, Co.                       */
  5. /*      \ 10001101 /         Writers and Distributors of                    */
  6. /*       \ 011110 /          Freely Available<tm> Software.                 */
  7. /*        \ 1011 /                                                          */
  8. /*         ------                                                           */
  9. /*                                                                          */
  10. /*  (C) Copyright 1987-91, Bit Bucket Software Co., a Delaware Corporation. */
  11. /*                                                                          */
  12. /*                                                                          */
  13. /*                  This module was written by Bob Hartman                  */
  14. /*                                                                          */
  15. /*                                                                          */
  16. /*                BinkleyTerm Modem7 Receiver State Machine                 */
  17. /*                                                                          */
  18. /*                                                                          */
  19. /*    For complete  details  of the licensing restrictions, please refer    */
  20. /*    to the License  agreement,  which  is published in its entirety in    */
  21. /*    the MAKEFILE and BT.C, and also contained in the file LICENSE.250.    */
  22. /*                                                                          */
  23. /*    USE  OF THIS FILE IS SUBJECT TO THE  RESTRICTIONS CONTAINED IN THE    */
  24. /*    BINKLEYTERM  LICENSING  AGREEMENT.  IF YOU DO NOT FIND THE TEXT OF    */
  25. /*    THIS  AGREEMENT IN ANY OF THE  AFOREMENTIONED FILES,  OR IF YOU DO    */
  26. /*    NOT HAVE THESE FILES,  YOU  SHOULD  IMMEDIATELY CONTACT BIT BUCKET    */
  27. /*    SOFTWARE CO.  AT ONE OF THE  ADDRESSES  LISTED BELOW.  IN NO EVENT    */
  28. /*    SHOULD YOU  PROCEED TO USE THIS FILE  WITHOUT HAVING  ACCEPTED THE    */
  29. /*    TERMS  OF  THE  BINKLEYTERM  LICENSING  AGREEMENT,  OR  SUCH OTHER    */
  30. /*    AGREEMENT AS YOU ARE ABLE TO REACH WITH BIT BUCKET SOFTWARE, CO.      */
  31. /*                                                                          */
  32. /*                                                                          */
  33. /* You can contact Bit Bucket Software Co. at any one of the following      */
  34. /* addresses:                                                               */
  35. /*                                                                          */
  36. /* Bit Bucket Software Co.        FidoNet  1:104/501, 1:343/491             */
  37. /* P.O. Box 460398                AlterNet 7:491/0                          */
  38. /* Aurora, CO 80046               BBS-Net  86:2030/1                        */
  39. /*                                Internet f491.n343.z1.fidonet.org         */
  40. /*                                                                          */
  41. /* Please feel free to contact us at any time to share your comments about  */
  42. /* our software and/or licensing policies.                                  */
  43. /*                                                                          */
  44. /*--------------------------------------------------------------------------*/
  45.  
  46. /* Include this file before any other includes or defines! */
  47.  
  48. #include "includes.h"
  49.  
  50. int MRInit (XMARGSP, int);
  51. int MREnd (XMARGSP, int);
  52. int MRSendNak (XMARGSP);
  53. int MRWaitAck (XMARGSP);
  54. int MRWaitChar (XMARGSP);
  55. int MRWaitOkCk (XMARGSP);
  56.  
  57. STATES Modem7_Receiver[] = {
  58.    { "MRInit",  MRInit },
  59.    { "MREnd",  MREnd },
  60.    { "MR0",  MRSendNak },
  61.    { "MR1",  MRWaitAck },
  62.    { "MR2",  MRWaitChar },
  63.    { "MR3",  MRWaitOkCk }
  64. };
  65.  
  66. int MRInit (XMARGSP args, int start_state)
  67. {
  68.    args->tries = 0;
  69.    return (start_state);
  70. }
  71.  
  72. int MREnd (XMARGSP args, int cur_state)
  73. {
  74.    args->result = cur_state;
  75.    return (cur_state);
  76. }
  77.  
  78. int MRSendNak (XMARGSP args)
  79. {
  80.    if (args->tries >= 10)
  81.       return (FNAME_ERR);
  82.  
  83.    args->fptr = args->filename;
  84.  
  85.    SENDBYTE (NAK);
  86.    ++(args->tries);
  87.    return (MR1);
  88. }
  89.  
  90. int MRWaitAck (XMARGSP args)
  91. {
  92.    long MR1Timer;
  93.    int in_char;
  94.  
  95.    MR1Timer = timerset (1000);
  96.    while (!timeup (MR1Timer))
  97.       {
  98.       if ((in_char = PEEKBYTE ()) >= 0)
  99.          {
  100.          (void) TIMED_READ (0);
  101.          switch (in_char)
  102.             {
  103.             case ACK:
  104.                return (MR2);
  105.  
  106.             case EOT:
  107.                args->result = SUCCESS_EOT;
  108.                return (SUCCESS_EOT);
  109.             }
  110.          }
  111.       else
  112.          {
  113.          if (!CARRIER)
  114.             return (CARRIER_ERR);
  115.          else
  116.             time_release ();
  117.          }
  118.       }
  119.  
  120.    return (MR0);
  121. }
  122.  
  123. int MRWaitChar (XMARGSP args)
  124. {
  125.    int in_char;
  126.    unsigned char check;
  127.    char *p;
  128.  
  129.    in_char = TIMED_READ (10);
  130.    switch (in_char)
  131.       {
  132.       case -1:
  133.          return (MR0);
  134.  
  135.       case EOT:
  136.          return (SUCCESS);
  137.  
  138.       case SUB:
  139.          for (p = args->filename, check = SUB; p != args->fptr; p++)
  140.             check += (unsigned char) *p;
  141.          SENDBYTE (check);
  142.          return (MR3);
  143.  
  144.       case 'u':
  145.          return (MR0);
  146.  
  147.       default:
  148.          break;
  149.       }
  150.  
  151.    *args->fptr++ = (char) (in_char & 0xff);
  152.    SENDBYTE (ACK);
  153.    return (MR2);
  154. }
  155.  
  156. int MRWaitOkCk (XMARGSP args)
  157. {
  158.    int in_char;
  159.  
  160.    in_char = TIMED_READ (10);
  161.    if (in_char == ACK)
  162.       {
  163.       args->result = SUCCESS;
  164.       return (SUCCESS);
  165.       }
  166.    
  167.    return (MR0);
  168. }
  169.  
  170. int Modem7_Receive_File (char *filename)
  171. {
  172.    XMARGS batch;
  173.    int res;
  174.  
  175.    batch.result = 0;
  176.    batch.filename = filename;
  177.    res = state_machine (Modem7_Receiver, &batch, 2);
  178.    return (res);
  179. }
  180.