C6747利用McASP发送中断方式完成音频输入信号的直接输出 - OMAP-L138 - 嵌入式开发者社区 - 51ele.net
设为首页收藏本站

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:  O% E4 q; E( s- ^+ ^8 Z
main文件:7 `% j: n0 g0 z, T& `
interrupt void interrupt4(void)  
! x  l2 e2 c; \* w9 l{9 Q7 y( ]& N0 Q+ \3 Z. n0 C
  Uint32 sample;
9 J5 ]1 _5 X% R' i: q# d" {# @$ ~! z4 R
  sample = input_sample(); // read L + R samples from ADC
( p+ W- j$ s  w- e+ ?. `  output_sample(sample);   // write L + R samples to DAC 9 R" c( h( e. G& k5 T
  return;
) M0 B, T: y( g, \9 y, g}
2 z! e: t4 I$ p% F" j- N
( E5 p1 }/ H. X1 V) @int main( void )
$ X4 A8 s9 g9 ]  r: y{* j- [% L# k3 ~5 I8 V6 E. H

3 W% z$ L3 M% M, k; M    /* Initialize BSL */
4 b; {' T" ?: H( R) G    EVMC6747_init( );/ f; y, w  Q( S, ^1 w/ f( g6 Q+ Y
        /* Call evmc6747_intr function */
, F, X7 ^! V" Y. x% D) i, V, R    aic3106_init( );
5 k; g3 O7 }4 x" B# ^9 W        while(1);5 k" ^# {! w- L  v
}
* F* p6 K3 Y  c' k' w' b3 N. [2 r3 H* D$ [3 D& C- I' t

  r9 R0 `% v! m; Gaic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题3 Q+ W9 u3 R. V( L# J
/* Initialize MCASP1 */. J* ~7 |. u$ C3 ^9 Z3 D6 A
    mcasp = &MCASP_MODULE_1;
1 b& s0 J1 I9 q" G1 v% s# J4 s    mcasp->regs->GBLCTL  = 0;       // Reset0 ~1 S3 f: T. H  Y7 z
    mcasp->regs->RGBLCTL = 0;       // Reset RX
9 z* d4 y8 H( }    mcasp->regs->XGBLCTL = 0;       // Reset TX  p: |  Z/ V9 ?+ J
    mcasp->regs->PWRDEMU = 1;       // Free-running0 L6 F& H  D, I8 [( _
   // configure McASP0 receive registers- l) L! k: M; j  g
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used# F1 Z4 `) `7 X8 A
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus3 j0 [2 m3 g% W: }" S  M& x2 \* X
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word9 ~2 G9 i* J; d: y. q$ u& q
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
7 O/ I" I0 E5 w- @' a    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side), j. u( Y7 u' m% t% D' _- J
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
0 H9 X9 g2 {, k$ b- M$ M" S2 d! f    mcasp->regs->RINTCTL    = 0x00000000; // Not used
. D9 r" q; a6 h- X" b& a    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
% O) q( N1 X: R8 b6 {# i" J; O
1 s  t9 h8 ^8 p' _    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
4 U) {+ ~- e6 m& m    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
. h# Q# J/ x; H0 S, Y7 [+ ^    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
5 k- J4 T9 N5 F; O4 U$ g    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
/ g6 y# x5 D" o& J" ?& n8 C    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK7 G$ _5 \- Y) u& N5 w$ A; w  m
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1# j* a, w6 S7 [8 E$ [$ c
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
8 e% Y- ?3 U8 F! Q    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2567 g3 b( O0 E2 ?5 ^8 Z7 d

( [% l5 w' t" E; }: `    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN  T0 [5 ^( w5 s, D% w, L1 I
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
) U+ T9 N/ i5 X; X, B1 i    mcasp->regs->PFUNC      = 0;          // All MCASPs8 H9 w4 _0 K% j0 x
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
6 u8 F7 s/ }3 h6 w6 i( N- A7 @* F) j
    mcasp->regs->DITCTL     = 0x00000000; // Not used
2 ?) c1 `& T# |) m* b( M# l  O    mcasp->regs->DLBCTL     = 0x00000000; // Not used
' ?% Y" ~1 U7 _( @4 r    mcasp->regs->AMUTE      = 0x00000000; // Not used- g  {  F) _, E: u" J) ~8 O
0 k6 s# F: \) s$ w) |) M
/* Starting sections of the McASP*/
4 b1 R! z, ~7 N; u    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; $ j$ `0 h+ W' Z, j
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
5 G3 Q9 |' J% T4 C& x0 K1 Y    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
5 B/ w0 M9 {* z7 @    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
, K$ I8 ?$ O- N9 @4 [3 m9 H# f5 A2 o/ h0 _8 `2 T- h
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
4 v. W$ ~* `' x7 i* R    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );0 k& N$ ]* F4 [" M  B; ]
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 1 W1 V1 {4 v; X1 v& d7 F: M
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
$ D" t& c2 k1 O! t6 Q" z1 i
" r# [" ?  _7 ?8 Y2 B" l9 b    mcasp->regs->XSTAT = 0x0000ffff;
! ^9 s- Y9 \: A( |    mcasp->regs->RSTAT = 0x0000ffff; * q- r0 Q  [' Z
9 J& |( J9 E; l) C! c! n
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;, Y& O$ c8 p5 \& W, E% _1 R
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );3 J& C3 M) h! B5 R; K2 L
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; 7 c7 x$ e. r4 N. c
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );7 L" Q6 ]; P. C: d, ]: X

' W$ D/ J: m1 x: [6 j: ?    /* Write a 0, so that no underrun occurs after releasing the state machine */
& X; Z+ a( U4 E; E9 m; ^$ ~    mcasp->regs->XBUF5 = 0;
& B* w" X1 }9 {5 k: i! V    mcasp->regs->RBUF0 = 0;
3 ^+ V& K8 j, T) ]* }
' d) N9 ~0 }, |5 M, B: u+ [    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
; N  d; o; q  ?7 m% A1 W    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
" l( w. @- h% p# K    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
0 u% V: X" h+ g, s    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
- t! d3 i0 q; T( _( M5 ^! D# K3 L3 F! V* {) j' T
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 2 I/ D& W& n( G! ]
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );1 R) p( J0 P& C5 ]  ~7 I
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
5 ~# F; j0 W. g- B0 f% D# l    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
0 V9 s! M- u9 u! i9 |! r2 J7 `
1 {  T6 i% V+ s2 o4 E6 \    CSR = 0x0000;
4 w1 x0 ^" P) R9 W9 N    INTC_INTMUX1 = 0x3d;
7 L0 w, ^8 Y+ ?4 L    ISTP = (unsigned int)vectors;
3 q; ]# P; i) Q. L2 t    ICR = 0xFFF0;  
0 E. L$ w0 l; J5 U! h9 n    IER |= 0x12;    z/ u: y, Y* a+ f' x" J% Y4 F
    CSR |= 0x01;  
8 h6 ^/ X$ t& j" D! S4 j" D' ]+ @5 m0 ]# u5 h; t9 h
7 ?# ^( a* X5 f" x' M% v

; A" d2 e. E  N还有就是两个输入输出函数:+ j3 F+ ?1 `2 ?( ?/ F1 J
void output_sample(Int32 out_data)
+ k. v2 f4 s4 s4 X( }* y; l{
8 t& t3 W3 \" x8 b2 E# Z% Y" q- P  AIC31_data.uint = out_data;  $ l1 u0 o- I7 H
  MCASP1_XBUF5_32BIT = AIC31_data.uint;3 B) O- e0 T( X& b$ a( g
}
. [6 }: G- r- D3 P* ]8 }: i
' T7 E" a8 x$ @( D  iInt32 input_sample(void)
" X& F, f' ~9 f% Y* ]4 B{  6 m6 z$ m# K$ F2 h' |
  AIC31_data.uint = MCASP1_RBUF0_32BIT;; }' ^- c" S# T  l. ^& ~
  return (AIC31_data.uint);
& @- A! B5 D; ?/ H& y- ?6 H8 V: Q8 `}
3 u1 I+ k5 e% C' `0 h2 I' b0 M  j0 u6 p$ H  x6 _3 _
分享到:  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, 2025-8-6 05:59 , Processed in 0.040591 second(s), 23 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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