?? set_auth.c
字號(hào):
#include <mem.h>
#include <dir.h>
#include <dos.h>
#include <stdlib.h>
#include <string.h>
#include <conio.h>
#include <ctype.h>
#include <alloc.h>
#include <graphics.h>
#include <bios.h>
#include <time.h>
#include <bio.inc>
#include <menu.inc>
#include <key.inc>
#include <g_id.inc>
#include "feedef.h"
#define UNIT_NUM 16
#define ITEM_NUM 4
typedef struct
{
UC setup[3];
UC close[3];
UC change[3];
}AUTH_HEAD_STRUCT;
void send_auth_code(void);
/* function : creat the authority code and the authorized unit relation
* called by : set_data()
* date : 1993.11.8
*/
void process_auth_code(UC mode)
{
UI pg;
TABLE_STRUCT authcd_tbl = {102,99,20,18,UNIT_NUM,ITEM_NUM,
{35,86,35,64}, ITBL_CLR};
TABLE_STRUCT authcd_tblq = {102,99,20,18,UNIT_NUM,ITEM_NUM,
{35,86,35,64},QTBL_CLR};
AUTHCD_STRUCT *tbl;
clr_DialWin(1);
set_finger_color(Dsp_clr.fng_clr);
if(mode == INQ_AUTH)
draw_table(&authcd_tblq); /* draw the table frame */
else
draw_table(&authcd_tbl); /* draw the table frame */
disp_authcd_head(mode); /* display table head */
disp_authcd_help(mode);
message_disp(8,"根據(jù)右上方彈出提示窗口提示操作");
load_authcd_tbl(1);
ANewlen = authcd_tbl_len(); /* calculate table length */
Count = 1;
tbl = Auth_cd_top;
disp_authcd_tbl(tbl,Count); /* display 1th page of the authority code table */
if(!(ANewlen%UNIT_NUM) && ANewlen) /* calculate the pages and display */
pg = ANewlen/UNIT_NUM;
else
pg = (UI)(ANewlen/UNIT_NUM)+1;
outf(542,397,11,14,"%2u",pg);
locate_finger(0,1);
process_authcd_data(mode);
unload_authcd_tbl();
recover_screen(1);
message_end();
return;
}
/* function : display the head information for authority code setting
* called by : set_authcd_unit()
*
*/
void disp_authcd_head(UC mode)
{
if(mode==SET_AUTH)
hz16_disp(150,80, "授 權(quán) 用 戶 設(shè) 定", BLACK); /* authcd setting */
else
hz16_disp(150,80, "授 權(quán) 用 戶 查 詢", BLACK); /* authcd inquiring */
outf(104, 103, 7, 0, "卡號(hào)"); /* seqence no */
outf(143, 103, 7, 0, "授權(quán)用戶名"); /* authed authcd name */
outf(228, 103, 7, 0, "級(jí)別"); /* auth class */
outf(270, 103, 7, 0, "月租費(fèi)"); /* authed authcd name */
return;
}
/* function : display the help information
* called by : set_authcd_unit()
* date : 1993.11.9
*/
void disp_authcd_help(UC mode)
{
/*** PROMPT: ***/
draw_back1(490, 122, 625, 357, 11);
if(mode==SET_AUTH)
{
outf(500, 142, 11, 0, "F2 存盤");
outf(500, 162, 11, 0, "F5 刪除");
outf(500, 182, 11, 0, "F6 卡號(hào)定位");
outf(500, 202, 11, 0, "F7 頁(yè)定位");
outf(500, 222, 11, 0, "←↓→↑ 移動(dòng)");
outf(500, 242, 11, 0, "PgUp 向前翻頁(yè)");
outf(500, 262, 11, 0, "PgDn 向后翻頁(yè)");
outf(500, 282, 11, 0, "Enter 輸入");
outf(500, 322, 11, 0, "Esc 退出");
}
else
{
outf(500, 142, 11, 0, "F6 卡號(hào)定位");
outf(500, 162, 11, 0, "F7 頁(yè)定位");
outf(500, 182, 11, 0, "←↓→↑ 移動(dòng)");
outf(500, 202, 11, 0, "PgUp 向前翻頁(yè)");
outf(500, 222, 11, 0, "PgDn 向后翻頁(yè)");
outf(500, 322, 11, 0, "Esc 退出");
}
/*** PAGE No. AND TOTAL PAGE ***/
draw_back1(498, 365, 607, 427, 11);
outf(518, 377, 11, 14, "第");
outf(575, 377, 11, 14, "頁(yè)");
outf(518, 397, 11, 14, "共");
outf(575, 397, 11, 14, "頁(yè)");
}
/* function : load authority code from authcd.dat
* called by : set_authcd_unit()
* input : mode -- 0 : if there is no charge.aus file, return false
* 1 : if there is no charge.aus file, alloc memory
* date : 1993.11.9
*/
UC load_authcd_tbl(UC Alloc)
{
FILE *fp;
AUTHCD_STRUCT *tbl;
UL ss;
int i, num = 0;
if(Auth_cd_top != NULL ) /* already load */
return(TRUE);
fp = fopen(ChargeDataFile[AUTH_CASH],"rb");
if(fp == NULL && Alloc == 0)
return(FALSE);
Auth_cd_top = (AUTHCD_STRUCT *) farcalloc( MAX_AUTHCD , sizeof(AUTHCD_STRUCT) );
if(!Auth_cd_top)
{
ss = (UL) ( MAX_AUTHCD *sizeof(AUTHCD_STRUCT) );
exit_scr(1,"Out of memery ERROR: %ld bytes.\n\nGFS system shutdown abnormally.\n\n\n\n",ss);
}
tbl = Auth_cd_top;
if(fp != NULL) {
while(fread(tbl,sizeof(AUTHCD_STRUCT), 1, fp) == 1)
{
tbl++;
num++;
}
fclose(fp);
}
for(i=num; i<MAX_AUTHCD ; i++)
{
tbl->auth_code = i;
tbl->auth_class = UNUSED_AUTH;
tbl->auth_usr_nam[0] = '\0';
tbl->month_lease = 0;
tbl++;
}
return(TRUE);
}
/* function : free the alloced space
* called by : set_authcd_unit()
* date : 1993.11.9
*/
void unload_authcd_tbl(void)
{
farfree(Auth_cd_top);
Auth_cd_top = NULL;
return;
}
/* function : calculate the length of the authcd table
* called by : set_authcd_unit()
* output : length of the authcd table
* date : 1993.11.9
*/
UI authcd_tbl_len(void)
{
AUTHCD_STRUCT *tbl;
UI tbllen = MAX_AUTHCD;
tbl = Auth_cd_top+MAX_AUTHCD-1;
while( (tbl->auth_class == UNUSED_AUTH) && (tbllen>0) && tbl->auth_set_flag==0)
{
tbllen--;
tbl--;
}
return(tbllen);
}
/* function : display a page of the authority code talbe
* input : tbl -- the first struct of this page
* num -- the sequence no of the first struct of this page
* date : 1993.11.9
*/
void disp_authcd_tbl(AUTHCD_STRUCT *tbl, int num)
{
UI i, j;
UI x, y;
UI pg;
UNIT_STRUCT cer_unit;
UC color;
for(i=0;i<UNIT_NUM;i++) /* DISPLAY No. IN THE TABLE */
{
if(num+i > MAX_AUTHCD )
break;
outf(108, i*19+123, 7, 0, "%-3u", num+i-1);
}
pg = (UI)(num/UNIT_NUM)+1; /* DISPLAY THIS PAGE No. */
setfillstyle(1,11);
bar(534, 393, 575, 377);
outf(542, 377, 11, 14, "%2u", pg);
if(num == ANewlen+1) /* the table has been added, so redisplay pg */
{
bar(534, 413, 575, 397);
outf(542, 397, 11, 14, "%2u", pg);
}
/***** Display a page of the rate table. *****/
for(i=0;i<UNIT_NUM;i++)
{
if( num+i > MAX_AUTHCD )
break;
if( tbl->auth_class != UNUSED_AUTH )
{
for(j=1;j<ITEM_NUM;j++)
{
cer_unit.unit_x = i;
cer_unit.unit_y = j;
get_certain(&cer_unit);
x = cer_unit.dot_sx+5;
y = cer_unit.dot_sy+1;
switch(j)
{
case 1: /* authrized user name */
outf(x, y, 7, 0, "%-s", tbl->auth_usr_nam);
break;
case 2: /* authority class */
if(tbl->auth_set_flag)
color = LIGHTRED;
else
color = 0;
outf(x,y,7,color,"%1d", tbl->auth_class);
break;
case 3: /* authrized user month lease */
outf(x, y, 7, 0, "%6.2f", ((double)tbl->month_lease)/100);
break;
default:
break;
}/* END SWITCH */
}/* END FOR2 */
}
else if (tbl->auth_set_flag) /* have not been deleted succussfully*/
{
cer_unit.unit_x = i;
cer_unit.unit_y = 1;
get_certain(&cer_unit);
x = cer_unit.dot_sx+5;
y = cer_unit.dot_sy+1;
outf(x, y, 7, LIGHTRED, "未下送");
}
tbl++;
}/* END FOR1 */
return;
}
/* function : run commands authcd inputs
* date : 1993.11.9
*/
void process_authcd_data(UC mode)
{
UI input;
UC *title = "注意:";
UC *warn = "最多只能有這么多授權(quán)用戶!";
UC result;
UNIT_STRUCT cur_unit;
while(1)
{
input=get_key1();
get_current(&cur_unit);
switch(input)
{
case ESC: /* QUIT */
if(mode==SET_AUTH)
{
result=select_1in3();
switch(result)
{
case 1: /* DON'T QUIT */
break;
case 2: /* SAVE AND QUIT */
message_disp(8,"正在存盤，請(qǐng)稍候..."); /* saving, please wait... */
save_authcd_tbl(NOFRESH, 1);
message_end();
return;
case 3: /* QUIT AND DON'T SAVE */
return;
}
break;
}
else
{
return;
}
case UP: /* GO TO THE LAST ROW */
move_finger(0,1);
break;
case DOWN: /* GO TO THE NEXT ROW */
if(Count+cur_unit.unit_x == MAX_AUTHCD )
{
warn_mesg(title, warn);
break;
}
move_finger(1,1);
/* if((Count+cur_unit.unit_x) <= ANewlen)
{
move_finger(1,1);
if((Count+cur_unit.unit_x) == ANewlen)
move_finger(2,cur_unit.unit_y-1);
}
else
sound_bell();
*/ break;
case LEFT:
if(cur_unit.unit_y != 1)
move_finger(2,1);
else
sound_bell();
break;
case RIGHT:
// if(Auth_cd_top[Count+cur_unit.unit_x-1].auth_class != UNUSED_AUTH)
move_finger(3,1);
// else
// sound_bell();
break;
case PAGEUP:
pgup_authcd_tbl();
break;
case PAGEDOWN:
pgdn_authcd_tbl();
break;
case F2: /* SAVE THE RATE TABLE */
if(mode==SET_AUTH)
{
message_disp(8,"正在存盤，請(qǐng)稍候..."); /* saving, please wait... */
save_authcd_tbl(REFRESH, 1);
message_end();
}
break;
case F5: /* DELETE */
if(mode==SET_AUTH)
delet_authcd_item();
break;
case F6: /* AREA No. LOCATE */
message_disp(8," 輸入卡號(hào) Enter 確認(rèn)"); /*authcd no.*/
loc_authcd_tbl();
message_end();
break;
case F7: /* PAGE No. LOCATE */
message_disp(8," 輸入頁(yè)號(hào) Enter 確認(rèn)"); /*page no.*/
loc_authcd_page();
message_end();
break;
case ENTER:
if(mode==SET_AUTH)
modi_authcd_tbl(); /* MODIFY THE RATE TABLE */
break;
default:
sound_bell();
break;
}/* END OF SWITCH */
}/* END OF WHILE */
}
/* function : save the authority code setting table
* input : status=0 -- not refresh
* status=1 -- refresh
* send_flag=0 -- not send
* send_flag=1 -- send
* date : 1993.11.9
*/
void save_authcd_tbl(UC status, UC send_flag)
{
FILE *authcd_file;
ANewlen = authcd_tbl_len();
// if(ANewlen == 0)
// return;
if(send_flag)
send_auth_code();
authcd_file = fopen(ChargeDataFile[AUTH_CASH], "wb");
fwrite(Auth_cd_top, sizeof(AUTHCD_STRUCT), ANewlen, authcd_file);
fclose(authcd_file);
if(status == REFRESH)
{
hide_finger();
brush_tbl(ITEM_NUM, UNIT_NUM, 7);
disp_authcd_tbl(&Auth_cd_top[Count-1], Count); /* REDISPLAY */
echo_finger();
}
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -