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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:( `  a" M3 t) H' H; Z
main文件:: `. ^0 y8 W$ Y4 A
interrupt void interrupt4(void)  & G9 L. Q7 m# B  w
{
. `. _$ f, i  q3 L3 V4 a2 b$ i  Uint32 sample;2 a8 N  f7 l. @' u
! X( D. h2 Y# O
  sample = input_sample(); // read L + R samples from ADC' U4 m. g) `$ O) f& \
  output_sample(sample);   // write L + R samples to DAC
! b) o( Q) P6 O4 x4 t9 O  return;
) k: S8 L7 B3 ~! F# E}
& L2 r2 l1 S, }! h1 m$ D/ z- E# q5 \4 J+ p  w
int main( void )
( }7 \/ W3 c# \{' `0 O+ a$ s1 @' d. @! j
, W) q( K/ n; X( ]: H
    /* Initialize BSL */2 a" n2 |, P+ F: @$ w. h
    EVMC6747_init( );! k2 h2 H: d' T9 e  M: I
        /* Call evmc6747_intr function */
+ x' |+ P: z6 f1 `, a, m8 t    aic3106_init( );! N" U6 W3 v$ w8 O: _+ W; W  ]
        while(1);# p) R2 t% ]! x( f( ]
}
. K4 j7 o& R7 B: p8 D& U( F4 |5 j3 c0 \0 [% s9 w

# N$ P+ K) \2 I. ]9 v* Qaic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
* K9 _1 r- [. W7 A  `) V1 @/* Initialize MCASP1 */2 S# b/ F5 U' h6 Y
    mcasp = &MCASP_MODULE_1;
2 ?2 i" m: X8 T: V    mcasp->regs->GBLCTL  = 0;       // Reset8 W1 [6 N0 r2 S8 H7 v$ K
    mcasp->regs->RGBLCTL = 0;       // Reset RX
' _* M  g# q- r5 \    mcasp->regs->XGBLCTL = 0;       // Reset TX8 p, W6 |! p) d" l
    mcasp->regs->PWRDEMU = 1;       // Free-running
8 ^! \# a9 o5 C" _  O   // configure McASP0 receive registers/ Z1 F9 [$ C0 I1 o$ C1 ~( `- ^, r0 g
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used( _* t. q) F8 i3 ]* t
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus9 P$ f" D! t1 h
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
. H3 K: g& t0 A5 M    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)6 x8 F0 i, ]% E' \
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
; o$ r5 X* s1 P4 `9 O    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
; i/ m; K4 }- o    mcasp->regs->RINTCTL    = 0x00000000; // Not used
6 s: A4 _  U7 z. t0 i    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256' G/ O) M1 D3 M7 ~
0 x' J# T- y; \( G( ^% q
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used3 c( x) Z, w! d, T$ n
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
! g! J! N9 e) k! d/ ~$ e6 p& |    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
1 ~+ N, F/ Q# r. f2 l( ]2 h4 _! R    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16" z! o* k2 g% f9 O
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK  H. t0 O3 e5 Z6 j, ?2 h) o
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,15 ]1 |. u) g' L0 Q% F' R" _
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit9 G- K, S% h, T$ [) c
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
( h( B# k  D8 K6 o1 [' `4 R) ?+ A! a: v: t
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
) [8 F/ d/ y) j/ o+ }& _* ~    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT9 s. E5 P, ]3 m
    mcasp->regs->PFUNC      = 0;          // All MCASPs
  K1 ?( p. ]& A) r# G    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
; H/ L! @( c" q' V/ G" ]
' [- U8 O% a9 u% @    mcasp->regs->DITCTL     = 0x00000000; // Not used% q* L  ~" R! n; B# `8 C" P4 o+ _
    mcasp->regs->DLBCTL     = 0x00000000; // Not used
