?? 44blib.c
字號:
/************************************************
* NAME : 44BLIB.C *
* Version : 17.APR.00 *
************************************************/
#include "..\inc\44b.h"
#include "..\inc\44blib.h"
#include "..\inc\option.h"
#include <stdarg.h>
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include <ctype.h>
#define STACKSIZE 0xa00 //SVC satck size(do not use user stack)
#define HEAPEND (_ISR_STARTADDRESS-STACKSIZE-0x500) // = 0xc7ff000
extern char Image$$RW$$Limit[];
void *mallocPt=Image$$RW$$Limit;
/************************* SYSTEM *************************/
static int delayLoopCount=400;
void Delay(int time)
// time=0: adjust the Delay function by WatchDog timer.
// time>0: the number of loop time
// 100us resolution.
{
int i,adjust=0;
if(time==0)
{
time=200;
adjust=1;
delayLoopCount=400;
rWTCON=((MCLK/1000000-1)<<8)|(2<<3); // 1M/64,Watch-dog,nRESET,interrupt disable
rWTDAT=0xffff;
rWTCNT=0xffff;
rWTCON=((MCLK/1000000-1)<<8)|(2<<3)|(1<<5); // 1M/64,Watch-dog enable,nRESET,interrupt disable
}
for(;time>0;time--)
for(i=0;i<delayLoopCount;i++);
if(adjust==1)
{
rWTCON=((MCLK/1000000-1)<<8)|(2<<3);
i=0xffff-rWTCNT; // 1count/16us?????????
delayLoopCount=8000000/(i*64); //400*100/(i*64/200)
}
}
/************************* PORTS ****************************/
static int whichUart=0;
void Uart_Init(int mclk,int baud)
{
int i;
if(mclk==0)
mclk=MCLK;
rUFCON0=0x0; //FIFO disable
rUFCON1=0x0;
rUMCON0=0x0;
rUMCON1=0x0;
//UART0
rULCON0=0x3; //Normal,No parity,1 stop,8 bit
// rULCON0=0x7; //Normal,No parity,2 stop,8 bit
rUCON0=0x245; //rx=edge,tx=level,disable timeout int.,enable rx error int.,normal,interrupt or polling
rUBRDIV0=( (int)(mclk/16./baud + 0.5) -1 );
//UART1
// rULCON1=0x7; //Normal,No parity,2 stop,8 bit
rULCON1=0x3;
rUCON1=0x245;
rUBRDIV1=( (int)(mclk/16./baud + 0.5) -1 );
for(i=0;i<100;i++);
}
void Uart_Select(int ch)
{
whichUart=ch;
}
void Uart_TxEmpty(int ch)
{
if(ch==0)
while(!(rUTRSTAT0 & 0x4)); //wait until tx shifter is empty.
else
while(!(rUTRSTAT1 & 0x4)); //wait until tx shifter is empty.
}
char Uart_Getch(void)
{
if(whichUart==0)
{
while(!(rUTRSTAT0 & 0x1)); //Receive data read
return RdURXH0();
}
else
{
while(!(rUTRSTAT1 & 0x1)); //Receive data ready
return rURXH1;
}
}
char Uart_GetKey(void)
{
if(whichUart==0)
{
if(rUTRSTAT0 & 0x1) //Receive data ready
return RdURXH0();
else
return 0;
}
else
{
if(rUTRSTAT1 & 0x1) //Receive data ready
return rURXH1;
else
return 0;
}
}
void Uart_GetString(char *string)
{
char *string2=string;
char c;
while((c=Uart_Getch())!='\r')
{
if(c=='\b')
{
if( (int)string2 < (int)string )
{
Uart_Printf("\b \b");
string--;
}
}
else
{
*string++=c;
Uart_SendByte(c);
}
}
*string='\0';
Uart_SendByte('\n');
}
int Uart_GetIntNum(void)
{
char str[30];
char *string=str;
int base=10;
int minus=0;
int lastIndex;
int result=0;
int i;
Uart_GetString(string);
if(string[0]=='-')
{
minus=1;
string++;
}
if(string[0]=='0' && (string[1]=='x' || string[1]=='X'))
{
base=16;
string+=2;
}
lastIndex=strlen(string)-1;
if( string[lastIndex]=='h' || string[lastIndex]=='H' )
{
base=16;
string[lastIndex]=0;
lastIndex--;
}
if(base==10)
{
result=atoi(string);
result=minus ? (-1*result):result;
}
else
{
for(i=0;i<=lastIndex;i++)
{
if(isalpha(string[i]))
{
if(isupper(string[i]))
result=(result<<4)+string[i]-'A'+10;
else
result=(result<<4)+string[i]-'a'+10;
}
else
{
result=(result<<4)+string[i]-'0';
}
}
result=minus ? (-1*result):result;
}
return result;
}
void Uart_SendByte(int data)
{
int data1;
data1=data;
if(whichUart==0)
{
if(data=='\n')
{
while(!(rUTRSTAT0 & 0x2));
Delay(10); //because the slow response of hyper_terminal
WrUTXH0('\r');
};
while(!(rUTRSTAT0 & 0x2)); //Wait until THR is empty.
Delay(10);
WrUTXH0(data1);
}
else
{
if(data=='\n')
{
while(!(rUTRSTAT1 & 0x2));
Delay(10); //because the slow response of hyper_terminal
rUTXH1='\r';
}
while(!(rUTRSTAT1 & 0x2)); //Wait until THR is empty.
Delay(10);
rUTXH1=data1;
}
}
void Uart_SendString(char *pt)
{
while(*pt)
Uart_SendByte(*pt++);
}
//if you don't use vsprintf(), the code size is reduced very much.
void Uart_Printf(char *fmt,...)
{
va_list ap;
char string[256];
va_start(ap,fmt);
vsprintf(string,fmt,ap);
Uart_SendString(string);
va_end(ap);
}
/******************** S3C44B0X EV. BOARD LED **********************/
// -g-- a: data0 b: data1
// a/_b_/f c: data2 d: data3 dp: data4
// c/_d_/e dp e: data5 f: data6 g: data7
void Led_Display(int LedStatus)
{
if((LedStatus&0x01)==0x01) //PE7狀態設置
{ rPDATC=rPDATC&0xfffD;
Delay(50);
}
else
{ rPDATC=rPDATC|0x02;
Delay(50);
}
if((LedStatus&0x02)==0x02) //PE6狀態設置
{
rPDATC=rPDATC&0xfffB;
Delay(50);
}
else
{
rPDATC=rPDATC|0x04;
Delay(50);
}
if((LedStatus&0x04)==0x04) //PE5狀態設置
{
rPDATC=rPDATC&0xfff7;
Delay(50);
}
else
{
rPDATC=rPDATC|0x08;
Delay(50);
}
//if((LedStatus&0x08)==0x08) //PE4狀態設置
// rPDATC=rPDATC&0x1ef;
//else
// rPDATC=rPDATC|0x10;
// Uart_Printf("\n keyboard is %d\n\n",data);
}
/************************* PLL ********************************/
void ChangePllValue(int mdiv,int pdiv,int sdiv)
{
rPLLCON=(mdiv<<12)|(pdiv<<4)|sdiv;
}
/************************* General Library **********************/
void * malloc(unsigned nbyte)
{
void *returnPt=mallocPt;
mallocPt= (int *)mallocPt+nbyte/4+((nbyte%4)>0); //to align 4byte
if( (int)mallocPt > HEAPEND )
{
mallocPt=returnPt;
return NULL;
}
return returnPt;
}
void free(void *pt)
{
mallocPt=pt;
}
void Cache_Flush(void)
{
int i,saveSyscfg;
saveSyscfg=rSYSCFG;
rSYSCFG=SYSCFG_0KB;
for(i=0x10004000;i<0x10004800;i+=16)
{
*((int *)i)=0x0;
}
rSYSCFG=saveSyscfg;
}
/************************* Timer ********************************/
void Timer_Start(int divider) //0:16us,1:32us 2:64us 3:128us
{
rWTCON=((MCLK/1000000-1)<<8)|(divider<<3);
rWTDAT=0xffff;
rWTCNT=0xffff;
// 1/16/(65+1),nRESET & interrupt disable
rWTCON=((MCLK/1000000-1)<<8)|(divider<<3)|(1<<5);
}
int Timer_Stop(void)
{
// int i;
rWTCON=((MCLK/1000000-1)<<8);
return (0xffff-rWTCNT);
}
/****************************************************************************
【功能說明】蜂鳴器鳴叫time個100us
****************************************************************************/
void Beep(unsigned int time)
{
rPDATE = (rPDATE | 0x08);
Delay(time); //延時若干個100us
rPDATE = (rPDATE & 0x1f7);
}
//***************************************************************************
/****************************************************************************
【功能說明】定時器初始化，讓PE7、6、5、4輸出PWM信號
****************************************************************************/
void Timer_Pwm(void)
{
rPCONE = 0xaa6b;
//PE8－P0的引腳功能依次為：ENDIAN TOUT4、3、2、1、0 RXD0 TXD0 FOUT
rPUPE |= 0xf0; //TOUT4、3、2、1、0設置成不上拉，其他引腳上拉
rTCFG0 = 0x23f3f3f; //死區長度為2; Prescaler0/1/2=3f,3f,3f
//定時器輸入時鐘頻率計算公式 = MCLK/{prescaler+1}/{divider value}
rTCFG1 = 0x0; // Interrupt; Devider value = 1/2
//定時器時鐘 = (MCLK/prescaler+1)/2
rTCNTB0 = 20000; //決定TOUT 0引腳PWM輸出信號的頻率
rTCNTB1 = 32000; //決定TOUT 1引腳PWM輸出信號的頻率
rTCNTB2 = 43000; //決定TOUT 2引腳PWM輸出信號的頻率
rTCNTB3 = 53000; //決定TOUT 3引腳PWM輸出信號的頻率
rTCNTB4 = 64000; //決定TOUT 4引腳PWM輸出信號的頻率
rTCMPB0 = 12000; //決定TOUT 0引腳PWM輸出高電平的信號寬度(rTCMPB0<rTCNTB0)
rTCMPB1 = 18000; //決定TOUT 1引腳PWM輸出高電平的信號寬度(rTCMPB1<rTCNTB1)
rTCMPB2 = 25000; //決定TOUT 2引腳PWM輸出高電平的信號寬度(rTCMPB2<rTCNTB2)
rTCMPB3 = 28000; //決定TOUT 3引腳PWM輸出高電平的信號寬度(rTCMPB3<rTCNTB3)
rTCMPB4 = 36000; //決定TOUT 4引腳PWM輸出高電平的信號寬度(rTCMPB4<rTCNTB4)
// rTCON = 0xaaaa0a; //自動重裝,輸出取反關閉,更新TCNTBn、TCMPBn,死區控制器關閉
// rTCON = 0x999909; //開始PWM輸出(不使用死區控制器，上升沿會非常陡峭，是標準矩形波)
// rTCON = 0xeeee0e; //自動重裝,輸出取反打開,更新TCNTBn、TCMPBn,死區控制器關閉
// rTCON = 0xdddd0d; //開始PWM輸出(不使用死區控制器，上升沿會非常陡峭，是標準矩形波)
// rTCON = 0xaaaa1a; //自動重裝,輸出取反關閉,更新TCNTBn、TCMPBn,死區控制器打開
// rTCON = 0x999919; //開始PWM輸出（使用死區控制器，上升沿會變得平滑，適用于功率器件控制）
//Delay(7500); //延時若干個100us
rTCON = 0xaaaa0a; //自動重裝,輸出取反關閉,更新TCNTBn、TCMPBn,死區控制器關閉
rTCON = 0x999900; //停止蜂鳴器的叫聲
// rTCON = 0x0; //停止定時器
rPCONE = 0xaa6b; //
//PE8－P0的引腳功能依次為：ENDIAN TOUT4、3、2、1 OUTPUT RXD0 TXD0 FOUT
}
/*****************************************************************************************
<Author:> Sun <Creat time:> 6/21/2005
【功能說明】A/D轉換器初始化
******************************************************************************************/
void ADC_Start(void)
{
rCLKCON=0x07ff8; //時鐘控制寄存器，使能MCLK作為ADC時鐘源
rADCCON=0x1|(0<<2); //啟用A/D轉換
Delay(100); //等待一定時間使ADC的參考電壓穩定下來
rADCPSR=0x20; //設置時鐘預分頻值
}
/*****************************************************************************************
<Author:> Sun <Creat time:> 6/21/2005
【功能說明】讀取A/D轉換數值子程序
【參數說明】int ch 采樣通道
【返回類型】int 轉換結果
******************************************************************************************/
int ReadAdc(int ch)
{
//ADCCON
/* Bit 6 5 4 3 2 1 0 */
/* 0: 正在轉換 0；正常模式 輸入選擇000~111 0：允許讀 0：無操作 */
/* 1；轉換結束 1：睡眠模式 1：禁止讀 1：啟動轉換 */
int i;
static int prevCh = -1; // 靜態變量，第一次進入該程序是，ADC通道一定不為-1，因此必須等待信號建立
// 以后進入該程序時，該語句賦值被忽略，preCh的值為上一次轉換的通道號
if(prevCh!=ch) // 若當前的轉換通道不是上一次轉換的通道，等待信號建立
{
rADCCON=0x0|(ch<<2); //設置采樣通道
for(i=0;i<150;i++); //等待最小15us
}
rADCCON=0x1|(ch<<2); //啟動A/D轉換
while(rADCCON & 0x1); //To avoid The frist FLAG error case
//(The START bit is cleared in one ADC clock)
while(! (rADCCON & 0x40)); //A/D轉換是否結束？
for(i=0;i<rADCPSR;i++); //To avoid the second FLAG error case
prevCh=ch; // 將此時的通道號，作為相對下一次轉換的上一次轉換通道號
//Uart_Printf("ADCPSR=%03xh ",rADCPSR);
return rADCDAT; //返回轉換結果
}
/*****************************************************************************************
<Author:> Sun <Creat time:> 6/21/2005
【功能說明】信號調理板控制程序
【參數說明】int parameter 選擇138控制的門和采樣保持器
【返回類型】0
******************************************************************************************/
int IOCtrl(int parameter)
{
int a; //138輸入選擇
int b; //138輸入選擇
int c; //138輸入選擇
int data;
int temp;
switch ( parameter ) //通過parameter來確定138的三根選擇線a,b,c
{
case 1: c=0; b=0; a=0; break; //"DGTL_IN"
case 2: c=0; b=0; a=1; break; //"Switch_IN"
case 3: c=0; b=1; a=0; break; //"DGTL_OUT"
case 4: c=0; b=1; a=1; break; //"Switch_OUT"
case 5: c=1; b=0; a=0; break; //"S/H1"
case 6: c=1; b=0; a=1; break; //"S/H2"
case 7: c=1; b=1; a=0; break; //"S/H3"
case 8: c=1; b=1; a=1; break; //"S/H4"
}
//PORT F GROUP
/* Bit 8 7 6 5 4 3 2 1 0 */
/* IISCLK IISDI IISDO IISLRCK Output Output Output IICSDA IICSCL */
/* 111 111 111 111 00 00 00 11 11 */
//11 1111 1111 1100 0000 1111 b=3FFC0FX;
temp=(rPCONF & 0x3FFC0F);
//PORT F GROUP
/* Bit 8 7 6 5 4 3 2 1 0 */
/* IISCLK IISDI IISDO IISLRCK Output Output Output IICSDA IICSCL */
/* 000 000 000 000 01 01 01 00 00 */
//01 0101 0000 b=150X;
rPCONF=temp+0x150;
//PORT F GROUP
/* Bit 8 7 6 5 4 3 2 1 0 */
/* 1 1 1 1 0 0 0 1 1 */
//111100011b=483d; a(bit2)2^2; b(bit4)2^4; c(bit3)2^3
data=483;
temp=(rPDATF & data);
data=b*16+c*8+a*4;
rPDATF=temp+data;
return 0;
}
/*****************************************************************************************
<Author:> Sun <Creat time:> 6/18/2005
【功能說明】信號調理板數據總線輸入輸出控制
【參數說明】char IO in & out
【返回類型?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -