00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031 #ifndef _ASMDEF_H
00032 #define _ASMDEF_H
00033
00034
00035
00036
00037 #ifndef __AVR_HAVE_MOVW__
00038 # if defined(__AVR_ENHANCED__) && __AVR_ENHANCED__
00039 # define __AVR_HAVE_MOVW__ 1
00040 # else
00041 # define __AVR_HAVE_MOVW__ 0
00042 # endif
00043 #endif
00044
00045 #ifndef __AVR_HAVE_LPMX__
00046 # if defined(__AVR_ENHANCED__) && __AVR_ENHANCED__
00047 # define __AVR_HAVE_LPMX__ 1
00048 # else
00049 # define __AVR_HAVE_LPMX__ 0
00050 # endif
00051 #endif
00052
00053
00054
00055 #define _U(name) name
00056
00057 #define __tmp_reg__ r0
00058 #define __zero_reg__ r1
00059
00060 #define XL r26
00061 #define XH r27
00062 #define YL r28
00063 #define YH r29
00064 #define ZL r30
00065 #define ZH r31
00066
00067 #define SPL_IO_ADDR 0x3D
00068 #define SPH_IO_ADDR 0x3E
00069
00070 #if defined(__AVR_MEGA__) && __AVR_MEGA__
00071 # define XJMP jmp
00072 # define XCALL call
00073 #else
00074 # define XJMP rjmp
00075 # define XCALL rcall
00076 #endif
00077
00078
00079
00080
00081
00082
00083
00084
00085 .macro FUNCTION name
00086 .ifdef .L__function
00087 .err "FUNCTION is defined already"
00088 .endif
00089 .L__function = 1
00090 #ifdef FUNC_SEGNAME
00091 .section FUNC_SEGNAME, "ax", @progbits
00092 #else
00093 .text
00094 #endif
00095 .type _U(\name), "function"
00096 .ifdef .L__END
00097 .err ".L__END is defined already"
00098 .endif
00099 .size _U(\name), .L__END - .
00100 .endm
00101 #define FUNCTION FUNCTION
00102
00103
00104
00105
00106
00107 .macro ENTRY name
00108 .ifndef .L__function
00109 FUNCTION \name
00110 .endif
00111 .global _U(\name)
00112 _U(\name):
00113 .endm
00114
00115
00116
00117 .macro ENDFUNC
00118 .L__END:
00119 .endm
00120
00121
00122
00123
00124
00125 .macro REGNO name, reg
00126 \name = -1
00127
00128 .L__regno = 0
00129 .irp sym, r0, r1, r2, r3, r4, r5, r6, r7, r8, r9, \
00130 r10,r11,r12,r13,r14,r15,r16,r17,r18,r19, \
00131 r20,r21,r22,r23,r24,r25,r26,r27,r28,r29, \
00132 r30,r31
00133 .ifc \sym,\reg
00134 \name = .L__regno
00135 .endif
00136 .L__regno = .L__regno + 1
00137 .endr
00138
00139 .L__regno = 0
00140 .irp sym, R0, R1, R2, R3, R4, R5, R6, R7, R8, R9, \
00141 R10,R11,R12,R13,R14,R15,R16,R17,R18,R19, \
00142 R20,R21,R22,R23,R24,R25,R26,R27,R28,R29, \
00143 R30,R31
00144 .ifc \sym,\reg
00145 \name = .L__regno
00146 .endif
00147 .L__regno = .L__regno + 1
00148 .endr
00149
00150 .if \name < 0
00151 .L__regno = 0
00152 .rept 32
00153 .if \reg == .L__regno
00154 \name = .L__regno
00155 .endif
00156 .L__regno = .L__regno + 1
00157 .endr
00158 .endif
00159
00160 .if \name < 0
00161 .err "Invalid dst arg of 'X_lpm' macro."
00162 .endif
00163
00164 .endm
00165
00166
00167
00168 .macro X_movw dst,src
00169 #if __AVR_HAVE_MOVW__
00170 movw \dst,\src
00171 #else
00172 REGNO .L__movw_dst, \dst
00173 .if .L__movw_dst < 0
00174 .exitm
00175 .endif
00176 .if .L__movw_dst % 1
00177 .err "Invalid dst arg in X_movw macro"
00178 .exitm
00179 .endif
00180
00181 REGNO .L__movw_src, \src
00182 .if .L__movw_src < 0
00183 .exitm
00184 .endif
00185 .if .L__movw_src % 1
00186 .err "Invalid src arg in X_movw macro"
00187 .exitm
00188 .endif
00189 mov .L__movw_dst, .L__movw_src
00190 mov .L__movw_dst + 1, .L__movw_src + 1
00191 #endif
00192 .endm
00193
00194
00195
00196
00197
00198
00199
00200
00201
00202
00203
00204
00205
00206
00207
00208
00209
00210
00211
00212
00213 .macro X_lpm dst=r0, src=Z
00214
00215
00216 REGNO .L__lpm_dst, \dst
00217 .if .L__lpm_dst < 0
00218 .exitm ; do not multiply errors
00219 .endif
00220
00221
00222 .L__lpm_src = -1
00223 .L__lpm_n = 0
00224 .irp reg, z,Z,z+,Z+
00225 .ifc \reg,\src
00226 .L__lpm_src = .L__lpm_n
00227 .endif
00228 .L__lpm_n = .L__lpm_n + 1
00229 .endr
00230
00231 .if (.L__lpm_src < 0)
00232 .err "Invalid src arg of 'X_lpm' macro."
00233 .endif
00234
00235
00236 .if .L__lpm_src < 2
00237 .if .L__lpm_dst == 0
00238 lpm
00239 .else
00240 #if __AVR_HAVE_LPMX__
00241 lpm .L__lpm_dst, Z
00242 #else
00243 lpm
00244 mov .L__lpm_dst, r0
00245 #endif
00246 .endif
00247 .else
00248 .if (.L__lpm_dst >= 30)
00249 .err "Registers 30 and 31 are inhibited as 'X_lpm *,Z+' dst."
00250 .endif
00251 #if __AVR_HAVE_LPMX__
00252 lpm .L__lpm_dst, Z+
00253 #else
00254 lpm
00255 .if .L__lpm_dst
00256 mov .L__lpm_dst, r0
00257 .endif
00258 adiw r30, 1
00259 #endif
00260 .endif
00261 .endm
00262
00263 #endif