xnu-1699.32.7.tar.gz

[apple/xnu.git] / bsd / kern / mach_fat.c

diff --git a/bsd/kern/mach_fat.c b/bsd/kern/mach_fat.c
index 6ccadf16e2c8667d959c66dae111239a74082370..9811047d7500d8b9c5edc6ef159e5ae8a72dee5f 100644 (file)
--- a/bsd/kern/mach_fat.c
+++ b/bsd/kern/mach_fat.c
@@ -1,16 +1,19 @@
 /*
 /*

- * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
+ * Copyright (c) 1991-2005 Apple Computer, Inc. All rights reserved.

  *
  *

- * @APPLE_LICENSE_HEADER_START@
- * 
- * Copyright (c) 1999-2003 Apple Computer, Inc.  All Rights Reserved.
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_START@

  * 
  * This file contains Original Code and/or Modifications of Original Code
  * as defined in and that are subject to the Apple Public Source License
  * Version 2.0 (the 'License'). You may not use this file except in
  * 
  * This file contains Original Code and/or Modifications of Original Code
  * as defined in and that are subject to the Apple Public Source License
  * Version 2.0 (the 'License'). You may not use this file except in

- * compliance with the License. Please obtain a copy of the License at
- * http://www.opensource.apple.com/apsl/ and read it before using this
- * file.
+ * compliance with the License. The rights granted to you under the License
+ * may not be used to create, or enable the creation or redistribution of,
+ * unlawful or unlicensed copies of an Apple operating system, or to
+ * circumvent, violate, or enable the circumvention or violation of, any
+ * terms of an Apple operating system software license agreement.
+ * 
+ * Please obtain a copy of the License at
+ * http://www.opensource.apple.com/apsl/ and read it before using this file.

  * 
  * The Original Code and all software distributed under the License are
  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  * 
  * The Original Code and all software distributed under the License are
  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER


@@ -20,17 +23,8 @@
  * Please see the License for the specific language governing rights and
  * limitations under the License.
  * 
  * Please see the License for the specific language governing rights and
  * limitations under the License.
  * 

- * @APPLE_LICENSE_HEADER_END@
- */
-/* Copyright (c) 1991 NeXT Computer, Inc.  All rights reserved.
- *
- *     File:   kern/mach_fat.c
- *     Author: Peter King
- *
- *     Fat file support routines.
- *
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_END@

  */
  */

-

 #include <sys/param.h>
 #include <sys/types.h>
 #include <sys/uio.h>
 #include <sys/param.h>
 #include <sys/types.h>
 #include <sys/uio.h>


@@ -41,43 +35,55 @@
 #include <kern/cpu_number.h>
 #include <mach-o/fat.h>
 #include <kern/mach_loader.h>
 #include <kern/cpu_number.h>
 #include <mach-o/fat.h>
 #include <kern/mach_loader.h>

-#include <architecture/byte_order.h>
-
+#include <kern/mach_fat.h>
+#include <libkern/OSByteOrder.h>
+#include <machine/exec.h>

 
 /**********************************************************************
 
 /**********************************************************************

- * Routine:    fatfile_getarch()
+ * Routine:    fatfile_getarch2()

  *
  * Function:   Locate the architecture-dependant contents of a fat
  *             file that match this CPU.
  *
  * Args:       vp:             The vnode for the fat file.
  *             header:         A pointer to the fat file header.
  *
  * Function:   Locate the architecture-dependant contents of a fat
  *             file that match this CPU.
  *
  * Args:       vp:             The vnode for the fat file.
  *             header:         A pointer to the fat file header.

+ *             req_cpu_type:   The required cpu type.
+ *             mask_bits:      Bits to mask from the sub-image type when
+ *                             grading it vs. the req_cpu_type

  *             archret (out):  Pointer to fat_arch structure to hold
  *                             the results.
  *
  * Returns:    KERN_SUCCESS:   Valid architecture found.
  *             KERN_FAILURE:   No valid architecture found.
  **********************************************************************/
  *             archret (out):  Pointer to fat_arch structure to hold
  *                             the results.
  *
  * Returns:    KERN_SUCCESS:   Valid architecture found.
  *             KERN_FAILURE:   No valid architecture found.
  **********************************************************************/

