main.c 19.4 KB
Newer Older
1
#include <stdio.h>
2
#include <string.h>
Damien's avatar
Damien committed
3
4
#include <stm32f4xx.h>
#include <stm32f4xx_rcc.h>
5
#include <stm32f4xx_syscfg.h>
6
#include <stm32f4xx_gpio.h>
7
#include <stm32f4xx_exti.h>
8
#include <stm32f4xx_tim.h>
Damien's avatar
Damien committed
9
#include <stm32f4xx_pwr.h>
10
#include <stm32f4xx_rtc.h>
11
#include <stm32f4xx_usart.h>
12
#include <stm32f4xx_rng.h>
13
#include <usbd_storage_msd.h>
14
#include <stm_misc.h>
Damien's avatar
Damien committed
15
16
#include "std.h"

17
#include "misc.h"
18
19
#include "ff.h"
#include "mpconfig.h"
20
#include "qstr.h"
21
22
23
#include "nlr.h"
#include "misc.h"
#include "lexer.h"
24
#include "lexerfatfs.h"
25
26
#include "parse.h"
#include "obj.h"
27
#include "parsehelper.h"
28
#include "compile.h"
29
30
#include "runtime0.h"
#include "runtime.h"
Damien's avatar
Damien committed
31
#include "gc.h"
32
#include "gccollect.h"
33
#include "systick.h"
34
#include "pendsv.h"
35
#include "pyexec.h"
36
#include "led.h"
37
#include "gpio.h"
38
#include "servo.h"
39
#include "lcd.h"
40
#include "storage.h"
41
#include "sdcard.h"
Damien George's avatar
Damien George committed
42
#include "accel.h"
43
#include "usart.h"
Damien's avatar
Damien committed
44
#include "usb.h"
45
#include "timer.h"
46
#include "audio.h"
47
#include "pybwlan.h"
48
#include "i2c.h"
49
#include "usrsw.h"
mux's avatar
mux committed
50
#include "adc.h"
mux's avatar
mux committed
51
#include "rtc.h"
mux's avatar
mux committed
52
#include "file.h"
Dave Hylands's avatar
Dave Hylands committed
53
#include "pin.h"
Dave Hylands's avatar
Dave Hylands committed
54
#include "exti.h"
55
56

int errno;
Damien's avatar
Damien committed
57

58
static FATFS fatfs0;
59
#if MICROPY_HW_HAS_SDCARD
60
static FATFS fatfs1;
61
#endif
62

63
64
65
66
67
68
69
70
71
72
73
74
void flash_error(int n) {
    for (int i = 0; i < n; i++) {
        led_state(PYB_LED_R1, 1);
        led_state(PYB_LED_R2, 0);
        sys_tick_delay_ms(250);
        led_state(PYB_LED_R1, 0);
        led_state(PYB_LED_R2, 1);
        sys_tick_delay_ms(250);
    }
    led_state(PYB_LED_R2, 0);
}

Damien's avatar
Damien committed
75
void __fatal_error(const char *msg) {
mux's avatar
mux committed
76
#if MICROPY_HW_HAS_LCD
Damien's avatar
Damien committed
77
78
    lcd_print_strn("\nFATAL ERROR:\n", 14);
    lcd_print_strn(msg, strlen(msg));
mux's avatar
mux committed
79
#endif
Damien's avatar
Damien committed
80
    for (;;) {
81
        flash_error(1);
Damien's avatar
Damien committed
82
83
84
    }
}

85
86
static mp_obj_t pyb_config_source_dir = MP_OBJ_NULL;
static mp_obj_t pyb_config_main = MP_OBJ_NULL;
87

88
mp_obj_t pyb_source_dir(mp_obj_t source_dir) {
89
90
91
    if (MP_OBJ_IS_STR(source_dir)) {
        pyb_config_source_dir = source_dir;
    }
92
    return mp_const_none;
93
94
}

