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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
* N1 D2 F3 \& e2 i' p, {9 ~$ ~main文件:- A5 j# \2 ]$ z# w3 ^; N) L
interrupt void interrupt4(void)  
- ?% b# h) @4 [/ _  r& U! A{5 R0 j; c2 P. K* H
  Uint32 sample;# p3 X& ]0 a- u* i9 G

* S& g' p; ^6 U  sample = input_sample(); // read L + R samples from ADC
6 a2 T  j5 c3 l" H) A* o$ P  output_sample(sample);   // write L + R samples to DAC 1 z; T* w7 g4 ~; Q# a
  return;0 D3 H! e- k/ d' \3 Q6 ]# n+ L, }
}
+ v- v% i2 f2 K2 G7 K$ h2 h! h/ g5 Q7 y- J$ F
int main( void )1 i( L+ |$ }7 X& W: K
{
7 s0 e$ w" C6 d% C) u1 P; L# d  E  Y
' y$ z1 n4 f+ t    /* Initialize BSL */
" ]! f, k1 x& P9 D- M    EVMC6747_init( );9 D1 [$ x; d* U" _( H
        /* Call evmc6747_intr function */
, y2 j9 Y1 W/ \    aic3106_init( );
' h* G7 \& x$ }( b5 Z/ |+ m        while(1);
$ O4 b9 f3 L4 W: C6 L; Q. V2 @}# [: x# q/ J: w& T! F" G4 W6 W

, D! s* t6 X9 j5 C6 p- M  Q" N9 a% v
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
; Y7 e: \2 c9 m9 ~) A/* Initialize MCASP1 */& L% U  t5 }% p: s
    mcasp = &MCASP_MODULE_1;
$ s1 ]: L. t* L7 N) v4 p! _    mcasp->regs->GBLCTL  = 0;       // Reset9 E, j7 r$ q- X! i
    mcasp->regs->RGBLCTL = 0;       // Reset RX& b9 ~: l1 A) s4 s
    mcasp->regs->XGBLCTL = 0;       // Reset TX7 h5 k9 O( H- {. t
    mcasp->regs->PWRDEMU = 1;       // Free-running1 t9 M2 h; R, b+ d6 P1 d
   // configure McASP0 receive registers; u7 E& G: E6 i+ R
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
$ R" w2 m7 K; ~- C    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus% B8 p! G6 B" h* f2 l
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
& H; m+ B& o1 g$ t6 v0 \3 z    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
) G% i7 v- o  M: e    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)$ ?' O2 M4 _$ s2 z4 l' |- Z* p
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
; s. K9 q( p5 h    mcasp->regs->RINTCTL    = 0x00000000; // Not used8 ^, g2 J! \% P5 Q8 m% m/ P( o( v
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256& _' g1 H' I7 r$ f% u) _- p

4 b. q, I% r8 K4 o    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used' z* x) E, d1 ?$ V4 c' p4 y
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus/ \' `# \  y6 `3 t; v' M- h
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
# x0 `2 v% J8 B6 N7 H    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16/ f5 B9 G6 r1 p0 D, X; ]+ t( t
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
* ~$ t9 s6 {. b) a    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
- G- R: N$ A/ q# D% F2 b  r" Z    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit: k2 i: r2 @: _1 r0 l
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2564 P! |8 o: r5 \' r. Q8 R

