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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
4 m% b. F% N1 U( L+ i2 gmain文件:; N9 Y6 t6 ]- N0 D/ i+ G* Q
interrupt void interrupt4(void)  
" k0 ~+ t# p7 S( _{
6 P' `3 i% W1 o  Uint32 sample;
/ M( a  |. D' ^% p: V7 J
% g1 d% A0 I+ O! k0 g- ^7 M  sample = input_sample(); // read L + R samples from ADC
6 L9 Q8 B& S/ U8 U1 h  output_sample(sample);   // write L + R samples to DAC
, H8 |2 E  t& T- `$ N1 d2 ^) i! b3 F  return;
' _- s4 L0 ]9 z9 R" l2 C/ N: Z% k}* ~" ?, {: ?% o* Z% x, a
: q' |+ ?. T" b- H4 D3 O# S
int main( void )6 X: r' g8 A- u' ^
{
0 U2 s: f  t& f2 W- k
9 c' |1 n( ?; y8 a; M    /* Initialize BSL */
" b' J" x1 f; ^+ K1 B) z    EVMC6747_init( );
2 d% g, w) d; d        /* Call evmc6747_intr function */
# I+ |% B& f) G5 E" S    aic3106_init( );) g5 a6 B) v. q3 _/ P6 \, _
        while(1);
/ ^6 E. w* i5 q* [}& t. ]0 y& f6 v
) K/ r. A* B4 L5 B  [8 d3 t$ }

% {" m& w! g. o# s3 paic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
1 q+ ]: [6 a. `7 |! `/* Initialize MCASP1 */9 Y8 _, \6 V. |5 t7 Q* p9 R
    mcasp = &MCASP_MODULE_1;
1 U8 z* q5 t& R) g* p4 f    mcasp->regs->GBLCTL  = 0;       // Reset
% n! D  R0 }% E: @) ~8 L4 c* \    mcasp->regs->RGBLCTL = 0;       // Reset RX
  K( x) w0 V; y& M% p8 A    mcasp->regs->XGBLCTL = 0;       // Reset TX
. f9 ]/ [0 S( X: R2 f, M: C    mcasp->regs->PWRDEMU = 1;       // Free-running
3 g# y% l7 O8 w   // configure McASP0 receive registers
3 I5 |  B0 K! h- g8 @    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used: m; u/ Z4 m. s$ e; M8 ?
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
0 c0 p# D) w! Y    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
& U, j- X+ |$ C5 O+ b; ~" y0 F    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
% I: w' O6 p) P, R  f3 p  Q% F    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
2 t9 \* j8 L8 T$ D0 E" `    mcasp->regs->RTDM       = 0x00000003; // Slots 0,13 B! t& `) ]2 _: U# r
    mcasp->regs->RINTCTL    = 0x00000000; // Not used
$ d$ k, T+ Z! h0 y    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
2 t" j" j7 ~8 B- F) f9 {8 f9 \% x- Z3 r
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used" l( d; D! k: F$ I' U3 ^, @  `
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus+ E( N! O' B" L' p! O/ v. n
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word/ \$ O( W5 s; o' V+ ]1 L
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
2 y% h  K# u6 j) ]    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
% A8 R' B6 D+ J1 I' X    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1) L9 e. V* u+ a2 \
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
& V+ D7 u* Z% Z  M. v" i' B( [/ ]% B; n9 {    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
+ Y& {% C7 W. |) _4 d$ l6 R4 j7 v7 I- ^9 \
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN) P/ e7 l8 V& R( G' t7 }
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
9 ?- w( o. v) M9 ]3 z* q    mcasp->regs->PFUNC      = 0;          // All MCASPs
! \8 L# r( l- K3 l  P    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX15 W, l" R4 a4 ?: k5 A% s

5 E2 _; d3 n% v7 c: C( O: T    mcasp->regs->DITCTL     = 0x00000000; // Not used6 }7 U2 h5 @' n/ Z
    mcasp->regs->DLBCTL     = 0x00000000; // Not used/ [" S. U! T  v( w1 h
    mcasp->regs->AMUTE      = 0x00000000; // Not used
2 w' v9 W. [5 b, b  x1 \  n5 c/ s3 R: |. a  ]
/* Starting sections of the McASP*/
: T9 J+ D+ v/ y5 E! P6 g    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; ( b( Q, p6 x/ Q
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
; ?" F8 c* q7 E, L: y# Y3 K    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; 8 ~% A5 d, G! Z9 |# l
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
9 i3 F& Q. O6 r0 }8 E; r* z) P- O. B
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; - h8 D+ h% `* m% y4 \4 I$ A9 F/ D
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
# o- S9 N: d! M) j    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; / {5 J1 Y7 R; ?4 B6 ~- i  p
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
4 ~& G2 B. j2 g  B6 h0 \. ]' t6 w  h5 }" s- }4 t# ~9 i
    mcasp->regs->XSTAT = 0x0000ffff;
7 j; b( |. c8 `, B- X$ n& ]" i* T    mcasp->regs->RSTAT = 0x0000ffff;
; J4 E  W$ ~1 G& G  w+ b6 d$ }  }7 _5 ]0 P/ `/ v% `
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
! o& L, i5 S/ @    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
4 p; r- z7 f, ]* I# e2 Q    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;   ^+ H+ O3 z, s; F/ y+ B$ N5 J; v# s& S
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
7 `. L4 _# a9 U$ Z! F# l! R
- a6 F; S  p$ W) {/ m" V5 I    /* Write a 0, so that no underrun occurs after releasing the state machine */" }" `: Y7 |8 d# E
    mcasp->regs->XBUF5 = 0;
