]> git.kernelconcepts.de Git - karo-tx-redboot.git/blob - packages/devs/flash/arm/edb7xxx/v2_0/src/flash_program_buf.c
Initial revision
[karo-tx-redboot.git] / packages / devs / flash / arm / edb7xxx / 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 int  flash_program_buf(volatile unsigned long* addr, unsigned long* data, int len)
59     __attribute__ ((section (".2ram.flash_program_buf")));
60
61 int
62 flash_program_buf(volatile unsigned long *addr, unsigned long *data, int len)
63 {
64     volatile unsigned long *ROM;
65     unsigned long stat = 0;
66     int timeout = 50000;
67
68     ROM = (volatile unsigned long *)((unsigned long)addr & 0xFF800000);
69
70     // Clear any error conditions
71     ROM[0] = FLASH_Clear_Status;
72
73     while (len > 0) {
74         ROM[0] = FLASH_Program;
75         *addr = *data;
76         timeout = 5000000;
77         while(((stat = ROM[0]) & FLASH_Status_Ready) != FLASH_Status_Ready) {
78             if (--timeout == 0) {
79                 goto bad;
80             }
81         }
82         if (stat & 0x007E007E) {
83             break;
84         }
85         ROM[0] = FLASH_Reset;            
86         if (*addr++ != *data++) {
87             stat = 0x99109910;
88             break;
89         }
90         len -= 4;
91     }
92
93     // Restore ROM to "normal" mode
94  bad:
95     ROM[0] = FLASH_Reset;            
96
97     return stat;
98 }