PLEASE
[capstone.git] / src / pru.S
CommitLineData
020b576b 1/*
2 * Copyright (c) 2016, Ian Sutton <ian@kremlin.cc>
3 *
4 * Permission to use, copy, modify, and/or distribute this software for
5 * any purpose with or without fee is hereby granted, provided that the
6 * above copyright notice and this permission notice appear in all
7 * copies.
8 *
9 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL
10 * WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED
11 * WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE
12 * AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
13 * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
14 * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
15 * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
16 * PERFORMANCE OF THIS SOFTWARE.
17 */
18
19.origin 0
20.entrypoint START /* used by debugger only */
21
22#define PRU0_R31_VEC_VALID (1<<5)
23#define SIGNUM 3 /* corresponds to PRU_EVTOUT_0 */
24
25#define DELAY_SECONDS 5
26#define CLOCK 200000000
27#define CLOCKS_PER_LOOP 2
28#define DELAYCOUNT DELAY_SECONDS * CLOCK / CLOCKS_PER_LOOP
29
020b576b 30
f828c748 31#define R_PINKY 0x0
32#define R_RING 0x1
33#define R_MID 0x10
34#define R_FORE 0x11
35#define R_THUMB 0x100
36#define L_THUMB 0x101
37#define L_FORE 0x110
38#define L_MID 0x111
39#define L_RING 0x1000
40#define L_PINKY 0x1001
41
42#define CYCLE 4000000
43#define WIDTH_UP 120000
44#define WIDTH_DOWN 480000
45
46// MOV r1, DELAYCOUNT
47// ADD r1, r1, r1
48// ADD r1, r1, r1
49// ADD r1, r1, r1
50// ADD r1, r1, r1
51//DELAY:
52 //SUB r1, r1, 1
53 //NOT r30, r30, r30
54 //QBNE DELAY, r1, 0
55
56START:
020b576b 57
f828c748 58 MOV r1, CYCLE
59 MOV r2, WIDTH_UP
60 MOV r3, WIDTH_DOWN
61 MOV r4, 0xffffffff
62 MOV r30, 0x000003ff
63 MOV r5, 0x00000000
64KLOOP:
65 QBLE DOWN, r5, r2
66 QBLE KRST, r5, r1
67 ADD r5, r5, 4
68 JMP KLOOP
69DOWN:
70 MOV r30, 0x00000000
71 MOV r2, 0xffffffff
72 JMP KLOOP
73KRST:
74 MOV r5, 0x00000000
75 MOV r30, 0x000003ff
76 MOV r2, WIDTH_UP
77 JMP KLOOP
78KHALT:
020b576b 79 MOV R31.b0, PRU0_R31_VEC_VALID | SIGNUM
80 HALT
81