95
mp_obj_t pyb_main(mp_obj_t main) {
96
97
98
    if (MP_OBJ_IS_STR(main)) {
        pyb_config_main = main;
    }
99
    return mp_const_none;
100
101
102
}

// sync all file systems
103
mp_obj_t pyb_sync(void) {
104
    storage_flush();
105
    return mp_const_none;
106
}
Damien's avatar
Damien committed
107

108
109
110
mp_obj_t pyb_delay(mp_obj_t count) {
    sys_tick_delay_ms(mp_obj_get_int(count));
    return mp_const_none;
Damien's avatar
Damien committed
111
112
}

113
114
115
116
117
118
119
120
121
122
mp_obj_t pyb_udelay(mp_obj_t usec) {
    uint32_t count = 0;
    const uint32_t utime = (168 * mp_obj_get_int(usec) / 5);
    for (;;) {
        if (++count > utime) {
            return mp_const_none;
        }
    }
}

123
void fatality(void) {
124
125
126
127
128
129
    led_state(PYB_LED_R1, 1);
    led_state(PYB_LED_G1, 1);
    led_state(PYB_LED_R2, 1);
    led_state(PYB_LED_G2, 1);
}

130
static const char fresh_boot_py[] =
131
132
133
134
135
136
137
138
139
140
141
"# boot.py -- run on boot-up\n"
"# can run arbitrary Python, but best to keep it minimal\n"
"\n"
"pyb.source_dir('/src')\n"
"pyb.main('main.py')\n"
"#pyb.usb_usr('VCP')\n"
"#pyb.usb_msd(True, 'dual partition')\n"
"#pyb.flush_cache(False)\n"
"#pyb.error_log('error.txt')\n"
;

142
143
144
145
146
147
148
149
150
151
static const char fresh_main_py[] =
"# main.py -- put your code here!\n"
;

static const char *help_text =
"Welcome to Micro Python!\n\n"
"This is a *very* early version of Micro Python and has minimal functionality.\n\n"
"Specific commands for the board:\n"
"    pyb.info()     -- print some general information\n"
"    pyb.gc()       -- run the garbage collector\n"
152
"    pyb.repl_info(<val>) -- enable/disable printing of info after each command\n"
153
154
155
156
157
158
159
160
"    pyb.delay(<n>) -- wait for n milliseconds\n"
"    pyb.Led(<n>)   -- create Led object for LED n (n=1,2)\n"
"                      Led methods: on(), off()\n"
"    pyb.Servo(<n>) -- create Servo object for servo n (n=1,2,3,4)\n"
"                      Servo methods: angle(<x>)\n"
"    pyb.switch()   -- return True/False if switch pressed or not\n"
"    pyb.accel()    -- get accelerometer values\n"
"    pyb.rand()     -- get a 16-bit random number\n"
161
"    pyb.gpio(<port>)           -- get port value (port='A4' for example)\n"
162
"    pyb.gpio(<port>, <val>)    -- set port value, True or False, 1 or 0\n"
163
164
"    pyb.ADC(<port>) -- make an analog port object (port='C0' for example)\n"
"                       ADC methods: read()\n"
165
166
167
;

// get some help about available functions
168
static mp_obj_t pyb_help(void) {
169
    printf("%s", help_text);
170
    return mp_const_none;
171
172
}

