开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 金融证券系统 > 查看源码
MAIN.C
资源名称：inet_stock.zip　[点击查看]
上传用户：bjghjy
上传日期：2007-01-07
资源大小：379k
文件大小：10k
源码类别：

金融证券系统

开发平台：

Visual C++

MAIN.C：源码内容
  1. /* sv_data:数据采集机。直接将变化数据发送到通讯机
  2. *  by lgd/Paladin.InetSoft guangzhou,1996.9
  3. *  modify by lym(修改后作者里却不愿写上原作者的一个人) guangzhou,1997.4-1998
  4. */
  5. #include <windows.h>
  6. #include <string.h>
  7. #include <time.h>
  8. #include <stdlib.h>
  9. //#include "ctl3d.h"
  10. #include "resource.h"
  11. #include "hq.h"
  12. #include "sv_hq.h"
  13. #include "data.h"
  14. #include "lzw.h"
  16. #define WND_CAPTION     (LPSTR)"数据采集处理机"
  17. LRESULT CALLBACK MainDlgProc(HWND, UINT, WPARAM, LPARAM);
  19. HWND ghWndMain =NULL;
  20. HINSTANCE ghInstance =NULL;
  21. int WinVer;
  22. extern int Idel;
  24. BOOL ErrMsg(HWND hWnd, LPSTR msg);
  25. BOOL AppInit(void);
  26. void AppExit(void);
  27. int CheckTime(BOOL fRead);
  28. extern BOOL JyOpen(int);
  29. void MsgRecv(char far *msg);
  30. void MsgLocal(LPSTR msg);
  31. HBRUSH DrawChild(HDC hDC, HWND hWnd);
  32. BOOL PASCAL DrawDlgFrame(HWND,int, int);
  33. BOOL run_cancelled =FALSE;
  34. BOOL IsWeekEnd(struct tm*);
  35. BOOL IsMonthEnd(struct tm*);
  37. int DoHq(void);
  39. extern int UDPBlockingHook(void);
  40. extern BOOL IsTodayHq(int);
  41. extern BOOL ReadHqDat(int);
  42. extern BOOL WriteDayData(int);
  43. extern BOOL RemoveGDataFile(int);
  44. extern BOOL ResetHqData(int);
  45. extern BOOL WriteWeekData(int);
  46. extern BOOL WriteMonthData(int);
  48. int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hInstPre,
  49. LPSTR lpszCmdLine, int nCmdShow)
  50. {
  51. HWND hwnd;
  52. FARPROC lpDlgProc;
  54. if(hInstPre)
  55. {
  56. hwnd =FindWindow(NULL, WND_CAPTION);
  57. if(hwnd)
  58. SetFocus(hwnd);
  59. return FALSE;
  60. }
  61.     
  62. ghInstance =hInstance;
  64. if(!AppInit())
  65. {
  66. ErrMsg(NULL, "AppInit failed!");
  67. goto appexit;
  68. }
  70. lpDlgProc =(FARPROC)MakeProcInstance((FARPROC)MainDlgProc, hInstance);
  71. if(lpDlgProc ==NULL)
  72. {
  73. ErrMsg(NULL, "MakeProcInstance failed!");
  74. goto appexit;
  75. }
  76. DialogBox(hInstance, MAKEINTRESOURCE(IDD_MAIN), NULL, lpDlgProc);
  77. FreeProcInstance(lpDlgProc);
  79. appexit:
  80. AppExit();
  82. return 0;
  83. }
  85. HANDLE hLibCtl3d =NULL;
  86. BOOL AppInit(void)
  87. {
  88. extern int PCTCPInit();
  89. // FARPROC fpTemp;
  91. WinVer =LOBYTE(LOWORD(GetVersion()));
  93. //if(WinVer <4)
  94. //{
  95. // hLibCtl3d =LoadLibrary("CTL3DV2.DLL");
  96. // if((UINT)hLibCtl3d <=32)
  97. // hLibCtl3d =LoadLibrary("CTL3D.DLL");
  98. // if((UINT)hLibCtl3d >32)
  99. // {
  100. // fpTemp =GetProcAddress(hLibCtl3d, "Ctl3dRegister");
  101. // if(fpTemp)
  102. // (*fpTemp)(ghInstance);
  103. // fpTemp =GetProcAddress(hLibCtl3d, "Ctl3dAutoSubclass");
  104. // if(fpTemp)
  105. // (*fpTemp)(ghInstance);
  106. // }
  107. //}
  109. SetHandleCount(100);
  111. if(PCTCPInit()<0)
  112. {
  113. ErrMsg(NULL, "PCTCPInit failed!");
  114. //return FALSE;
  115. }
  116. if(HqInit() <0)
  117. {
  118. ErrMsg(NULL, "HqInit() failed!");
  119. return FALSE;
  120. }
  121. return TRUE;
  122. }
  124. void AppExit(void)
  125. {
  126. extern void PCTCPExit();
  127. static BOOL fExit =FALSE;
  128. // FARPROC fpTemp;
  130. if(fExit) return;
  131. fExit =TRUE;
  133. HqExit();
  134. PCTCPExit();
  135. //if((UINT)hLibCtl3d >32)
  136. //{
  137. // fpTemp =GetProcAddress(hLibCtl3d, "Ctl3dUnregister");
  138. // if(fpTemp)
  139. // (*fpTemp)(ghInstance);
  140. // FreeLibrary(hLibCtl3d);
  141. //}
  142. }
  144. extern int Hq_Refresh_Time;
  146. BOOL fAuto =TRUE;
  147. extern BOOL fWrited[2];
  149. extern int SendJyStart(int);
  150. extern int ConnectHost(void);
  151. extern int WriteHqAll(int);
  154. LRESULT CALLBACK MainDlgProc(HWND hDlg, UINT message,
  155. WPARAM wParam, LPARAM lParam)
  156. {
  157. char dt[40];
  158. static BOOL fHq_Running =FALSE, fJy_Running =FALSE;
  159. HWND hctl;
  160. char temp[300];
  161. DWORD dw;
  163. switch(message)
  164. {
  165. case WM_INITDIALOG:
  166. fHq_Running =fJy_Running =FALSE;
  167. SetWindowText(hDlg, WND_CAPTION);
  168. ghWndMain =hDlg;
  169. _strdate(dt);
  170. strcat(dt, " ");
  171. _strtime(&dt[strlen(dt)]);
  172. SetDlgItemText(hDlg, IDC_STARTTIME, dt);
  173. CheckDlgButton(hDlg, IDC_AUTO, fAuto);
  174. if(ConnectHost() <0)
  175. ErrMsg(hDlg, "warning: Comm server not start");
  176. PostMessage(hDlg, WM_USER+1, 0, 0L);
  177. return TRUE;
  178. case WM_TIMER:
  179. if(wParam==1)
  180.             {
  181.              KillTimer(hDlg,1);
  182.              DoHq();
  183.              if(!run_cancelled)
  184.              SetTimer(hDlg,1,Idel,NULL);
  185. }
  186. break;
  187. case WM_USER+1:
  188. CheckTime(TRUE);
  189. SetTimer(hDlg,1,Idel,NULL);
  190. break;
  192. case WM_COMMAND:
  193. switch(wParam)
  194. {
  195. case IDC_AUTO:
  196. if(HIWORD(lParam) ==BN_CLICKED)
  197. {
  198. if(IsDlgButtonChecked(hDlg, IDC_AUTO))
  199. {
  200. hctl =GetDlgItem(hDlg, IDC_DAY);
  201. EnableWindow(hctl, FALSE);
  202. hctl =GetDlgItem(hDlg, IDC_WEEK);
  203. EnableWindow(hctl, FALSE);
  204. hctl =GetDlgItem(hDlg, IDC_MONTH);
  205. EnableWindow(hctl, FALSE);
  206. }
  207. }
  208. break;
  210. case IDC_MANU:
  211. if(HIWORD(lParam) ==BN_CLICKED)
  212. {
  213. if(IsDlgButtonChecked(hDlg, IDC_MANU))
  214. {
  215. hctl =GetDlgItem(hDlg, IDC_DAY);
  216. EnableWindow(hctl, TRUE);
  217. hctl =GetDlgItem(hDlg, IDC_WEEK);
  218. EnableWindow(hctl, TRUE);
  219. hctl =GetDlgItem(hDlg, IDC_MONTH);
  220. EnableWindow(hctl, TRUE);
  221. }
  222. }
  223. break;
  225. case IDC_DAY:
  226. if(HqTime[0].fRunning ==FALSE
  227. && HqTime[1].fRunning ==FALSE)
  228. {         
  229. WriteDayData(0);
  230. WriteDayData(1);
  231. }
  232. break;
  233. case IDC_WEEK:
  234. if(HqTime[0].fRunning ==FALSE
  235. && HqTime[1].fRunning ==FALSE)
  236. {         
  237. if(!fAuto && MessageBox(hDlg,"是本周最后交易日吗","请您注意",MB_YESNO|MB_DEFBUTTON2)==IDYES)
  238. {
  239. WriteWeekData(0);
  240. WriteWeekData(1);
  241. }
  242. }
  243. break;
  244. case IDC_MONTH:
  245. if(HqTime[0].fRunning ==FALSE
  246. && HqTime[1].fRunning ==FALSE)
  247. {         
  248. if(!fAuto && MessageBox(hDlg,"是本月最后交易日吗","请您注意",MB_YESNO|MB_DEFBUTTON2)==IDYES)
  249. {
  250. WriteMonthData(0);
  251. WriteMonthData(1);
  252. }
  254. }       
  255. break;
  256. case IDCANCEL:
  257. if(MessageBox(hDlg, "您要退出吗?", "请您注意",
  258. MB_YESNO|MB_ICONQUESTION|MB_DEFBUTTON2) ==IDNO)
  259. break;
  260. KillTimer(hDlg,1);
  261. EndDialog(hDlg, 0);
  262. ghWndMain =NULL;
  263. PostQuitMessage(0);
  264. break;
  265. case IDOK:
  266. dw =SendDlgItemMessage(hDlg, IDL_MSG, LB_GETCURSEL, 0, 0L);
  267. if(dw !=LB_ERR)
  268. {
  269. SendDlgItemMessage(hDlg, IDL_MSG, LB_GETTEXT, (int)dw, (LPARAM)(LPSTR)temp);
  270. MessageBox(hDlg, temp, "Message", MB_OK);
  271. }
  272. break;
  273. }
  274. break;
  275. }
  277. return FALSE;
  278. }
  280. BOOL ErrMsg(HWND hWnd, LPSTR msg)
  281. {
  282. //char tmp[256];
  283. DWORD dw;
  285. //if(ghWndMain)
  286. {
  287. if((dw =SendDlgItemMessage(ghWndMain, IDC_LISTERR,
  288. LB_ADDSTRING, 0, (LPARAM)(LPSTR)msg))==LB_ERR)
  289. SendDlgItemMessage(ghWndMain, IDC_LISTERR,
  290. LB_RESETCONTENT, 0, (LPARAM)(LPSTR)msg);
  291. else
  292. SendDlgItemMessage(ghWndMain, IDC_LISTERR,
  293. LB_SETCURSEL, (int)dw, 0L);
  294. }
  296. //msgbox_exist =TRUE;
  297. //if(strlen(msg)>=250) *(msg+250) =0;
  298. //wsprintf(tmp, "Error message:n %s", msg);
  299. //MessageBox(hWnd, tmp, WND_CAPTION, MB_OK|MB_ICONSTOP);
  301. return FALSE;
  302. }
  304. void DelSpaces(LPSTR lpstr)
  305. {
  306. return;
  307. }
  309. BOOL GetInitString(char *Entry, char *Item, char *buf)
  310. {
  311. GetPrivateProfileString(Entry, Item, "", buf, 256, "sv_data.ini");
  312. if(*buf ==0) return FALSE;
  313. return TRUE;
  314. }
  316. void PutInitString(char *Entry, char *Item, char *buf)
  317. {
  318. WritePrivateProfileString(Entry, Item, buf, "sv_data.ini");
  319. }
  321. int GetInitInt(char *Entry, char *Item)
  322. {
  323. return GetPrivateProfileInt(Entry, Item, -1, "sv_data.ini");
  324. }
  326. void MsgSend(char far *msg)
  327. {
  328. SetDlgItemText(ghWndMain, IDC_STATUS_SEND, msg);
  329. }
  331. void MsgRecv(char far *msg)
  332. {
  333. SetDlgItemText(ghWndMain, IDC_STATUS_RECV, msg);
  334. }
  336. void MsgLocal(LPSTR msg)
  337. {
  338. SetDlgItemText(ghWndMain, IDC_STATE_LOCAL, msg);
  339. }
  341. int date_num =-1, tim =-1;
  342. long tim_seconds =0;
  343. int CheckTime(BOOL fRead)
  344. {
  345. char tmp[40], tmp1[41];
  346. LPSTR tok;
  347. int jys, ret;
  348. static long time_start =-1;
  349. //struct tm *ptm;
  351. //HFILE hFile;
  352. //OFSTRUCT os;
  354. _strdate(tmp);
  355. date_num =100*atoi(strtok(tmp, "/"));
  356. tok =strtok(NULL, "/");
  357. date_num +=atoi(tok);
  359. _strtime(tmp); //hh:mm:ss
  360. strcpy(tmp1, tmp);
  361. tok =strtok(tmp, ":");
  362. tim =atoi(tok)*60;
  363. tim +=atoi(strtok(NULL, ":"));
  364. tim_seconds =(long)tim*60+atoi(strtok(NULL, ":"));
  366. if(time_start ==-1) time_start =tim_seconds;
  367. else if(tim_seconds >time_start)
  368. MsgLocal(tmp1);
  370. for(jys =0; jys <2; jys++)
  371. {    
  372. //此处收市放量五分钟