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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:; K) I9 o) U7 s, b$ k% j5 G
main文件:
% y9 p+ g" I, w! I% R8 Yinterrupt void interrupt4(void)  . Q0 j2 Y! m2 z. K
{2 |% h" z: f/ c/ [: Y$ J: s: Q8 q
  Uint32 sample;
+ R1 i2 T& S# k0 f+ F7 ]4 a+ A# P* q* O' m; f2 |8 Z& E, u2 ^. @0 g7 \' L
  sample = input_sample(); // read L + R samples from ADC
0 b- R& A3 A& O1 a  output_sample(sample);   // write L + R samples to DAC 5 w( `/ |: b; x& ~8 Q1 r% @
  return;
" G% P8 f& j+ o( z1 ?}9 P+ ?; [! ?# J% ~  v1 E6 G; p

- y/ t; M# m; k7 Hint main( void )" ?  u+ z* K, Z, T: T
{9 b# [$ T" [5 e  C9 l  `

6 @$ P& E/ i3 Y: n, g! A    /* Initialize BSL */" u- G7 R& c; w* I0 _- `" H4 u4 n
    EVMC6747_init( );
% W5 R5 _$ w. l2 T( V1 t5 W        /* Call evmc6747_intr function */
% T& V0 ^/ t$ f. C( |3 y- C    aic3106_init( );
. e; e+ q' F9 D        while(1);1 E( _; F3 d. z
}. H1 ^, ^+ X8 o$ U( p
0 n( p7 X- E7 m0 \1 Y" T" \9 K  L
2 p) j+ f/ c( v2 T+ U" b
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题0 Z; v+ @/ `4 y5 e# O. K' l
/* Initialize MCASP1 */( |* Z: X  U- F  i% J
    mcasp = &MCASP_MODULE_1;  H0 x2 j0 j' D9 O+ l
    mcasp->regs->GBLCTL  = 0;       // Reset. W4 }4 a! ?0 t
    mcasp->regs->RGBLCTL = 0;       // Reset RX
2 e) i# }/ U8 z    mcasp->regs->XGBLCTL = 0;       // Reset TX
( b7 a( K! o& J/ u& C& R# q1 m    mcasp->regs->PWRDEMU = 1;       // Free-running
9 U' b: Z1 {6 @! @% \   // configure McASP0 receive registers
. f( u( r9 ~3 z( B9 ^    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
- b6 X. g1 f. F5 L7 d. Z    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
) W# s$ Z0 q7 j" w( c    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
/ _/ s* M- k; l4 M; D& G    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)! A' J* I# `. ^9 C: P
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
: ^7 W: R: D( V    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1& F/ |- Y% s9 h
    mcasp->regs->RINTCTL    = 0x00000000; // Not used
4 ~( d0 n7 I8 d+ X9 T    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2568 G5 {3 w" c$ G/ B
9 M) X1 J5 @, \7 O( E
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used& {' O8 E9 l9 M, k- }+ F/ c2 A' R
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
) ^/ ?1 b5 J4 f! w    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word. [6 W8 W( q8 u8 B. `
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-160 i! H; C; {5 w/ N! ^- _3 K# _
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK) v  b, i: K3 x# c
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
2 m, p2 q+ a% F6 `2 q1 q    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit7 W  Y8 \6 y  o5 _
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
- o, e: L! D, Z+ I# B. R3 V' G7 x8 B1 T5 ?7 p/ O
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN1 C( K  Y  c: o. \! e- |
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
0 u* d( i: V: Z2 X) _    mcasp->regs->PFUNC      = 0;          // All MCASPs
# B' W/ @' d3 t% G    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
* B% {5 g! w7 y; P
& S! z" h3 N* j4 ?! ^    mcasp->regs->DITCTL     = 0x00000000; // Not used
% d0 L& q$ o! d0 c4 U    mcasp->regs->DLBCTL     = 0x00000000; // Not used
+ l, F4 n0 Y& M6 b6 d* z    mcasp->regs->AMUTE      = 0x00000000; // Not used( t7 v2 T2 S" [( c/ _8 H: D

6 N  ]: s! [3 p1 ?: e" w$ p/* Starting sections of the McASP*/1 S/ q4 `8 q" ^- {$ _% H, C7 X
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
8 B5 H: h2 ?, B8 P" K8 e5 X: j    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  " |; x( B( \% v5 K; t) a
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
: i+ ]; X* i) v( G1 e. G* L/ Y4 D- k    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
: H! k* W; M& k6 A# [1 t3 y* Q! H# t, k+ v$ Q0 j! D
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; # Q! b9 }: k/ {+ `/ p
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );$ Z* Y1 s6 W$ X# V  b
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
, G: \/ Q8 v3 P0 s1 C& A- Z    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
8 d, X% p2 J' j8 a4 \5 O3 J0 f% o/ ~7 W& g+ U5 L5 k' L
    mcasp->regs->XSTAT = 0x0000ffff; 4 R! c$ {- s) L! Q
    mcasp->regs->RSTAT = 0x0000ffff;
$ C$ |) w3 b6 Q' t& P; z+ G: j, B( ~# B0 H4 G5 w
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;, ~7 E5 [3 g1 _
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );" {& w8 k. w9 d) r& p% `. d
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; + t: A/ @7 e* j" S; O/ w
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );; g( @+ T5 m) g/ N3 z* h& H

# j  s, ]. _% t: C- A* ~    /* Write a 0, so that no underrun occurs after releasing the state machine */+ O* G7 q" t" Z1 C/ i' y4 p
    mcasp->regs->XBUF5 = 0;. u  V5 x3 M3 t/ t
    mcasp->regs->RBUF0 = 0;
1 Q8 h% `- V* X% I* S0 k9 @+ h$ B: S3 j+ |$ H
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
  l  w- `5 @5 j# r: t    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
) N( i, _( D0 f. }9 x1 f    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
% }3 i" L. K$ u! [# I# Z0 Z    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
- F0 @% h( `6 Y2 L1 `* i" F; c# H3 T- f9 {! F  R
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 6 N/ M2 E# y. i9 b. ^3 U
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );4 K! k3 x+ b6 l1 F8 A/ D: _
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
9 Z: Z. r  q1 g1 T6 V    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );6 ^% I) H% b$ t- N, c
0 O2 j  o1 J6 C  t" p+ Q
    CSR = 0x0000;) y' R6 J0 {& {& a4 a, b5 p
    INTC_INTMUX1 = 0x3d;
: q( A( s+ S* _    ISTP = (unsigned int)vectors;" j" M" K' |( \3 c! A  z( R0 d) K! {# ]
    ICR = 0xFFF0;  * k# U* \' j9 a9 z- M  J
    IER |= 0x12;  
- C/ e2 t+ I. E    CSR |= 0x01;  
! h4 {, }: S; g# v
! ^: H9 X/ v" A. }, l9 `+ B5 p3 A- Q  f

* j; Q7 S* }) T3 }还有就是两个输入输出函数:4 p7 O! y# e& F# g. L+ ~+ e
void output_sample(Int32 out_data)
2 T6 X+ |: q5 D) l  D& ]2 J{/ x3 V. |1 l/ W4 n
  AIC31_data.uint = out_data;  
- _$ d0 M- D# ^; g; O! j  MCASP1_XBUF5_32BIT = AIC31_data.uint;
3 E+ Y* q% |, x  W}3 G3 h. j9 B* c
9 o' k0 j. u# e1 |  w! I
Int32 input_sample(void)/ `3 L/ r. u& T; j' E/ T& m# S
{  
+ `  @. U* |2 S- g( ~2 q) ^7 u# Q' Y  AIC31_data.uint = MCASP1_RBUF0_32BIT;  U3 [  x5 {' w, x  G5 _6 \5 Y' l
  return (AIC31_data.uint);
5 c% A3 q5 X1 l) ~  @; ]}
8 f% ~& i! q. q* z0 g
" ]+ F8 Q9 q  Z* j: a
分享到:  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-11-25 13:25 , Processed in 0.038935 second(s), 23 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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