home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / comp / sys / mac / programm / 20225 < prev    next >
Encoding:
Internet Message Format  |  1992-12-22  |  2.7 KB
  1. Path: sparky!uunet!usc!sdd.hp.com!think.com!yale.edu!spool.mu.edu!olivea!apple!goofy!mumbo.apple.com!gallant.apple.com!seuss.apple.com!user
  2. From: absurd@apple.apple.com (Tim Dierks, software saboteur)
  3. Newsgroups: comp.sys.mac.programmer
  4. Subject: Re: Problem with patch to HFSDispatch
  5. Message-ID: <absurd-221292190600@seuss.apple.com>
  6. Date: 23 Dec 92 03:10:35 GMT
  7. References: <1992Dec22.182710.26751@panix.com>
  8. Sender: news@gallant.apple.com
  9. Followup-To: comp.sys.mac.programmer
  10. Organization: MacDTS Marauders
  11. Lines: 59
  12.  
  13. In article <1992Dec22.182710.26751@panix.com>, rmah@panix.com (Robert Mah)
  14. wrote:
  15. > 
  16. > In an extension that works fine on most systems, but some people seem to 
  17. > be getting freezes when they shut down/restart their machine.  I'm not 
  18. > sure, but I think it might be related to my patching HFSDispatch.
  19. > 
  20. > I'm using register a1 to hold the adress of the real trap -- is there
  21. > something wrong with this?  Anyone care to comment?
  22. > 
  23. > Some code...
  24. > 
  25. > /* 
  26. >  *  We need to trap whenever the user moves a directory (selector 5).
  27. >  */
  28. > pascal void FSDispatchPatch()
  29. > {
  30. >     asm{
  31. >         movem.l  a4, -(sp)                 ; save registers
  32. >         lea      main, a4                  ; setup globals
  33. >         cmp.w    #5, d0                    ; if not CatMove
  34. >         bne.s    @1 
  35. >         move.w   #1, gNeedsUpdate          ; set the gNeedsUpdate flag
  36. > @1      move.l   realHFSDispatchTrap, a1   ; grab the addr of the real thing
  37. >         movem.l  (sp)+, a4                 ; restore registers
  38. >         jmp      (a1)                      ; jump to real HFSDispatch
  39. >     }
  40. > }
  41.  
  42. Your problem is that you're destroying A1; it's used as a parameter by
  43. some HFSDispatch selectors.
  44.  
  45. While you could do this by trashing a different register, which isn't
  46. used, you could always use the slightly more complex but somewhat more
  47. clever method.
  48.  
  49.           clr.l    -(sp)                     ; save room for forwarding
  50. address   
  51. >         movem.l  a4, -(sp)                 ; save registers
  52. >         lea      main, a4                  ; setup globals
  53. >         cmp.w    #5, d0                    ; if not CatMove
  54. >         bne.s    @1 
  55. >         move.w   #1, gNeedsUpdate          ; set the gNeedsUpdate flag
  56.   @1      move.l   realHFSDispatchTrap,4(a7) ; store forwarding address on
  57. stack
  58. >         movem.l  (sp)+, a4                 ; restore registers
  59.           rts                                ; jump to real HFSDispatch
  60.  
  61. Note that this preserves all the registers by using the trick of using
  62. an RTS to pop the jump address off of the stack, allowing you to restore
  63. all your registers first.
  64.  
  65. (Well, I always thought it was neat, anyway.)
  66.  
  67. Have a great holiday, one and all- I'm off to home till Jan 6; I'll
  68. be gone (netwise) till then.
  69.  
  70. Tim Dierks
  71. MacDTS pinball addict
  72.