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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
" P& ~2 X: W" C' pmain文件:
! I/ [) B6 p$ \interrupt void interrupt4(void)  7 X6 o1 ?  G+ B, j8 ?$ A- m
{
+ b0 e: u* Q; W$ A# M0 y$ s; g  Uint32 sample;% I. P# N  j4 P

1 `3 c  D! ^' V: V) M5 j0 t: j  sample = input_sample(); // read L + R samples from ADC
) U: d) v6 d, n) V+ n2 c5 h5 n, R  output_sample(sample);   // write L + R samples to DAC
3 v; Z# ]8 o) M/ a6 r% d9 f  return;8 L  D' s2 h! J
}
2 [6 G' J$ X. z1 ?; S
" }' g" L1 t3 A1 kint main( void )7 I9 ?, g) y/ h# b( u) \
{
8 `$ U% X8 z. M+ X5 _* T. H
$ U" d) _' N9 {8 P    /* Initialize BSL */% J, N8 x0 K2 ]& {
    EVMC6747_init( );& D0 V6 c" V! z8 Q0 S
        /* Call evmc6747_intr function *// X1 E9 p& W6 a& E# Z
    aic3106_init( );2 v, d4 M( r8 Z8 ~
        while(1);
$ F7 R3 z1 w+ ~. ~8 U}
' U' ~7 S1 {8 I
( e% f' ~$ ?! D" |  |, Z5 D! _2 d% B1 l( ]
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题- _7 j) X) ~3 }+ o$ ^. q6 e
/* Initialize MCASP1 */) Q4 j, n5 A6 a
    mcasp = &MCASP_MODULE_1;
: l  a, [5 F' O' l& n- V    mcasp->regs->GBLCTL  = 0;       // Reset
3 i3 ]$ A' I( g2 o) S% [! S7 h    mcasp->regs->RGBLCTL = 0;       // Reset RX
! ^0 J8 T* g8 U: ]% S# j6 H8 t) C    mcasp->regs->XGBLCTL = 0;       // Reset TX
$ }+ q) H) T' ~& k    mcasp->regs->PWRDEMU = 1;       // Free-running7 ~: J0 N) F- }! m$ W
   // configure McASP0 receive registers
/ m" k& @, H( ?4 {5 D( k* J& Z1 S    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used) r8 ^7 U$ i3 L7 _5 v1 [
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus' H& [" R5 U- U4 m$ D" O
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word# R4 h& O, D2 x& x% K$ w  M
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side): i9 H# `3 c1 y4 K
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
4 P$ V9 D) @8 I    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1' C; Q# d8 r+ L% [/ o! l" A
    mcasp->regs->RINTCTL    = 0x00000000; // Not used! E$ E1 \5 M2 a. X: h( ]4 a2 P* h
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256. B$ E  m( ^  D/ e* Q. ~. ]
: O: ~; Z; m  r5 B  Q" B
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used8 O/ @: w$ ?5 f+ Y$ }# v
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus8 m" k; U7 M3 ^$ L7 f
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
3 f  ?& ]+ f( K6 h( r    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16. T4 a; z3 y* H. {- ]
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
8 d, B  N2 ]8 B" b0 d    mcasp->regs->XTDM       = 0x00000003; // Slots 0,11 J; ?. O4 Z' L) W
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
* x7 T6 w- h9 g6 F    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256: w4 q. `+ d4 J: u( @

/ U: R- n5 [, H    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN/ l( @% [9 f! q3 w+ g1 _$ y# u5 ?
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT: E9 U4 {! j; h( h0 v) a
    mcasp->regs->PFUNC      = 0;          // All MCASPs
5 I: f/ F. `3 g6 b! E2 R    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
8 u5 h8 t2 V, x0 Y8 ]5 K$ _) _. B4 s1 v6 f& l2 N3 g
    mcasp->regs->DITCTL     = 0x00000000; // Not used
