嵌入式开发者社区

标题: C6747利用McASP发送中断方式完成音频输入信号的直接输出 [打印本页]

作者: yusijiangchengm    时间: 2016-3-15 16:07
标题: C6747利用McASP发送中断方式完成音频输入信号的直接输出
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:' F" [: W; w9 X% ]
main文件:
0 X- H: l5 N" L4 ~: K% P7 X) }- \interrupt void interrupt4(void)  8 q% U3 b! u6 G. l/ p# m. h9 a  N
{9 e  c- V! S9 q7 t! Z7 i
  Uint32 sample;$ G4 @0 C+ p* U! n

/ r; |4 X- y% G8 Y. l  sample = input_sample(); // read L + R samples from ADC
; i0 ]( ]" `' ?2 I7 l  output_sample(sample);   // write L + R samples to DAC
. i9 _  Y$ J1 ~$ Q  return;5 q0 E, y; |$ I
}
# R3 u6 ^( b3 \$ ]9 ^7 A/ u+ I4 J: j4 o6 j
int main( void )
# d" J4 n8 ^2 I' S& P1 M1 j{
, f/ _) ~1 V9 D5 B
7 Z% u, L/ H( L4 d& W$ Y    /* Initialize BSL */
. W/ v: p% S( f5 D8 X    EVMC6747_init( );
3 U  I: a6 z( p( O, {; @+ m        /* Call evmc6747_intr function */. W/ f7 S) X7 m7 v) n/ k; N- S  b* e
    aic3106_init( );) u1 ], r  ^, _, x1 `0 D
        while(1);
9 x* m/ {" n3 D7 Z* i}
: X, {8 d) |$ m8 v% I7 u# O; x
  _7 n$ H6 w2 j7 G& f: A6 W) |- A" F, y! E
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题* h4 R9 _8 ?5 U( S" t+ T, r( O
/* Initialize MCASP1 */
' }# {# Y% @. _& F    mcasp = &MCASP_MODULE_1;3 A$ }( J, X0 c! m4 y$ y, ]
    mcasp->regs->GBLCTL  = 0;       // Reset* g' j' ~8 D. G/ [( E
    mcasp->regs->RGBLCTL = 0;       // Reset RX% {: H- k' V8 ?, f: i$ t" \
    mcasp->regs->XGBLCTL = 0;       // Reset TX; b2 o4 x6 q/ j! d
    mcasp->regs->PWRDEMU = 1;       // Free-running; V# x6 z! Y7 ]$ f0 o/ g
   // configure McASP0 receive registers0 w! t0 ^. n; ^4 v
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
) W8 K: R  _' Y+ }1 Q) N9 m7 s    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
# q$ S* R( [4 x  f6 ]/ n+ x$ g    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
+ c0 J, E( ~( z, F  P4 v( N    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
9 z" r/ H! A# Y& v2 m- j    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
$ |8 |% z: L9 F" n9 i2 \- ]2 k* }    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1) ]6 D7 i$ y9 b8 a
    mcasp->regs->RINTCTL    = 0x00000000; // Not used
) Y% K9 Z& \' K) C6 _1 |$ l    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
; S5 T2 l" ]- V2 _( b3 j$ @- ]5 a) I1 |4 f) ?5 m% H
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
5 Y+ V0 m& C6 U& `! B" E- O) q    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus2 J" ^2 J; \9 Z, ~0 u/ i7 I$ [& I
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
( \6 Y3 y7 g7 ?' k5 ^, ?1 j) Y    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16' x9 R- v5 B# s# i; ^
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
+ u8 n1 J3 Q, c1 d    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
, \$ N" u& Z% A+ E! q0 Z. D    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
+ j; H/ Y9 H# `$ b1 Y    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256$ K9 r# r8 i8 e% h- n
: v) {; E2 k9 {$ G7 Y8 E
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
2 m9 |- \* w2 {+ j' W9 N    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
" ]7 B' m# c/ u: B    mcasp->regs->PFUNC      = 0;          // All MCASPs
3 c* L9 |3 v7 u: g9 f3 C; z+ h    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
1 f1 l9 H6 y+ ?! F/ ~) j3 e' E: [/ l: s' F+ v* W% {  J$ D
    mcasp->regs->DITCTL     = 0x00000000; // Not used
5 I& g  H" p! g1 {7 ~    mcasp->regs->DLBCTL     = 0x00000000; // Not used, P* ?2 M, v) x) v% G* h
    mcasp->regs->AMUTE      = 0x00000000; // Not used. @4 @/ Y4 R3 b- L

% C2 T  L% L5 b/* Starting sections of the McASP*/
7 S+ L) U/ s, W9 C9 H    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; : X' C) \. H, L8 S" G, s
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
6 T  \- o* E$ K    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
8 b* D* C* q) c, M$ ?- V' g    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
: ~# T, T4 @) d# V& N) p" c. S+ g$ V. q; _" q
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
, O1 a" n$ F3 ?* S9 v1 x- X    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
3 i& i" }0 t: G  f    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; ' |0 Y7 c4 d9 c  M6 @2 @0 G! _& e8 ^
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );* J2 N* Q/ j  l7 M" V( b
; s( x" J9 \& y+ p3 g" H
    mcasp->regs->XSTAT = 0x0000ffff;
7 U$ X5 X6 C2 }+ C8 e+ p" v1 K    mcasp->regs->RSTAT = 0x0000ffff;
* c! ?% a2 a8 m4 @/ y" O7 {7 o
( |9 X4 p) {; T" Z& n" ]( B    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
" w, p6 S% ~# ?2 R* e5 Z  N    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );3 A3 c" @( b# L
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; 5 g. A, |1 Y8 B3 h' k/ V
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );: l  l; K" c* k! A# J% C
. M9 h8 h$ Z; ~! R7 l( V
    /* Write a 0, so that no underrun occurs after releasing the state machine */) T8 A' @+ |. H5 E
    mcasp->regs->XBUF5 = 0;; r; r5 ?- }$ g& p
    mcasp->regs->RBUF0 = 0;
4 b; F) ?( |  v) E
0 H6 v% N2 n" }1 Y! d    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; 6 O+ ]' T( ]# k2 Q6 P
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
4 P  R6 u0 M. [# n; L# i; t    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; 7 V7 r1 V0 H. p2 F2 A/ S0 V# {
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );; u. s+ D# o& V( a$ c3 D# F' l& p, c
/ W9 r  H+ n+ b5 d6 ^% O. m
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 0 p9 X0 N7 b! ~/ b% N, Z
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
& @: T2 w6 v6 i3 `: z( F    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; . X4 \0 G. y# P: X7 U  ^
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
5 J$ D( P# A# c, Y) I
: {1 u4 u6 L; Q8 N    CSR = 0x0000;; _5 P- |) q* Q
    INTC_INTMUX1 = 0x3d;1 w( F1 K- ]3 [$ i
    ISTP = (unsigned int)vectors;
2 d, D* T0 w& m/ ~    ICR = 0xFFF0;  
. `! @( z/ C& i# N    IER |= 0x12;  
  h8 l* _* v: r* \; {6 F    CSR |= 0x01;  4 P" Y7 W0 a# W$ w! U8 q+ Y

0 u) N" m2 q& W* W6 _8 s9 u6 I
- I( _" p4 N- m. j" s# W
$ f) `1 w: \$ }7 `  u" ~- C' [还有就是两个输入输出函数:
/ G4 T+ ]& E" hvoid output_sample(Int32 out_data)5 ]9 R& z" B4 q, @8 t+ @6 s
{
3 Q2 b4 F0 E7 O! x$ t  AIC31_data.uint = out_data;  7 X% ]( N+ [6 d; S
  MCASP1_XBUF5_32BIT = AIC31_data.uint;% g4 X6 x7 A4 l, ~
}
- I# G$ h$ u8 {  K, {# l+ S6 G- K5 w/ _7 {: O
Int32 input_sample(void)& {  ]( u" x. Y
{  6 n7 G1 w, s7 S! Z: k3 b- V8 f* j
  AIC31_data.uint = MCASP1_RBUF0_32BIT;. s1 b0 w" `. y) B  v5 _
  return (AIC31_data.uint);
' w+ }7 u# z: K: p}
7 `' {( L! I9 q4 U  E  i
/ Y% ~1 |# B  H, D& C
作者: human    时间: 2016-3-16 11:55
可以参看创龙提供的例程:AUDIO_LINE_OUT_INTR——Line Out 音频输出(中断方式)




欢迎光临 嵌入式开发者社区 (https://www.51ele.net/) Powered by Discuz! X3.4