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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:; O' I% t2 u- T! j7 `
main文件:
8 M0 N+ T% T1 @- C- C2 N+ {interrupt void interrupt4(void)  5 V8 K6 v; K% D. n) k& p# K
{
/ j  P  L" `" S! z+ Y9 l  Uint32 sample;
3 d7 ^$ z9 u& t' `1 ]* L. F8 q6 w8 \, |9 I: q, p2 F/ C
  sample = input_sample(); // read L + R samples from ADC0 y. m5 |) H& P! Y$ ]% L5 R
  output_sample(sample);   // write L + R samples to DAC
1 t( L, W; T* z0 e: z  I5 m0 Z  return;# i% s" U$ K8 W3 m' f$ J
}
3 ~* _* `; _5 ]8 h) N) o- j
, s  r+ G+ k+ p- Q4 m8 k( l+ Zint main( void )
. ^/ R& H' F4 {; Z; K8 ^{5 C6 [2 |5 l$ @

, `: e, K' L9 I9 P1 g( o    /* Initialize BSL */+ m8 s; }4 V2 u* h* x- d% U& P
    EVMC6747_init( );; A1 T' z; w, K5 U
        /* Call evmc6747_intr function */
  D' z- z: Q+ F, @) }8 X0 O    aic3106_init( );. G% P3 {' Q3 _& _- P+ f; U
        while(1);. X2 P2 S: o* T
}
2 b& ~3 t. O" k6 t( m
! R3 G( N7 t1 e/ W% q% R( r' P7 G/ t, n4 L+ l1 E4 H5 E
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
2 y" n) ^8 a: y) X- x9 Z9 t, s/* Initialize MCASP1 */! x; f9 s  |; @$ Z: l% ?, S/ K8 ~
    mcasp = &MCASP_MODULE_1;6 j% ^$ K* U+ ^3 d# |7 `" ~# i
    mcasp->regs->GBLCTL  = 0;       // Reset
2 A: ]! Y0 S* `* p) t; z( a* q9 A    mcasp->regs->RGBLCTL = 0;       // Reset RX5 E! x* q) H& e# x% |
    mcasp->regs->XGBLCTL = 0;       // Reset TX' X. [2 I1 C) c2 X2 _0 [; D, Z- S
    mcasp->regs->PWRDEMU = 1;       // Free-running
4 N0 d$ R. }4 {% I/ G5 y0 v   // configure McASP0 receive registers3 t6 M( a2 w; k, y, h* E0 _
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used( H; m; M$ q) Z- v0 M( J$ }
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
7 E0 h, ~; h, w! V    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
# D+ r  A+ H/ v4 V4 c    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)8 H9 ]7 K2 j5 X* L
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)/ x4 R* \6 y/ `
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,16 J5 v3 z) \! C( L! y
    mcasp->regs->RINTCTL    = 0x00000000; // Not used& u' i7 _8 S# |+ N* ?. @
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256* r  t7 K6 `9 k6 L: h" \7 n7 m

5 G+ @/ M: u  B# ]% c    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
2 p2 ^8 s- [8 B7 l! ?    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus( Z6 t+ I1 C8 p& U/ I' P
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word- Y+ X/ z: ]2 ^) U5 S
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-163 D! b$ K  ?$ m2 o( S5 Q: o
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK- _6 |+ U* W5 \, L5 w3 b
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
9 F: d6 f( p7 o! @& w    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit$ r' X' C; ~4 G# ?3 j! T
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
3 }9 K7 u, J% C2 Q$ S
5 Q. c! n$ l  p' i  u    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN7 a4 L. Y$ I( G! f( _) E1 p8 \; A
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
5 ~; X+ B, }5 D8 u6 x+ K    mcasp->regs->PFUNC      = 0;          // All MCASPs, B- n. ~% Y6 P5 g8 T
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
4 X/ \% m/ d! _$ q5 m) J/ ~/ m: Z+ t' |- |9 U, R
    mcasp->regs->DITCTL     = 0x00000000; // Not used! L% H& M+ N- S! f  {
    mcasp->regs->DLBCTL     = 0x00000000; // Not used: Q6 {* P- \) k6 e( ^" K, i
    mcasp->regs->AMUTE      = 0x00000000; // Not used
! w- X7 z6 o7 M9 B& o- b7 @# F& U+ X! g
/* Starting sections of the McASP*// @8 G* q. j2 f# C3 y
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
5 u9 w& D9 C, F  p1 F    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  9 K) ^. P* e# Y/ j: l2 o- x
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
' D7 k9 _0 f: N3 I2 N' ?$ |    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );) P& B- z- X' v- `7 O  x
  ]+ E1 w3 W# I* b1 Y
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; ( K7 F# t' ^# _; n5 h. {
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
7 j* V8 k" A. M/ k6 }$ u    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 5 I3 f% E) @. y
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
3 o6 Q+ p+ ~0 W' u/ N4 Y: c4 K
0 K% ^5 a; e6 s5 f; n* q( p    mcasp->regs->XSTAT = 0x0000ffff; ) H. v/ Y5 D2 W2 a% I
    mcasp->regs->RSTAT = 0x0000ffff; 2 b6 s4 V* k2 F) |8 q

