C6747利用McASP发送中断方式完成音频输入信号的直接输出 - OMAP-L138 - 嵌入式开发者社区 - 51ele.net
设为首页收藏本站
点击跳转“创龙科技服务通”

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:2 {2 e/ ], {2 A
main文件:8 K7 s. G4 o1 d
interrupt void interrupt4(void)  $ {2 n, Q3 w0 g3 F6 y8 u( a, i% @+ T8 S1 `
{
! }: y( ^) _, u) t# c$ a  Uint32 sample;
: E& f8 U9 ?1 s& h9 J
: G- c  a& m0 l( y- l  sample = input_sample(); // read L + R samples from ADC3 y9 p$ X' _6 N7 E5 M3 U
  output_sample(sample);   // write L + R samples to DAC
1 Y0 I6 O7 x- o9 R: M2 ]0 Z  return;1 X, S: c$ r  _. ?+ o$ I
}8 L9 g' N4 r9 D: F$ T: t

( _$ R* L! B6 s3 v/ W: M; _  S5 Qint main( void )3 i6 }' }; o# N! K
{
' U$ {  ^4 L# ^: l) [/ m3 c$ ^* B% W+ Z. s4 p' X
    /* Initialize BSL */
4 Q9 ^0 y$ x2 v8 @- Y    EVMC6747_init( );
9 i- {) H. K, Q+ y0 A% G6 s9 T        /* Call evmc6747_intr function */5 ^7 P, S! q- n( `2 o) i) x
    aic3106_init( );% Y- v$ [/ R! }. S
        while(1);& x+ k& e3 ]( y# f; K8 Q
}
! U/ M' C# r2 h, z* ]7 I9 d# n8 Z, f8 `. _

