]> git.kernelconcepts.de Git - karo-tx-redboot.git/blob - packages/devs/flash/arm/ebsa285/v2_0/src/flash_program_buf.c
Initial revision
[karo-tx-redboot.git] / packages / devs / flash / arm / ebsa285 / v2_0 / src / flash_program_buf.c
1 //==========================================================================
2 //
3 //      flash_program_buf.c
4 //
5 //      Flash programming
6 //
7 //==========================================================================
8 //####ECOSGPLCOPYRIGHTBEGIN####
9 // -------------------------------------------
10 // This file is part of eCos, the Embedded Configurable Operating System.
11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
12 //
13 // eCos is free software; you can redistribute it and/or modify it under
14 // the terms of the GNU General Public License as published by the Free
15 // Software Foundation; either version 2 or (at your option) any later version.
16 //
17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
19 // FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
20 // for more details.
21 //
22 // You should have received a copy of the GNU General Public License along
23 // with eCos; if not, write to the Free Software Foundation, Inc.,
24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
25 //
26 // As a special exception, if other files instantiate templates or use macros
27 // or inline functions from this file, or you compile this file and link it
28 // with other works to produce a work based on this file, this file does not
29 // by itself cause the resulting work to be covered by the GNU General Public
30 // License. However the source code for this file must still be made available
31 // in accordance with section (3) of the GNU General Public License.
32 //
33 // This exception does not invalidate any other reasons why a work based on
34 // this file might be covered by the GNU General Public License.
35 //
36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
37 // at http://sources.redhat.com/ecos/ecos-license/
38 // -------------------------------------------
39 //####ECOSGPLCOPYRIGHTEND####
40 //==========================================================================
41 //#####DESCRIPTIONBEGIN####
42 //
43 // Author(s):    gthomas
44 // Contributors: gthomas
45 // Date:         2000-07-14
46 // Purpose:      
47 // Description:  
48 //              
49 //####DESCRIPTIONEND####
50 //
51 //==========================================================================
52
53 #include "flash.h"
54
55 #include <pkgconf/hal.h>
56 #include <cyg/hal/hal_arch.h>
57
58
59 int
60 flash_program_buf(volatile unsigned long *addr, unsigned long *data, int len)
61         __attribute__ ((section (".2ram.flash_program_buf")));
62 int
63 flash_program_buf(volatile unsigned long *addr, unsigned long *data, int len)
64 {
65     unsigned long stat=0;
66     int timeout = 5000000;
67     volatile unsigned long *orig_addr = addr;
68
69     // Clear any error conditions
70     *addr = FLASH_Clear_Status;
71
72     while (len > 0) {
73         *addr = FLASH_Program;
74         *addr = *data++;
75         timeout = 5000000;
76         while(((stat = *addr) & FLASH_Status_Ready) != FLASH_Status_Ready) {
77             if (--timeout == 0) {
78                 goto bad;
79             }
80         }
81         addr++;
82         len -= sizeof(unsigned long);
83     }
84
85     // Restore ROM to "normal" mode
86  bad:
87     *orig_addr = FLASH_Reset;            
88
89     return stat;
90 }