173
// get lots of info about the board
174
static mp_obj_t pyb_info(void) {
175
176
177
178
179
180
    // get and print unique id; 96 bits
    {
        byte *id = (byte*)0x1fff7a10;
        printf("ID=%02x%02x%02x%02x:%02x%02x%02x%02x:%02x%02x%02x%02x\n", id[0], id[1], id[2], id[3], id[4], id[5], id[6], id[7], id[8], id[9], id[10], id[11]);
    }

181
182
183
184
185
186
187
188
189
190
    // get and print clock speeds
    // SYSCLK=168MHz, HCLK=168MHz, PCLK1=42MHz, PCLK2=84MHz
    {
        RCC_ClocksTypeDef rcc_clocks;
        RCC_GetClocksFreq(&rcc_clocks);
        printf("S=%lu\nH=%lu\nP1=%lu\nP2=%lu\n", rcc_clocks.SYSCLK_Frequency, rcc_clocks.HCLK_Frequency, rcc_clocks.PCLK1_Frequency, rcc_clocks.PCLK2_Frequency);
    }

    // to print info about memory
    {
191
192
193
194
195
196
197
        printf("_text_end=%p\n", &_text_end);
        printf("_data_start_init=%p\n", &_data_start_init);
        printf("_data_start=%p\n", &_data_start);
        printf("_data_end=%p\n", &_data_end);
        printf("_bss_start=%p\n", &_bss_start);
        printf("_bss_end=%p\n", &_bss_end);
        printf("_stack_end=%p\n", &_stack_end);
198
        printf("_ram_start=%p\n", &_ram_start);
199
        printf("_heap_start=%p\n", &_heap_start);
Damien George's avatar
Damien George committed
200
201
202
203
204
205
206
207
208
        printf("_heap_end=%p\n", &_heap_end);
        printf("_ram_end=%p\n", &_ram_end);
    }

    // qstr info
    {
        uint n_pool, n_qstr, n_str_data_bytes, n_total_bytes;
        qstr_pool_info(&n_pool, &n_qstr, &n_str_data_bytes, &n_total_bytes);
        printf("qstr:\n  n_pool=%u\n  n_qstr=%u\n  n_str_data_bytes=%u\n  n_total_bytes=%u\n", n_pool, n_qstr, n_str_data_bytes, n_total_bytes);
209
210
    }

211
212
213
214
215
216
217
218
219
220
    // GC info
    {
        gc_info_t info;
        gc_info(&info);
        printf("GC:\n");
        printf("  %lu total\n", info.total);
        printf("  %lu : %lu\n", info.used, info.free);
        printf("  1=%lu 2=%lu m=%lu\n", info.num_1block, info.num_2block, info.max_block);
    }

221
222
223
224
225
    // free space on flash
    {
        DWORD nclst;
        FATFS *fatfs;
        f_getfree("0:", &nclst, &fatfs);
226
        printf("LFS free: %u bytes\n", (uint)(nclst * fatfs->csize * 512));
227
    }
228

229
    return mp_const_none;
230
231
}

232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
static void SYSCLKConfig_STOP(void) {
    /* After wake-up from STOP reconfigure the system clock */
    /* Enable HSE */
    RCC_HSEConfig(RCC_HSE_ON);

    /* Wait till HSE is ready */
    while (RCC_GetFlagStatus(RCC_FLAG_HSERDY) == RESET) {
    }

    /* Enable PLL */
    RCC_PLLCmd(ENABLE);

    /* Wait till PLL is ready */
    while (RCC_GetFlagStatus(RCC_FLAG_PLLRDY) == RESET) {
    }

    /* Select PLL as system clock source */
    RCC_SYSCLKConfig(RCC_SYSCLKSource_PLLCLK);

    /* Wait till PLL is used as system clock source */
    while (RCC_GetSYSCLKSource() != 0x08) {
    }
}

256
static mp_obj_t pyb_stop(void) {
257
258
259
260
261
262
263
264
265
266
267
268
    PWR_EnterSTANDBYMode();
    //PWR_FlashPowerDownCmd(ENABLE); don't know what the logic is with this

    /* Enter Stop Mode */
    PWR_EnterSTOPMode(PWR_Regulator_LowPower, PWR_STOPEntry_WFI);

    /* Configures system clock after wake-up from STOP: enable HSE, PLL and select 
     *        PLL as system clock source (HSE and PLL are disabled in STOP mode) */
    SYSCLKConfig_STOP();

    //PWR_FlashPowerDownCmd(DISABLE);

269
    return mp_const_none;
270
271
}