. U3 ~% ^8 ~+ M; j( w4 q% S+ Gaic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题& R+ n9 A8 _; R! `8 X( o0 T' n# E4 t
/* Initialize MCASP1 */
+ ^3 r+ ^, G/ m! f  F    mcasp = &MCASP_MODULE_1;
, ^( @+ v& K1 p7 h3 o6 w    mcasp->regs->GBLCTL  = 0;       // Reset
5 S3 H0 g7 g, |" S0 a    mcasp->regs->RGBLCTL = 0;       // Reset RX( q* T) \2 B1 }' r
    mcasp->regs->XGBLCTL = 0;       // Reset TX+ `& M, m* d& k! u
    mcasp->regs->PWRDEMU = 1;       // Free-running$ I1 [! P& I; ]- X7 U+ c1 P
   // configure McASP0 receive registers$ ^3 K9 y, M1 w# h# h
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used6 H( z5 h% w* o  k- t, \
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
# j7 L/ G7 E6 L4 n- L3 m    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
3 y  W* c5 F+ u# j9 y$ @0 Z    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)/ J6 b8 ?) [, q/ f  J  _6 D
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
: _2 Y: C6 F7 [    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1! e- L6 G/ a3 x
    mcasp->regs->RINTCTL    = 0x00000000; // Not used
! Y/ C& y* p% d$ v. S: H- W  G/ {: m    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
( N# G/ S/ H% {( A3 }
7 a# Z& N4 ^1 b. a    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used& b" M$ E# x8 @
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
5 [, C! e& V& _& g; B* }    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word& Y) i0 ~: C7 `, ?/ Y5 k6 K" U# s. d
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16& |, [  o. |) X# v: R
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
/ v  ^& R! `0 r9 C+ K0 |' t* A    mcasp->regs->XTDM       = 0x00000003; // Slots 0,10 ]. r2 U/ y/ ~! s5 }  p
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
* G  [- G8 u& o4 `; y    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2564 ]9 e: N6 N4 s/ J, i% A1 T; n1 C

, g) {/ o9 z( w. Y9 B; ?# F! e3 i/ p+ g    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
1 k2 j- ]6 R3 W6 x6 ?" o/ o  T    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
9 K7 @: r+ k! T7 K% d* f5 F    mcasp->regs->PFUNC      = 0;          // All MCASPs
3 B* S3 K" {, C, Z/ t. c8 u$ \    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1% l4 p6 w  v" }% A( _  M
6 J2 ]1 q5 e9 _" B" L+ h6 X* J
    mcasp->regs->DITCTL     = 0x00000000; // Not used
7 m; @5 I) L- f; N1 h7 l    mcasp->regs->DLBCTL     = 0x00000000; // Not used+ |* ], ^3 K/ ^/ c5 v
    mcasp->regs->AMUTE      = 0x00000000; // Not used
, t, o& Z/ e! b7 ~4 b! `
4 s& G1 u! s+ u! l9 N/ b7 E& H) n/* Starting sections of the McASP*/
0 q  ^' p  g( T9 P    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; 2 B4 ~) |. K, c; p
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  " a) w7 _3 u9 Y, u& B2 A0 k. |
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;   e& S% }* u+ B; Y+ o
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
) v- @2 n" t0 L1 E8 W& f. D" a/ \
, K) K0 w  G' g( Z/ T, G* x' U. T2 W& P    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
1 A4 B2 V0 e  ?3 L; k    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
2 p) k. |; H. v. \) l    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
8 J& N2 a, i; ~, `  w    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );& ~9 q) f+ M+ R: R) L$ A3 f
. u, O/ j& K7 x/ i* X7 {1 h
    mcasp->regs->XSTAT = 0x0000ffff;
' C/ L9 u, a* N: t( s- ~" a6 P    mcasp->regs->RSTAT = 0x0000ffff;
* Y5 {# d; F9 d# i) D6 o; m2 G3 |3 a6 a, v. Y8 v
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;& j6 i6 ]0 {' }' N5 I
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );! H4 d5 w2 L+ ?6 B! Q# C
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
. W5 _4 X% {6 b; S. R+ d    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
: v- m# N& r/ H$ b6 m& y0 E& V
8 E/ e7 k& x$ u% S& I1 K- E" y    /* Write a 0, so that no underrun occurs after releasing the state machine */
( Y& ?2 W- l) i0 B4 A    mcasp->regs->XBUF5 = 0;
, V  X  c/ M' s- x    mcasp->regs->RBUF0 = 0;
% r/ U! V7 Z1 Y. V5 `! ~) f: C4 c5 y& i$ l0 O
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
8 Z& I4 n* B3 f$ d    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
* x& R) ?7 c4 d5 A    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
% g$ r! P1 V4 W( V    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
2 I! n3 }+ R" Z
7 \3 I2 y, Y# L! f, S( G    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
' [- C8 R  H$ U+ p    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );7 V' k7 q: v* d1 X
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
9 a& x( f$ L# D  I+ F    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );; p, K" A7 ~" ]  |$ U+ X, h

0 Y5 U0 W& b) r( X+ f    CSR = 0x0000;
1 M2 W& U9 c) L9 b7 `1 ?5 _    INTC_INTMUX1 = 0x3d;
8 Y( q4 [$ f. e! r1 o% Q: r- S    ISTP = (unsigned int)vectors;& y: {* H. [, ^
    ICR = 0xFFF0;  
1 q$ x$ Z1 r" v% T# g7 H+ n    IER |= 0x12;  " }5 F: j: z1 y7 ~
    CSR |= 0x01;  
/ ?3 Y: I& T. q. z7 z
' i/ V% N$ c+ J1 B
7 Z- h1 B. l3 M
& B9 r0 U6 b0 s还有就是两个输入输出函数:
& ]. Q6 d# Y1 {7 cvoid output_sample(Int32 out_data)
9 B4 k7 L5 |! M9 a  S# J{
8 A: A8 l/ ?. v! a1 J  AIC31_data.uint = out_data;  
3 |7 }9 m0 x, f; u% X! u0 D. ?  MCASP1_XBUF5_32BIT = AIC31_data.uint;( {7 z& n6 V. e1 t: z
}) A% S4 N( v$ e/ a0 h7 ^0 Z+ Y

7 O$ G8 {4 Y! SInt32 input_sample(void)
$ ^$ C/ p  ~" R7 w2 P2 `{  
. M* Q2 S: I+ \" H0 y% N  AIC31_data.uint = MCASP1_RBUF0_32BIT;- U! e7 w/ @8 X- {' t1 U
  return (AIC31_data.uint);
) r" {  G2 R7 p/ l& E+ {# q}
9 y$ v  h' ^) W, l  P) \) Y, Z0 {  M4 i* ]* R' T& x
分享到:  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, 2026-3-1 16:26 , Processed in 0.045619 second(s), 26 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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