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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:, N/ P. c7 S4 h6 O: P; Q
main文件:
# h' r! s/ |- |! K0 Q, ^interrupt void interrupt4(void)  ' A" G  g& U8 _' a& z5 i
{6 e  ?$ R! H* ~! A7 B5 o( P
  Uint32 sample;
& X" }( D: a6 p) i: U' t  r6 u, k1 V2 ]% s7 I2 c
  sample = input_sample(); // read L + R samples from ADC
4 Q; N+ s3 d! ]1 R# |/ o% s  output_sample(sample);   // write L + R samples to DAC
  m9 Y, n5 M& ]9 @8 n  return;
9 U* y8 p+ r3 T, x. d}
8 B9 |3 t. V4 ?7 r8 Z. ~- x1 g) u& o# s* O1 t9 M
int main( void )
* q9 ?0 g  l" O. l# W' E& m{
. q; g+ g1 F+ }
; l' \2 S0 A" y$ s; Q. d, J: p    /* Initialize BSL */! A* r8 c9 {, P7 F
    EVMC6747_init( );. Z- H. d& ]9 y
        /* Call evmc6747_intr function */; Q& B0 b0 `. \7 v8 O
    aic3106_init( );6 i( H6 U  E9 `; ~4 ~* s' y
        while(1);