. a+ [( R$ Y0 u3 ?% P4 }    mcasp->regs->DLBCTL     = 0x00000000; // Not used- x, I7 O7 P4 p/ b# A
    mcasp->regs->AMUTE      = 0x00000000; // Not used" G- t9 V  D4 e9 V7 k6 F( X

- f$ D+ G8 \% N. Z7 g/ [( p* U/* Starting sections of the McASP*/) i$ c- U& o# X1 V3 i2 ]+ k# Z3 h
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; ! E9 m1 V: c" ?# D8 c' m, u* s
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
. |2 C* Y# P4 b4 W    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
/ q7 G- z3 G4 J: d    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
- Z1 j( G" ^: g& H3 B* z% P
  g7 G( |. g$ w( u    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
) @& x- D+ L3 W% F7 `    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );0 t. P6 G3 z0 n# s" a
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 1 I. a4 K- x% Q
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );% v. \, p! D0 U) w/ Z9 I- {

( `8 N. @2 M7 \1 J    mcasp->regs->XSTAT = 0x0000ffff;
/ g+ I; }* ?" j) \* T# F" R    mcasp->regs->RSTAT = 0x0000ffff;
) h$ c  m) f6 ]& b) |4 \* u% U2 J  E1 b' V; q9 d
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;2 Y# Z8 k4 _  u
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );" ^7 C. f$ G( R4 g9 `
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; - }4 Z; a1 {; G' e
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );- Z/ a, [( K9 g* e% e
. q6 V# Z* F" \
    /* Write a 0, so that no underrun occurs after releasing the state machine */3 H% C1 b3 V' \  J8 W
    mcasp->regs->XBUF5 = 0;
) W6 @9 e$ @1 r    mcasp->regs->RBUF0 = 0;% d6 e# c+ ~2 @( Q. g

, P- l% ]+ X1 G& l4 i    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
+ x& S4 I! b9 o3 r    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );, l4 x3 b0 W; \$ Z7 [! c
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; + X4 o7 v- z, h; {6 d, ~2 t) n# Q  h
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );" h+ f: w" K8 a6 S- o& I: V
# N+ K# b, L' D6 b5 d
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; : U7 `  I' \) u; m6 Z9 w
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
, {/ d$ |6 q( b  P0 e    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; + g& h  {" D3 ?+ T
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );- h4 B2 ^# Z/ k3 |& t1 p
* f$ Z: I2 s6 p. J1 \; L- X
    CSR = 0x0000;
0 E+ p% i5 S0 I0 |) s    INTC_INTMUX1 = 0x3d;6 H" S" r; f) ]
    ISTP = (unsigned int)vectors;
9 `! b; |. s" Y' Q& W3 Z    ICR = 0xFFF0;  
3 j; i- I! S; }# `    IER |= 0x12;  # e5 C( [6 @6 _0 W( l  U) t
    CSR |= 0x01;  
0 u+ k& M+ k. l1 o
" @) j' G9 L1 l; ?  s' J' j) i7 W  [9 w; g' ^( E
- o6 c" F2 ?+ Y: D) D
还有就是两个输入输出函数:; @+ ]+ V" N5 q; S  }/ |" n: u1 x
void output_sample(Int32 out_data)! ?* I$ n  A9 r* u/ T, \% |8 l! V6 C
{3 R" y1 n8 `3 Z0 Y- U+ `7 g! S3 Y
  AIC31_data.uint = out_data;  
# d& z5 d# Z  f7 k  MCASP1_XBUF5_32BIT = AIC31_data.uint;
) _* ^2 x4 F4 D) P}# H' l- Y" e+ Q# e5 a$ j% h
% L+ `' s3 I2 }" y  v9 ~
Int32 input_sample(void): P7 Z/ y2 g; k. a
{  
! _8 g0 l; R+ y# i8 V  AIC31_data.uint = MCASP1_RBUF0_32BIT;2 ?8 n/ W  o) f+ Y$ F, w6 }
  return (AIC31_data.uint);" A4 o8 [) N, O' B% ~2 R4 C
}' |+ |0 i$ P8 `+ s8 r( p( Z9 U
2 b9 n5 p  V& s7 I9 Z6 M
分享到:  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-29 17:04 , Processed in 0.047267 second(s), 26 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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