fpmodule.c
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:5k
源码类别:

嵌入式Linux

开发平台:

Unix_Linux

  1. /*
  2.     NetWinder Floating Point Emulator
  3.     (c) Rebel.com, 1998-1999
  4.     (c) Philip Blundell, 1998-1999
  5.     Direct questions, comments to Scott Bambrough <scottb@netwinder.org>
  6.     This program is free software; you can redistribute it and/or modify
  7.     it under the terms of the GNU General Public License as published by
  8.     the Free Software Foundation; either version 2 of the License, or
  9.     (at your option) any later version.
  10.     This program is distributed in the hope that it will be useful,
  11.     but WITHOUT ANY WARRANTY; without even the implied warranty of
  12.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13.     GNU General Public License for more details.
  14.     You should have received a copy of the GNU General Public License
  15.     along with this program; if not, write to the Free Software
  16.     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  17. */
  18. #include "fpa11.h"
  19. #include <linux/module.h>
  20. #include <linux/version.h>
  21. #include <linux/config.h>
  22. /* XXX */
  23. #include <linux/types.h>
  24. #include <linux/kernel.h>
  25. #include <linux/signal.h>
  26. #include <linux/sched.h>
  27. #include <linux/init.h>
  28. /* XXX */
  29. #include "softfloat.h"
  30. #include "fpopcode.h"
  31. #include "fpmodule.h"
  32. #include "fpa11.inl"
  33. /* kernel symbols required for signal handling */
  34. typedef struct task_struct* PTASK;
  35. #ifdef MODULE
  36. void fp_send_sig(unsigned long sig, PTASK p, int priv);
  37. #if LINUX_VERSION_CODE > 0x20115
  38. MODULE_AUTHOR("Scott Bambrough <scottb@rebel.com>");
  39. MODULE_DESCRIPTION("NWFPE floating point emulator");
  40. #endif
  41. #else
  42. #define fp_send_sig send_sig
  43. #define kern_fp_enter fp_enter
  44. extern char fpe_type[];
  45. #endif
  46. /* kernel function prototypes required */
  47. void fp_setup(void);
  48. /* external declarations for saved kernel symbols */
  49. extern void (*kern_fp_enter)(void);
  50. /* Original value of fp_enter from kernel before patched by fpe_init. */ 
  51. static void (*orig_fp_enter)(void);
  52. /* forward declarations */
  53. extern void nwfpe_enter(void);
  54. #ifdef MODULE
  55. /*
  56.  * Return 0 if we can be unloaded.  This can only happen if
  57.  * kern_fp_enter is still pointing at nwfpe_enter
  58.  */
  59. static int fpe_unload(void)
  60. {
  61.   return (kern_fp_enter == nwfpe_enter) ? 0 : 1;
  62. }
  63. #endif
  64. static int __init fpe_init(void)
  65. {
  66.   if (sizeof(FPA11) > sizeof(union fp_state)) {
  67.     printk(KERN_ERR "nwfpe: bad structure sizen");
  68.     return -EINVAL;
  69.   }
  70.   if (sizeof(FPREG) != 12) {
  71.     printk(KERN_ERR "nwfpe: bad register sizen");
  72.     return -EINVAL;
  73.   }
  74. #ifdef MODULE
  75.   if (!mod_member_present(&__this_module, can_unload))
  76.     return -EINVAL;
  77.   __this_module.can_unload = fpe_unload;
  78. #else
  79.   if (fpe_type[0] && strcmp(fpe_type, "nwfpe"))
  80.     return 0;
  81. #endif
  82.   /* Display title, version and copyright information. */
  83.   printk(KERN_WARNING "NetWinder Floating Point Emulator V0.95 "
  84.  "(c) 1998-1999 Rebel.comn");
  85.   /* Save pointer to the old FP handler and then patch ourselves in */
  86.   orig_fp_enter = kern_fp_enter;
  87.   kern_fp_enter = nwfpe_enter;
  88.   return 0;
  89. }
  90. static void __exit fpe_exit(void)
  91. {
  92.   /* Restore the values we saved earlier. */
  93.   kern_fp_enter = orig_fp_enter;
  94. }
  95. /*
  96. ScottB:  November 4, 1998
  97. Moved this function out of softfloat-specialize into fpmodule.c.
  98. This effectively isolates all the changes required for integrating with the
  99. Linux kernel into fpmodule.c.  Porting to NetBSD should only require modifying
  100. fpmodule.c to integrate with the NetBSD kernel (I hope!).
  101. [1/1/99: Not quite true any more unfortunately.  There is Linux-specific
  102. code to access data in user space in some other source files at the 
  103. moment (grep for get_user / put_user calls).  --philb]
  104. float_exception_flags is a global variable in SoftFloat.
  105. This function is called by the SoftFloat routines to raise a floating
  106. point exception.  We check the trap enable byte in the FPSR, and raise
  107. a SIGFPE exception if necessary.  If not the relevant bits in the 
  108. cumulative exceptions flag byte are set and we return.
  109. */
  110. void float_raise(signed char flags)
  111. {
  112.   register unsigned int fpsr, cumulativeTraps;
  113.   
  114. #ifdef CONFIG_DEBUG_USER
  115.   printk(KERN_DEBUG "NWFPE: %s[%d] takes exception %08x at %p from %08xn",
  116.  current->comm, current->pid, flags,
  117.  __builtin_return_address(0), GET_USERREG()[15]);
  118. #endif
  119.   /* Keep SoftFloat exception flags up to date.  */
  120.   float_exception_flags |= flags;
  121.   /* Read fpsr and initialize the cumulativeTraps.  */
  122.   fpsr = readFPSR();
  123.   cumulativeTraps = 0;
  124.   
  125.   /* For each type of exception, the cumulative trap exception bit is only
  126.      set if the corresponding trap enable bit is not set.  */
  127.   if ((!(fpsr & BIT_IXE)) && (flags & BIT_IXC))
  128.      cumulativeTraps |= BIT_IXC;  
  129.   if ((!(fpsr & BIT_UFE)) && (flags & BIT_UFC))
  130.      cumulativeTraps |= BIT_UFC;  
  131.   if ((!(fpsr & BIT_OFE)) && (flags & BIT_OFC))
  132.      cumulativeTraps |= BIT_OFC;  
  133.   if ((!(fpsr & BIT_DZE)) && (flags & BIT_DZC))
  134.      cumulativeTraps |= BIT_DZC;  
  135.   if ((!(fpsr & BIT_IOE)) && (flags & BIT_IOC))
  136.      cumulativeTraps |= BIT_IOC;  
  137.   /* Set the cumulative exceptions flags.  */
  138.   if (cumulativeTraps)
  139.     writeFPSR(fpsr | cumulativeTraps);
  140.   /* Raise an exception if necessary.  */
  141.   if (fpsr & (flags << 16))
  142.     fp_send_sig(SIGFPE, current, 1);
  143. }
  144. module_init(fpe_init);
  145. module_exit(fpe_exit);