-load_return_t
-fatfile_getarch(
-       struct vnode            *vp,
-       vm_offset_t     data_ptr,
-       struct fat_arch         *archret)
+static load_return_t
+fatfile_getarch2(
+#if 0
+       struct vnode    *vp,
+#else
+       __unused struct vnode   *vp,
+#endif
+       vm_offset_t     data_ptr,
+       cpu_type_t      req_cpu_type,
+       cpu_type_t      mask_bits,
+       struct fat_arch *archret)

 {
        /* vm_pager_t           pager; */
        vm_offset_t             addr;
        vm_size_t               size;
 {
        /* vm_pager_t           pager; */
        vm_offset_t             addr;
        vm_size_t               size;

-       kern_return_t           kret;

        load_return_t           lret;
        load_return_t           lret;

-       struct machine_slot     *ms;

        struct fat_arch         *arch;
        struct fat_arch         *best_arch;
        int                     grade;
        int                     best_grade;
        int                     nfat_arch;
        struct fat_arch         *arch;
        struct fat_arch         *best_arch;
        int                     grade;
        int                     best_grade;
        int                     nfat_arch;

-       int                     end_of_archs;
+       off_t                   end_of_archs;
+       cpu_type_t              testtype;
+       cpu_type_t              testsubtype;

        struct fat_header       *header;
        struct fat_header       *header;

+#if 0

        off_t filesize;
        off_t filesize;

+#endif

 
        /*
         *      Get the pager for the file.
 
        /*
         *      Get the pager for the file.


@@ -89,10 +95,10 @@ fatfile_getarch(
         *      Map portion that must be accessible directly into
         *      kernel's map.
         */
         *      Map portion that must be accessible directly into
         *      kernel's map.
         */

-       nfat_arch = NXSwapBigLongToHost(header->nfat_arch);
+       nfat_arch = OSSwapBigToHostInt32(header->nfat_arch);

 
 

-       end_of_archs = sizeof(struct fat_header)
-               + nfat_arch * sizeof(struct fat_arch);
+       end_of_archs = (off_t)nfat_arch * sizeof(struct fat_arch) +
+                       sizeof(struct fat_header);

 #if 0
        filesize = ubc_getsize(vp);
        if (end_of_archs > (int)filesize) {
 #if 0
        filesize = ubc_getsize(vp);
        if (end_of_archs > (int)filesize) {


@@ -100,38 +106,57 @@ fatfile_getarch(
        }
 #endif
 
        }
 #endif
 

-       /* This is beacuse we are reading only 512 bytes */
-
-       if (end_of_archs > 512)
+       /*
+        * This check is limited on the top end because we are reading
+        * only PAGE_SIZE bytes
+        */
+       if (end_of_archs > PAGE_SIZE ||
+           end_of_archs < (off_t)(sizeof(struct fat_header)+sizeof(struct fat_arch)))

                return(LOAD_BADMACHO);
                return(LOAD_BADMACHO);

+

        /*
         *      Round size of fat_arch structures up to page boundry.
         */
        /*
         *      Round size of fat_arch structures up to page boundry.
         */

-       size = round_page_32(end_of_archs);
-       if (size <= 0)
+       size = round_page(end_of_archs);
+       if (size == 0)

                return(LOAD_BADMACHO);
 
        /*
                return(LOAD_BADMACHO);
 
        /*

-        * Scan the fat_arch's looking for the best one.
+        * Ignore LIB64 flag so that binary slices with the flag set
+        * don't choke in grade_binary.

         */
         */

+       mask_bits |= CPU_SUBTYPE_LIB64;
+
+       /*
+        * Scan the fat_arch's looking for the best one.  */

        addr = data_ptr;
        addr = data_ptr;

-       ms = &machine_slot[cpu_number()];

        best_arch = NULL;
        best_grade = 0;
        arch = (struct fat_arch *) (addr + sizeof(struct fat_header));
        for (; nfat_arch-- > 0; arch++) {
 
        best_arch = NULL;
        best_grade = 0;
        arch = (struct fat_arch *) (addr + sizeof(struct fat_header));
        for (; nfat_arch-- > 0; arch++) {
 

+               /* 
+                *      Collect flags from both cputype and cpusubtype 
+                */
+               testtype = OSSwapBigToHostInt32(arch->cputype) |
+                               (OSSwapBigToHostInt32(arch->cpusubtype) & 
+                                       CPU_SUBTYPE_MASK);
+               testsubtype = OSSwapBigToHostInt32(arch->cpusubtype) 
+                       & ~CPU_SUBTYPE_MASK;
+

                /*
                 *      Check to see if right cpu type.
                 */
                /*
                 *      Check to see if right cpu type.
                 */

-               if(NXSwapBigIntToHost(arch->cputype) != ms->cpu_type)
+               if((testtype & ~mask_bits) != req_cpu_type) {

                        continue;
                        continue;

+               }

 
                /*
 
                /*

-                *      Get the grade of the cpu subtype.
+                *      Get the grade of the cpu subtype (without feature flags)

                 */
                 */

-               grade = grade_cpu_subtype(
-                           NXSwapBigIntToHost(arch->cpusubtype));
+               grade = grade_binary(
+                               (testtype & ~CPU_SUBTYPE_LIB64), 
+                               testsubtype);

 
                /*
                 *      Remember it if it's the best we've seen.
 
                /*
                 *      Remember it if it's the best we've seen.


@@ -149,15 +174,15 @@ fatfile_getarch(
                lret = LOAD_BADARCH;
        } else {
                archret->cputype        =
                lret = LOAD_BADARCH;
        } else {
                archret->cputype        =

-                           NXSwapBigIntToHost(best_arch->cputype);
+                           OSSwapBigToHostInt32(best_arch->cputype);

                archret->cpusubtype     =
                archret->cpusubtype     =

-                           NXSwapBigIntToHost(best_arch->cpusubtype);
+                           OSSwapBigToHostInt32(best_arch->cpusubtype);

                archret->offset         =
                archret->offset         =

-                           NXSwapBigLongToHost(best_arch->offset);
+                           OSSwapBigToHostInt32(best_arch->offset);

                archret->size           =
                archret->size           =

-                           NXSwapBigLongToHost(best_arch->size);
+                           OSSwapBigToHostInt32(best_arch->size);

                archret->align          =
                archret->align          =

-                           NXSwapBigLongToHost(best_arch->align);
+                           OSSwapBigToHostInt32(best_arch->align);

 
                lret = LOAD_SUCCESS;
        }
 
                lret = LOAD_SUCCESS;
        }


@@ -168,4 +193,84 @@ fatfile_getarch(
        return(lret);
 }
 
        return(lret);
 }
 

+load_return_t
+fatfile_getarch_affinity(
+               struct vnode            *vp,
+               vm_offset_t             data_ptr,
+               struct fat_arch *archret,
+               int                             affinity)
+{
+               load_return_t lret;
+               int handler = (exec_archhandler_ppc.path[0] != 0);
+               cpu_type_t primary_type, fallback_type;
+
+               if (handler && affinity) {
+                               primary_type = CPU_TYPE_POWERPC;
+                               fallback_type = cpu_type();
+               } else {
+                               primary_type = cpu_type();
+                               fallback_type = CPU_TYPE_POWERPC;
+               }
+               /*
+                * Ignore all architectural bits when determining if an image
+                * in a fat file should be skipped or graded.
+                */
+               lret = fatfile_getarch2(vp, data_ptr, primary_type, 
+                               CPU_ARCH_MASK, archret);
+               if ((lret != 0) && handler) {
+                       lret = fatfile_getarch2(vp, data_ptr, fallback_type,
+                                               CPU_SUBTYPE_LIB64, archret);
+               }
+               return lret;
+}
+
+/**********************************************************************
+ * Routine:    fatfile_getarch()
+ *
+ * Function:   Locate the architecture-dependant contents of a fat
+ *             file that match this CPU.
+ *
+ * Args:       vp:             The vnode for the fat file.
+ *             header:         A pointer to the fat file header.
+ *             archret (out):  Pointer to fat_arch structure to hold
+ *                             the results.
+ *
+ * Returns:    KERN_SUCCESS:   Valid architecture found.
+ *             KERN_FAILURE:   No valid architecture found.
+ **********************************************************************/
+load_return_t
+fatfile_getarch(
+       struct vnode            *vp,
+       vm_offset_t     data_ptr,
+       struct fat_arch         *archret)
+{
+       return fatfile_getarch2(vp, data_ptr, cpu_type(), 
+                       CPU_SUBTYPE_LIB64, archret);
+}
+
+/**********************************************************************
+ * Routine:    fatfile_getarch_with_bits()
+ *
+ * Function:   Locate the architecture-dependant contents of a fat
+ *             file that match this CPU.
+ *
+ * Args:       vp:             The vnode for the fat file.
+ *             archbits:       Architecture specific feature bits
+ *             header:         A pointer to the fat file header.
+ *             archret (out):  Pointer to fat_arch structure to hold
+ *                             the results.
+ *
+ * Returns:    KERN_SUCCESS:   Valid architecture found.
+ *             KERN_FAILURE:   No valid architecture found.
+ **********************************************************************/
+load_return_t
+fatfile_getarch_with_bits(
+       struct vnode            *vp,
+       integer_t               archbits,
+       vm_offset_t     data_ptr,
+       struct fat_arch         *archret)
+{
+       return fatfile_getarch2(vp, data_ptr, archbits | cpu_type(), 
+                       CPU_SUBTYPE_LIB64, archret);
+}