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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
% {( F# \8 Q# g; i% `. V( ^' Lmain文件:. ^& ~% t5 H) [, r+ X7 F& h
interrupt void interrupt4(void)  4 Y& T. B/ ^6 e5 @5 U. z3 U
{* U, A3 w- \: w, ~& [) z9 J
  Uint32 sample;
  s; e4 T) S, U& F, t) n, ~/ v! Z3 I& S( a0 W- b& o
  sample = input_sample(); // read L + R samples from ADC
+ w* X8 e8 v' j- L: j: U  output_sample(sample);   // write L + R samples to DAC
5 d/ Z2 |$ s0 _4 H, @5 L  return;
( S* P  }: S5 F3 L7 e" M1 M}
" V5 L0 {# r# i! w: s1 O
+ t$ u+ A: }) S$ }3 F( E, B; x7 Vint main( void )
: `3 n( ]; K) q. {8 @{
- B& \# r: a3 h. @( a; L5 C
. [/ ~2 O4 C, R* C) v# R    /* Initialize BSL */
1 @* @$ o( x! f    EVMC6747_init( );
: h7 N9 Y$ j( D; v" z5 U: }2 Q        /* Call evmc6747_intr function */! h1 N$ J! A' P1 _0 ]- y
    aic3106_init( );
: d7 v9 u5 r2 [0 R3 \        while(1);! @4 F% O  H2 u9 ^
}. j2 \' ^  L$ P9 R7 ]( e" {5 ?
. z& B- u/ _7 W9 \

  W- X5 c6 `- xaic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题7 d/ Z1 W/ t9 M: y) J5 ]  {
/* Initialize MCASP1 */' S! h/ L" y# m8 T2 r) u
    mcasp = &MCASP_MODULE_1;& w8 a' U- K  T
    mcasp->regs->GBLCTL  = 0;       // Reset* V5 R# E8 N# R2 y5 F0 v  R, A
    mcasp->regs->RGBLCTL = 0;       // Reset RX) v1 V  ~  ?5 {. U4 g4 M0 y# c% z
    mcasp->regs->XGBLCTL = 0;       // Reset TX* ~& x% N' B4 y& v6 [4 D
    mcasp->regs->PWRDEMU = 1;       // Free-running( x, F4 v7 r; }
   // configure McASP0 receive registers
2 Y% G) J/ X1 @    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
. `+ S3 Q1 t5 ^, x    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
$ O; x- _  t. u# ?    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
) T" p2 g0 g* O3 G1 N    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)/ j5 D& v8 i+ O7 s, H
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)0 Y1 R. ]/ p! u- M( i
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,19 y( q: L! d) q4 z' M! b
    mcasp->regs->RINTCTL    = 0x00000000; // Not used8 X! E  B  _0 l" C# u5 J. T
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2561 k6 T+ d& R1 [3 c4 a& Q& ?
. n' o4 r3 l/ d! \3 @
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used9 U2 G7 Z+ g0 n  W# |
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
0 |  y* P9 J9 W, L    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
! L1 H+ H* m$ E3 _7 m8 b" x! W    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
& o% [. x, v( ?! ~  X8 G    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK# |9 r3 X! K' v% G& U
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
. I$ T* n9 p. G: y; u( b/ |    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
' \1 g8 T7 R. A( r1 G$ [  Q    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2563 j- ^) R' I4 M! ~; h

- F: u) W" q4 [- w    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN. q' A3 d  ?, J1 }. \- M
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
& `3 d- {0 z- ]  @1 Y) ?    mcasp->regs->PFUNC      = 0;          // All MCASPs
! ^, }  i6 M: T0 s% \    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
6 @* Y8 q7 t) N/ w2 Y  j
9 @; p# Y" L! G& C( K5 `: s    mcasp->regs->DITCTL     = 0x00000000; // Not used0 }9 g; N) }2 B
    mcasp->regs->DLBCTL     = 0x00000000; // Not used
