home *** CD-ROM | disk | FTP | other *** search
- ;>s.pppMod
-
- ; (c) Andrew Draper 1993
- ; This code may be distributed freely as long as no
- ; charge is made (except a small charge for the
- ; media involved).
-
- ; Interface to Internet ppp modules
-
- a1 RN 0
- a2 RN 1
- a3 RN 2
- a4 RN 3
- v1 RN 4
- v2 RN 5
- v3 RN 6
- v4 RN 7
- v5 RN 8
- v6 RN 9
- sl RN 10
- fp RN 11
- ip RN 12
- sp RN 13
- lr RN 14
- pc RN 15
-
- ;;; Change the SWI numbers once I get an allocation from Acorn
- ;;; Use KA9QDriver interface if I write that
-
- XPPP_RawInit * &AFF10
- XPPP_RawTXPacket * &AFF11
- XPPP_RawRXPacket * &AFF12
- XPPP_RawClose * &AFF13
-
- AREA |C$$code|, CODE, READONLY
-
- EXPORT pppmod_txpacket
- pppmod_txpacket
- SWI XPPP_RawTXPacket
- MOVVC a1,#0
- MOV pc,lr
-
-
- EXPORT pppmod_rxpacket
- pppmod_rxpacket
- SWI XPPP_RawRXPacket
- MOVVS a1,#-1
- MOV pc,lr
-
-
- EXPORT pppmod_close
- pppmod_close
- SWI XPPP_RawClose
- MOVVC a1,#0
- MOV pc,lr
-
-
- EXPORT pppmod_find
- pppmod_find
- STMFD sp!,{v1-v2,lr}
- MOV v1,a3
- MOV v2,a4
- SWI XPPP_RawInit
- MOVVS a1,#-2
- MOVVS a3,#0
- MOVVS a4,#0
- STR a3,[v1]
- STR a4,[v2]
- LDMFD sp!,{v1-v2,pc}
-
- END
-