osfmk/ppc/hibernate_ppc.c

   1 /*
   2  * Copyright (c) 2004-2005 Apple Computer, 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
  29 #include <kern/kern_types.h>
  30 #include <kern/kalloc.h>
  31 #include <kern/machine.h>
  32 #include <kern/misc_protos.h>
  33 #include <kern/thread.h>
  34 #include <kern/processor.h>
  35 #include <mach/machine.h>
  36 #include <mach/processor_info.h>
  37 #include <mach/mach_types.h>
  38 #include <ppc/proc_reg.h>
  39 #include <ppc/misc_protos.h>
  40 #include <ppc/machine_routines.h>
  41 #include <ppc/machine_cpu.h>
  42 #include <ppc/exception.h>
  43 #include <ppc/asm.h>
  44 #include <ppc/hw_perfmon.h>
  45 #include <pexpert/pexpert.h>
  46 #include <kern/cpu_data.h>
  47 #include <ppc/mappings.h>
  48 #include <ppc/Diagnostics.h>
  49 #include <ppc/trap.h>
  50 #include <ppc/mem.h>
  51 #include <IOKit/IOPlatformExpert.h>
  52 #include <IOKit/IOHibernatePrivate.h>
  53 #include <vm/vm_page.h>
  54
  55 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
  56
  57 hibernate_page_list_t *
  58 hibernate_page_list_allocate(void)
  59 {
  60     vm_size_t               size;
  61     uint32_t                bank;
  62     uint32_t                pages, page_count;
  63     hibernate_page_list_t * list;
  64     hibernate_bitmap_t *    bitmap;
  65
  66     page_count = 0;
  67     size = sizeof(hibernate_page_list_t);
  68
  69     for (bank = 0; bank < (uint32_t) pmap_mem_regions_count; bank++)
  70     {
  71         size += sizeof(hibernate_bitmap_t);
  72         pages = pmap_mem_regions[bank].mrEnd + 1 - pmap_mem_regions[bank].mrStart;
  73         page_count += pages;
  74         size += ((pages + 31) >> 5) * sizeof(uint32_t);
  75     }
  76
  77     list = kalloc(size);
  78     if (!list)
  79         return (list);
  80
  81     list->list_size  = size;
  82     list->page_count = page_count;
  83     list->bank_count = pmap_mem_regions_count;
  84
  85     bitmap = &list->bank_bitmap[0];
  86     for (bank = 0; bank < list->bank_count; bank++)
  87     {
  88         bitmap->first_page  =  pmap_mem_regions[bank].mrStart;
  89         bitmap->last_page   =  pmap_mem_regions[bank].mrEnd;
  90         bitmap->bitmapwords = (pmap_mem_regions[bank].mrEnd + 1
  91                              - pmap_mem_regions[bank].mrStart + 31) >> 5;
  92
  93         bitmap = (hibernate_bitmap_t *) &bitmap->bitmap[bitmap->bitmapwords];
  94     }
  95     return (list);
  96 }
  97
  98 void
  99 hibernate_page_list_setall_machine(hibernate_page_list_t * page_list,
 100                                     hibernate_page_list_t * page_list_wired,
 101                                     uint32_t * pagesOut)
 102 {
 103     uint32_t page, count, PCAsize;
 104
 105     /* Get total size of PCA table */
 106     PCAsize = round_page((hash_table_size / PerProcTable[0].ppe_vaddr->pf.pfPTEG)
 107                           * sizeof(PCA_t));
 108
 109     page = atop_64(hash_table_base - PCAsize);
 110     count = atop_64(hash_table_size + PCAsize);
 111
 112     hibernate_set_page_state(page_list, page_list_wired, page, count, 0);
 113     pagesOut -= count;
 114
 115     HIBLOG("removed hash, pca: %d pages\n", count);
 116
 117     save_snapshot();
 118 }
 119
 120 // mark pages not to be saved and not for scratch usage during restore
 121 void
 122 hibernate_page_list_set_volatile(__unused hibernate_page_list_t *page_list,
 123                                  __unused hibernate_page_list_t *page_list_wired,
 124                                  __unused uint32_t *pagesOut)
 125 {
 126 }
 127
 128 kern_return_t
 129 hibernate_processor_setup(IOHibernateImageHeader * header)
 130 {
 131     header->processorFlags = PerProcTable[0].ppe_vaddr->pf.Available;
 132
 133     PerProcTable[0].ppe_vaddr->hibernate = 1;
 134
 135     return (KERN_SUCCESS);
 136 }
 137
 138 void
 139 hibernate_vm_lock(void)
 140 {
 141     if (getPerProc()->hibernate)
 142     {
 143         vm_page_lock_queues();
 144         lck_mtx_lock(&vm_page_queue_free_lock);
 145     }
 146 }
 147
 148 void
 149 hibernate_vm_unlock(void)
 150 {
 151     if (getPerProc()->hibernate)
 152     {
 153         lck_mtx_unlock(&vm_page_queue_free_lock);
 154         vm_page_unlock_queues();
 155     }
 156 }
 157
 158 void ml_ppc_sleep(void)
 159 {
 160     struct per_proc_info *proc_info;
 161     boolean_t dohalt;
 162
 163     proc_info = getPerProc();
 164     if (!proc_info->hibernate)
 165     {
 166         ml_ppc_do_sleep();
 167         return;
 168     }
 169
 170     {
 171         uint64_t start, end, nsec;
 172
 173         HIBLOG("mapping_hibernate_flush start\n");
 174         clock_get_uptime(&start);
 175
 176         mapping_hibernate_flush();
 177
 178         clock_get_uptime(&end);
 179         absolutetime_to_nanoseconds(end - start, &nsec);
 180         HIBLOG("mapping_hibernate_flush time: %qd ms\n", nsec / 1000000ULL);
 181     }
 182
 183     dohalt = hibernate_write_image();
 184
 185     if (dohalt)
 186     {
 187         // off
 188         HIBLOG("power off\n");
 189         if (PE_halt_restart)
 190             (*PE_halt_restart)(kPEHaltCPU);
 191     }
 192     else
 193     {
 194         // sleep
 195         HIBLOG("sleep\n");
 196
 197         // should we come back via regular wake, set the state in memory.
 198         PerProcTable[0].ppe_vaddr->hibernate = 0;
 199
 200         PE_cpu_machine_quiesce(proc_info->cpu_id);
 201         return;
 202     }
 203 }
 204
 205 void
 206 hibernate_newruntime_map(__unused void * map,
 207                          __unused vm_size_t map_size,
 208                          __unused uint32_t runtime_offset)
 209 {
 210 }