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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
7 l# U3 L  |5 w; \/ E1 Jmain文件:
, W8 f  o& [4 \6 k5 E8 Minterrupt void interrupt4(void)  
* g+ n! O- s3 [1 w6 }1 g' {; S) S{
8 K+ x9 B9 n+ V9 t& a0 N  Uint32 sample;7 q4 s- B9 C8 D2 }) q
+ P( Q0 V* ]2 N3 g& p
  sample = input_sample(); // read L + R samples from ADC
1 m- o& r* z( P  output_sample(sample);   // write L + R samples to DAC
8 @9 m3 X0 L, V" w. J4 _  return;
+ ]; |: s0 A, B& |}' z, C; P$ N' x

3 h$ B- C7 B. d9 U; fint main( void )
, t0 B( o- Y1 o3 o8 j7 V& L* Q+ I{/ O$ G* Q1 Q8 H) y- s- |

2 j% M+ U& C( n9 ?6 L) O    /* Initialize BSL */
, O9 R6 S7 S& L: D) Z    EVMC6747_init( );
0 K5 q8 d* S- b5 ?# n  _        /* Call evmc6747_intr function */- n  K4 {/ b4 f# a& ^
    aic3106_init( );# X& I; y; L& T3 G8 j
        while(1);/ H* y/ ?# P+ z( k* n8 o
}
3 O+ C; k* o$ h* z
' `% f6 }6 x! O: ~
9 Y$ d* P% U. v' E4 t0 |' Raic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题8 e9 u% W! y* m. _9 r
/* Initialize MCASP1 */& R) o  l* L9 q) z0 T( |
    mcasp = &MCASP_MODULE_1;, e( n; s$ c# `) x$ `2 i+ _
    mcasp->regs->GBLCTL  = 0;       // Reset
& L% x- `/ j7 V# Y4 M    mcasp->regs->RGBLCTL = 0;       // Reset RX
# P$ {! E0 B5 `' M5 ]! I# W" {    mcasp->regs->XGBLCTL = 0;       // Reset TX" g% E+ f! p6 v) E. s+ S7 S1 R6 d
    mcasp->regs->PWRDEMU = 1;       // Free-running
2 ?, F/ j5 q4 h8 u+ c) }   // configure McASP0 receive registers1 u$ Q# j( }& ?- M
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used3 o$ I% ^/ D; R" f2 l4 J7 a
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
' |* M% _% t3 G/ |- u    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
( n) V' \; D$ E    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)/ t( P& o! R' t% F. {/ l
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
# _; }8 V' Z2 J) y    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
- R+ s9 _2 F  a1 [- {# |5 {1 q    mcasp->regs->RINTCTL    = 0x00000000; // Not used
9 e+ L6 s+ U0 ^* ^    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
. G: H& i& x& f8 N8 ?# \  M2 n1 s; h9 q% E
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used6 Y4 Q. n! X' o  ~3 `6 ]
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus: m& F3 F/ b0 C7 U0 S7 y
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word& }  P" `* F8 q: |; {8 P
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16* U3 @$ R/ z6 U4 N+ W. }  u
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
3 H/ o( W( d: k! c- X, V. f, d    mcasp->regs->XTDM       = 0x00000003; // Slots 0,11 G1 l. v- s6 F, }; {& |
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
( a8 c% O' R. Y7 L7 Y5 D/ z    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
) ?4 R0 I: {! ~* |
) I& P/ s6 p" m3 J3 @/ P5 k1 R    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
2 s5 ~( U0 u4 p    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
) H: \& l. \2 W5 P1 X    mcasp->regs->PFUNC      = 0;          // All MCASPs7 D1 A4 h$ W6 h, D3 z" L
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX13 j* T8 p2 [) \$ o& j
+ ^* a5 e+ w  O1 T2 H
    mcasp->regs->DITCTL     = 0x00000000; // Not used8 l' {+ ]2 @! G# O: |& \, O; O
    mcasp->regs->DLBCTL     = 0x00000000; // Not used) S* T2 H, S% c# i/ X5 \/ [0 n
    mcasp->regs->AMUTE      = 0x00000000; // Not used
7 `' L3 l( \( B
1 f( [: _8 ]9 a- t/* Starting sections of the McASP*/
- ]4 U6 E% k4 G" V    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
. i& C4 ~, y, c, N: [* G    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
8 i( ~3 w' u+ c. ?# a& u6 t( n2 o; o    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
  \7 B! q/ \1 p! q( X! U    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );- W  H4 l' k3 i% e* ~
+ a& A! s) p" u9 [  k
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
/ j1 Q! p3 b* K  Q+ _- x: U    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );, h+ Z/ A. I% n7 i
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 1 ^0 U& I; d4 g5 V4 a+ u
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );3 T0 U" S) M* C; C( v
9 Y1 p5 _4 _) Y! z9 R: G5 @
    mcasp->regs->XSTAT = 0x0000ffff; 7 z; F! |0 z3 f& S
    mcasp->regs->RSTAT = 0x0000ffff; 1 I( W# b# L% l7 G% R
% w# L: g# _: _  S( c- T
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;' t. n: ]0 e/ ~& S  |5 e' L# @4 |
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );# V0 l! |7 R- `; u# d; z
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; & O( \3 M6 ?; h1 ]9 T) j" g+ ]6 {9 ]- r
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );2 ^. C* p' l$ N! W0 z$ T" V1 D8 @
" r" u6 a& h/ C- w% A$ B
    /* Write a 0, so that no underrun occurs after releasing the state machine */
2 C% c/ W( x7 X$ X5 u! F    mcasp->regs->XBUF5 = 0;% x- I. r- X  [" m% S
    mcasp->regs->RBUF0 = 0;) o9 @* Z3 D) {0 U: B3 P

  `2 b* W) h2 V) R# B! P  i    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
6 l& H5 E& n; i* v    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
. }" c' ~8 G* ]/ w    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; " i- R4 g% C. n( p
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
% D6 s" I; Q  ?( @0 c7 k' j( B1 v3 E- f* B1 ]  n7 t; c
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
8 o6 D: n$ a/ X1 Z: H    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );- F5 h, R& h2 G9 f! O
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
6 G* f+ L5 B8 H& k/ j    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
' w1 y! V0 }( d1 F, v  X6 W0 n" @6 z2 \) q8 V
    CSR = 0x0000;0 G+ _( V+ O4 e$ w
    INTC_INTMUX1 = 0x3d;' T7 t; x; x5 k' z% C  x
    ISTP = (unsigned int)vectors;
$ r2 c+ D  A% j    ICR = 0xFFF0;  
0 {, T. B, [; g% \4 U    IER |= 0x12;  ! e: Q4 v3 h! _0 z. c2 U
    CSR |= 0x01;  - D; D! ]/ `, w4 D' i
1 T$ [' L$ f, q# @6 C+ I; W

4 O4 h* F" c- c% L
1 h8 U. E5 Q/ K$ D; w还有就是两个输入输出函数:
; I. e6 p, T" N7 `% {void output_sample(Int32 out_data)) w# ~* T; r! M& f. @/ h7 c
{
& d: z0 ]9 a5 A; y' Z" D  AIC31_data.uint = out_data;  
1 }6 E. R& Y% s& u5 a4 S/ ~  MCASP1_XBUF5_32BIT = AIC31_data.uint;* k- K) a( F3 w- Y, N0 e4 M' K
}
2 [+ q! |( q( i  I% {5 X
1 r6 O6 s9 H2 C7 A! P& S, R7 T! zInt32 input_sample(void)" s& S: c; k! k$ l
{  5 Z* u( w8 r, t
  AIC31_data.uint = MCASP1_RBUF0_32BIT;
% A9 A( c2 G5 l6 D6 T& }7 X- [( h# A  return (AIC31_data.uint);3 w, Q% b, E5 F9 w( N5 h( \
}) e' s2 H0 h9 t; _% c
9 S& d! q. [" \5 S" i- a6 [
分享到:  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-2-4 18:46 , Processed in 0.047592 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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