; ?; K( U. U* j; {, S( }}
! A% L% b( p8 b& {0 |  T& D  r1 P# j; {* @% r6 c
$ W. Y/ j/ P, `1 q6 v* n: y+ R
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题' y1 F% K  D: U' Y4 H
/* Initialize MCASP1 */
' E6 q: X2 N' y    mcasp = &MCASP_MODULE_1;' u1 c0 P, ~- k$ W. q/ {
    mcasp->regs->GBLCTL  = 0;       // Reset+ K. `( D0 Z! N- d+ ~( V) o
    mcasp->regs->RGBLCTL = 0;       // Reset RX7 q8 T% r8 c- E- K$ r+ x) g
    mcasp->regs->XGBLCTL = 0;       // Reset TX7 {& d$ t: [( _& N# i) I! }! L
    mcasp->regs->PWRDEMU = 1;       // Free-running; \. i7 Z& M. {5 O/ F. c5 ~
   // configure McASP0 receive registers# Q( Q; }8 q& P8 H$ N- }9 R
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used- f* S$ ?; _1 E- }" f# r
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus0 @. _4 u% m! c% q4 k$ W8 r) u
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word: Y% K2 j% S3 {3 I$ g( T2 P. ^
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
; E" o/ f1 i8 a    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
' a6 M  i  W: W5 Z    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1! N9 s% W8 V" p. g! |' X( y
    mcasp->regs->RINTCTL    = 0x00000000; // Not used) j- `+ c/ D9 w
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256: M( z6 `2 W' M* Y; G! }
2 }. P& z# q0 J
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
- |1 f1 S( h, L5 Z    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
3 R* A  Q" ?- R) Y4 i5 O    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word% N: O) l- V  W
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
9 F* i* |* M1 D1 _  @( c  }% e    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
' J0 f$ t3 X0 ]( D" _" h    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
) p2 l7 R' g! K    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
! I5 D9 c3 M7 ~' o    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256" h& j7 G5 T: d1 G
* w1 W1 E# ]9 {/ e* F3 h6 M: h
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN& v$ J* M! |/ D# S$ m9 @2 |" o
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
$ s# m0 @$ k6 Q: a3 U    mcasp->regs->PFUNC      = 0;          // All MCASPs
# V  o, w# v* l3 g, Z6 \( c    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
7 }8 _5 y2 v) K$ l9 k; w( N: o/ V2 l. v
    mcasp->regs->DITCTL     = 0x00000000; // Not used
6 b* T4 _5 i7 v& G" O9 [& S/ _    mcasp->regs->DLBCTL     = 0x00000000; // Not used5 Q9 Z. ]; K( N
    mcasp->regs->AMUTE      = 0x00000000; // Not used; g  K+ ]+ X7 ^9 k2 c

( V/ ~4 @3 Z  K. ~- L4 Q: ?0 F  m; j/* Starting sections of the McASP*/
7 S5 K6 X4 n7 w) K    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
0 I9 b$ `( C* x  Y    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
% L5 }, A0 Z1 a- @' W    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
/ W5 }/ i+ ~" l; _* Y' C    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );8 ], ]" g, U0 m# P" w
/ Y# p% _" g% y" w
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; 0 k( X* z# }' J! k
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
8 `( u) \( d" t' h    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
: \- r4 g% W" c. Y, h    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
9 t, w) p5 V7 L3 n3 O) S8 }0 G# E! Y* a% p& y" `/ u  Q; p) @
    mcasp->regs->XSTAT = 0x0000ffff; 3 S9 k& A) d# r; V7 z( [! Y
    mcasp->regs->RSTAT = 0x0000ffff;
3 ?3 r3 |: w2 `! Y
  C- `: R6 u2 U/ J$ T6 I    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
) R! n0 z. r' c+ t. R    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );- \- k  e1 Q, I$ z& Q. {* h$ t
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; , J" L0 r" |# Q. P  ~
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );7 s/ E. m# L' n/ u
7 Z4 h6 @1 N, P' e1 u
    /* Write a 0, so that no underrun occurs after releasing the state machine */! F5 V, P5 `5 e" W& f, F$ O9 ]+ N9 t0 E
    mcasp->regs->XBUF5 = 0;
8 N( D) r& ^' b+ q3 k    mcasp->regs->RBUF0 = 0;+ `# x: j. l3 v% `" S; s
- c. T. i" R  u( B
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
6 J# ~8 c* l- N6 e& ?0 u    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );6 Y: q; Y8 L4 m
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; 8 w9 j3 ~/ d# v+ x7 ?' a3 j5 K: P9 z
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );7 D9 f; Q" c: ^. u
- h+ T. K$ A* r
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
2 j2 r' T! o- s4 g# D3 ]# L; u* z8 m7 R    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
5 x  N+ J6 ^$ H, W3 V  p    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
! U% b  r7 n$ {$ F. B1 u7 y& Q2 X1 `9 y    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
8 B; H/ o+ j  B! I* j& J& L! r2 J, U4 ]2 ?( k/ i
    CSR = 0x0000;
, i5 G  v0 y$ N$ t2 a. c2 A% h    INTC_INTMUX1 = 0x3d;
) d# K& D" ~2 f7 S1 L) r  u2 S    ISTP = (unsigned int)vectors;
  M. F$ e2 }# k/ B  @" m+ W    ICR = 0xFFF0;  ! `' X! L8 ~  k6 X. F6 ~6 b
    IER |= 0x12;  6 _  C# y) W8 Q* E. [$ [* ]" d
    CSR |= 0x01;  9 s; b# m7 @1 E' y/ a
4 G2 D" M% b; [8 W% ~( e% m8 u% Y

) K8 F0 q2 O1 k. c6 z2 ]
7 [- M) q6 _* S7 J9 `: G  R还有就是两个输入输出函数:
! ~4 S( a- k* B6 Z' {0 R8 svoid output_sample(Int32 out_data)
3 b; S, }3 W3 Y* A. W5 K{
( d- ~" g1 t# s/ b/ A  AIC31_data.uint = out_data;  
# _* f' x+ {' l' P' O  MCASP1_XBUF5_32BIT = AIC31_data.uint;  L, @/ Z+ k7 k# ?! [9 U
}
, c' S+ d+ c5 O( w
$ Y5 @8 L  Y* d: q3 aInt32 input_sample(void)7 k' A0 i% g6 l# j
{  
% B$ H: O. m& i: ?% K  AIC31_data.uint = MCASP1_RBUF0_32BIT;
% J2 w2 a" [3 h6 e& A- |! G  return (AIC31_data.uint);
6 J9 G! L2 p5 \6 p}
5 e# Z! Z5 q, X( E; R8 S  d
/ |' r# w' M  S7 `/ T1 n
分享到:  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-18 09:59 , Processed in 0.041091 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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