C6747利用McASP发送中断方式完成音频输入信号的直接输出 - OMAP-L138 - 嵌入式开发者社区 - 51ele.net
设为首页收藏本站

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 5854|回复: 1
打印 上一主题 下一主题

C6747利用McASP发送中断方式完成音频输入信号的直接输出

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
6 U, K  q7 s$ z6 imain文件:
  I$ k8 I( |' h' O: m* b' Ginterrupt void interrupt4(void)  
3 s. @8 Z$ \, N$ f) ~{' k2 v- B. h7 B3 H5 b
  Uint32 sample;
2 Q0 C% x9 L0 H3 _/ k
! o' J$ @  t8 y* d0 I  sample = input_sample(); // read L + R samples from ADC
% g& B  j; F7 u. K7 Y& @7 b  output_sample(sample);   // write L + R samples to DAC * n$ I: K1 ~  x( ]: O
  return;
; x! `4 r$ f( o1 z4 }# A0 I; K5 J1 ]# D}
% N5 l, V7 q! m$ X4 E: E- t3 C) R/ S8 X- b
5 U$ u" o0 D- t8 fint main( void )
( N7 c4 ^) S/ G: S6 h+ @# ?5 }{& j5 g% \8 D- T: x5 ]

; D5 m+ I* r9 I9 Y  H$ _1 J    /* Initialize BSL *// t& `7 H' f- s1 h  X8 V
    EVMC6747_init( );$ e9 K# E# Q8 e# F
        /* Call evmc6747_intr function */
6 W+ \1 p' H5 J/ X3 v1 L+ X# h    aic3106_init( );/ D$ Y. Q, I! s2 z
        while(1);
/ `. z# g& Z3 ~}/ r4 Q( G) c9 \* G
) l$ {5 s- b+ i+ V9 p. D, z: ^$ K6 ]
, ]: ?- ^+ f% `& Q( A# ~
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题7 _. B$ r/ g- D' Z. z# t
/* Initialize MCASP1 */
. ?0 t( i" e6 V2 \1 j    mcasp = &MCASP_MODULE_1;
' W4 U7 k3 D: i; ?, F* O9 u  I' X/ L    mcasp->regs->GBLCTL  = 0;       // Reset
" y5 O! ^$ U+ B0 e* `, F    mcasp->regs->RGBLCTL = 0;       // Reset RX
9 z+ P' x2 c+ W- k3 t0 T/ A  B  _    mcasp->regs->XGBLCTL = 0;       // Reset TX
; }/ E) E. c" u8 u    mcasp->regs->PWRDEMU = 1;       // Free-running2 I! U9 i2 w# [' Q2 u
   // configure McASP0 receive registers
9 a; l+ I/ ?; g    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
8 w# o; U, b# n6 `    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
6 x( G2 \  v5 {    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
5 n0 P+ l( I! a8 i- z! A1 R/ G    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)% P, ~* }2 j' y
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
6 Q0 p. z- X8 A, Y4 B) F' b$ A    mcasp->regs->RTDM       = 0x00000003; // Slots 0,13 Q/ b" o8 M/ p* m. }
    mcasp->regs->RINTCTL    = 0x00000000; // Not used; O$ h( I; E; v" R( [4 }; n7 U& c5 D
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256; O. r; V! l& T
1 ^) A" i1 k- R2 x
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used7 U+ }  o' k) C0 \8 @
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus- s1 P: C7 p1 g) z, m' F  o
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
) q6 C0 q$ n; {2 W8 ?    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
4 Y) j9 s2 [9 B- ]$ Y/ H" S    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
! f4 X* y- U" d    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
" _  n  W8 L# K8 \    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit9 w5 m3 a- v: z; Q- ]$ ^8 E* O
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2569 b, U. v1 h# J; S  t8 d3 W1 k

) E5 n6 k3 e1 F$ y$ Q    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN$ d* _" D. _6 }# m% i4 B
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
! [' w# c  ?6 C    mcasp->regs->PFUNC      = 0;          // All MCASPs
1 V; N: \3 U# L5 Z: c    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
8 ?4 H& N3 j. @# M7 j8 e% v3 W3 ?0 f1 d. I8 A$ |' p4 a0 a& F  E
    mcasp->regs->DITCTL     = 0x00000000; // Not used3 y: _  N) `% }. S4 Z
    mcasp->regs->DLBCTL     = 0x00000000; // Not used
4 j8 N  c5 L" J: M# y    mcasp->regs->AMUTE      = 0x00000000; // Not used; C( j, r( K- b& a% k7 |2 |

% |6 O$ m1 ^3 ?9 i/* Starting sections of the McASP*/2 p' i7 V+ k1 h
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
' N" {% n5 K+ v% f    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
! @8 P2 ~- [3 [) ]    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; . L+ b( s- V6 m
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
. j8 t% Z* z& }9 H- r: K/ \( H; R# S
9 j% S3 C: v2 c1 z5 H% n4 w    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; 5 c  X1 P, _4 Z& ], m' p/ i
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );9 I3 ?) w6 _8 a
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
( y) l5 Z: F( m- {    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );) S% o# E. _2 t: Y( {/ S2 q
) p( \+ Y8 n: W7 v# G
    mcasp->regs->XSTAT = 0x0000ffff; ! c  k0 {+ Z% C9 b! G0 p
    mcasp->regs->RSTAT = 0x0000ffff;
+ G9 j) L) V) H& R" f2 p- y  y" r& m* ?3 t# @' {7 ~
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
( g0 e9 p" K" K    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
' O* X$ W, G2 D! f3 U+ s    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
$ f/ B, ]* L! V2 q- E    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );& J# n& H+ L; D% x

