Home » Archimedes archive » Acorn User » AU 1995-04.adf » !Internet_StarterPak » SerialDev/h/driver
SerialDev/h/driver
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » Archimedes archive » Acorn User » AU 1995-04.adf » !Internet_StarterPak |
| Filename: | SerialDev/h/driver |
| Read OK: | ✔ |
| File size: | 0996 bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
/* _____________________________________________
[> <]
Project [> ARCterm VII <]
Author [> Hugo Fiennes <]
Date started [> 05-March-1990 <]
[> <]
Module name [> Driver calls <]
Current version [> 00.04 <]
Version date [> 08-January-1993 <]
State [> Unfinished <]
[> <]
[> This source is COPYRIGHT � 1992/93 by <]
[> Hugo Fiennes of The Serial Port <]
[>_____________________________________________<]
*/
extern int (*driver)(int,...);
extern int driver_block[];
extern int *driver_speedtable,driver_flags,driver_version,driver_noofspeeds;
extern char *driver_info,*driver_creator;
extern void driver_init(void);
typedef struct
{
int number;
char file[16];
char info[32];
} drivers_block;
extern drivers_block drivers[];
#define DRIVER_PUTBYTE 0
#define DRIVER_GETBYTE 1
#define DRIVER_PUTBLOCK 2
#define DRIVER_GETBLOCK 3
#define DRIVER_CHECKTX 4
#define DRIVER_CHECKRX 5
#define DRIVER_FLUSHTX 6
#define DRIVER_FLUSHRX 7
#define DRIVER_CONTROLLINES 8
#define DRIVER_MODEMCONTROL 9
#define DRIVER_RXERRORS 10
#define DRIVER_BREAK 11
#define DRIVER_EXAMINE 12
#define DRIVER_TXSPEED 13
#define DRIVER_RXSPEED 14
#define DRIVER_WORDFORMAT 15
#define DRIVER_FLOWCONTROL 16
#define DRIVER_INITIALISE 17
#define DRIVER_CLOSEDOWN 18
#define DRIVER_POLL 19
#define DRIVER_SELECT 20
#define driver_txspeed(tx) (*driver)(DRIVER_TXSPEED,portnumber,tx)
#define driver_rxspeed(rx) (*driver)(DRIVER_RXSPEED,portnumber,rx)
#define driver_wordformat(w) (*driver)(DRIVER_WORDFORMAT,portnumber,w)
#define driver_flowcontrol(f) (*driver)(DRIVER_FLOWCONTROL,portnumber,f)
#define driver_initialise() (*driver)(DRIVER_INITIALISE,portnumber)
#define driver_closedown() (*driver)(DRIVER_CLOSEDOWN,portnumber)
#define driver_poll() (*driver)(DRIVER_POLL,portnumber)
00000000 2f 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |/* |
00000010 20 20 20 20 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f | ____________|
00000020 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f |________________|
*
00000040 5f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |_. |
00000050 20 20 20 20 5b 3e 20 20 20 20 20 20 20 20 20 20 | [> |
00000060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
*
00000080 20 20 20 3c 5d 0a 50 72 6f 6a 65 63 74 20 20 20 | <].Project |
00000090 20 20 20 20 20 20 20 20 5b 3e 20 41 52 43 74 65 | [> ARCte|
000000a0 72 6d 20 56 49 49 20 20 20 20 20 20 20 20 20 20 |rm VII |
000000b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000c0 20 20 20 20 20 20 20 3c 5d 0a 41 75 74 68 6f 72 | <].Author|
000000d0 20 20 20 20 20 20 20 20 20 20 20 20 5b 3e 20 48 | [> H|
000000e0 75 67 6f 20 46 69 65 6e 6e 65 73 20 20 20 20 20 |ugo Fiennes |
000000f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100 20 20 20 20 20 20 20 20 20 20 20 3c 5d 0a 44 61 | <].Da|
00000110 74 65 20 73 74 61 72 74 65 64 20 20 20 20 20 20 |te started |
00000120 5b 3e 20 30 35 2d 4d 61 72 63 68 2d 31 39 39 30 |[> 05-March-1990|
00000130 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c | <|
00000150 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |]. |
00000160 20 20 20 20 5b 3e 20 20 20 20 20 20 20 20 20 20 | [> |
00000170 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
*
00000190 20 20 20 3c 5d 0a 4d 6f 64 75 6c 65 20 6e 61 6d | <].Module nam|
000001a0 65 20 20 20 20 20 20 20 5b 3e 20 44 72 69 76 65 |e [> Drive|
000001b0 72 20 63 61 6c 6c 73 20 20 20 20 20 20 20 20 20 |r calls |
000001c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001d0 20 20 20 20 20 20 20 3c 5d 0a 43 75 72 72 65 6e | <].Curren|
000001e0 74 20 76 65 72 73 69 6f 6e 20 20 20 5b 3e 20 30 |t version [> 0|
000001f0 30 2e 30 34 20 20 20 20 20 20 20 20 20 20 20 20 |0.04 |
00000200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000210 20 20 20 20 20 20 20 20 20 20 20 3c 5d 0a 56 65 | <].Ve|
00000220 72 73 69 6f 6e 20 64 61 74 65 20 20 20 20 20 20 |rsion date |
00000230 5b 3e 20 30 38 2d 4a 61 6e 75 61 72 79 2d 31 39 |[> 08-January-19|
00000240 39 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |93 |
00000250 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c | <|
00000260 5d 0a 53 74 61 74 65 20 20 20 20 20 20 20 20 20 |].State |
00000270 20 20 20 20 5b 3e 20 55 6e 66 69 6e 69 73 68 65 | [> Unfinishe|
00000280 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |d |
00000290 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002a0 20 20 20 3c 5d 0a 20 20 20 20 20 20 20 20 20 20 | <]. |
000002b0 20 20 20 20 20 20 20 20 5b 3e 20 20 20 20 20 20 | [> |
000002c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
*
000002e0 20 20 20 20 20 20 20 3c 5d 0a 20 20 20 20 20 20 | <]. |
000002f0 20 20 20 20 20 20 20 20 20 20 20 20 5b 3e 20 20 | [> |
00000300 20 54 68 69 73 20 73 6f 75 72 63 65 20 69 73 20 | This source is |
00000310 43 4f 50 59 52 49 47 48 54 20 a9 20 31 39 39 32 |COPYRIGHT . 1992|
00000320 2f 39 33 20 62 79 20 20 20 20 20 3c 5d 0a 20 20 |/93 by <]. |
00000330 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000340 5b 3e 20 20 20 20 20 20 48 75 67 6f 20 46 69 65 |[> Hugo Fie|
00000350 6e 6e 65 73 20 6f 66 20 54 68 65 20 53 65 72 69 |nnes of The Seri|
00000360 61 6c 20 50 6f 72 74 20 20 20 20 20 20 20 20 3c |al Port <|
00000370 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |]. |
00000380 20 20 20 20 5b 3e 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f | [>__________|
00000390 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f |________________|
*
000003b0 5f 5f 5f 3c 5d 0a 2a 2f 0a 0a 65 78 74 65 72 6e |___<].*/..extern|
000003c0 20 69 6e 74 20 20 28 2a 64 72 69 76 65 72 29 28 | int (*driver)(|
000003d0 69 6e 74 2c 2e 2e 2e 29 3b 0a 65 78 74 65 72 6e |int,...);.extern|
000003e0 20 69 6e 74 20 20 64 72 69 76 65 72 5f 62 6c 6f | int driver_blo|
000003f0 63 6b 5b 5d 3b 0a 65 78 74 65 72 6e 20 69 6e 74 |ck[];.extern int|
00000400 20 20 2a 64 72 69 76 65 72 5f 73 70 65 65 64 74 | *driver_speedt|
00000410 61 62 6c 65 2c 64 72 69 76 65 72 5f 66 6c 61 67 |able,driver_flag|
00000420 73 2c 64 72 69 76 65 72 5f 76 65 72 73 69 6f 6e |s,driver_version|
00000430 2c 64 72 69 76 65 72 5f 6e 6f 6f 66 73 70 65 65 |,driver_noofspee|
00000440 64 73 3b 0a 65 78 74 65 72 6e 20 63 68 61 72 20 |ds;.extern char |
00000450 2a 64 72 69 76 65 72 5f 69 6e 66 6f 2c 2a 64 72 |*driver_info,*dr|
00000460 69 76 65 72 5f 63 72 65 61 74 6f 72 3b 0a 65 78 |iver_creator;.ex|
00000470 74 65 72 6e 20 76 6f 69 64 20 64 72 69 76 65 72 |tern void driver|
00000480 5f 69 6e 69 74 28 76 6f 69 64 29 3b 0a 0a 74 79 |_init(void);..ty|
00000490 70 65 64 65 66 20 73 74 72 75 63 74 0a 20 20 7b |pedef struct. {|
000004a0 0a 20 20 69 6e 74 20 6e 75 6d 62 65 72 3b 0a 20 |. int number;. |
000004b0 20 63 68 61 72 20 66 69 6c 65 5b 31 36 5d 3b 0a | char file[16];.|
000004c0 20 20 63 68 61 72 20 69 6e 66 6f 5b 33 32 5d 3b | char info[32];|
000004d0 0a 20 20 7d 20 64 72 69 76 65 72 73 5f 62 6c 6f |. } drivers_blo|
000004e0 63 6b 3b 0a 0a 65 78 74 65 72 6e 20 64 72 69 76 |ck;..extern driv|
000004f0 65 72 73 5f 62 6c 6f 63 6b 20 64 72 69 76 65 72 |ers_block driver|
00000500 73 5b 5d 3b 0a 0a 23 64 65 66 69 6e 65 20 44 52 |s[];..#define DR|
00000510 49 56 45 52 5f 50 55 54 42 59 54 45 20 20 20 20 |IVER_PUTBYTE |
00000520 20 20 20 20 30 0a 23 64 65 66 69 6e 65 20 44 52 | 0.#define DR|
00000530 49 56 45 52 5f 47 45 54 42 59 54 45 20 20 20 20 |IVER_GETBYTE |
00000540 20 20 20 20 31 0a 23 64 65 66 69 6e 65 20 44 52 | 1.#define DR|
00000550 49 56 45 52 5f 50 55 54 42 4c 4f 43 4b 20 20 20 |IVER_PUTBLOCK |
00000560 20 20 20 20 32 0a 23 64 65 66 69 6e 65 20 44 52 | 2.#define DR|
00000570 49 56 45 52 5f 47 45 54 42 4c 4f 43 4b 20 20 20 |IVER_GETBLOCK |
00000580 20 20 20 20 33 0a 23 64 65 66 69 6e 65 20 44 52 | 3.#define DR|
00000590 49 56 45 52 5f 43 48 45 43 4b 54 58 20 20 20 20 |IVER_CHECKTX |
000005a0 20 20 20 20 34 0a 23 64 65 66 69 6e 65 20 44 52 | 4.#define DR|
000005b0 49 56 45 52 5f 43 48 45 43 4b 52 58 20 20 20 20 |IVER_CHECKRX |
000005c0 20 20 20 20 35 0a 23 64 65 66 69 6e 65 20 44 52 | 5.#define DR|
000005d0 49 56 45 52 5f 46 4c 55 53 48 54 58 20 20 20 20 |IVER_FLUSHTX |
000005e0 20 20 20 20 36 0a 23 64 65 66 69 6e 65 20 44 52 | 6.#define DR|
000005f0 49 56 45 52 5f 46 4c 55 53 48 52 58 20 20 20 20 |IVER_FLUSHRX |
00000600 20 20 20 20 37 0a 23 64 65 66 69 6e 65 20 44 52 | 7.#define DR|
00000610 49 56 45 52 5f 43 4f 4e 54 52 4f 4c 4c 49 4e 45 |IVER_CONTROLLINE|
00000620 53 20 20 20 38 0a 23 64 65 66 69 6e 65 20 44 52 |S 8.#define DR|
00000630 49 56 45 52 5f 4d 4f 44 45 4d 43 4f 4e 54 52 4f |IVER_MODEMCONTRO|
00000640 4c 20 20 20 39 0a 23 64 65 66 69 6e 65 20 44 52 |L 9.#define DR|
00000650 49 56 45 52 5f 52 58 45 52 52 4f 52 53 20 20 20 |IVER_RXERRORS |
00000660 20 20 20 31 30 0a 23 64 65 66 69 6e 65 20 44 52 | 10.#define DR|
00000670 49 56 45 52 5f 42 52 45 41 4b 20 20 20 20 20 20 |IVER_BREAK |
00000680 20 20 20 31 31 0a 23 64 65 66 69 6e 65 20 44 52 | 11.#define DR|
00000690 49 56 45 52 5f 45 58 41 4d 49 4e 45 20 20 20 20 |IVER_EXAMINE |
000006a0 20 20 20 31 32 0a 23 64 65 66 69 6e 65 20 44 52 | 12.#define DR|
000006b0 49 56 45 52 5f 54 58 53 50 45 45 44 20 20 20 20 |IVER_TXSPEED |
000006c0 20 20 20 31 33 0a 23 64 65 66 69 6e 65 20 44 52 | 13.#define DR|
000006d0 49 56 45 52 5f 52 58 53 50 45 45 44 20 20 20 20 |IVER_RXSPEED |
000006e0 20 20 20 31 34 0a 23 64 65 66 69 6e 65 20 44 52 | 14.#define DR|
000006f0 49 56 45 52 5f 57 4f 52 44 46 4f 52 4d 41 54 20 |IVER_WORDFORMAT |
00000700 20 20 20 31 35 0a 23 64 65 66 69 6e 65 20 44 52 | 15.#define DR|
00000710 49 56 45 52 5f 46 4c 4f 57 43 4f 4e 54 52 4f 4c |IVER_FLOWCONTROL|
00000720 20 20 20 31 36 0a 23 64 65 66 69 6e 65 20 44 52 | 16.#define DR|
00000730 49 56 45 52 5f 49 4e 49 54 49 41 4c 49 53 45 20 |IVER_INITIALISE |
00000740 20 20 20 31 37 0a 23 64 65 66 69 6e 65 20 44 52 | 17.#define DR|
00000750 49 56 45 52 5f 43 4c 4f 53 45 44 4f 57 4e 20 20 |IVER_CLOSEDOWN |
00000760 20 20 20 31 38 0a 23 64 65 66 69 6e 65 20 44 52 | 18.#define DR|
00000770 49 56 45 52 5f 50 4f 4c 4c 20 20 20 20 20 20 20 |IVER_POLL |
00000780 20 20 20 31 39 0a 23 64 65 66 69 6e 65 20 44 52 | 19.#define DR|
00000790 49 56 45 52 5f 53 45 4c 45 43 54 20 20 20 20 20 |IVER_SELECT |
000007a0 20 20 20 32 30 0a 0a 23 64 65 66 69 6e 65 20 64 | 20..#define d|
000007b0 72 69 76 65 72 5f 74 78 73 70 65 65 64 28 74 78 |river_txspeed(tx|
000007c0 29 20 20 20 20 20 28 2a 64 72 69 76 65 72 29 28 |) (*driver)(|
000007d0 44 52 49 56 45 52 5f 54 58 53 50 45 45 44 2c 70 |DRIVER_TXSPEED,p|
000007e0 6f 72 74 6e 75 6d 62 65 72 2c 74 78 29 0a 23 64 |ortnumber,tx).#d|
000007f0 65 66 69 6e 65 20 64 72 69 76 65 72 5f 72 78 73 |efine driver_rxs|
00000800 70 65 65 64 28 72 78 29 20 20 20 20 20 28 2a 64 |peed(rx) (*d|
00000810 72 69 76 65 72 29 28 44 52 49 56 45 52 5f 52 58 |river)(DRIVER_RX|
00000820 53 50 45 45 44 2c 70 6f 72 74 6e 75 6d 62 65 72 |SPEED,portnumber|
00000830 2c 72 78 29 0a 23 64 65 66 69 6e 65 20 64 72 69 |,rx).#define dri|
00000840 76 65 72 5f 77 6f 72 64 66 6f 72 6d 61 74 28 77 |ver_wordformat(w|
00000850 29 20 20 20 28 2a 64 72 69 76 65 72 29 28 44 52 |) (*driver)(DR|
00000860 49 56 45 52 5f 57 4f 52 44 46 4f 52 4d 41 54 2c |IVER_WORDFORMAT,|
00000870 70 6f 72 74 6e 75 6d 62 65 72 2c 77 29 0a 23 64 |portnumber,w).#d|
00000880 65 66 69 6e 65 20 64 72 69 76 65 72 5f 66 6c 6f |efine driver_flo|
00000890 77 63 6f 6e 74 72 6f 6c 28 66 29 20 20 28 2a 64 |wcontrol(f) (*d|
000008a0 72 69 76 65 72 29 28 44 52 49 56 45 52 5f 46 4c |river)(DRIVER_FL|
000008b0 4f 57 43 4f 4e 54 52 4f 4c 2c 70 6f 72 74 6e 75 |OWCONTROL,portnu|
000008c0 6d 62 65 72 2c 66 29 0a 23 64 65 66 69 6e 65 20 |mber,f).#define |
000008d0 64 72 69 76 65 72 5f 69 6e 69 74 69 61 6c 69 73 |driver_initialis|
000008e0 65 28 29 20 20 20 20 28 2a 64 72 69 76 65 72 29 |e() (*driver)|
000008f0 28 44 52 49 56 45 52 5f 49 4e 49 54 49 41 4c 49 |(DRIVER_INITIALI|
00000900 53 45 2c 70 6f 72 74 6e 75 6d 62 65 72 29 0a 23 |SE,portnumber).#|
00000910 64 65 66 69 6e 65 20 64 72 69 76 65 72 5f 63 6c |define driver_cl|
00000920 6f 73 65 64 6f 77 6e 28 29 20 20 20 20 20 28 2a |osedown() (*|
00000930 64 72 69 76 65 72 29 28 44 52 49 56 45 52 5f 43 |driver)(DRIVER_C|
00000940 4c 4f 53 45 44 4f 57 4e 2c 70 6f 72 74 6e 75 6d |LOSEDOWN,portnum|
00000950 62 65 72 29 0a 23 64 65 66 69 6e 65 20 64 72 69 |ber).#define dri|
00000960 76 65 72 5f 70 6f 6c 6c 28 29 20 20 20 20 20 20 |ver_poll() |
00000970 20 20 20 20 28 2a 64 72 69 76 65 72 29 28 44 52 | (*driver)(DR|
00000980 49 56 45 52 5f 50 4f 4c 4c 2c 70 6f 72 74 6e 75 |IVER_POLL,portnu|
00000990 6d 62 65 72 29 0a |mber).|
00000996 
.