7 z8 c3 U' Y, s2 I' h! e    mcasp->regs->RBUF0 = 0;
7 z' o% T7 `+ U/ C: i. c7 @$ ]$ s( X5 W+ G9 ^2 W6 D% r
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; 4 W) ^9 d0 j$ w
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );/ [* M* Z* P# g' V+ s
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
/ T4 _$ t* L, P$ T' H& H: q* C! `) q    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );0 {0 W. O4 ?, P: |/ e1 g  f

. Q8 M. T3 n& l    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
( i  g% i/ K# C) w! T1 L    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
4 Z1 h  f0 i! z7 k) ]    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
. q5 p. _9 x; d7 {: s1 J) x    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
. z) Y/ e  ?  }. a/ l" m3 e, X3 ~0 n* M" ~8 x/ I
    CSR = 0x0000;
5 B8 W; d. k" f2 N: [& p    INTC_INTMUX1 = 0x3d;0 I5 Y, |) i& m! r, s4 \3 n9 Z
    ISTP = (unsigned int)vectors;
, V8 ^# `! W( P$ r! v    ICR = 0xFFF0;  % I( T9 i' }0 G# D' @
    IER |= 0x12;  
2 P4 Y+ W2 _0 X/ V" W# L    CSR |= 0x01;  4 S1 }& }- _0 E6 h( o! ^, g

; g: r9 ]# b* l1 w! T: R- ?' @
6 M" z0 `7 v* {) `% O
/ a5 B8 e- C& T8 Z: @* n# j! t# y还有就是两个输入输出函数:
" Z! x: m) O2 \* N# Ivoid output_sample(Int32 out_data)
9 X' K/ N4 P* o* _3 k( u; W: |{
. w0 t* u7 C# l6 P  AIC31_data.uint = out_data;  * b: E3 k+ u" K7 N% o/ M
  MCASP1_XBUF5_32BIT = AIC31_data.uint;
7 }0 h  ~5 C, l; L}
4 o9 u6 S' c- |" b- t, u3 T8 R; W1 _. Z+ P
Int32 input_sample(void), y) B) U- z' \. [/ T
{  
8 q+ E/ j+ N. q  AIC31_data.uint = MCASP1_RBUF0_32BIT;
3 y) w% U+ p  z5 O! B( ~5 M1 v$ h  return (AIC31_data.uint);5 M6 N( }; N6 Q1 g7 s, F; n
}# [, \# j) N  s1 {
& n" B$ G, {! u( E& S
分享到:  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-23 19:08 , Processed in 0.038918 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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