\ *****************************************************************************
\ * Copyright (c) 2011 IBM Corporation
\ * All rights reserved.
\ * This program and the accompanying materials
\ * are made available under the terms of the BSD License
\ * which accompanies this distribution, and is available at
\ * http://www.opensource.org/licenses/bsd-license.php
\ *
\ * Contributors:
\ *     IBM Corporation - initial implementation
\ ****************************************************************************/

\ Qemu supports max 256cpus, 32K will be able to accomodate the fdt changes if
\ needed.
8000 VALUE size
: ibm,client-architecture-support         ( vec -- err? )
    \ Store require parameters in nvram
    \ to come back to right boot device
    \ Allocate memory for H_CALL
    size alloc-mem                        ( vec memaddr )
    swap over size                        ( memaddr vec memaddr size )
    \ make h_call to hypervisor
    hv-cas 0= IF                          ( memaddr )
	dup l@ 1 >= IF                    \ Version number >= 1
	    \ Make required changes
	    " /" find-node set-node
	    dup 4 + fdt-init
	    fdt-check-header
	    fdt-struct fdt-fix-cas-node
	    fdt-fix-cas-success NOT
	ELSE
	    FALSE
	THEN
    ELSE
	TRUE
    THEN
    >r size free-mem r>
;

\ *****************************************************************************
\ * Copyright (c) 2011 IBM Corporation
\ * All rights reserved.
\ * This program and the accompanying materials
\ * are made available under the terms of the BSD License
\ * which accompanies this distribution, and is available at
\ * http://www.opensource.org/licenses/bsd-license.php
\ *
\ * Contributors:
\ *     IBM Corporation - initial implementation
\ ****************************************************************************/

\ 128KB FDT buffer size is enough to accommodate 255 CPU cores and 1TB of
\ maxmem specification.
20000 VALUE size
: ibm,client-architecture-support         ( vec -- err? )
    \ Store require parameters in nvram
    \ to come back to right boot device
    \ Allocate memory for H_CALL
    size alloc-mem                        ( vec memaddr )
    swap over size                        ( memaddr vec memaddr size )
    \ make h_call to hypervisor
    hv-cas 0= IF                          ( memaddr )
	dup l@ 1 >= IF                    \ Version number >= 1
	    \ Make required changes
	    " /" find-node set-node
	    dup 4 + fdt-init
	    fdt-check-header
	    fdt-struct fdt-fix-cas-node
	    fdt-fix-cas-success NOT
	ELSE
	    FALSE
	THEN
    ELSE
	TRUE
    THEN
    >r size free-mem r>
;

Increase FDT buffer size to accomodate larger ibm, cas node properties
cas: Increase FDT buffer size to accomodate larger ibm, cas node properties

When QEMU starts with a higher value of maxmem, ibm,dynamic-memory
property under ibm,client-architecture-support device tree node can
consume a large FDT buffer space.

Accommodate this by increasing the FDT buffer size passed from SLOF
to QEMU to 128KB from the current 32KB.

Tested with QEMU options:
"-m 2G,slots=16,maxmem=1024G -smp 255 -cpu host,compat=power7"
on a POWER8 host with /sys/devices/system/cpu/subcores_per_core=4

Signed-off-by: Bharata B Rao <37852461ec08f94420c663824224090aed552843@linux.vnet.ibm.com>
Cc: Nikunj A Dadhania <e2f4a5db9b4735182a88051d1e7a3599f9eac9db@linux.vnet.ibm.com>
Signed-off-by: Nikunj A Dadhania <e2f4a5db9b4735182a88051d1e7a3599f9eac9db@linux.vnet.ibm.com>
Signed-off-by: Alexey Kardashevskiy <ac1fc56530d7d037e1ea666f130daca22d72f964@ozlabs.ru>
