This commit was generated by cvs2git to track changes on a CVS vendor branch.

s/PCCardFS

+; Copyright 1996 Acorn Computers Ltd
+;
+; Licensed under the Apache License, Version 2.0 (the "License");
+; you may not use this file except in compliance with the License.
+; You may obtain a copy of the License at
+;
+;     http://www.apache.org/licenses/LICENSE-2.0
+;
+; Unless required by applicable law or agreed to in writing, software
+; distributed under the License is distributed on an "AS IS" BASIS,
+; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+; See the License for the specific language governing permissions and
+; limitations under the License.
+;
+;-------------------------------------------------------------------------
+;
+; PCCardFS_entry
+;
+; Entry point for PCMCIA cards.
+PCCardFS_entry
+
+        TEQ     r0,#FreeReason_GetName
+        BEQ     PCCardFS_GetName
+        TEQ     r0,#FreeReason_GetSpace
+        BEQ     PCCardFS_GetSpace
+        TEQ     r0,#FreeReason_ComparePath
+        BEQ     PCCardFS_ComparePath
+
+        Pull    "PC"
+
+;-----------------------------------------------------------------------
+; PCCardFS_GetName
+;
+; Put the name of the drive specified in r3 into the buffer at r2
+;
+PCCardFS_GetName
+
+        Push    "r1-r3"
+
+        Debug   xx,"Get name"
+
+        MOV     r0,r3
+        ADR     r1,disc_desc
+        SWI     XPCCardFS_DescribeDisc
+        Pull    "r1-r3,PC",VS
+
+        Debug   xx,"Get name- SWI OK"
+
+        ADD     r4,r1,#22
+
+      [ Version >= 4               ; Cope with unnamed discs
+        LDRB    r14,[r4]
+        CMP     r14,#" "
+        MOVLE   r14,#":"
+        STRLEB  r14,[r2],#1
+        MOVLE   r4,r3
+      ]
+
+        MOV     r0,r2
+      [ Version >= 4
+        MOV     r3,#10             ; Max length
+        BL      copy_r0r4r3_space  ; Copy name to buffer
+      |
+        BL      copy_r0r4_null     ; Copy name to buffer
+      ]
+
+        MOV     r0,#11             ; Name is 10 chars + terminator.
+
+        Debug   xx,"r0 set ",r0
+
+        Pull    "r1-r3,PC"
+;-----------------------------------------------------------------------
+; PCCardFS_GetSpace
+;
+; Put the free space on the drive specified in r3 into the buffer at r2
+;
+PCCardFS_GetSpace
+
+        Push    "r1-r3"
+
+        Debug   xx,"Get space"
+
+
+        MOV     r0,r3
+        ADR     r1,disc_desc
+        SWI     XPCCardFS_DescribeDisc
+        Pull    "r1-r3,PC",VS
+
+        LDR     r0,[r1,#16]        ; Store disc size in buffer.
+        STR     r0,[r2]
+
+        MOV     r0,r3
+        SWI     XPCCardFS_FreeSpace
+        Pull    "r1-r3,PC",VS
+
+        STR     r0,[r2,#4]         ; Free space
+        LDR     r1,[r2]
+        SUB     r1,r1,r0
+        STR     r1,[r2,#8]         ; used space
+
+        Pull    "r1-r3,PC"
+
+
+;-------------------------------------------------------------------------
+; PCCardFS_ComparePath
+;
+;
+
+PCCardFS_ComparePath
+
+        Push  "r0-r9"
+
+        Debug  xx,"PCCardFS compare path"
+
+        ADR    r1,dataarea
+01
+        LDRB   r0,[r2],#1
+        CMP    r0,#"."
+        Debug  xx,"Copy ",r0
+        MOVEQ  r0,#0
+        STRB   r0,[r1],#1
+        CMP    r0,#0
+        BNE    %BT01            ; Copy to first "."
+
+        ADR    r3,dataarea
+        MOV    r2,r3
+        Push   "PC"
+        B      PCCardFS_GetName
+        MOV    r0,r0
+        Debug  xx,"Got name ",r0
+
+        ADR    r2,dataarea
+        LDR    r3,[sp,#3*4]
+        CMPSTR r2,r3
+
+        Pull   "r0-r9,PC"
+
+        LNK     s.SWIs