summaryrefslogtreecommitdiff
path: root/arm9/modules/04/asm/mod04_021DC8A4.s
blob: 7668cb101c889dc71b72f27a782a1b92e0bfc1d8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
	.include "asm/macros.inc"
	.include "global.inc"
	.section .text
	.balign 4, 0

	arm_func_start MOD04_021DCA84
MOD04_021DCA84: ; 0x021DCA84
	stmdb sp!, {r4, r5, r6, r7, r8, lr}
	sub sp, sp, #0x40
	mov r6, r0
	bl strlen
	mov r4, r0
	ldr r0, _021DCCB4 ; =UNK04_0220C580
	bl strlen
	cmp r4, r0
	bne _021DCCA8
	ldrsb r0, [r6, #7]
	cmp r0, #0x20
	bne _021DCCA8
	ldrsb r0, [r6, #0xb]
	cmp r0, #0x20
	bne _021DCCA8
	ldrsb r0, [r6, #0x10]
	cmp r0, #0x20
	bne _021DCCA8
	ldrsb r0, [r6, #0x13]
	cmp r0, #0x3a
	bne _021DCCA8
	ldrsb r0, [r6, #0x16]
	cmp r0, #0x3a
	bne _021DCCA8
	ldrsb r0, [r6, #0x19]
	cmp r0, #0x20
	bne _021DCCA8
	add r0, sp, #0
	bl RTC_GetDate
	cmp r0, #0
	bne _021DCCA8
	add r0, sp, #0x10
	bl RTC_GetTime
	cmp r0, #0
	bne _021DCCA8
	add r0, sp, #0
	add r1, sp, #0x10
	bl RTC_ConvertDateTimeToSecond
	mov r4, r0
	mov r5, r1
	mvn r0, #0
	cmp r5, r0
	cmpeq r4, r0
	beq _021DCCA8
	add r0, sp, #0x1c
	mov r1, r6
	bl strcpy
	mov r2, #0
	ldr r1, _021DCCB8 ; =errno
	add r0, sp, #0x28
	strb r2, [sp, #0x23]
	strb r2, [sp, #0x27]
	strb r2, [sp, #0x2c]
	strb r2, [sp, #0x2f]
	strb r2, [sp, #0x32]
	strb r2, [sp, #0x35]
	str r2, [r1]
	bl atol
	ldr r1, _021DCCB8 ; =errno
	str r0, [sp]
	ldr r1, [r1]
	cmp r1, #0x22
	beq _021DCCA8
	sub r1, r0, #0x7d0
	mov r0, #0xd
	str r1, [sp]
	str r0, [sp, #4]
	mov r8, #0
	ldr r7, _021DCCBC ; =UNK04_0220C550
	add r6, sp, #0x24
_021DCB9C:
	ldr r0, [r7, r8, lsl #2]
	mov r1, r6
	bl strcmp
	cmp r0, #0
	addeq r0, r8, #1
	streq r0, [sp, #4]
	beq _021DCBC4
	add r8, r8, #1
	cmp r8, #0xc
	blt _021DCB9C
_021DCBC4:
	ldr r0, [sp, #4]
	cmp r0, #0xc
	bhi _021DCCA8
	ldr r1, _021DCCB8 ; =errno
	mov r2, #0
	add r0, sp, #0x21
	str r2, [r1]
	bl atol
	ldr r1, _021DCCB8 ; =errno
	str r0, [sp, #8]
	ldr r0, [r1]
	cmp r0, #0x22
	beq _021DCCA8
	mov r2, #0
	add r0, sp, #0x2d
	str r2, [r1]
	bl atol
	ldr r1, _021DCCB8 ; =errno
	str r0, [sp, #0x10]
	ldr r0, [r1]
	cmp r0, #0x22
	beq _021DCCA8
	mov r2, #0
	add r0, sp, #0x30
	str r2, [r1]
	bl atol
	ldr r1, _021DCCB8 ; =errno
	str r0, [sp, #0x14]
	ldr r0, [r1]
	cmp r0, #0x22
	beq _021DCCA8
	mov r2, #0
	add r0, sp, #0x33
	str r2, [r1]
	bl atol
	ldr r1, _021DCCB8 ; =errno
	str r0, [sp, #0x18]
	ldr r0, [r1]
	cmp r0, #0x22
	beq _021DCCA8
	add r0, sp, #0
	add r1, sp, #0x10
	bl RTC_ConvertDateTimeToSecond
	mvn r2, #0
	cmp r1, r2
	cmpeq r0, r2
	beq _021DCCA8
	subs r4, r4, r0
	ldr r2, _021DCCC0 ; =UNK04_022104FC
	sbc r3, r5, r1
	ldr r1, _021DCCC4 ; =UNK04_022104F8
	mov r0, #1
	str r3, [r2, #4]
	str r0, [r1]
	add sp, sp, #0x40
	str r4, [r2]
	ldmia sp!, {r4, r5, r6, r7, r8, pc}
_021DCCA8:
	mov r0, #0
	add sp, sp, #0x40
	ldmia sp!, {r4, r5, r6, r7, r8, pc}
	.align 2, 0
_021DCCB4: .word UNK04_0220C580
_021DCCB8: .word errno
_021DCCBC: .word UNK04_0220C550
_021DCCC0: .word UNK04_022104FC
_021DCCC4: .word UNK04_022104F8
	arm_func_end MOD04_021DCA84

	.section .data

	.global UNK04_0220C520
UNK04_0220C520: ; 0x0220C520
	.asciz "Dec"

	.balign 4, 0
	.global UNK04_0220C524
UNK04_0220C524: ; 0x0220C524
	.asciz "Jul"

	.balign 4, 0
	.global UNK04_0220C528
UNK04_0220C528: ; 0x0220C528
	.asciz "Oct"

	.balign 4, 0
	.global UNK04_0220C52C
UNK04_0220C52C: ; 0x0220C52C
	.asciz "Sep"

	.balign 4, 0
	.global UNK04_0220C530
UNK04_0220C530: ; 0x0220C530
	.asciz "Aug"

	.balign 4, 0
	.global UNK04_0220C534
UNK04_0220C534: ; 0x0220C534
	.asciz "Nov"

	.balign 4, 0
	.global UNK04_0220C538
UNK04_0220C538: ; 0x0220C538
	.asciz "Jun"

	.balign 4, 0
	.global UNK04_0220C53C
UNK04_0220C53C: ; 0x0220C53C
	.asciz "May"

	.balign 4, 0
	.global UNK04_0220C540
UNK04_0220C540: ; 0x0220C540
	.asciz "Apr"

	.balign 4, 0
	.global UNK04_0220C544
UNK04_0220C544: ; 0x0220C544
	.asciz "Mar"

	.balign 4, 0
	.global UNK04_0220C548
UNK04_0220C548: ; 0x0220C548
	.asciz "Feb"

	.balign 4, 0
	.global UNK04_0220C54C
UNK04_0220C54C: ; 0x0220C54C
	.asciz "Jan"

	.balign 4, 0
	.global UNK04_0220C550
UNK04_0220C550: ; 0x0220C550
	.word UNK04_0220C54C, UNK04_0220C548, UNK04_0220C544, UNK04_0220C540
	.word UNK04_0220C53C, UNK04_0220C538, UNK04_0220C524, UNK04_0220C530
	.word UNK04_0220C52C, UNK04_0220C528, UNK04_0220C534, UNK04_0220C520

	.global UNK04_0220C580
UNK04_0220C580: ; 0x0220C580
	.asciz "Fri, 03 Mar 2006 01:28:13 GMT"

	.balign 4, 0
	.section .bss

	.global UNK04_022104F8
UNK04_022104F8: ; 0x022104F8
	.space 0x4

	.global UNK04_022104FC
UNK04_022104FC: ; 0x022104FC
	.space 0x8