git.oblomov.eu Git - linux-2.6/blob - arch/powerpc/platforms/ps3/os-area.c

   1 /*
   2  *  PS3 flash memory os area.
   3  *
   4  *  Copyright (C) 2006 Sony Computer Entertainment Inc.
   5  *  Copyright 2006 Sony Corp.
   6  *
   7  *  This program is free software; you can redistribute it and/or modify
   8  *  it under the terms of the GNU General Public License as published by
   9  *  the Free Software Foundation; version 2 of the License.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program; if not, write to the Free Software
  18  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include <linux/kernel.h>
  22 #include <linux/io.h>
  23 #include <linux/workqueue.h>
  24 #include <linux/fs.h>
  25 #include <linux/syscalls.h>
  26 #include <linux/ctype.h>
  27
  28 #include <asm/lmb.h>
  29
  30 #include "platform.h"
  31
  32 enum {
  33         OS_AREA_SEGMENT_SIZE = 0X200,
  34 };
  35
  36 enum os_area_ldr_format {
  37         HEADER_LDR_FORMAT_RAW = 0,
  38         HEADER_LDR_FORMAT_GZIP = 1,
  39 };
  40
  41 #define OS_AREA_HEADER_MAGIC_NUM "cell_ext_os_area"
  42
  43 /**
  44  * struct os_area_header - os area header segment.
  45  * @magic_num: Always 'cell_ext_os_area'.
  46  * @hdr_version: Header format version number.
  47  * @db_area_offset: Starting segment number of other os database area.
  48  * @ldr_area_offset: Starting segment number of bootloader image area.
  49  * @ldr_format: HEADER_LDR_FORMAT flag.
  50  * @ldr_size: Size of bootloader image in bytes.
  51  *
  52  * Note that the docs refer to area offsets.  These are offsets in units of
  53  * segments from the start of the os area (top of the header).  These are
  54  * better thought of as segment numbers.  The os area of the os area is
  55  * reserved for the os image.
  56  */
  57
  58 struct os_area_header {
  59         u8 magic_num[16];
  60         u32 hdr_version;
  61         u32 db_area_offset;
  62         u32 ldr_area_offset;
  63         u32 _reserved_1;
  64         u32 ldr_format;
  65         u32 ldr_size;
  66         u32 _reserved_2[6];
  67 };
  68
  69 enum os_area_boot_flag {
  70         PARAM_BOOT_FLAG_GAME_OS = 0,
  71         PARAM_BOOT_FLAG_OTHER_OS = 1,
  72 };
  73
  74 enum os_area_ctrl_button {
  75         PARAM_CTRL_BUTTON_O_IS_YES = 0,
  76         PARAM_CTRL_BUTTON_X_IS_YES = 1,
  77 };
  78
  79 /**
  80  * struct os_area_params - os area params segment.
  81  * @boot_flag: User preference of operating system, PARAM_BOOT_FLAG flag.
  82  * @num_params: Number of params in this (params) segment.
  83  * @rtc_diff: Difference in seconds between 1970 and the ps3 rtc value.
  84  * @av_multi_out: User preference of AV output, PARAM_AV_MULTI_OUT flag.
  85  * @ctrl_button: User preference of controller button config, PARAM_CTRL_BUTTON
  86  *      flag.
  87  * @static_ip_addr: User preference of static IP address.
  88  * @network_mask: User preference of static network mask.
  89  * @default_gateway: User preference of static default gateway.
  90  * @dns_primary: User preference of static primary dns server.
  91  * @dns_secondary: User preference of static secondary dns server.
  92  *
  93  * The ps3 rtc maintains a read-only value that approximates seconds since
  94  * 2000-01-01 00:00:00 UTC.
  95  *
  96  * User preference of zero for static_ip_addr means use dhcp.
  97  */
  98
  99 struct os_area_params {
 100         u32 boot_flag;
 101         u32 _reserved_1[3];
 102         u32 num_params;
 103         u32 _reserved_2[3];
 104         /* param 0 */
 105         s64 rtc_diff;
 106         u8 av_multi_out;
 107         u8 ctrl_button;
 108         u8 _reserved_3[6];
 109         /* param 1 */
 110         u8 static_ip_addr[4];
 111         u8 network_mask[4];
 112         u8 default_gateway[4];
 113         u8 _reserved_4[4];
 114         /* param 2 */
 115         u8 dns_primary[4];
 116         u8 dns_secondary[4];
 117         u8 _reserved_5[8];
 118 };
 119
 120 #define OS_AREA_DB_MAGIC_NUM "-db-"
 121
 122 /**
 123  * struct os_area_db - Shared flash memory database.
 124  * @magic_num: Always '-db-'.
 125  * @version: os_area_db format version number.
 126  * @index_64: byte offset of the database id index for 64 bit variables.
 127  * @count_64: number of usable 64 bit index entries
 128  * @index_32: byte offset of the database id index for 32 bit variables.
 129  * @count_32: number of usable 32 bit index entries
 130  * @index_16: byte offset of the database id index for 16 bit variables.
 131  * @count_16: number of usable 16 bit index entries
 132  *
 133  * Flash rom storage for exclusive use by guests running in the other os lpar.
 134  * The current system configuration allocates 1K (two segments) for other os
 135  * use.
 136  */
 137
 138 struct os_area_db {
 139         u8 magic_num[4];
 140         u16 version;
 141         u16 _reserved_1;
 142         u16 index_64;
 143         u16 count_64;
 144         u16 index_32;
 145         u16 count_32;
 146         u16 index_16;
 147         u16 count_16;
 148         u32 _reserved_2;
 149         u8 _db_data[1000];
 150 };
 151
 152 /**
 153  * enum os_area_db_owner - Data owners.
 154  */
 155
 156 enum os_area_db_owner {
 157         OS_AREA_DB_OWNER_ANY = -1,
 158         OS_AREA_DB_OWNER_NONE = 0,
 159         OS_AREA_DB_OWNER_PROTOTYPE = 1,
 160         OS_AREA_DB_OWNER_LINUX = 2,
 161         OS_AREA_DB_OWNER_PETITBOOT = 3,
 162         OS_AREA_DB_OWNER_MAX = 32,
 163 };
 164
 165 enum os_area_db_key {
 166         OS_AREA_DB_KEY_ANY = -1,
 167         OS_AREA_DB_KEY_NONE = 0,
 168         OS_AREA_DB_KEY_RTC_DIFF = 1,
 169         OS_AREA_DB_KEY_VIDEO_MODE = 2,
 170         OS_AREA_DB_KEY_MAX = 8,
 171 };
 172
 173 struct os_area_db_id {
 174         int owner;
 175         int key;
 176 };
 177
 178 static const struct os_area_db_id os_area_db_id_empty = {
 179         .owner = OS_AREA_DB_OWNER_NONE,
 180         .key = OS_AREA_DB_KEY_NONE
 181 };
 182
 183 static const struct os_area_db_id os_area_db_id_any = {
 184         .owner = OS_AREA_DB_OWNER_ANY,
 185         .key = OS_AREA_DB_KEY_ANY
 186 };
 187
 188 static const struct os_area_db_id os_area_db_id_rtc_diff = {
 189         .owner = OS_AREA_DB_OWNER_LINUX,
 190         .key = OS_AREA_DB_KEY_RTC_DIFF
 191 };
 192
 193 static const struct os_area_db_id os_area_db_id_video_mode = {
 194         .owner = OS_AREA_DB_OWNER_LINUX,
 195         .key = OS_AREA_DB_KEY_VIDEO_MODE
 196 };
 197
 198 #define SECONDS_FROM_1970_TO_2000 946684800LL
 199
 200 /**
 201  * struct saved_params - Static working copies of data from the PS3 'os area'.
 202  *
 203  * The order of preference we use for the rtc_diff source:
 204  *  1) The database value.
 205  *  2) The game os value.
 206  *  3) The number of seconds from 1970 to 2000.
 207  */
 208
 209 struct saved_params {
 210         unsigned int valid;
 211         s64 rtc_diff;
 212         unsigned int av_multi_out;
 213 } static saved_params;
 214
 215 static struct property property_rtc_diff = {
 216         .name = "linux,rtc_diff",
 217         .length = sizeof(saved_params.rtc_diff),
 218         .value = &saved_params.rtc_diff,
 219 };
 220
 221 static struct property property_av_multi_out = {
 222         .name = "linux,av_multi_out",
 223         .length = sizeof(saved_params.av_multi_out),
 224         .value = &saved_params.av_multi_out,
 225 };
 226
 227 /**
 228  * os_area_set_property - Add or overwrite a saved_params value to the device tree.
 229  *
 230  * Overwrites an existing property.
 231  */
 232
 233 static void os_area_set_property(struct device_node *node,
 234         struct property *prop)
 235 {
 236         int result;
 237         struct property *tmp = of_find_property(node, prop->name, NULL);
 238
 239         if (tmp) {
 240                 pr_debug("%s:%d found %s\n", __func__, __LINE__, prop->name);
 241                 prom_remove_property(node, tmp);
 242         }
 243
 244         result = prom_add_property(node, prop);
 245
 246         if (result)
 247                 pr_debug("%s:%d prom_set_property failed\n", __func__,
 248                         __LINE__);
 249 }
 250
 251 /**
 252  * os_area_get_property - Get a saved_params value from the device tree.
 253  *
 254  */
 255
 256 static void __init os_area_get_property(struct device_node *node,
 257         struct property *prop)
 258 {
 259         const struct property *tmp = of_find_property(node, prop->name, NULL);
 260
 261         if (tmp) {
 262                 BUG_ON(prop->length != tmp->length);
 263                 memcpy(prop->value, tmp->value, prop->length);
 264         } else
 265                 pr_debug("%s:%d not found %s\n", __func__, __LINE__,
 266                         prop->name);
 267 }
 268
 269 static void dump_field(char *s, const u8 *field, int size_of_field)
 270 {
 271 #if defined(DEBUG)
 272         int i;
 273
 274         for (i = 0; i < size_of_field; i++)
 275                 s[i] = isprint(field[i]) ? field[i] : '.';
 276         s[i] = 0;
 277 #endif
 278 }
 279
 280 #define dump_header(_a) _dump_header(_a, __func__, __LINE__)
 281 static void _dump_header(const struct os_area_header *h, const char *func,
 282         int line)
 283 {
 284         char str[sizeof(h->magic_num) + 1];
 285
 286         dump_field(str, h->magic_num, sizeof(h->magic_num));
 287         pr_debug("%s:%d: h.magic_num:       '%s'\n", func, line,
 288                 str);
 289         pr_debug("%s:%d: h.hdr_version:     %u\n", func, line,
 290                 h->hdr_version);
 291         pr_debug("%s:%d: h.db_area_offset:  %u\n", func, line,
 292                 h->db_area_offset);
 293         pr_debug("%s:%d: h.ldr_area_offset: %u\n", func, line,
 294                 h->ldr_area_offset);
 295         pr_debug("%s:%d: h.ldr_format:      %u\n", func, line,
 296                 h->ldr_format);
 297         pr_debug("%s:%d: h.ldr_size:        %xh\n", func, line,
 298                 h->ldr_size);
 299 }
 300
 301 #define dump_params(_a) _dump_params(_a, __func__, __LINE__)
 302 static void _dump_params(const struct os_area_params *p, const char *func,
 303         int line)
 304 {
 305         pr_debug("%s:%d: p.boot_flag:       %u\n", func, line, p->boot_flag);
 306         pr_debug("%s:%d: p.num_params:      %u\n", func, line, p->num_params);
 307         pr_debug("%s:%d: p.rtc_diff         %ld\n", func, line, p->rtc_diff);
 308         pr_debug("%s:%d: p.av_multi_out     %u\n", func, line, p->av_multi_out);
 309         pr_debug("%s:%d: p.ctrl_button:     %u\n", func, line, p->ctrl_button);
 310         pr_debug("%s:%d: p.static_ip_addr:  %u.%u.%u.%u\n", func, line,
 311                 p->static_ip_addr[0], p->static_ip_addr[1],
 312                 p->static_ip_addr[2], p->static_ip_addr[3]);
 313         pr_debug("%s:%d: p.network_mask:    %u.%u.%u.%u\n", func, line,
 314                 p->network_mask[0], p->network_mask[1],
 315                 p->network_mask[2], p->network_mask[3]);
 316         pr_debug("%s:%d: p.default_gateway: %u.%u.%u.%u\n", func, line,
 317                 p->default_gateway[0], p->default_gateway[1],
 318                 p->default_gateway[2], p->default_gateway[3]);
 319         pr_debug("%s:%d: p.dns_primary:     %u.%u.%u.%u\n", func, line,
 320                 p->dns_primary[0], p->dns_primary[1],
 321                 p->dns_primary[2], p->dns_primary[3]);
 322         pr_debug("%s:%d: p.dns_secondary:   %u.%u.%u.%u\n", func, line,
 323                 p->dns_secondary[0], p->dns_secondary[1],
 324                 p->dns_secondary[2], p->dns_secondary[3]);
 325 }
 326
 327 static int verify_header(const struct os_area_header *header)
 328 {
 329         if (memcmp(header->magic_num, OS_AREA_HEADER_MAGIC_NUM,
 330                 sizeof(header->magic_num))) {
 331                 pr_debug("%s:%d magic_num failed\n", __func__, __LINE__);
 332                 return -1;
 333         }
 334
 335         if (header->hdr_version < 1) {
 336                 pr_debug("%s:%d hdr_version failed\n", __func__, __LINE__);
 337                 return -1;
 338         }
 339
 340         if (header->db_area_offset > header->ldr_area_offset) {
 341                 pr_debug("%s:%d offsets failed\n", __func__, __LINE__);
 342                 return -1;
 343         }
 344
 345         return 0;
 346 }
 347
 348 static int db_verify(const struct os_area_db *db)
 349 {
 350         if (memcmp(db->magic_num, OS_AREA_DB_MAGIC_NUM,
 351                 sizeof(db->magic_num))) {
 352                 pr_debug("%s:%d magic_num failed\n", __func__, __LINE__);
 353                 return -1;
 354         }
 355
 356         if (db->version != 1) {
 357                 pr_debug("%s:%d version failed\n", __func__, __LINE__);
 358                 return -1;
 359         }
 360
 361         return 0;
 362 }
 363
 364 struct db_index {
 365        uint8_t owner:5;
 366        uint8_t key:3;
 367 };
 368
 369 struct db_iterator {
 370         const struct os_area_db *db;
 371         struct os_area_db_id match_id;
 372         struct db_index *idx;
 373         struct db_index *last_idx;
 374         union {
 375                 uint64_t *value_64;
 376                 uint32_t *value_32;
 377                 uint16_t *value_16;
 378         };
 379 };
 380
 381 static unsigned int db_align_up(unsigned int val, unsigned int size)
 382 {
 383         return (val + (size - 1)) & (~(size - 1));
 384 }
 385
 386 /**
 387  * db_for_each_64 - Iterator for 64 bit entries.
 388  *
 389  * A NULL value for id can be used to match all entries.
 390  * OS_AREA_DB_OWNER_ANY and OS_AREA_DB_KEY_ANY can be used to match all.
 391  */
 392
 393 static int db_for_each_64(const struct os_area_db *db,
 394         const struct os_area_db_id *match_id, struct db_iterator *i)
 395 {
 396 next:
 397         if (!i->db) {
 398                 i->db = db;
 399                 i->match_id = match_id ? *match_id : os_area_db_id_any;
 400                 i->idx = (void *)db + db->index_64;
 401                 i->last_idx = i->idx + db->count_64;
 402                 i->value_64 = (void *)db + db->index_64
 403                         + db_align_up(db->count_64, 8);
 404         } else {
 405                 i->idx++;
 406                 i->value_64++;
 407         }
 408
 409         if (i->idx >= i->last_idx) {
 410                 pr_debug("%s:%d: reached end\n", __func__, __LINE__);
 411                 return 0;
 412         }
 413
 414         if (i->match_id.owner != OS_AREA_DB_OWNER_ANY
 415                 && i->match_id.owner != (int)i->idx->owner)
 416                 goto next;
 417         if (i->match_id.key != OS_AREA_DB_KEY_ANY
 418                 && i->match_id.key != (int)i->idx->key)
 419                 goto next;
 420
 421         return 1;
 422 }
 423
 424 static int db_delete_64(struct os_area_db *db, const struct os_area_db_id *id)
 425 {
 426         struct db_iterator i;
 427
 428         for (i.db = NULL; db_for_each_64(db, id, &i); ) {
 429
 430                 pr_debug("%s:%d: got (%d:%d) %llxh\n", __func__, __LINE__,
 431                         i.idx->owner, i.idx->key,
 432                         (unsigned long long)*i.value_64);
 433
 434                 i.idx->owner = 0;
 435                 i.idx->key = 0;
 436                 *i.value_64 = 0;
 437         }
 438         return 0;
 439 }
 440
 441 static int db_set_64(struct os_area_db *db, const struct os_area_db_id *id,
 442         uint64_t value)
 443 {
 444         struct db_iterator i;
 445
 446         pr_debug("%s:%d: (%d:%d) <= %llxh\n", __func__, __LINE__,
 447                 id->owner, id->key, (unsigned long long)value);
 448
 449         if (!id->owner || id->owner == OS_AREA_DB_OWNER_ANY
 450                 || id->key == OS_AREA_DB_KEY_ANY) {
 451                 pr_debug("%s:%d: bad id: (%d:%d)\n", __func__,
 452                         __LINE__, id->owner, id->key);
 453                 return -1;
 454         }
 455
 456         db_delete_64(db, id);
 457
 458         i.db = NULL;
 459         if (db_for_each_64(db, &os_area_db_id_empty, &i)) {
 460
 461                 pr_debug("%s:%d: got (%d:%d) %llxh\n", __func__, __LINE__,
 462                         i.idx->owner, i.idx->key,
 463                         (unsigned long long)*i.value_64);
 464
 465                 i.idx->owner = id->owner;
 466                 i.idx->key = id->key;
 467                 *i.value_64 = value;
 468
 469                 pr_debug("%s:%d: set (%d:%d) <= %llxh\n", __func__, __LINE__,
 470                         i.idx->owner, i.idx->key,
 471                         (unsigned long long)*i.value_64);
 472                 return 0;
 473         }
 474         pr_debug("%s:%d: database full.\n",
 475                 __func__, __LINE__);
 476         return -1;
 477 }
 478
 479 static int db_get_64(const struct os_area_db *db,
 480         const struct os_area_db_id *id, uint64_t *value)
 481 {
 482         struct db_iterator i;
 483
 484         i.db = NULL;
 485         if (db_for_each_64(db, id, &i)) {
 486                 *value = *i.value_64;
 487                 pr_debug("%s:%d: found %lld\n", __func__, __LINE__,
 488                                 (long long int)*i.value_64);
 489                 return 0;
 490         }
 491         pr_debug("%s:%d: not found\n", __func__, __LINE__);
 492         return -1;
 493 }
 494
 495 static int db_get_rtc_diff(const struct os_area_db *db, int64_t *rtc_diff)
 496 {
 497         return db_get_64(db, &os_area_db_id_rtc_diff, (uint64_t*)rtc_diff);
 498 }
 499
 500 #define dump_db(a) _dump_db(a, __func__, __LINE__)
 501 static void _dump_db(const struct os_area_db *db, const char *func,
 502         int line)
 503 {
 504         char str[sizeof(db->magic_num) + 1];
 505
 506         dump_field(str, db->magic_num, sizeof(db->magic_num));
 507         pr_debug("%s:%d: db.magic_num:      '%s'\n", func, line,
 508                 str);
 509         pr_debug("%s:%d: db.version:         %u\n", func, line,
 510                 db->version);
 511         pr_debug("%s:%d: db.index_64:        %u\n", func, line,
 512                 db->index_64);
 513         pr_debug("%s:%d: db.count_64:        %u\n", func, line,
 514                 db->count_64);
 515         pr_debug("%s:%d: db.index_32:        %u\n", func, line,
 516                 db->index_32);
 517         pr_debug("%s:%d: db.count_32:        %u\n", func, line,
 518                 db->count_32);
 519         pr_debug("%s:%d: db.index_16:        %u\n", func, line,
 520                 db->index_16);
 521         pr_debug("%s:%d: db.count_16:        %u\n", func, line,
 522                 db->count_16);
 523 }
 524
 525 static void os_area_db_init(struct os_area_db *db)
 526 {
 527         enum {
 528                 HEADER_SIZE = offsetof(struct os_area_db, _db_data),
 529                 INDEX_64_COUNT = 64,
 530                 VALUES_64_COUNT = 57,
 531                 INDEX_32_COUNT = 64,
 532                 VALUES_32_COUNT = 57,
 533                 INDEX_16_COUNT = 64,
 534                 VALUES_16_COUNT = 57,
 535         };
 536
 537         memset(db, 0, sizeof(struct os_area_db));
 538
 539         memcpy(db->magic_num, OS_AREA_DB_MAGIC_NUM, sizeof(db->magic_num));
 540         db->version = 1;
 541         db->index_64 = HEADER_SIZE;
 542         db->count_64 = VALUES_64_COUNT;
 543         db->index_32 = HEADER_SIZE
 544                         + INDEX_64_COUNT * sizeof(struct db_index)
 545                         + VALUES_64_COUNT * sizeof(u64);
 546         db->count_32 = VALUES_32_COUNT;
 547         db->index_16 = HEADER_SIZE
 548                         + INDEX_64_COUNT * sizeof(struct db_index)
 549                         + VALUES_64_COUNT * sizeof(u64)
 550                         + INDEX_32_COUNT * sizeof(struct db_index)
 551                         + VALUES_32_COUNT * sizeof(u32);
 552         db->count_16 = VALUES_16_COUNT;
 553
 554         /* Rules to check db layout. */
 555
 556         BUILD_BUG_ON(sizeof(struct db_index) != 1);
 557         BUILD_BUG_ON(sizeof(struct os_area_db) != 2 * OS_AREA_SEGMENT_SIZE);
 558         BUILD_BUG_ON(INDEX_64_COUNT & 0x7);
 559         BUILD_BUG_ON(VALUES_64_COUNT > INDEX_64_COUNT);
 560         BUILD_BUG_ON(INDEX_32_COUNT & 0x7);
 561         BUILD_BUG_ON(VALUES_32_COUNT > INDEX_32_COUNT);
 562         BUILD_BUG_ON(INDEX_16_COUNT & 0x7);
 563         BUILD_BUG_ON(VALUES_16_COUNT > INDEX_16_COUNT);
 564         BUILD_BUG_ON(HEADER_SIZE
 565                         + INDEX_64_COUNT * sizeof(struct db_index)
 566                         + VALUES_64_COUNT * sizeof(u64)
 567                         + INDEX_32_COUNT * sizeof(struct db_index)
 568                         + VALUES_32_COUNT * sizeof(u32)
 569                         + INDEX_16_COUNT * sizeof(struct db_index)
 570                         + VALUES_16_COUNT * sizeof(u16)
 571                         > sizeof(struct os_area_db));
 572 }
 573
 574 /**
 575  * update_flash_db - Helper for os_area_queue_work_handler.
 576  *
 577  */
 578
 579 static void update_flash_db(void)
 580 {
 581         int result;
 582         int file;
 583         off_t offset;
 584         ssize_t count;
 585         static const unsigned int buf_len = 8 * OS_AREA_SEGMENT_SIZE;
 586         const struct os_area_header *header;
 587         struct os_area_db* db;
 588
 589         /* Read in header and db from flash. */
 590
 591         file = sys_open("/dev/ps3flash", O_RDWR, 0);
 592
 593         if (file < 0) {
 594                 pr_debug("%s:%d sys_open failed\n", __func__, __LINE__);
 595                 goto fail_open;
 596         }
 597
 598         header = kmalloc(buf_len, GFP_KERNEL);
 599
 600         if (!header) {
 601                 pr_debug("%s:%d kmalloc failed\n", __func__, __LINE__);
 602                 goto fail_malloc;
 603         }
 604
 605         offset = sys_lseek(file, 0, SEEK_SET);
 606
 607         if (offset != 0) {
 608                 pr_debug("%s:%d sys_lseek failed\n", __func__, __LINE__);
 609                 goto fail_header_seek;
 610         }
 611
 612         count = sys_read(file, (char __user *)header, buf_len);
 613
 614         result = count < OS_AREA_SEGMENT_SIZE || verify_header(header)
 615                 || count < header->db_area_offset * OS_AREA_SEGMENT_SIZE;
 616
 617         if (result) {
 618                 pr_debug("%s:%d verify_header failed\n", __func__, __LINE__);
 619                 dump_header(header);
 620                 goto fail_header;
 621         }
 622
 623         /* Now got a good db offset and some maybe good db data. */
 624
 625         db = (void*)header + header->db_area_offset * OS_AREA_SEGMENT_SIZE;
 626
 627         result = db_verify(db);
 628
 629         if (result) {
 630                 printk(KERN_NOTICE "%s:%d: Verify of flash database failed, "
 631                         "formatting.\n", __func__, __LINE__);
 632                 dump_db(db);
 633                 os_area_db_init(db);
 634         }
 635
 636         /* Now got good db data. */
 637
 638         db_set_64(db, &os_area_db_id_rtc_diff, saved_params.rtc_diff);
 639
 640         offset = sys_lseek(file, header->db_area_offset * OS_AREA_SEGMENT_SIZE,
 641                 SEEK_SET);
 642
 643         if (offset != header->db_area_offset * OS_AREA_SEGMENT_SIZE) {
 644                 pr_debug("%s:%d sys_lseek failed\n", __func__, __LINE__);
 645                 goto fail_db_seek;
 646         }
 647
 648         count = sys_write(file, (const char __user *)db,
 649                 sizeof(struct os_area_db));
 650
 651         if (count < sizeof(struct os_area_db)) {
 652                 pr_debug("%s:%d sys_write failed\n", __func__, __LINE__);
 653         }
 654
 655 fail_db_seek:
 656 fail_header:
 657 fail_header_seek:
 658         kfree(header);
 659 fail_malloc:
 660         sys_close(file);
 661 fail_open:
 662         return;
 663 }
 664
 665 /**
 666  * os_area_queue_work_handler - Asynchronous write handler.
 667  *
 668  * An asynchronous write for flash memory and the device tree.  Do not
 669  * call directly, use os_area_queue_work().
 670  */
 671
 672 static void os_area_queue_work_handler(struct work_struct *work)
 673 {
 674         struct device_node *node;
 675
 676         pr_debug(" -> %s:%d\n", __func__, __LINE__);
 677
 678         node = of_find_node_by_path("/");
 679
 680         if (node) {
 681                 os_area_set_property(node, &property_rtc_diff);
 682                 of_node_put(node);
 683         } else
 684                 pr_debug("%s:%d of_find_node_by_path failed\n",
 685                         __func__, __LINE__);
 686
 687 #if defined(CONFIG_PS3_FLASH) || defined(CONFIG_PS3_FLASH_MODULE)
 688         update_flash_db();
 689 #else
 690         printk(KERN_WARNING "%s:%d: No flash rom driver configured.\n",
 691                 __func__, __LINE__);
 692 #endif
 693         pr_debug(" <- %s:%d\n", __func__, __LINE__);
 694 }
 695
 696 static void os_area_queue_work(void)
 697 {
 698         static DECLARE_WORK(q, os_area_queue_work_handler);
 699
 700         wmb();
 701         schedule_work(&q);
 702 }
 703
 704 /**
 705  * ps3_os_area_save_params - Copy data from os area mirror to @saved_params.
 706  *
 707  * For the convenience of the guest the HV makes a copy of the os area in
 708  * flash to a high address in the boot memory region and then puts that RAM
 709  * address and the byte count into the repository for retrieval by the guest.
 710  * We copy the data we want into a static variable and allow the memory setup
 711  * by the HV to be claimed by the lmb manager.
 712  *
 713  * The os area mirror will not be available to a second stage kernel, and
 714  * the header verify will fail.  In this case, the saved_params values will
 715  * be set from flash memory or the passed in device tree in ps3_os_area_init().
 716  */
 717
 718 void __init ps3_os_area_save_params(void)
 719 {
 720         int result;
 721         u64 lpar_addr;
 722         unsigned int size;
 723         struct os_area_header *header;
 724         struct os_area_params *params;
 725         struct os_area_db *db;
 726
 727         pr_debug(" -> %s:%d\n", __func__, __LINE__);
 728
 729         result = ps3_repository_read_boot_dat_info(&lpar_addr, &size);
 730
 731         if (result) {
 732                 pr_debug("%s:%d ps3_repository_read_boot_dat_info failed\n",
 733                         __func__, __LINE__);
 734                 return;
 735         }
 736
 737         header = (struct os_area_header *)__va(lpar_addr);
 738         params = (struct os_area_params *)__va(lpar_addr
 739                 + OS_AREA_SEGMENT_SIZE);
 740
 741         result = verify_header(header);
 742
 743         if (result) {
 744                 /* Second stage kernels exit here. */
 745                 pr_debug("%s:%d verify_header failed\n", __func__, __LINE__);
 746                 dump_header(header);
 747                 return;
 748         }
 749
 750         db = (struct os_area_db *)__va(lpar_addr
 751                 + header->db_area_offset * OS_AREA_SEGMENT_SIZE);
 752
 753         dump_header(header);
 754         dump_params(params);
 755         dump_db(db);
 756
 757         result = db_verify(db) || db_get_rtc_diff(db, &saved_params.rtc_diff);
 758         if (result)
 759                 saved_params.rtc_diff = params->rtc_diff ? params->rtc_diff
 760                         : SECONDS_FROM_1970_TO_2000;
 761         saved_params.av_multi_out = params->av_multi_out;
 762         saved_params.valid = 1;
 763
 764         memset(header, 0, sizeof(*header));
 765
 766         pr_debug(" <- %s:%d\n", __func__, __LINE__);
 767 }
 768
 769 /**
 770  * ps3_os_area_init - Setup os area device tree properties as needed.
 771  */
 772
 773 void __init ps3_os_area_init(void)
 774 {
 775         struct device_node *node;
 776
 777         pr_debug(" -> %s:%d\n", __func__, __LINE__);
 778
 779         node = of_find_node_by_path("/");
 780
 781         if (!saved_params.valid && node) {
 782                 /* Second stage kernels should have a dt entry. */
 783                 os_area_get_property(node, &property_rtc_diff);
 784                 os_area_get_property(node, &property_av_multi_out);
 785         }
 786
 787         if(!saved_params.rtc_diff)
 788                 saved_params.rtc_diff = SECONDS_FROM_1970_TO_2000;
 789
 790         if (node) {
 791                 os_area_set_property(node, &property_rtc_diff);
 792                 os_area_set_property(node, &property_av_multi_out);
 793                 of_node_put(node);
 794         } else
 795                 pr_debug("%s:%d of_find_node_by_path failed\n",
 796                         __func__, __LINE__);
 797
 798         pr_debug(" <- %s:%d\n", __func__, __LINE__);
 799 }
 800
 801 /**
 802  * ps3_os_area_get_rtc_diff - Returns the rtc diff value.
 803  */
 804
 805 u64 ps3_os_area_get_rtc_diff(void)
 806 {
 807         return saved_params.rtc_diff;
 808 }
 809
 810 /**
 811  * ps3_os_area_set_rtc_diff - Set the rtc diff value.
 812  *
 813  * An asynchronous write is needed to support writing updates from
 814  * the timer interrupt context.
 815  */
 816
 817 void ps3_os_area_set_rtc_diff(u64 rtc_diff)
 818 {
 819         if (saved_params.rtc_diff != rtc_diff) {
 820                 saved_params.rtc_diff = rtc_diff;
 821                 os_area_queue_work();
 822         }
 823 }
 824
 825 /**
 826  * ps3_os_area_get_av_multi_out - Returns the default video mode.
 827  */
 828
 829 enum ps3_param_av_multi_out ps3_os_area_get_av_multi_out(void)
 830 {
 831     return saved_params.av_multi_out;
 832 }
 833 EXPORT_SYMBOL_GPL(ps3_os_area_get_av_multi_out);