home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 2 / amigaformatcd02.iso / comms / netsoftware / amitcp2_x_gcc.lha / RCS.RCSfiles / sana2printfault.c,v < prev    next >
Encoding:
Text File  |  1994-01-12  |  1.9 KB  |  112 lines
  1. head    1.3;
  2. access;
  3. symbols;
  4. locks
  5.     jasegler:1.3; strict;
  6. comment    @ * @;
  7.  
  8.  
  9. 1.3
  10. date    94.01.12.18.39.33;    author jasegler;    state Exp;
  11. branches;
  12. next    1.2;
  13.  
  14. 1.2
  15. date    94.01.11.20.09.41;    author jasegler;    state Exp;
  16. branches;
  17. next    1.1;
  18.  
  19. 1.1
  20. date    94.01.11.19.36.35;    author jasegler;    state Exp;
  21. branches;
  22. next    ;
  23.  
  24.  
  25. desc
  26. @@
  27.  
  28.  
  29. 1.3
  30. log
  31. @*** empty log message ***
  32. @
  33. text
  34. @char RCS_ID_SANA2PRINTFAULT_C[] = "$Id: sana2printfault.c,v 1.2 1994/01/11 20:09:41 jasegler Exp jasegler $";
  35. /*
  36.  * sana2printfault.c --- print SANA-II error message
  37.  *
  38.  * Author: ppessi <Pekka.Pessi@@hut.fi>
  39.  *
  40.  * Copyright © 1993 AmiTCP/IP Group, <amitcp-group@@hut.fi>
  41.  *                  Helsinki University of Technology, Finland.
  42.  *                  All rights reserved.
  43.  *
  44.  * Created      : Sat Mar 20 02:10:14 1993 ppessi
  45.  * Last modified: Fri Jun  4 02:20:34 1993 ppessi
  46.  */
  47.  
  48. #include <devices/sana2.h>
  49. #include <net/sana2errno.h>
  50. #ifdef __SASC
  51. #include <proto/dos.h>
  52. #else
  53. #include <clib/dos_protos.h>
  54. #endif
  55.  
  56. void
  57. Sana2PrintFault (const char *banner, struct IOSana2Req *ios2)
  58. {
  59.   register WORD err = ios2->ios2_Req.io_Error;
  60.   register ULONG werr = ios2->ios2_WireError;
  61.   LONG args[3];
  62.   char *format;
  63.  
  64.   args[0] = (LONG) banner;
  65.  
  66.   if (err >= sana2io_nerr || -err > io_nerr)
  67.     {
  68.       args[1] = (LONG) io_errlist[0];
  69.     }
  70.   else
  71.     {
  72.       if (err < 0)
  73.     args[1] = (LONG) io_errlist[-err];
  74.       else
  75.     args[1] = (LONG) sana2io_errlist[err];
  76.     }
  77.   if (werr == 0 || werr >= sana2wire_nerr)
  78.     {
  79.       format = "%s: %s\n";
  80.     }
  81.   else
  82.     {
  83.       format = "%s: %s (%s)\n";
  84.       args[2] = (LONG) sana2wire_errlist[werr];
  85.     }
  86.  
  87.   VPrintf (format, args);
  88. }
  89. @
  90.  
  91.  
  92. 1.2
  93. log
  94. @*** empty log message ***
  95. @
  96. text
  97. @d1 1
  98. a1 1
  99. char RCS_ID_C[] = "$Id: sana2printfault.c,v 1.1 1994/01/11 19:36:35 jasegler Exp jasegler $";
  100. @
  101.  
  102.  
  103. 1.1
  104. log
  105. @Initial revision
  106. @
  107. text
  108. @d1 1
  109. a1 1
  110. RCS_ID_C = "$Id: sana2printfault.c,v 1.2 1993/06/03 23:27:19 ppessi Exp $";
  111. @
  112.