' g! h4 ]! J7 @  \7 T* H    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
# [' a2 z  F! S% N    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );& T" b  D: x8 G9 e% A& [0 I# ~% G$ n4 D
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; 7 [2 k& A& }2 ~  t7 t1 H% X
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );/ G! Y2 H9 B/ C1 a: s6 r, w

) ?: i! e: c) X% x. S9 Z; t    /* Write a 0, so that no underrun occurs after releasing the state machine */5 l( }+ x# D; f0 G6 v
    mcasp->regs->XBUF5 = 0;
1 B3 T) ?9 h# L% v* T0 }& P5 l' ?- x! Y    mcasp->regs->RBUF0 = 0;
6 D- `  K* u( Z% t# H& l1 t3 q/ j& N6 K
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; : Q( s) p7 I5 x# M' ~3 z
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );! z* R6 `2 Y; h! v- N
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
" g, N! }- F  b4 }; B    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );$ K! u; T- {5 a. R) n& n) t

8 z3 @  I8 i; c7 E0 p2 B" F, v    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
4 S0 `$ ?5 A; P    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );" I) c* B2 r; ^5 n8 j
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; / ?1 Y3 ~: Q2 `
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );3 d. n9 J7 i/ O5 S6 r' g4 ^; r

0 A( r$ r# k; X7 L6 }* `9 x    CSR = 0x0000;
. w4 o# a& c' I2 S" L, H5 I6 J    INTC_INTMUX1 = 0x3d;4 `4 A' ~% [( R3 r
    ISTP = (unsigned int)vectors;, c+ `4 N  l+ }7 q0 E/ v) c; X5 @
    ICR = 0xFFF0;  
& T  g5 Q7 f9 A4 P" R! m    IER |= 0x12;  ( Y3 Y4 g% i5 T
    CSR |= 0x01;  
* m+ l/ Z% n/ X7 w4 `0 y4 L' S; U' ^

$ C  d4 X6 j( H7 Q7 U6 B) C6 i2 b* y2 @3 _8 A5 H: L  W' m
还有就是两个输入输出函数:+ C' S8 ]# ?* W! z$ v7 k
void output_sample(Int32 out_data)) @$ x) i+ x5 k( ~; S3 }
{
4 S+ a3 t8 T1 ?* h% U  AIC31_data.uint = out_data;  
* L  M9 M/ G+ U, t4 }  MCASP1_XBUF5_32BIT = AIC31_data.uint;3 e5 V0 [8 I4 ]
}
$ Z: V9 C$ v, R( L# W
  b: Q3 Y6 G+ ]2 G+ _Int32 input_sample(void)
$ m% G  V) V7 ^% N5 S{  6 o! \2 ~5 h8 U, L' `
  AIC31_data.uint = MCASP1_RBUF0_32BIT;
8 D: x5 Y" k" v4 J  return (AIC31_data.uint);" R6 U+ b8 U( r; v1 f# h
}
7 ^* R5 r/ ^* F4 \( |2 f' E: h& a- w* F4 z+ r( j. o/ J8 d( y
分享到:  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-4 14:08 , Processed in 0.042895 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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