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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
$ C) I/ J( [. p6 g# v1 @( Dmain文件:
, m6 Y- M+ I/ `- |interrupt void interrupt4(void)  
- r! a. B6 H' c; X* r{
% w1 Y% |' H, n3 E( v9 f. ]! ^5 ^  Uint32 sample;6 c, T, V/ O6 M6 p. M. o
, R6 B/ U. }9 K, P& L! C
  sample = input_sample(); // read L + R samples from ADC
" z0 D: u  ^& p+ p6 T! o+ X  output_sample(sample);   // write L + R samples to DAC 4 _/ x- V' p$ V6 }7 p
  return;* O+ ^  Y. {9 B
}1 K  W  a# _% z' V1 F# h: @3 c2 \6 {
% N) {5 L! W: d7 M! W; b
int main( void )1 ?4 R0 }; a- T! o4 m" V, V
{
/ m8 q8 n5 W6 T# u7 h* T( ]' O4 M2 n
    /* Initialize BSL */! t2 Z- e( \: S5 z) X4 w* A& f
    EVMC6747_init( );- r" Q- E! n. S8 v7 p8 t
        /* Call evmc6747_intr function */
' ^" I) q8 t; G! U    aic3106_init( );% x# V! k* B( p7 x4 E7 P/ L
        while(1);% ?9 i$ ?5 \- X+ I( V/ i
}/ t8 V9 O% _, `* W" F

  Y1 D6 `+ S1 N2 Z: S  a! m( b' r6 ?# C9 e* g0 b- w; v
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
) f8 b7 h4 y1 T/* Initialize MCASP1 */
7 ~  _5 O+ C) q! A; F  Y    mcasp = &MCASP_MODULE_1;, [5 M5 S. x" h# C: \5 y; w/ x
    mcasp->regs->GBLCTL  = 0;       // Reset
; n% c% `' `4 B7 E* u    mcasp->regs->RGBLCTL = 0;       // Reset RX9 P) r( Y; {. s. D; F3 N# o
    mcasp->regs->XGBLCTL = 0;       // Reset TX
% D7 A* f0 ^% d    mcasp->regs->PWRDEMU = 1;       // Free-running* g9 m) D) ^, L2 }+ B
   // configure McASP0 receive registers, P* p% W7 Q, p
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
4 B) Z! D2 o5 \1 J" Z    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus2 B5 V7 S. l7 g0 m
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word8 w. v- N; M) S6 D* V/ I
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
9 f  K. ^0 R* N- V    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
  }3 A5 ~+ }! G7 T  @9 ?( g    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1. R: T" B) q) Q2 h
    mcasp->regs->RINTCTL    = 0x00000000; // Not used
" z" \- }1 K* o- `2 g    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2562 F" f4 V% P. w. \
' _/ T6 b; |/ O1 {" B: x0 }" E
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
( _" v+ M/ E3 h  V& k    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
( q. J' ~+ @; k9 P    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word/ k8 ^8 m4 r# e9 B2 i7 _1 C
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
+ y, w% j3 c# N3 }( C2 T    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
$ q" I5 D0 N" j; a9 p7 p    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
9 q" }: @: I7 M  m& {. o    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
" l; r. |3 `" b. o2 v3 n' V    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
0 j$ v  G8 @6 s* G" q8 G( d6 c1 y" p# W' Q
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
! j0 r( F8 z: w' z# T    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT9 `4 ^& Q- B: y: n* l3 R
    mcasp->regs->PFUNC      = 0;          // All MCASPs
! }* b' y4 Q5 M( |7 t" L  v    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
4 w, y* t' _: {6 L) `$ M1 y. e6 g3 X7 \: @2 u
    mcasp->regs->DITCTL     = 0x00000000; // Not used