, z$ _. F0 Q2 L+ y& U    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN) L. k+ n' F5 W. W7 r, j
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
8 d/ o* g7 B# U; a- _5 M    mcasp->regs->PFUNC      = 0;          // All MCASPs
  g( K$ j7 |9 X9 f7 Q3 N    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1' }# T, `  d$ F0 h" g# l
  E2 L$ c& k3 b" {
    mcasp->regs->DITCTL     = 0x00000000; // Not used
9 N# j* w8 i5 @$ j( l    mcasp->regs->DLBCTL     = 0x00000000; // Not used  H( s0 ~: k! q+ g- S' p9 J
    mcasp->regs->AMUTE      = 0x00000000; // Not used
% }* W# L$ \  n. }- U
" x4 I  A) r+ }4 ?  j/* Starting sections of the McASP*/1 V! Y( g1 @" e$ z' P
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
$ a/ R# F/ r5 l4 {  F+ ?4 B' t    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
$ `+ d( {: ~* _2 D" T; ]    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
7 H. o6 F* D5 g- ^" H* u2 D  e    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );7 }( k/ P7 Y/ D9 e! ^" s& C

9 e, o2 _- h- e' y( Y; G: F; f! H' W    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; 3 V; N8 N/ p5 U/ `$ G2 j0 T* A; R8 o
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
% i4 \- W2 r9 C9 o    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; . _. I% }+ K1 D# u& w( d1 j4 M4 W
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
& y; i0 T  w3 R" q% L- N; V- w% V& X& ]6 H
    mcasp->regs->XSTAT = 0x0000ffff;
& n6 ]; ^- H- O$ Q% m8 l    mcasp->regs->RSTAT = 0x0000ffff; 3 z7 u- ]0 I, y

7 L0 f8 F3 }' y    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;2 _: S/ P; A5 ]6 w
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
  _- i/ f! Z. N+ q4 o  \1 C2 [" V    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
3 |, ]! E1 a4 W) g' }  b3 p    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );7 o) ^( Z# \; _- Y+ i0 g6 M
$ V7 y' U" K7 @8 i' _  p! R
    /* Write a 0, so that no underrun occurs after releasing the state machine */* v! k+ S9 v  w4 Y  p4 Z7 b
    mcasp->regs->XBUF5 = 0;
+ Y: f3 |4 h+ k3 E* e/ x& v5 H    mcasp->regs->RBUF0 = 0;" L/ z9 i+ D0 P5 g4 p
+ N) f9 ]9 e2 [! x+ Y
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
# z$ O/ S: A9 c8 p- D, z+ r    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
( U# J( t) k* l. Z) f0 Y    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; - |- c: K/ H1 R! x
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );0 W9 s5 H5 Z% Q7 i' Y/ R! g/ ~* Z

0 V  f! W4 W4 I9 D% j3 F8 }    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
0 G0 X" D& p) W9 N2 @    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );+ B; {+ h& b+ ^, F$ A' U. b' f
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
8 |9 s$ j( T- o1 Y, P    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );3 o2 ]8 ]" h/ K) D6 a
* m( E+ A1 T' v
    CSR = 0x0000;* R3 l1 Z8 R  A: F7 u$ c
    INTC_INTMUX1 = 0x3d;
' A; O3 A  |% j2 |1 k2 |    ISTP = (unsigned int)vectors;5 ]. S1 U% u9 g" g9 |5 Y
    ICR = 0xFFF0;  $ P0 |4 d9 J1 L1 V) @* B
    IER |= 0x12;  $ V: n9 |5 d8 Y7 H+ q0 g0 p  ]
    CSR |= 0x01;  
+ ?0 C& D0 B: a# |$ ?5 ]  v
6 k  S" o) O9 O. K) y. z& L  s5 _- i* k% T

2 o- @) `5 l9 b, w+ C还有就是两个输入输出函数:5 d3 P' T& x& j
void output_sample(Int32 out_data)5 P" A* l0 G* @2 [2 d
{. [2 }+ B" L/ M" P/ Z
  AIC31_data.uint = out_data;  ' @( p+ M' f& O' I
  MCASP1_XBUF5_32BIT = AIC31_data.uint;
" s  b% Z" N0 R! ^8 A; A! @}7 r8 Q# w2 L2 v8 s. P
' O! X& S( F' H, Z; w1 s" T$ i. H
Int32 input_sample(void)
: C! M" a* o6 `) T; y6 K{  9 [6 d, Q: k9 d6 t
  AIC31_data.uint = MCASP1_RBUF0_32BIT;
, y  H8 j0 I3 i; |  return (AIC31_data.uint);
) V1 u' d% O; e}* Y) s/ }9 r# `. c
5 ?" }2 [9 W9 b; a2 Z
分享到:  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-1-22 22:44 , Processed in 0.040467 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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