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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
5 o/ x/ `) Y5 m" Qmain文件:
  A8 k1 x- T" s5 S# u- Z6 ~interrupt void interrupt4(void)  ; H, L( `+ F' |
{2 P  ~, O( ]# T& a
  Uint32 sample;- n+ N, ]* S" a) \# I/ b# ]; b
8 p7 ^2 E" p" x( f7 o- J$ \
  sample = input_sample(); // read L + R samples from ADC
$ p  U. A# E" X! h  output_sample(sample);   // write L + R samples to DAC
- P7 ^% W- q3 m/ j1 A, ~  return;
; B1 p$ }3 u% U$ |  |+ O}" |7 i  R, p+ i+ T, }/ y% {

3 h/ a2 h9 Z9 k; Gint main( void )7 b6 Z- t5 V7 l$ g" V
{! `% z* d4 k% X7 t* q+ X+ m" R
' Z( e/ d! x1 B6 P3 p
    /* Initialize BSL */
' F* N- e8 R& V    EVMC6747_init( );
6 x- N% }  ^* y( k. V        /* Call evmc6747_intr function */4 o6 ]6 s5 M& i, J$ }3 {2 t& P) k
    aic3106_init( );
: K9 j4 S) B6 C% w* P) O2 r        while(1);
6 G+ d( Z! h1 M: D5 J3 t7 ~- m}
3 S# Z1 w+ o9 E0 o8 r3 ~5 d
4 u# ~0 _+ \- n4 v. Q/ }8 Y- M* w) H: y# e/ o
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
' c: q1 [- y; {5 Q9 F* T" I$ i' d/* Initialize MCASP1 */
+ `8 J% `7 a. }) o8 w& {    mcasp = &MCASP_MODULE_1;# M% @* C. l) n
    mcasp->regs->GBLCTL  = 0;       // Reset1 ~& y) d4 I! q1 V  B- }# E
    mcasp->regs->RGBLCTL = 0;       // Reset RX1 @+ D9 A8 R* C
    mcasp->regs->XGBLCTL = 0;       // Reset TX0 H% z9 A+ `& Q& G
    mcasp->regs->PWRDEMU = 1;       // Free-running7 J& k7 {! c0 i( h  H+ ~( P
   // configure McASP0 receive registers
( m; O% p# k% G0 Z# j& ?    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used* ~2 N+ B, P7 o/ \
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus& x1 @. U3 A* {) J* }( f
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
0 L4 [* s' Y- |9 h8 H) s8 R% q    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)6 }/ F4 }8 t% Z' T
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
+ m9 R6 ]9 w9 i    mcasp->regs->RTDM       = 0x00000003; // Slots 0,19 X+ s7 ]2 q) t( Z; S/ i, k
    mcasp->regs->RINTCTL    = 0x00000000; // Not used
2 l3 f: N8 C7 w    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256) W+ Z. z/ T7 e

0 m9 e. J+ P, I0 @* N$ _    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used; d% l/ o/ j+ P7 n* S
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus* P, a" O' X. G
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word6 A2 @* ^) T2 H
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16" Y* h6 t$ n& t' @% P" }4 D
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
  U0 [9 Y) g7 D$ d$ m  w! V0 x6 Z9 E    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
7 K6 C+ z5 h/ w- A# {# {5 X( ^" r    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit: _" G+ `# c9 _7 E% L3 f
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
# n" b. B% f- Y6 L% l/ W; X
3 j% C* J! u, P    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN- _) {; L, }7 W/ S) {8 o1 Y, X
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
9 ~% k' f; h, c$ b/ r    mcasp->regs->PFUNC      = 0;          // All MCASPs8 @/ X: g8 u: Q; b+ x* R
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1  o- ?7 u8 l# n

6 p- k* I# ~! o  G  ^; z    mcasp->regs->DITCTL     = 0x00000000; // Not used
8 g! D1 ]* I) W9 N7 a    mcasp->regs->DLBCTL     = 0x00000000; // Not used# G! i6 S$ L* U
    mcasp->regs->AMUTE      = 0x00000000; // Not used7 i7 ]8 c# b% r4 I& k
