osfmk/i386/hibernate_restore.c

   1 /*
   2  * Copyright (c) 2008 Apple Inc. All rights reserved.
   3  *
   4  * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
   5  *
   6  * This file contains Original Code and/or Modifications of Original Code
   7  * as defined in and that are subject to the Apple Public Source License
   8  * Version 2.0 (the 'License'). You may not use this file except in
   9  * compliance with the License. The rights granted to you under the License
  10  * may not be used to create, or enable the creation or redistribution of,
  11  * unlawful or unlicensed copies of an Apple operating system, or to
  12  * circumvent, violate, or enable the circumvention or violation of, any
  13  * terms of an Apple operating system software license agreement.
  14  *
  15  * Please obtain a copy of the License at
  16  * http://www.opensource.apple.com/apsl/ and read it before using this file.
  17  *
  18  * The Original Code and all software distributed under the License are
  19  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  20  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  21  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  22  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  23  * Please see the License for the specific language governing rights and
  24  * limitations under the License.
  25  *
  26  * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
  27  */
  28 #include <i386/pmap.h>
  29 #include <i386/proc_reg.h>
  30 #include <IOKit/IOHibernatePrivate.h>
  31
  32 #include <i386/pal_hibernate.h>
  33
  34 extern pd_entry_t BootstrapPTD[2048];
  35
  36 #define TWO_MEG_MASK 0xFFFFFFFFFFE00000ULL
  37 #define FOUR_K_MASK 0xFFFFFFFFFFFFF000ULL
  38
  39 // src is virtually mapped, not page aligned,
  40 // dst is a physical 4k page aligned ptr, len is one 4K page
  41 // src & dst will not overlap
  42
  43 uintptr_t
  44 hibernate_restore_phys_page(uint64_t src, uint64_t dst, uint32_t len, uint32_t procFlags)
  45 {
  46         (void)procFlags;
  47         uint64_t * d;
  48         uint64_t * s;
  49         uint32_t idx;
  50
  51         if (src == 0)
  52                 return (uintptr_t)dst;
  53
  54         d = (uint64_t *)pal_hib_map(DEST_COPY_AREA, dst);
  55         s = (uint64_t *) (uintptr_t)src;
  56
  57         for (idx = 0; idx < (len / (uint32_t)sizeof(uint64_t)); idx++)
  58                 d[idx] = s[idx];
  59
  60         return (uintptr_t)d;
  61 }
  62 #undef hibprintf
  63
  64 void hibprintf(const char *fmt, ...);
  65
  66 void
  67 pal_hib_window_setup(ppnum_t page)
  68 {
  69         uint64_t *pp;
  70         uint64_t phys = ptoa_64(page);
  71         int i;
  72
  73         BootstrapPTD[2047] = (phys & ~((uint64_t)I386_LPGMASK)) | INTEL_PTE_PS  | INTEL_PTE_VALID | INTEL_PTE_WRITE;
  74
  75         invlpg(HIB_PTES);
  76
  77         pp = (uint64_t *)(uintptr_t)(HIB_PTES + (phys & I386_LPGMASK));
  78
  79         for(i=0;i<512;i++)
  80                 *pp = 0;
  81
  82         pp[0] = phys | INTEL_PTE_VALID | INTEL_PTE_WRITE;
  83         BootstrapPTD[2047] = phys | INTEL_PTE_VALID | INTEL_PTE_WRITE;
  84
  85         invlpg(HIB_PTES);
  86 }
  87
  88 uintptr_t
  89 pal_hib_map(uintptr_t v, uint64_t p)
  90 {
  91         int index;
  92
  93         switch(v) {
  94                 case DEST_COPY_AREA:
  95                         index = 1;
  96                         break;
  97                 case SRC_COPY_AREA:
  98                         index = 2;
  99                         break;
 100                 case COPY_PAGE_AREA:
 101                         index = 3;
 102                         break;
 103                 default:
 104                         index = -1;
 105                         asm("cli;hlt;");
 106         }
 107
 108         uint64_t *ptes = (uint64_t *)HIB_PTES;
 109
 110         /* Outside 1-1 4G map so set up the mappings for the dest page using 2MB pages */
 111         ptes[index] = (p & FOUR_K_MASK) | INTEL_PTE_VALID | INTEL_PTE_WRITE;
 112
 113         /* Invalidate the page tables for this */
 114         invlpg((uintptr_t)v);
 115
 116         return v;
 117 }
 118
 119 void hibernateRestorePALState(uint32_t *arg)
 120 {
 121         (void)arg;
 122 }
 123 void
 124 pal_hib_patchup(void)
 125 {
 126 }