pci: extract dma functions as separate file

DMA alloc/mapping functions needs to be used by pci generic bridge as well.

Reviewed-by: Thomas Huth <thuth@linux.vnet.ibm.com>
Signed-off-by: Nikunj A Dadhania <nikunj@linux.vnet.ibm.com>

board-qemu/slof/Makefile

@@ -84,6 +84,7 @@ OF_FFS_FILES = \
 	$(SLOFCMNDIR)/fs/ide.fs \
 	$(SLOFCMNDIR)/fs/fbuffer.fs \
 	$(SLOFCMNDIR)/fs/generic-disk.fs \
+	$(SLOFCMNDIR)/fs/dma-function.fs \
 	$(SLOFCMNDIR)/fs/pci-device.fs \
 	$(SLOFCMNDIR)/fs/pci-bridge.fs \
 	$(SLOFCMNDIR)/fs/pci-properties.fs \

slof/fs/dma-function.fs

@@ -0,0 +1,36 @@
+\ *****************************************************************************
+\ * Copyright (c) 2004, 2014 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
+\ ****************************************************************************/
+
+\ DMA memory allocation functions
+: dma-alloc ( size -- virt )
+   my-phandle TO calling-child
+   s" dma-alloc" my-phandle parent $call-static
+   0 TO calling-child
+;
+
+: dma-free ( virt size -- )
+   my-phandle TO calling-child
+   s" dma-free" my-phandle parent $call-static
+   0 TO calling-child
+;
+
+: dma-map-in ( virt size cacheable? -- devaddr )
+   my-phandle TO calling-child
+   s" dma-map-in" my-phandle parent $call-static
+   0 TO calling-child
+;
+
+: dma-map-out ( virt devaddr size -- )
+   my-phandle TO calling-child
+   s" dma-map-out" my-phandle parent $call-static
+   0 TO calling-child
+;

slof/fs/pci-device.fs

@@ -53,32 +53,7 @@ s" my-puid" my-phandle parent $call-static CONSTANT my-puid
         r> TO puid          \ restore puid
 ;
 
-
-\ DMA memory allocation functions
-: dma-alloc ( size -- virt )
-   my-phandle TO calling-child
-   s" dma-alloc" my-phandle parent $call-static
-   0 TO calling-child
-;
-
-: dma-free ( virt size -- )
-   my-phandle TO calling-child
-   s" dma-free" my-phandle parent $call-static
-   0 TO calling-child
-;
-
-: dma-map-in ( virt size cacheable? -- devaddr )
-   my-phandle TO calling-child
-   s" dma-map-in" my-phandle parent $call-static
-   0 TO calling-child
-;
-
-: dma-map-out ( virt devaddr size -- )
-   my-phandle TO calling-child
-   s" dma-map-out" my-phandle parent $call-static
-   0 TO calling-child
-;
-
+s" dma-function.fs" included
 
 \ generate the rom-fs filename from the vendor and device ID "pci-device_VENDORID_DEVICEID.fs"
 : devicefile ( -- str len )