1 T8 J% e7 ^( D- D8 _. E( W    /* Write a 0, so that no underrun occurs after releasing the state machine */
) d7 w) g# z! [8 |7 t5 q+ c: {) @    mcasp->regs->XBUF5 = 0;
# P( C# B4 d* {7 R0 l* M    mcasp->regs->RBUF0 = 0;
1 X0 X: y' b" V7 q5 x% G# G1 Z+ o# Q' I, v
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
4 |0 b% d  W, t% M% g( {; z9 I' @    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );6 N" A  ?$ Z0 ^; S3 F# U8 v3 A# B! W
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; - B$ M$ V' }5 u  r) g/ \" {( M% C
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );& X; Y2 L9 C/ |: c  i6 e

4 H0 T3 ~$ U+ f# L  ^" Y/ V6 O    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
- o2 ]  J6 ^& ^* Z: J. O8 |    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
% `' F& ~" p: Q3 H' r- u    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
7 n( h* Y5 r+ j  H* h8 F# b; \    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );% D) H. Z9 h- Y8 }9 K4 ]

% _" [* v/ N" M7 a6 v- X    CSR = 0x0000;1 S2 d+ J# @4 ?
    INTC_INTMUX1 = 0x3d;
; L' a: a2 ^( r    ISTP = (unsigned int)vectors;9 x' G% e6 ^+ }( M$ l
    ICR = 0xFFF0;  
& X2 K( l# d9 k$ [. z2 a- K    IER |= 0x12;  
! u+ K8 s* F% f; _+ Y6 ]) ]+ B9 N! n    CSR |= 0x01;  0 Y8 b9 A& Z) a2 b! ~

! c/ m- a+ i3 u5 P) Y. j
$ y2 T0 S- v; F( J. c9 G' j, {; |/ P# K: I( b( B
还有就是两个输入输出函数:# O- a+ M; D: i8 p$ Y9 k" _4 ~
void output_sample(Int32 out_data)
+ w+ h* L2 G: d8 D; [5 K# L{
# o( F$ \4 T3 @8 n9 U  AIC31_data.uint = out_data;  
. s; j$ A: l5 z+ V) c" W  MCASP1_XBUF5_32BIT = AIC31_data.uint;
# [% D- D- a* f: u}& `/ X' `  C5 i- G9 w% m: k

+ z- F2 a+ C/ J& R0 D8 F& JInt32 input_sample(void)
, Z1 L* `$ u! y" O+ H{  
% Y$ K, S5 A: A6 {( H# Y  AIC31_data.uint = MCASP1_RBUF0_32BIT;2 ^) M) d5 x' ]/ r
  return (AIC31_data.uint);% j" U* ?1 t9 S1 z/ k2 f1 W
}
; m  [* N- L- k$ v& C! k! R* n- r9 a- R( J! h7 Y5 u* D
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖
回复

使用道具 举报

3

主题

852

帖子

3538

积分

创龙

Rank: 8Rank: 8

积分
3538
沙发
发表于 2016-3-16 11:55:59 | 只看该作者
可以参看创龙提供的例程:AUDIO_LINE_OUT_INTR——Line Out 音频输出(中断方式)
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|手机版|小黑屋|嵌入式开发者社区 ( 粤ICP备15055271号

GMT+8, 2025-12-21 12:23 , Processed in 0.036955 second(s), 23 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

快速回复 返回顶部 返回列表