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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 嵌入式/单片机编程 > Windows CE > 查看源码
wasap.c
资源名称：tcpmp.rar　[点击查看]
上传用户：wstnjxml
上传日期：2014-04-03
资源大小：7248k
文件大小：12k
源码类别：

Windows CE

开发平台：

C/C++

wasap.c：源码内容
  1. /*
  2.  * wasap.c - Another Slight Atari Player for Win32 systems
  3.  *
  4.  * Copyright (C) 2005-2006  Piotr Fusik
  5.  *
  6.  * This file is part of ASAP (Another Slight Atari Player),
  7.  * see http://asap.sourceforge.net
  8.  *
  9.  * ASAP is free software; you can redistribute it and/or modify it
  10.  * under the terms of the GNU General Public License as published
  11.  * by the Free Software Foundation; either version 2 of the License,
  12.  * or (at your option) any later version.
  13.  *
  14.  * ASAP is distributed in the hope that it will be useful,
  15.  * but WITHOUT ANY WARRANTY; without even the implied warranty
  16.  * of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  17.  * See the GNU General Public License for more details.
  18.  *
  19.  * You should have received a copy of the GNU General Public License
  20.  * along with ASAP; if not, write to the Free Software Foundation, Inc.,
  21.  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  22.  */
  24. #include "config.h"
  25. #include <windows.h>
  26. #include <shellapi.h>
  28. #include "asap.h"
  29. #include "resource.h"
  31. #define APP_TITLE        "WASAP"
  32. #define WND_CLASS_NAME   "WASAP"
  33. #define FREQUENCY        44100
  34. #define BUFFERED_BLOCKS  4096
  36. static unsigned int use_16bit = 1;
  37. static unsigned int quality = 1;
  40. static char *Util_stpcpy(char *dest, const char *src)
  41. {
  42. size_t len = strlen(src);
  43. memcpy(dest, src, len + 1);
  44. return dest + len;
  45. }
  47. static char *Util_utoa(char *dest, unsigned int x)
  48. {
  49. char tmpbuf[16];
  50. char *p = tmpbuf + 15;
  51. *p = '';
  52. do {
  53. *--p = x % 10 + '0';
  54. x /= 10;
  55. } while (x > 0);
  56. return Util_stpcpy(dest, p);
  57. }
  60. /* WaveOut ---------------------------------------------------------------- */
  62. /* double-buffering, *2 for 16-bit, *2 for stereo */
  63. static unsigned char buffer[2][BUFFERED_BLOCKS * 2 * 2];
  64. static HWAVEOUT hwo = INVALID_HANDLE_VALUE;
  65. static WAVEHDR wh[2] = {
  66. { buffer[0], 0, 0, 0, 0, 0, NULL, 0 },
  67. { buffer[1], 0, 0, 0, 0, 0, NULL, 0 },
  68. };
  69. static int playing = FALSE;
  71. static void WaveOut_Stop(void)
  72. {
  73. if (playing) {
  74. playing = FALSE;
  75. waveOutReset(hwo);
  76. }
  77. }
  79. static void WaveOut_Write(LPWAVEHDR pwh)
  80. {
  81. if (playing) {
  82. ASAP_Generate(pwh->lpData, pwh->dwBufferLength);
  83. if (waveOutWrite(hwo, pwh, sizeof(WAVEHDR)) != MMSYSERR_NOERROR)
  84. WaveOut_Stop();
  85. }
  86. }
  88. static void CALLBACK WaveOut_Proc(HWAVEOUT hwo2, UINT uMsg, DWORD dwInstance,
  89.                                   DWORD dwParam1, DWORD dwParam2)
  90. {
  91. if (uMsg == WOM_DONE)
  92. WaveOut_Write((LPWAVEHDR) dwParam1);
  93. }
  95. static int WaveOut_Open(unsigned int frequency, unsigned int use_16bit,
  96.                         unsigned int channels)
  97. {
  98. WAVEFORMATEX wfx;
  99. wfx.wFormatTag = WAVE_FORMAT_PCM;
  100. wfx.nChannels = channels;
  101. wfx.nSamplesPerSec = frequency;
  102. wfx.nBlockAlign = channels << use_16bit;
  103. wfx.nAvgBytesPerSec = frequency * wfx.nBlockAlign;
  104. wfx.wBitsPerSample = 8 << use_16bit;
  105. wfx.cbSize = 0;
  106. if (waveOutOpen(&hwo, WAVE_MAPPER, &wfx, (DWORD) WaveOut_Proc, 0,
  107.                 CALLBACK_FUNCTION) != MMSYSERR_NOERROR)
  108. return FALSE;
  109. wh[1].dwBufferLength = wh[0].dwBufferLength = BUFFERED_BLOCKS * wfx.nBlockAlign;
  110. if (waveOutPrepareHeader(hwo, &wh[0], sizeof(wh[0])) != MMSYSERR_NOERROR
  111.  || waveOutPrepareHeader(hwo, &wh[1], sizeof(wh[1])) != MMSYSERR_NOERROR)
  112. return FALSE;
  113. return TRUE;
  114. }
  116. static void WaveOut_Start(void)
  117. {
  118. playing = TRUE;
  119. WaveOut_Write(&wh[0]);
  120. WaveOut_Write(&wh[1]);
  121. }
  123. static void WaveOut_Close(void)
  124. {
  125. if (hwo == INVALID_HANDLE_VALUE)
  126. return;
  127. WaveOut_Stop();
  128. if (wh[0].dwFlags & WHDR_PREPARED)
  129. waveOutUnprepareHeader(hwo, &wh[0], sizeof(wh[0]));
  130. if (wh[1].dwFlags & WHDR_PREPARED)
  131. waveOutUnprepareHeader(hwo, &wh[1], sizeof(wh[1]));
  132. waveOutClose(hwo);
  133. hwo = INVALID_HANDLE_VALUE;
  134. }
  137. /* Tray ------------------------------------------------------------------- */
  139. static unsigned int songs = 0;
  140. static unsigned int cursong = 0;
  141. static char strFile[MAX_PATH] = "";
  143. #define MYWM_NOTIFYICON  (WM_APP + 1)
  145. static void Tray_Add(HWND hWnd, HICON hIcon)
  146. {
  147. NOTIFYICONDATA nid;
  148. nid.cbSize = sizeof(NOTIFYICONDATA);
  149. nid.hWnd = hWnd;
  150. nid.uID = 0;
  151. nid.uFlags = NIF_ICON | NIF_MESSAGE | NIF_TIP;
  152. nid.uCallbackMessage = MYWM_NOTIFYICON;
  153. nid.hIcon = hIcon;
  154. strcpy(nid.szTip, APP_TITLE);
  155. Shell_NotifyIcon(NIM_ADD, &nid);
  156. }
  158. static void Tray_Modify(HWND hWnd, HICON hIcon)
  159. {
  160. NOTIFYICONDATA nid;
  161. char *p;
  162. nid.cbSize = sizeof(NOTIFYICONDATA);
  163. nid.hWnd = hWnd;
  164. nid.uID = 0;
  165. nid.uFlags = NIF_ICON | NIF_TIP;
  166. nid.hIcon = hIcon;
  167. /* we need to be careful because szTip is only 64 characters */
  168. /* 8 */
  169. p = Util_stpcpy(nid.szTip, APP_TITLE);
  170. if (songs > 0) {
  171. const char *pb;
  172. const char *pe;
  173. for (pe = strFile; *pe != ''; pe++);
  174. for (pb = pe; pb > strFile && pb[-1] != '\' && pb[-1] != '/'; pb--);
  175. /* 2 */
  176. *p++ = ':';
  177. *p++ = ' ';
  178. /* max 33 */
  179. if (pe - pb <= 33)
  180. p = Util_stpcpy(p, pb);
  181. else {
  182. memcpy(p, pb, 30);
  183. p = Util_stpcpy(p + 30, "...");
  184. }
  185. if (songs > 1) {
  186. /* 7 */
  187. p = Util_stpcpy(p, " (song ");
  188. /* max 3 */
  189. p = Util_utoa(p, cursong + 1);
  190. /* 4 */
  191. p = Util_stpcpy(p, " of ");
  192. /* max 3 */
  193. p = Util_utoa(p, songs);
  194. /* 2 */
  195. p[0] = ')';
  196. p[1] = '';
  197. }
  198. }
  199. Shell_NotifyIcon(NIM_MODIFY, &nid);
  200. }
  202. static void Tray_Delete(HWND hWnd)
  203. {
  204. NOTIFYICONDATA nid;
  205. nid.cbSize = sizeof(NOTIFYICONDATA);
  206. nid.hWnd = hWnd;
  207. nid.uID = 0;
  208. Shell_NotifyIcon(NIM_DELETE, &nid);
  209. }
  212. /* GUI -------------------------------------------------------------------- */
  214. static HICON hStopIcon;
  215. static HICON hPlayIcon;
  216. static HMENU hTrayMenu;
  217. static HMENU hSongMenu;
  218. static HMENU hQualityMenu;
  220. static void SetSongs(unsigned int new_songs)
  221. {
  222. if (songs < new_songs) {
  223. do {
  224. char tmp_buf[16];
  225. Util_utoa(tmp_buf, songs + 1);
  226. AppendMenu(hSongMenu, MF_ENABLED | MF_STRING,
  227.            IDM_SONG1 + songs, tmp_buf);
  228. } while (++songs < new_songs);
  229. }
  230. else if (songs > new_songs) {
  231. do
  232. DeleteMenu(hSongMenu, --songs, MF_BYPOSITION);
  233. while (songs > new_songs);
  234. }
  235. }
  237. static void PlaySong(HWND hWnd, unsigned int n)
  238. {
  239. CheckMenuRadioItem(hSongMenu, 0, songs - 1, n, MF_BYPOSITION);
  240. cursong = n;
  241. ASAP_PlaySong(n);
  242. Tray_Modify(hWnd, hPlayIcon);
  243. WaveOut_Start();
  244. }
  246. static void LoadFile(HWND hWnd)
  247. {
  248. HANDLE fh;
  249. static unsigned char module[65000];
  250. DWORD module_len;
  251. fh = CreateFile(strFile, GENERIC_READ, 0, NULL, OPEN_EXISTING,
  252.                 FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN, NULL);
  253. if (fh == INVALID_HANDLE_VALUE)
  254. return;
  255. if (!ReadFile(fh, module, sizeof(module), &module_len, NULL)) {
  256. CloseHandle(fh);
  257. return;
  258. }
  259. CloseHandle(fh);
  260. WaveOut_Close();
  261. if (ASAP_Load(strFile, module, (unsigned int) module_len)) {
  262. if (!WaveOut_Open(FREQUENCY, use_16bit, ASAP_GetChannels())) {
  263. SetSongs(0);
  264. Tray_Modify(hWnd, hStopIcon);
  265. MessageBox(hWnd, "Error initalizing WaveOut", APP_TITLE,
  266.    MB_OK | MB_ICONERROR);
  267. return;
  268. }
  269. SetSongs(ASAP_GetSongs());
  270. PlaySong(hWnd, ASAP_GetDefSong());
  271. }
  272. else {
  273. SetSongs(0);
  274. Tray_Modify(hWnd, hStopIcon);
  275. MessageBox(hWnd, "Unsupported file format", APP_TITLE,
  276.            MB_OK | MB_ICONERROR);
  277. }
  278. }
  280. static int opening = FALSE;
  282. static void SelectAndLoadFile(HWND hWnd)
  283. {
  284. static OPENFILENAME ofn = {
  285. sizeof(OPENFILENAME),
  286. NULL,
  287. 0,
  288. "All supported"
  289. "*.sap;*.cmc;*.cmr;*.dmc;*.mpt;*.mpd;*.rmt;*.tmc;*.tm8;*.tm2"
  290. "Slight Atari Player (*.sap)"
  291. "*.sap"
  292. "Chaos Music Composer (*.cmc;*.cmr;*.dmc)"
  293. "*.cmc;*.cmr;*.dmc"
  294. "Music ProTracker (*.mpt;*.mpd)"
  295. "*.mpt;*.mpd"
  296. "Raster Music Tracker (*.rmt)"
  297. "*.rmt"
  298. "Theta Music Composer 1.x (*.tmc;*.tm8)"
  299. "*.tmc;*.tm8"
  300. "Theta Music Composer 2.x (*.tm2)"
  301. "*.tm2"
  302. "",
  303. NULL,
  304. 0,
  305. 1,
  306. strFile,
  307. MAX_PATH,
  308. NULL,
  309. 0,
  310. NULL,
  311. "Select Atari 8-bit music",
  312. OFN_ENABLESIZING | OFN_EXPLORER | OFN_HIDEREADONLY
  313. | OFN_FILEMUSTEXIST | OFN_PATHMUSTEXIST,
  314. 0,
  315. 0,
  316. NULL,
  317. 0,
  318. NULL,
  319. NULL
  320. };
  321. opening = TRUE;
  322. ofn.hwndOwner = hWnd;
  323. if (GetOpenFileName(&ofn))
  324. LoadFile(hWnd);
  325. opening = FALSE;
  326. }
  328. static void SetQuality(HWND hWnd, unsigned int new_16bit, unsigned int new_quality)
  329. {
  330. int reopen = FALSE;
  331. if (songs > 0) {
  332. WaveOut_Stop();
  333. SetSongs(0);
  334. Tray_Modify(hWnd, hStopIcon);
  335. reopen = TRUE;
  336. }
  337. CheckMenuRadioItem(hQualityMenu, IDM_8BIT, IDM_16BIT,
  338. IDM_8BIT + new_16bit, MF_BYCOMMAND);
  339. CheckMenuRadioItem(hQualityMenu, IDM_QUALITY_RF, IDM_QUALITY_MB3,
  340. IDM_QUALITY_RF + new_quality, MF_BYCOMMAND);
  341. ASAP_Initialize(FREQUENCY, new_16bit, new_quality);
  342. use_16bit = new_16bit;
  343. quality = new_quality;
  344. if (reopen)
  345. LoadFile(hWnd);
  346. }
  348. static LRESULT CALLBACK MainWndProc(HWND hWnd, UINT msg, WPARAM wParam,
  349.                                     LPARAM lParam)
  350. {
  351. UINT idc;
  352. POINT pt;
  353. PCOPYDATASTRUCT pcds;
  354. switch (msg) {
  355. case WM_COMMAND:
  356. if (opening)
  357. break;
  358. idc = LOWORD(wParam);
  359. switch (idc) {
  360. case IDM_OPEN:
  361. SelectAndLoadFile(hWnd);
  362. break;
  363. case IDM_STOP:
  364. WaveOut_Stop();
  365. Tray_Modify(hWnd, hStopIcon);
  366. break;
  367. case IDM_ABOUT:
  368. MessageBox(hWnd,
  369. ASAP_CREDITS
  370. "WASAP icons (C) 2005 Lukasz Sychowicznn"
  371. ASAP_COPYRIGHT,
  372. APP_TITLE " " ASAP_VERSION,
  373. MB_OK | MB_ICONINFORMATION);
  374. break;
  375. case IDM_EXIT:
  376. PostQuitMessage(0);
  377. break;
  378. default:
  379. if (idc >= IDM_SONG1 && idc < IDM_SONG1 + songs) {
  380. WaveOut_Stop();
  381. PlaySong(hWnd, idc - IDM_SONG1);
  382. }
  383. else if (idc >= IDM_QUALITY_RF && idc <= IDM_QUALITY_MB3)
  384. SetQuality(hWnd, use_16bit, idc - IDM_QUALITY_RF);
  385. else if (idc >= IDM_8BIT && idc <= IDM_16BIT)
  386. SetQuality(hWnd, idc - IDM_8BIT, quality);
  387. break;
  388. }
  389. break;
  390. case WM_DESTROY:
  391. PostQuitMessage(0);
  392. break;
  393. case MYWM_NOTIFYICON:
  394. if (opening) {
  395. SetForegroundWindow(GetLastActivePopup(hWnd));
  396. break;
  397. }
  398. switch (lParam) {
  399. case WM_LBUTTONDOWN:
  400. SelectAndLoadFile(hWnd);
  401. break;
  402. case WM_RBUTTONDOWN:
  403. GetCursorPos(&pt);
  404. SetForegroundWindow(hWnd);
  405. TrackPopupMenu(hTrayMenu,
  406. TPM_RIGHTALIGN | TPM_BOTTOMALIGN | TPM_RIGHTBUTTON,
  407. pt.x, pt.y, 0, hWnd, NULL);
  408. PostMessage(hWnd, WM_NULL, 0, 0);
  409. break;
  410. default:
  411. break;
  412. }
  413. break;
  414. case WM_COPYDATA:
  415. pcds = (PCOPYDATASTRUCT) lParam;
  416. if (pcds->dwData == 'O' && pcds->cbData <= sizeof(strFile)) {
  417. memcpy(strFile, pcds->lpData, pcds->cbData);
  418. LoadFile(hWnd);
  419. }
  420. break;
  421. default:
  422. return DefWindowProc(hWnd, msg, wParam, lParam);
  423. }
  424. return 0;
  425. }
  427. int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,
  428.                    LPSTR lpCmdLine, int nCmdShow)
  429. {
  430. char *pb;
  431. char *pe;
  432. WNDCLASS wc;
  433. HWND hWnd;
  434. HMENU hMainMenu;
  435. MSG msg;
  437. for (pb = lpCmdLine; *pb == ' ' || *pb == 't'; pb++);
  438. for (pe = pb; *pe != ''; pe++);
  439. while (--pe > pb && (*pe == ' ' || *pe == 't'));
  440. /* Now pb and pe point at respectively the first and last
  441.    non-blank character in lpCmdLine. If pb > pe then the command line
  442.    is blank. */
  443. if (*pb == '"' && *pe == '"')
  444. pb++;
  445. else
  446. pe++;
  447. *pe = '';
  448. /* Now pb contains the filename, if any, specified on the command line. */
  450. hWnd = FindWindow(WND_CLASS_NAME, NULL);
  451. if (hWnd != NULL) {
  452. /* as instance of WASAP is already running */
  453. if (*pb != '') {
  454. /* pass the filename */
  455. COPYDATASTRUCT cds = { 'O', (DWORD) (pe + 1 - pb), pb };
  456. SendMessage(hWnd, WM_COPYDATA, (WPARAM) NULL, (LPARAM) &cds);
  457. }
  458. else {
  459. /* bring the open dialog to top */
  460. HWND hChild = GetLastActivePopup(hWnd);
  461. if (hChild != hWnd)
  462. SetForegroundWindow(hChild);
  463. }
  464. return 0;
  465. }
  467. wc.style = CS_OWNDC | CS_VREDRAW | CS_HREDRAW;
  468. wc.lpfnWndProc = MainWndProc;
  469. wc.cbClsExtra = 0;
  470. wc.cbWndExtra = 0;
  471. wc.hInstance = hInstance;
  472. wc.hIcon = LoadIcon(hInstance, MAKEINTRESOURCE(IDI_APP));
  473. wc.hCursor = LoadCursor(NULL, IDC_ARROW);
  474. wc.hbrBackground = (HBRUSH) (COLOR_WINDOW + 1);
  475. wc.lpszMenuName = NULL;
  476. wc.lpszClassName = WND_CLASS_NAME;
  477. RegisterClass(&wc);
  479. hWnd = CreateWindow(WND_CLASS_NAME,
  480. APP_TITLE,
  481. WS_OVERLAPPEDWINDOW,
  482. CW_USEDEFAULT,
  483. CW_USEDEFAULT,
  484. CW_USEDEFAULT,
  485. CW_USEDEFAULT,
  486. NULL,
  487. NULL,
  488. hInstance,
  489. NULL
  490. );
  492. hStopIcon = LoadIcon(hInstance, MAKEINTRESOURCE(IDI_STOP));
  493. hPlayIcon = LoadIcon(hInstance, MAKEINTRESOURCE(IDI_PLAY));
  494. hMainMenu = LoadMenu(hInstance, MAKEINTRESOURCE(IDR_TRAYMENU));
  495. hTrayMenu = GetSubMenu(hMainMenu, 0);
  496. hSongMenu = CreatePopupMenu();
  497. InsertMenu(hTrayMenu, 1, MF_BYPOSITION | MF_ENABLED | MF_STRING | MF_POPUP,
  498.            (UINT_PTR) hSongMenu, "So&ng");
  499. hQualityMenu = GetSubMenu(hTrayMenu, 3);
  500. SetMenuDefaultItem(hTrayMenu, 0, TRUE);
  501. Tray_Add(hWnd, hStopIcon);
  502. SetQuality(hWnd, use_16bit, quality);
  503. if (*pb != '') {
  504. memcpy(strFile, pb, pe + 1 - pb);
  505. LoadFile(hWnd);
  506. }
  507. else
  508. SelectAndLoadFile(hWnd);
  509. while (GetMessage(&msg, NULL, 0, 0)) {
  510. TranslateMessage(&msg);
  511. DispatchMessage(&msg);
  512. }
  513. WaveOut_Close();
  514. Tray_Delete(hWnd);
  515. DestroyMenu(hMainMenu);
  516. return 0;
  517. }