2 {4 \2 Q7 [1 t    mcasp->regs->DLBCTL     = 0x00000000; // Not used1 R# x& o" i% ~6 O
    mcasp->regs->AMUTE      = 0x00000000; // Not used
9 o0 J% Z  T7 L( R+ f6 i$ R- a, ~6 C2 V
/* Starting sections of the McASP*/
: r. h1 n& l5 _7 y' S7 g3 r! f    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
  o0 b1 J5 a8 `$ M% S/ J  b# }    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  3 P- ~" y" }) X' {2 K& h
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; * n1 |1 z, D/ p& G* W& o
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
6 c, l+ y( _1 m: N
6 [5 F% e9 B$ n5 d) @2 z. i. K2 G    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; & b( Z9 _. q+ o  h
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
5 ?" A+ P. [0 N6 E; I; P    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
# s2 }7 {7 t. v, _    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );. c& Z4 s: t1 R5 c  ?, S6 J

! C0 q5 k3 r5 P! j. G    mcasp->regs->XSTAT = 0x0000ffff; 4 O/ O: h  X. U; i& L& D7 `
    mcasp->regs->RSTAT = 0x0000ffff; ! a# Z6 e& c3 B  `1 ?5 J; @. {7 Q8 O
( \. a, F2 l% \+ `5 T3 \
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
/ ^+ n- Q5 T, x3 i6 l6 @2 r    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );4 b. I# g) Q8 O$ }" l. k
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; ) T7 {- Q- B5 p
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );+ X" Q- L6 `- K$ J& V' ]  K0 U

& P8 W* ?5 R; B, f5 L9 B" x    /* Write a 0, so that no underrun occurs after releasing the state machine */5 c" L6 a0 q/ ?: B! ^
    mcasp->regs->XBUF5 = 0;  U2 K: K" R2 Z# ]0 N8 f3 K
    mcasp->regs->RBUF0 = 0;
8 l/ F2 K! Q, P! n' l( H. z6 x
6 T  c) _6 _. H2 n/ n0 g    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; & r% y$ c# u+ J& ^* @0 T5 y6 E2 \
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
' @6 j7 o  I3 g9 o. o( d' ^    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; * T4 f2 M. {; F: P( R: x
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );! x7 o7 u# W. c9 q/ g/ l: {

7 S! z  J' _" Z& O- \+ X' o    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
# `$ l) `9 f7 m& ?: g$ w    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );4 a9 \6 h3 \3 n* p7 j
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
2 f5 ^) t2 `  H. K! y$ n% o" t# _    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
  f& E  r# l' n7 p. M9 f
0 e( e" ~; E$ ?, i& {7 J* c9 X    CSR = 0x0000;
! o' X# Y2 l  H/ w    INTC_INTMUX1 = 0x3d;
, O2 G, s; @" A* w1 N- E    ISTP = (unsigned int)vectors;8 W0 T2 G$ Z% q; U
    ICR = 0xFFF0;  
) s0 a2 i8 v$ m  q2 p    IER |= 0x12;  
  R* f& N3 L0 z, E* Z1 {    CSR |= 0x01;  
+ K/ j$ a; v# V0 b5 b, J
) L' w' }& F1 _) ^+ {- R% R. M/ ]$ O

6 ]( p& s  W* e. {/ ?还有就是两个输入输出函数:0 V9 ?3 }" D- Z( {, j$ l
void output_sample(Int32 out_data)/ T9 i' a$ Y( O' e8 b# u& V; D
{
4 |" l6 z4 j8 h  AIC31_data.uint = out_data;  
5 l) M; j1 h4 o5 G  MCASP1_XBUF5_32BIT = AIC31_data.uint;
) p8 }5 q' E# J6 L& `0 y}
) m1 E9 U; y% ^# o6 G" Z/ Y  D* |" C& \. y3 x: N  o; l7 @
Int32 input_sample(void)8 b. H' ~7 I1 _% M. n6 \! i
{  + o5 y4 L2 C( J+ l8 {* Y$ ~# S
  AIC31_data.uint = MCASP1_RBUF0_32BIT;4 m2 J" F  w/ Z. E1 `, p# `
  return (AIC31_data.uint);
8 s: v9 D  I, h}8 w. f- e2 L) I( @6 w" `- S, x

3 ^) X1 l) y# R
分享到:  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-19 04:57 , Processed in 0.048474 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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