" E( }; [0 ?, z% R" m
/* Starting sections of the McASP*/9 z- s! R1 s) |8 O8 Q3 \$ @
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
2 y& |4 m* X. Y    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  . c( p( F( E) q) v6 `* C; T
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
, M& U& b' ^2 ~& ~8 R9 k* R    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );) `( s0 D7 p4 \

/ R& I9 n& m# e- g- M) E    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
9 C* L( x6 Z8 K+ ^0 U$ [9 x    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
/ V& {2 W% h% `    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
; Q8 N5 C; w% ~, p" y  f$ G    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );3 x4 {+ B6 `! S0 `0 A& |$ P" W
& P' G0 r6 G" p; j0 ]
    mcasp->regs->XSTAT = 0x0000ffff;
( W# t6 ]7 E( l1 `  \- w' B    mcasp->regs->RSTAT = 0x0000ffff; 6 n% ]2 q- Z0 @9 x( e
5 p3 z- d$ R1 d! E$ F% P7 l
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
% B. Y. ^& Y0 R2 h# W    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );% T! b8 V) p, A9 w' t
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
8 @4 }9 d! b  }    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
9 y5 K& y" I! C- F
# Z8 i! O9 p6 _; x8 Y1 ]    /* Write a 0, so that no underrun occurs after releasing the state machine */; l1 J9 s, R2 p+ ~2 w
    mcasp->regs->XBUF5 = 0;
" W3 o" o( I" N$ T    mcasp->regs->RBUF0 = 0;
5 _% Y5 r$ k: G" K6 g' C4 S# Q( H
0 T/ H$ w2 j' `1 y+ P    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
+ Q7 u- a- G# ~/ y    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );  z- j* [: c; r9 v! H2 B+ I  |( F
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
8 z) |; G- Z1 U! q! ?    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
2 ~; ^) s" f3 B3 s; E$ U, y# B
: B  L% K1 M: m6 O. `1 R    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
5 c  F; p0 z7 N' l    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );9 q7 ?. \. r, K6 @4 H' ?, k
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; . x4 D' {2 E9 Z' o( g
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );. o4 l6 U. L5 v2 U8 [) V
1 b3 I' |$ W. a( |) k0 N+ w
    CSR = 0x0000;6 G0 E8 C: Q9 m
    INTC_INTMUX1 = 0x3d;
: N& n, b# s1 W  T: h% C    ISTP = (unsigned int)vectors;
6 M- T) \$ S. ^9 c; S) T  E( D3 g    ICR = 0xFFF0;  ) H/ `* M7 {2 J3 _0 f8 Y: M! ~
    IER |= 0x12;  
2 U9 ~: s$ S4 T1 ?  Q  T9 ~    CSR |= 0x01;  
" K: w% f3 M1 W5 o$ O  r: M/ T: E/ q+ {4 N1 H$ `, X" G  L7 q

- w; W; P3 l2 [1 v# n, M3 |
8 \% \8 m% I+ ^7 P6 M6 Y还有就是两个输入输出函数:
' y) y" b7 s3 \void output_sample(Int32 out_data)
  G+ ?6 u! e" q" d  h' G{
6 n8 u3 e( Y' N# M! F* @$ Y( p/ }" S/ @  AIC31_data.uint = out_data;  : f0 N' O4 {5 r/ M& n
  MCASP1_XBUF5_32BIT = AIC31_data.uint;
. [7 `; \8 R' _1 a& W* m# u; }( o* A) h}. K& Q) a! B; \

3 z7 R6 J; J9 D% OInt32 input_sample(void)- \. E; X5 n) W& J
{  + b8 O% i5 b' K. S
  AIC31_data.uint = MCASP1_RBUF0_32BIT;: V5 z7 H5 g0 z- Z
  return (AIC31_data.uint);
5 O0 T- |# J2 S}
! g4 B9 p/ a/ ]6 S; }4 k0 n' C. M2 g) \: O' C5 O
分享到:  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-13 22:44 , Processed in 0.050195 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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