9 P3 {2 {. v! Y" {" V+ [. Q) ]    mcasp->regs->AMUTE      = 0x00000000; // Not used
* L. L) J5 U/ u6 h2 j8 W6 ?
  U, r. R, j) G. y4 v4 O/* Starting sections of the McASP*/8 r6 o2 b% P9 S4 ^1 W
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; + f/ @; ]5 d! h
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
# d8 g) Q9 @( y9 i! @" X    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
; ~" R0 |  i3 f& R    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
0 Y4 h( j' o2 N- O
6 e) I& f$ Z4 E/ s, w& w    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
$ H2 O4 F3 A6 ~; o$ M    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
0 J) W9 J6 l; _; ~! F    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 0 B. U$ R' A7 g
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
9 G+ h( i1 Q' p) r+ L, d8 J1 e& f6 h5 `$ D9 t: J( B$ }; W1 |
    mcasp->regs->XSTAT = 0x0000ffff;
( l# m8 p/ X. p& k8 ^    mcasp->regs->RSTAT = 0x0000ffff; / j) U4 S3 j6 C
9 h7 R& G2 U* [
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;4 c" L, X4 j1 H1 w" D/ r6 O
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );3 n+ ]8 z& H# r6 j, p
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
: Z8 ^& x( q8 v0 `( c$ M    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );4 r: j+ z' L: J

# t5 \9 P& E7 d! h' Q' ?' M    /* Write a 0, so that no underrun occurs after releasing the state machine */
8 u0 \9 _& ?+ ~7 f" P    mcasp->regs->XBUF5 = 0;
$ g8 B/ L2 y. q5 w% o, Y" j( \4 x    mcasp->regs->RBUF0 = 0;
( a5 w* q5 p% u( _" r5 }+ Z9 M' L: J& I9 _9 ?
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; ; a" w/ N9 @& V' j6 `
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
1 {, k! a5 }: d2 @+ Q- T: p    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
; d" f% _" D" K& ], h, u    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );; T3 `" @3 f) s( w3 T: N' k
& z% N- Y. O) }' f/ y) E% a- h
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; ; c2 z( a! F0 _! X: w$ d
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );( f0 Z- `% o& i5 y
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; + w3 Q+ x8 N- t! m( F
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );! x3 w% h0 \0 B- {4 }/ X* X- U5 n
4 h( x2 X* f( K2 b) `
    CSR = 0x0000;
  G4 d2 G5 `2 ^# R$ y* Y    INTC_INTMUX1 = 0x3d;/ g! f. r8 A$ X
    ISTP = (unsigned int)vectors;
6 g, k$ N) z. v  k2 B. Q    ICR = 0xFFF0;  
& }6 _1 ], o+ U2 |    IER |= 0x12;  ) M3 O! w# H& z
    CSR |= 0x01;  
. W0 D: d2 P# M( \- n/ R6 j8 ^, z
2 W1 \3 A' G4 a% ]% w3 [
# [' a7 _& t7 H6 i; n# ^: u' o
8 x1 a7 f' {3 d+ I# A4 V还有就是两个输入输出函数:
9 [5 A8 ?3 \) b& X! q8 Kvoid output_sample(Int32 out_data)
3 Z# H3 U9 R- [1 h& C- c{; I% U% E, ]: U0 ?6 N2 X
  AIC31_data.uint = out_data;  
3 H5 h1 m; @, H9 f- C0 }8 E  MCASP1_XBUF5_32BIT = AIC31_data.uint;
3 T, l8 N( W$ }& O! w7 P8 u5 n3 O( {}
. [8 e: B* u1 I6 v8 A# w  P
- O; b, l7 T$ g5 k8 T  YInt32 input_sample(void)
; Y6 s' e) y5 p; I- b{  8 ]* w' k/ Z4 a, R% z( l6 F
  AIC31_data.uint = MCASP1_RBUF0_32BIT;
: g, K- _4 L4 H' m; g! y  return (AIC31_data.uint);6 b/ h2 v, P( q, S& J4 I3 Z2 B1 V
}! J# O( n2 ~" z  N% `
* ~: C2 `3 K: s6 Q. j/ c- g: |
分享到:  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-11-24 05:31 , Processed in 0.046363 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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