272
static mp_obj_t pyb_standby(void) {
273
    PWR_EnterSTANDBYMode();
274
    return mp_const_none;
275
276
}

277
278
mp_obj_t pyb_hid_send_report(mp_obj_t arg) {
    mp_obj_t *items = mp_obj_get_array_fixed_n(arg, 4);
279
    uint8_t data[4];
280
281
282
283
    data[0] = mp_obj_get_int(items[0]);
    data[1] = mp_obj_get_int(items[1]);
    data[2] = mp_obj_get_int(items[2]);
    data[3] = mp_obj_get_int(items[3]);
284
    usb_hid_send_report(data);
285
    return mp_const_none;
286
287
}

288
289
mp_obj_t pyb_rng_get(void) {
    return mp_obj_new_int(RNG_GetRandomNumber() >> 16);
290
291
}

292
293
294
295
mp_obj_t pyb_millis(void) {
    return mp_obj_new_int(sys_tick_counter);
}

296
int main(void) {
297
    // TODO disable JTAG
Damien's avatar
Damien committed
298

299
300
301
    // update the SystemCoreClock variable
    SystemCoreClockUpdate();

302
303
304
305
    // set interrupt priority config to use all 4 bits for pre-empting
    NVIC_PriorityGroupConfig(NVIC_PriorityGroup_4);

    // enable the CCM RAM and the GPIO's
306
    RCC->AHB1ENR |= RCC_AHB1ENR_CCMDATARAMEN | RCC_AHB1ENR_GPIOAEN | RCC_AHB1ENR_GPIOBEN | RCC_AHB1ENR_GPIOCEN | RCC_AHB1ENR_GPIODEN;
307

mux's avatar
mux committed
308
#if MICROPY_HW_HAS_SDCARD
309
    {
310
311
312
313
314
315
316
317
318
319
320
321
322
        // configure SDIO pins to be high to start with (apparently makes it more robust)
        // FIXME this is not making them high, it just makes them outputs...
        GPIO_InitTypeDef GPIO_InitStructure;
        GPIO_InitStructure.GPIO_Pin = GPIO_Pin_8 | GPIO_Pin_9 | GPIO_Pin_10 | GPIO_Pin_11 | GPIO_Pin_12;
        GPIO_InitStructure.GPIO_Speed = GPIO_Speed_25MHz;
        GPIO_InitStructure.GPIO_Mode = GPIO_Mode_OUT;
        GPIO_InitStructure.GPIO_OType = GPIO_OType_PP;
        GPIO_InitStructure.GPIO_PuPd = GPIO_PuPd_NOPULL;
        GPIO_Init(GPIOC, &GPIO_InitStructure);

        // Configure PD.02 CMD line
        GPIO_InitStructure.GPIO_Pin = GPIO_Pin_2;
        GPIO_Init(GPIOD, &GPIO_InitStructure);
323
    }
mux's avatar
mux committed
324
#endif
Dave Hylands's avatar
Dave Hylands committed
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
#if defined(NETDUINO_PLUS_2)
    {
        GPIO_InitTypeDef GPIO_InitStructure;
        GPIO_InitStructure.GPIO_Speed = GPIO_Speed_25MHz;
        GPIO_InitStructure.GPIO_Mode = GPIO_Mode_OUT;
        GPIO_InitStructure.GPIO_OType = GPIO_OType_PP;
        GPIO_InitStructure.GPIO_PuPd = GPIO_PuPd_NOPULL;

#if MICROPY_HW_HAS_SDCARD
        // Turn on the power enable for the sdcard (PB1)
        GPIO_InitStructure.GPIO_Pin = GPIO_Pin_1;
        GPIO_Init(GPIOB, &GPIO_InitStructure);
        GPIO_WriteBit(GPIOB, GPIO_Pin_1, Bit_SET);
#endif

        // Turn on the power for the 5V on the expansion header (PB2)
        GPIO_InitStructure.GPIO_Pin = GPIO_Pin_2;
        GPIO_Init(GPIOB, &GPIO_InitStructure);
        GPIO_WriteBit(GPIOB, GPIO_Pin_2, Bit_SET);
    }
#endif
346

347
348
    // basic sub-system init
    sys_tick_init();
349
    pendsv_init();
Damien's avatar
Damien committed
350
    led_init();
mux's avatar
mux committed
351
352

#if MICROPY_HW_ENABLE_RTC
353
    rtc_init();
mux's avatar
mux committed
354
#endif
355
356
357
358
359

    // turn on LED to indicate bootup
    led_state(PYB_LED_G1, 1);

    // more sub-system init
360
361
#if MICROPY_HW_HAS_SDCARD
    sdcard_init();
mux's avatar
mux committed
362
#endif
363
    storage_init();
364

365
    // uncomment these 2 lines if you want REPL on USART_6 (or another usart) as well as on USB VCP
366
    //pyb_usart_global_debug = PYB_USART_YA;
367
    //usart_init(pyb_usart_global_debug, 115200);
Damien's avatar
Damien committed
368

369
370
    int first_soft_reset = true;

371
372
soft_reset:

Damien's avatar
Damien committed
373
    // GC init
374
    gc_init(&_heap_start, &_heap_end);
Damien's avatar
Damien committed
375

376
    // Micro Python init
377
378
    qstr_init();
    rt_init();
379
380
381
382
383
    mp_obj_t def_path[3];
    def_path[0] = MP_OBJ_NEW_QSTR(MP_QSTR_0_colon__slash_);
    def_path[1] = MP_OBJ_NEW_QSTR(MP_QSTR_0_colon__slash_src);
    def_path[2] = MP_OBJ_NEW_QSTR(MP_QSTR_0_colon__slash_lib);
    sys_path = mp_obj_new_list(3, def_path);
384

Dave Hylands's avatar
Dave Hylands committed
385
386
387
388
389
    exti_init_early();
#if MICROPY_HW_HAS_SWITCH
    switch_init();
#endif

mux's avatar
mux committed
390
#if MICROPY_HW_HAS_LCD
391
    // LCD init (just creates class, init hardware by calling LCD())
392
    lcd_init();
mux's avatar
mux committed
393
#endif
394

mux's avatar
mux committed
395
#if MICROPY_HW_ENABLE_SERVO
396
397
    // servo
    servo_init();
mux's avatar
mux committed
398
#endif
399

mux's avatar
mux committed
400
#if MICROPY_HW_ENABLE_TIMER
401
402
    // timer
    timer_init();
mux's avatar
mux committed
403
#endif
404

mux's avatar
mux committed
405
#if MICROPY_HW_ENABLE_RNG
406
    // RNG
mux's avatar
mux committed
407
408
409
    RCC_AHB2PeriphClockCmd(RCC_AHB2Periph_RNG, ENABLE);
    RNG_Cmd(ENABLE);
#endif
410

411
    // add some functions to the python namespace
412
    {
413
414
415
416
        rt_store_name(MP_QSTR_help, rt_make_function_n(0, pyb_help));

        mp_obj_t m = mp_obj_new_module(MP_QSTR_pyb);
        rt_store_attr(m, MP_QSTR_info, rt_make_function_n(0, pyb_info));
417
418
        rt_store_attr(m, MP_QSTR_gc, (mp_obj_t)&pyb_gc_obj);
        rt_store_attr(m, qstr_from_str("repl_info"), rt_make_function_n(1, pyb_set_repl_info));
mux's avatar
mux committed
419
#if MICROPY_HW_HAS_SDCARD
420
        rt_store_attr(m, qstr_from_str("SD"), (mp_obj_t)&pyb_sdcard_obj);
mux's avatar
mux committed
421
#endif
422
423
424
425
426
427
        rt_store_attr(m, MP_QSTR_stop, rt_make_function_n(0, pyb_stop));
        rt_store_attr(m, MP_QSTR_standby, rt_make_function_n(0, pyb_standby));
        rt_store_attr(m, MP_QSTR_source_dir, rt_make_function_n(1, pyb_source_dir));
        rt_store_attr(m, MP_QSTR_main, rt_make_function_n(1, pyb_main));
        rt_store_attr(m, MP_QSTR_sync, rt_make_function_n(0, pyb_sync));
        rt_store_attr(m, MP_QSTR_delay, rt_make_function_n(1, pyb_delay));
428
        rt_store_attr(m, MP_QSTR_udelay, rt_make_function_n(1, pyb_udelay));
mux's avatar
mux committed
429
#if MICROPY_HW_HAS_SWITCH
430
        rt_store_attr(m, MP_QSTR_switch, (mp_obj_t)&pyb_switch_obj);
mux's avatar
mux committed
431
432
#endif
#if MICROPY_HW_ENABLE_SERVO
433
        rt_store_attr(m, MP_QSTR_servo, rt_make_function_n(2, pyb_servo_set));
mux's avatar
mux committed
434
#endif
435
        rt_store_attr(m, MP_QSTR_pwm, rt_make_function_n(2, pyb_pwm_set));
mux's avatar
mux committed
436
#if MICROPY_HW_HAS_MMA7660
Damien George's avatar
Damien George committed
437
438
439
        rt_store_attr(m, MP_QSTR_accel, (mp_obj_t)&pyb_accel_read_obj);
        rt_store_attr(m, MP_QSTR_accel_read, (mp_obj_t)&pyb_accel_read_all_obj);
        rt_store_attr(m, MP_QSTR_accel_mode, (mp_obj_t)&pyb_accel_write_mode_obj);
440
#endif
441
        rt_store_attr(m, MP_QSTR_hid, rt_make_function_n(1, pyb_hid_send_report));
442
#if MICROPY_HW_ENABLE_RTC
443
444
        rt_store_attr(m, MP_QSTR_time, (mp_obj_t)&pyb_rtc_read_obj);
        rt_store_attr(m, qstr_from_str("rtc_info"), (mp_obj_t)&pyb_rtc_info_obj);
mux's avatar
mux committed
445
446
#endif
#if MICROPY_HW_ENABLE_RNG
447
        rt_store_attr(m, MP_QSTR_rand, rt_make_function_n(0, pyb_rng_get));
mux's avatar
mux committed
448
#endif
449
        rt_store_attr(m, MP_QSTR_Led, (mp_obj_t)&pyb_Led_obj);
mux's avatar
mux committed
450
#if MICROPY_HW_ENABLE_SERVO
451
        rt_store_attr(m, MP_QSTR_Servo, rt_make_function_n(1, pyb_Servo));
mux's avatar
mux committed
452
#endif
453
454
        rt_store_attr(m, MP_QSTR_I2C, rt_make_function_n(2, pyb_I2C));
        rt_store_attr(m, MP_QSTR_Usart, rt_make_function_n(2, pyb_Usart));
455
456
        rt_store_attr(m, qstr_from_str("ADC_all"), (mp_obj_t)&pyb_ADC_all_obj);
        rt_store_attr(m, MP_QSTR_ADC, (mp_obj_t)&pyb_ADC_obj);
457
        rt_store_attr(m, qstr_from_str("millis"), rt_make_function_n(0, pyb_millis));
458

459
460
461
462
#if MICROPY_HW_ENABLE_AUDIO
        rt_store_attr(m, qstr_from_str("Audio"), (mp_obj_t)&pyb_Audio_obj);
#endif

Dave Hylands's avatar
Dave Hylands committed
463
        pin_map_init(m);
464
        gpio_init(m);
Dave Hylands's avatar
Dave Hylands committed
465
        exti_init(m);
466
467
468
        rt_store_name(MP_QSTR_pyb, m);

        rt_store_name(MP_QSTR_open, rt_make_function_n(2, pyb_io_open));
469
    }
470

471
472
    // check if user switch held (initiates reset of filesystem)
    bool reset_filesystem = false;
mux's avatar
mux committed
473
#if MICROPY_HW_HAS_SWITCH
474
    if (switch_get()) {
475
476
        reset_filesystem = true;
        for (int i = 0; i < 50; i++) {
477
            if (!switch_get()) {
478
479
480
481
482
483
                reset_filesystem = false;
                break;
            }
            sys_tick_delay_ms(10);
        }
    }
mux's avatar
mux committed
484
#endif
485
486
487
488
    // local filesystem init
    {
        // try to mount the flash
        FRESULT res = f_mount(&fatfs0, "0:", 1);
489
        if (!reset_filesystem && res == FR_OK) {
490
            // mount sucessful
491
        } else if (reset_filesystem || res == FR_NO_FILESYSTEM) {
492
            // no filesystem, so create a fresh one
493
            // TODO doesn't seem to work correctly when reset_filesystem is true...
494
495
496
497
498
499
500
501
502
503
504
505

            // LED on to indicate creation of LFS
            led_state(PYB_LED_R2, 1);
            uint32_t stc = sys_tick_counter;

            res = f_mkfs("0:", 0, 0);
            if (res == FR_OK) {
                // success creating fresh LFS
            } else {
                __fatal_error("could not create LFS");
            }

506
507
508
509
510
511
512
513
514
515
516
517
            // create src directory
            res = f_mkdir("0:/src");
            // ignore result from mkdir

            // create empty main.py
            FIL fp;
            f_open(&fp, "0:/src/main.py", FA_WRITE | FA_CREATE_ALWAYS);
            UINT n;
            f_write(&fp, fresh_main_py, sizeof(fresh_main_py) - 1 /* don't count null terminator */, &n);
            // TODO check we could write n bytes
            f_close(&fp);

518
519
            // keep LED on for at least 200ms
            sys_tick_wait_at_least(stc, 200);
520
521
522
523
            led_state(PYB_LED_R2, 0);
        } else {
            __fatal_error("could not access LFS");
        }
Damien's avatar
Damien committed
524
525
    }

526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
    // make sure we have a /boot.py
    {
        FILINFO fno;
        FRESULT res = f_stat("0:/boot.py", &fno);
        if (res == FR_OK) {
            if (fno.fattrib & AM_DIR) {
                // exists as a directory
                // TODO handle this case
                // see http://elm-chan.org/fsw/ff/img/app2.c for a "rm -rf" implementation
            } else {
                // exists as a file, good!
            }
        } else {
            // doesn't exist, create fresh file

            // LED on to indicate creation of boot.py
            led_state(PYB_LED_R2, 1);
            uint32_t stc = sys_tick_counter;

            FIL fp;
            f_open(&fp, "0:/boot.py", FA_WRITE | FA_CREATE_ALWAYS);
            UINT n;
548
            f_write(&fp, fresh_boot_py, sizeof(fresh_boot_py) - 1 /* don't count null terminator */, &n);
549
550
551
            // TODO check we could write n bytes
            f_close(&fp);

552
553
            // keep LED on for at least 200ms
            sys_tick_wait_at_least(stc, 200);
554
555
556
557
            led_state(PYB_LED_R2, 0);
        }
    }

558
    // run /boot.py
559
    if (!pyexec_file("0:/boot.py")) {
560
561
562
        flash_error(4);
    }

563
    if (first_soft_reset) {
mux's avatar
mux committed
564
#if MICROPY_HW_HAS_MMA7660
Damien George's avatar
Damien George committed
565
566
        // MMA accel: init and reset address to zero
        accel_init();
567
#endif
Damien's avatar
Damien committed
568
569
    }

570
571
    // turn boot-up LED off
    led_state(PYB_LED_G1, 0);
572

573
574
575
576
577
578
#if MICROPY_HW_HAS_SDCARD
    // if an SD card is present then mount it on 1:/
    if (sdcard_is_present()) {
        FRESULT res = f_mount(&fatfs1, "1:", 1);
        if (res != FR_OK) {
            printf("[SD] could not mount SD card\n");
579
580
581
582
583
        } else {
            if (first_soft_reset) {
                // use SD card as medium for the USB MSD
                usbd_storage_select_medium(USBD_STORAGE_MEDIUM_SDCARD);
            }
584
585
586
587
        }
    }
#endif

588
589
590
591
592
#ifdef USE_HOST_MODE
    // USB host
    pyb_usb_host_init();
#elif defined(USE_DEVICE_MODE)
    // USB device
593
    pyb_usb_dev_init(PYB_USB_DEV_VCP_MSC);
594
595
#endif

596
597
598
599
    // run main script
    {
        vstr_t *vstr = vstr_new();
        vstr_add_str(vstr, "0:/");
600
        if (pyb_config_source_dir == MP_OBJ_NULL) {
601
602
            vstr_add_str(vstr, "src");
        } else {
603
            vstr_add_str(vstr, mp_obj_str_get_str(pyb_config_source_dir));
604
605
        }
        vstr_add_char(vstr, '/');
606
        if (pyb_config_main == MP_OBJ_NULL) {
607
608
            vstr_add_str(vstr, "main.py");
        } else {
609
            vstr_add_str(vstr, mp_obj_str_get_str(pyb_config_main));
610
        }
611
        if (!pyexec_file(vstr_str(vstr))) {
612
            flash_error(3);
613
        }
614
        vstr_free(vstr);
615
616
    }

Damien's avatar
Damien committed
617

mux's avatar
mux committed
618
#if MICROPY_HW_HAS_MMA7660
619
620
621
622
623
624
625
626
    // HID example
    if (0) {
        uint8_t data[4];
        data[0] = 0;
        data[1] = 1;
        data[2] = -2;
        data[3] = 0;
        for (;;) {
mux's avatar
mux committed
627
        #if MICROPY_HW_HAS_SWITCH
628
            if (switch_get()) {
629
630
631
632
                data[0] = 0x01; // 0x04 is middle, 0x02 is right
            } else {
                data[0] = 0x00;
            }
mux's avatar
mux committed
633
634
635
        #else
            data[0] = 0x00;
        #endif
Damien George's avatar
Damien George committed
636
637
638
            accel_start(0x4c /* ACCEL_ADDR */, 1);
            accel_send_byte(0);
            accel_restart(0x4c /* ACCEL_ADDR */, 0);
639
            for (int i = 0; i <= 1; i++) {
Damien George's avatar
Damien George committed
640
                int v = accel_read_ack() & 0x3f;
641
642
643
644
645
                if (v & 0x20) {
                    v |= ~0x1f;
                }
                data[1 + i] = v;
            }
Damien George's avatar
Damien George committed
646
            accel_read_nack();
647
648
649
650
            usb_hid_send_report(data);
            sys_tick_delay_ms(15);
        }
    }
651
#endif
652

mux's avatar
mux committed
653
#if MICROPY_HW_HAS_WLAN
654
    // wifi
mux's avatar
mux committed
655
656
657
    pyb_wlan_init();
    pyb_wlan_start();
#endif
658

659
    pyexec_repl();
660

661
662
663
664
    printf("PYB: sync filesystems\n");
    pyb_sync();

    printf("PYB: soft reboot\n");
665
666

    first_soft_reset = false;
667
    goto soft_reset;
Damien's avatar
Damien committed
668
}