! }( G8 O" q$ {! A' u* ?    mcasp->regs->AMUTE      = 0x00000000; // Not used
( |# n8 h' _9 U! e$ x/ H( x& G
3 @. ^3 _5 X: {6 a/* Starting sections of the McASP*/8 r  a# v; w& x% D# I4 ?$ \3 h$ b- V
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
8 e' G: ]9 d1 x8 j0 h    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
7 R- q% H. ?; f) \9 _; h    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; 9 a/ i$ h( [: [6 s  |: ]- e
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );" _7 P$ D" s  J" r

  ~4 b" x5 r$ W: G; s    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; & r" {3 F6 [* B. T% Q3 _% Q. X1 N1 _! ~
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
% c, z' l9 Y; ~3 A& D, A. E    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; / N6 q0 y0 ^1 L5 a# ?( D% Z
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
" {  _# V6 t6 E0 H: l/ o
* R5 M( [) c7 ?6 F4 m    mcasp->regs->XSTAT = 0x0000ffff; " ~2 Y* I1 S$ M+ d( Y
    mcasp->regs->RSTAT = 0x0000ffff;
& ]  }: O! \5 i1 e% i. l, E+ |8 v% x& b% C' ?+ a2 t3 F
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;3 ?! s. M7 C: J% k. ^
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
  D; e& r2 k9 u+ m1 B    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; 5 C$ D( h! n0 ^
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
, N9 R  `' g6 U2 J: i4 f% Q, D; X1 @' o
    /* Write a 0, so that no underrun occurs after releasing the state machine */
5 x' G; ^$ b( P    mcasp->regs->XBUF5 = 0;
3 s8 n0 [2 z' t/ X( [) [' w    mcasp->regs->RBUF0 = 0;- q; a! I: u; |2 P

6 _( E0 a& R. N    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
8 H; _9 }$ X' j0 H    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );! H! Y5 @0 R. L9 Z/ u9 j# L* b" N
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
5 t0 M, e& J7 e: I! a    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );, h, N  a" A! T$ y$ o: x7 A! c
+ g, @" r- ]0 V. b
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; $ a6 t6 d1 k2 A5 F" I
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );, U4 E" w. t9 {" o0 E
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; $ K+ l& \( s$ \/ E" F: a- ?% D
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );: I' L) t/ u9 d7 g

2 r" }# u1 \* m& T- D    CSR = 0x0000;
' x" Y7 I! L6 J+ F    INTC_INTMUX1 = 0x3d;
" ?+ ^/ I+ l, a- M: ]* ^  o4 l( g    ISTP = (unsigned int)vectors;
8 n7 t& e  O+ x; P* G    ICR = 0xFFF0;  
! J, E8 |( N- \8 ^2 x    IER |= 0x12;  
1 r6 n/ E$ x' \2 J5 {( x! c    CSR |= 0x01;  
' u9 u  p; g9 H9 S/ o
1 E: f" A' O3 R8 a* C8 @
1 P9 }; |! S1 I. B& k
5 r$ D+ E6 V4 I" v, m% T还有就是两个输入输出函数:
* |# F; z& M( U* Fvoid output_sample(Int32 out_data)
; T' l$ I% G0 m- Z$ ~; X8 g' j{
; H$ ~. I3 A* F! v0 N  AIC31_data.uint = out_data;  
7 w3 ^2 O3 t. Y8 k* F& s6 i+ D% j  MCASP1_XBUF5_32BIT = AIC31_data.uint;( Q& H( e/ ]) Z+ y5 T
}5 P# s: g6 }2 I; G5 v  A, v: g+ a/ {

2 M1 ?+ e) x! Y% j2 s9 R% S6 RInt32 input_sample(void)
) t  L6 K5 `* w{    f7 P/ T0 c/ @8 n3 S! Z# ?/ _$ w* o
  AIC31_data.uint = MCASP1_RBUF0_32BIT;
9 y& M! C: c: l  return (AIC31_data.uint);
# `  G/ i1 b1 t2 U}
  Z4 f7 i4 m) R( j
  W2 t& N" w1 M1 G" `- m
分享到:  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-13 21:38 , Processed in 0.039992 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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