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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:& O8 T( v( _4 v
main文件:
! E8 i  z9 e5 ^interrupt void interrupt4(void)  ( Y+ I: K3 ], T
{0 E0 u* e! R/ O. m
  Uint32 sample;
  m8 U* v9 A( k0 L3 x5 t( D0 i2 m, V
  sample = input_sample(); // read L + R samples from ADC! R) J/ l0 p4 H. k+ _0 F
  output_sample(sample);   // write L + R samples to DAC
, ^& i% m1 I4 ^0 p! E  return;
7 U7 i" g; i' ?- S$ `& t}
) V$ @9 w7 c' o+ R
8 @6 S7 G& H6 c, p' F# l$ w5 x1 R! Xint main( void )
; r. G6 H# E$ |3 V5 k5 t2 s{& F; F* p8 x4 n& l* h

, p! J. S1 I. A: @( b* [9 |    /* Initialize BSL */  B2 H* ^! R, p3 `" U& _
    EVMC6747_init( );7 J# f/ H% Q4 r- W
        /* Call evmc6747_intr function */! V$ H: k5 s3 V5 \& j2 F
    aic3106_init( );' R4 W( v) f1 E  Z8 j
        while(1);
# \4 D" Z3 h7 [1 {+ T}
3 R3 A/ R" L* W  u2 X( D% @
! M+ A; t; k3 h- ?* V6 ?8 I! q
$ u$ i: [1 x1 M+ R' h" ~' yaic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
9 z% ^' \# Z: j2 W  r: h- l# C/* Initialize MCASP1 *// I: _: m9 V, t1 V! H) p7 _, F
    mcasp = &MCASP_MODULE_1;8 M9 q% l: `  d! P! f2 s
    mcasp->regs->GBLCTL  = 0;       // Reset
% x& c3 W# f$ ~- x1 j1 [    mcasp->regs->RGBLCTL = 0;       // Reset RX* W2 @( e/ I( p5 G) r. A
    mcasp->regs->XGBLCTL = 0;       // Reset TX
& e/ t, B$ ^5 t; o. J    mcasp->regs->PWRDEMU = 1;       // Free-running) L. E$ q; w& U) g+ X2 q% Q
   // configure McASP0 receive registers
8 Z" m! s* N* t    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used; d! ~/ ]1 T* g1 L6 X& W% ]
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
, G5 P" ^* f; d    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word9 Z+ H1 `4 K' u. G1 r' k: N, w$ Q
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
2 C* d3 q& ?' n6 ?  c9 L" [    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side). B& I% c3 {7 b' z6 O9 T7 H
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1$ u( |: Q) O, V0 i+ f# H/ g
    mcasp->regs->RINTCTL    = 0x00000000; // Not used" Z/ r" T3 m, a6 ~- K! b
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
- P7 x( X0 J! }9 x/ N1 T
: b4 O  T) i; d/ H& f. z* L    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
! G) e% n( Y; |) Z! L! T    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
7 o7 H9 @; N! i7 p- Q2 ]    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
" y$ v+ |4 g- c: {% y, _4 c2 {% u    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
! x3 A: j  L8 g: j  C    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK; r) ^5 H) w/ U" r8 D
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,13 G& X- H9 z' P, g4 f/ V! ~2 x
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit* n& |7 }( e* {: V
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2563 k0 v0 W: h  ]2 j: Q

( }3 W# _! U7 T4 h" Z4 X    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN1 y; \% C" U, Z' T1 u( n: {
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT( F  N/ J. Z3 m: C3 x0 K
    mcasp->regs->PFUNC      = 0;          // All MCASPs
7 i# S( e! ]5 F  S9 g    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1% }1 Z2 J% b$ C7 e) O) w

6 S/ ?9 U# o+ Q" P! ]    mcasp->regs->DITCTL     = 0x00000000; // Not used
. w& W$ N( u6 v& h2 J/ ~    mcasp->regs->DLBCTL     = 0x00000000; // Not used- q" v- e! E6 J( v( g6 l' c, J; g
    mcasp->regs->AMUTE      = 0x00000000; // Not used
3 s' N- R3 W4 K. [4 O! Y. h! k$ S6 Z; ]. ?0 f! o
/* Starting sections of the McASP*/1 Q4 [& g1 L7 h
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
/ \3 @: m8 A9 }% z8 G7 `0 s    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
" _9 A) g7 d4 M( I, h    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
! A3 v7 s  U0 q    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
: [$ U3 N. s9 R) N" W2 X- @: N  M
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
2 C0 B3 B' ?# ]) U6 c5 S: [    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
: d, }. |$ _+ x- Z; T    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 5 t% q- r" A2 A9 @
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
! C( {$ k7 p' O( f+ w0 j/ ~  O4 ?2 u- b3 I
    mcasp->regs->XSTAT = 0x0000ffff;
- j3 f% e" N5 l  m! x, h. `: i    mcasp->regs->RSTAT = 0x0000ffff;   n. H9 G! u: M, z  H, ~& e

$ i: R) B0 ?2 _& U/ S4 n    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
- T7 l0 {( T, k; ]    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
8 c' X# C: u$ X$ Q    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; ' [6 U8 m$ O# _$ `
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
' v$ a* I- K! G
  J! u% g  E% Y5 }. R    /* Write a 0, so that no underrun occurs after releasing the state machine */% t( {3 Y8 M2 i* O9 @* J
    mcasp->regs->XBUF5 = 0;' h- J' {, q' L
    mcasp->regs->RBUF0 = 0;: i% f4 s2 R# c& X5 C+ \( ]* q- q

  B6 @, Z3 `1 t# v: X    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; * a8 b# @1 ]- ~$ ?
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );# }1 H* d; J8 `% W& j+ g
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
8 U/ `- q2 }) w' L% w    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
/ [. ^1 |- O' c5 ^) W8 U- Q
6 g$ F$ J8 ^( `8 J3 a: f% I    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;   {( r) b- B. Z" i* N% y# C
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
' M/ r$ t. Z7 H7 i    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; / {# Y- p! W! d* r* z
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
' w- g2 t- W( T, k6 y8 ]# s" i% [+ X: A! T2 T' G
    CSR = 0x0000;8 I6 v6 M. d, |) D9 t; O% L
    INTC_INTMUX1 = 0x3d;
) G  k0 f9 v" ]    ISTP = (unsigned int)vectors;
1 e9 H, ^/ z: e  O1 j    ICR = 0xFFF0;  
' e. a' a: e2 J0 h0 \3 L    IER |= 0x12;  & a. u6 h% W* u6 `9 S
    CSR |= 0x01;  7 k2 i$ ^% s7 Y1 i5 ~6 S9 j* q+ K2 Q% ^

- v4 Y- O* Q6 I9 V! J# G, Y6 r& j) |" E% v: E

+ x* X  q- p$ b0 i还有就是两个输入输出函数:  b0 W( N  @8 x! p0 O+ ]2 C! O
void output_sample(Int32 out_data)
8 N/ j8 n7 F3 o( N5 T! F1 [{
* y; }3 v0 P0 O$ P, P0 \& q  AIC31_data.uint = out_data;  
5 n% S- u  y4 S4 S( t3 t  MCASP1_XBUF5_32BIT = AIC31_data.uint;/ R8 ?4 X/ z* k8 p' T4 j
}+ ~) K! V; O9 [7 ~" }' D- v

) R4 I6 F1 j9 a, LInt32 input_sample(void)
# M& C3 S; ^9 c; H$ k' T{  
4 v3 H: e  {( E. b6 B  AIC31_data.uint = MCASP1_RBUF0_32BIT;
4 Q2 h6 R6 R& b6 G+ u+ S  return (AIC31_data.uint);% w8 v/ h/ p3 g$ j# O, i7 H- c  h
}
3 w% G9 y% I) \3 k: K
  ?' i1 t# }  x$ f
分享到:  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-2 15:44 , Processed in 0.040406 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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