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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 图形图像 > OpenGL > 查看源码
wineclipses.cpp
资源名称：celestia-1.6.0.tar.gz　[点击查看]
上传用户：center1979
上传日期：2022-07-26
资源大小：50633k
文件大小：17k
源码类别：

OpenGL

开发平台：

Visual C++

wineclipses.cpp：源码内容
  1. // wineclipses.cpp by Kendrix <kendrix@wanadoo.fr>
  2. // modified by Chris Laurel
  3. // 
  4. // Compute Solar Eclipses for our Solar System planets
  5. //
  6. // This program is free software; you can redistribute it and/or
  7. // modify it under the terms of the GNU General Public License
  8. // as published by the Free Software Foundation; either version 2
  9. // of the License, or (at your option) any later version.
  11. #include <string>
  12. #include <sstream>
  13. #include <algorithm>
  14. #include <set>
  15. #include <cassert>
  16. #include <windows.h>
  17. #include <commctrl.h>
  18. #include "eclipsefinder.h"
  19. #include "wineclipses.h"
  20. #include "res/resource.h"
  21. #include "celmath/mathlib.h"
  22. #include "celmath/ray.h"
  23. #include "celmath/distance.h"
  24. #include "celutil/util.h"
  25. #include "celutil/winutil.h"
  27. using namespace std;
  29. WNDPROC oldListViewProc;
  31. static vector<Eclipse> eclipseList;
  33. extern void SetMouseCursor(LPCTSTR lpCursor);
  35. char* MonthNames[12] =
  36. {
  37.     "Jan", "Feb", "Mar", "Apr",
  38.     "May", "Jun", "Jul", "Aug",
  39.     "Sep", "Oct", "Nov", "Dec"
  40. };
  42. bool InitEclipseFinderColumns(HWND listView)
  43. {
  44.     LVCOLUMN lvc;
  45.     LVCOLUMN columns[5];
  47.     lvc.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT | LVCF_SUBITEM;
  48.     lvc.fmt = LVCFMT_CENTER;
  49.     lvc.pszText = "";
  51.     int nColumns = sizeof(columns) / sizeof(columns[0]);
  52.     int i;
  54.     for (i = 0; i < nColumns; i++)
  55.         columns[i] = lvc;
  57.     bind_textdomain_codeset("celestia", CurrentCP());
  58.     columns[0].pszText = _("Planet");
  59.     columns[0].cx = 50;
  60.     columns[1].pszText = _("Satellite");
  61.     columns[1].cx = 65;
  62.     columns[2].pszText = _("Date");
  63.     columns[2].cx = 80;
  64.     columns[3].pszText = _("Start");
  65.     columns[3].cx = 55;
  66.     columns[4].pszText = _("Duration");
  67.     columns[4].cx = 55;
  68.     bind_textdomain_codeset("celestia", "UTF8");
  70.     for (i = 0; i < nColumns; i++)
  71.     {
  72.         columns[i].iSubItem = i;
  73.         if (ListView_InsertColumn(listView, i, &columns[i]) == -1)
  74.             return false;
  75.     }
  77.     return true;
  78. }
  81. bool InitEclipseFinderItems(HWND listView, const vector<Eclipse>& eclipses)
  82. {
  83.     LVITEM lvi;
  85.     lvi.mask = LVIF_TEXT | LVIF_PARAM | LVIF_STATE;
  86.     lvi.state = 0;
  87.     lvi.stateMask = 0;
  88.     lvi.pszText = LPSTR_TEXTCALLBACK;
  90.     for (unsigned int i = 0; i < eclipses.size(); i++)
  91.     {
  92.         lvi.iItem = i;
  93.         lvi.iSubItem = 0;
  94.         lvi.lParam = (LPARAM) &(eclipses[i]);
  95.         ListView_InsertItem(listView, &lvi);
  96.     }
  98.     return true;
  99. }
  102. static char callbackScratch[256];
  103. void EclipseFinderDisplayItem(LPNMLVDISPINFOA nm)
  104. {
  106.     Eclipse* eclipse = reinterpret_cast<Eclipse*>(nm->item.lParam);
  107.     if (eclipse == NULL)
  108.     {
  109.         nm->item.pszText = "";
  110.         return;
  111.     }
  113.     switch (nm->item.iSubItem)
  114.     {
  115.     case 0:
  116.         {
  117.             strncpy(callbackScratch, UTF8ToCurrentCP(_(eclipse->planete.c_str())).c_str(), sizeof(callbackScratch) - 1);
  118.             nm->item.pszText = callbackScratch;
  119.         }
  120.         break;
  121.             
  122.     case 1:
  123.         {
  124.             if (!strcmp(eclipse->planete.c_str(),"None")) 
  125.             {
  126.                 sprintf(callbackScratch,"");
  127.                 nm->item.pszText = callbackScratch;
  128.             }
  129.             else
  130.             {
  131.                 strncpy(callbackScratch, UTF8ToCurrentCP(_(eclipse->sattelite.c_str())).c_str(), sizeof(callbackScratch) - 1);
  132.                 nm->item.pszText = callbackScratch;
  133.             }
  134.         }
  135.         break;
  137.     case 2:
  138.         {
  139.             bind_textdomain_codeset("celestia", CurrentCP());
  140.             astro::Date startDate(eclipse->startTime);
  141.             if (!strcmp(eclipse->planete.c_str(),"None"))
  142.                 sprintf(callbackScratch,"");
  143.             else
  144.                 sprintf(callbackScratch, "%2d %s %4d",
  145.                         startDate.day,
  146.                         _(MonthNames[startDate.month - 1]),
  147.                         startDate.year);
  148.             nm->item.pszText = callbackScratch;
  149.             bind_textdomain_codeset("celestia", "UTF8");
  150.         }
  151.         break;
  152.             
  153.     case 3:
  154.         {
  155.             astro::Date startDate(eclipse->startTime);
  156.             if (!strcmp(eclipse->planete.c_str(),"None"))
  157.                 sprintf(callbackScratch,"");
  158.             else
  159.             {
  160.                 sprintf(callbackScratch, "%02d:%02d",
  161.                         startDate.hour, startDate.minute);
  162.             }
  163.             nm->item.pszText = callbackScratch;
  164.         }
  165.         break;
  167.     case 4:
  168.         {
  169.             if (!strcmp(eclipse->planete.c_str(),"None")) 
  170.             {
  171.                 sprintf(callbackScratch,"");
  172.                 nm->item.pszText = callbackScratch;
  173.             }
  174.             else
  175.             {
  176.                 int minutes = (int) ((eclipse->endTime - eclipse->startTime) *
  177.                                     24 * 60);
  178.                 sprintf(callbackScratch, "%02d:%02d", minutes / 60, minutes % 60);
  179.                 nm->item.pszText = callbackScratch;
  180.             }
  181.         }
  182.         break;
  183.     }
  184. }
  187. void InitDateControls(HWND hDlg, astro::Date& newTime, SYSTEMTIME& fromTime, SYSTEMTIME& toTime)
  188. {
  189.     HWND dateItem = NULL;
  191.     fromTime.wYear = newTime.year - 1;
  192.     fromTime.wMonth = newTime.month;
  193.     fromTime.wDay = newTime.day;
  194.     fromTime.wDayOfWeek = ((int) ((double) newTime + 0.5) + 1) % 7;
  195.     fromTime.wHour = 0;
  196.     fromTime.wMinute = 0;
  197.     fromTime.wSecond = (int) 0;
  198.     fromTime.wMilliseconds = 0;
  200.     toTime = fromTime;
  201.     toTime.wYear += 2;
  203.     dateItem = GetDlgItem(hDlg, IDC_DATEFROM);
  204.     if (dateItem != NULL)
  205.     {
  206.         DateTime_SetFormat(dateItem, "dd' 'MMM' 'yyy");
  207.         DateTime_SetSystemtime(dateItem, GDT_VALID, &fromTime);
  208.     }
  209.     dateItem = GetDlgItem(hDlg, IDC_DATETO);
  210.     if (dateItem != NULL)
  211.     {
  212.         DateTime_SetFormat(dateItem, "dd' 'MMM' 'yyy");
  213.         DateTime_SetSystemtime(dateItem, GDT_VALID, &toTime);
  214.     }
  215. }
  218. struct EclipseFinderSortInfo
  219. {
  220.     int         subItem;
  221.     string      planete;
  222.     string      sattelite;
  223.     int32       Year;
  224.     int8        Month;
  225.     int8        Day;
  226.     int8        Hour;
  227. };
  230. int CALLBACK EclipseFinderCompareFunc(LPARAM lParam0, LPARAM lParam1,
  231.                                     LPARAM lParamSort)
  232. {
  233.     EclipseFinderSortInfo* sortInfo = reinterpret_cast<EclipseFinderSortInfo*>(lParamSort);
  234.     Eclipse* eclipse0 = reinterpret_cast<Eclipse*>(lParam0);
  235.     Eclipse* eclipse1 = reinterpret_cast<Eclipse*>(lParam1);
  237.     switch (sortInfo->subItem)
  238.     {
  239.     case 1:
  240.         if (eclipse0->sattelite < eclipse1->sattelite)
  241.             return -1;
  242.         else if (eclipse1->sattelite < eclipse0->sattelite)
  243.             return 1;
  244.         else
  245.             return 0;
  247.     case 4:
  248.         {
  249.             double duration0 = eclipse0->endTime - eclipse0->startTime;
  250.             double duration1 = eclipse1->endTime - eclipse1->startTime;
  251.             if (duration0 < duration1)
  252.                 return -1;
  253.             else if (duration1 < duration0)
  254.                 return 1;
  255.             else
  256.                 return 0;
  257.         }
  259.     default:
  260.         if (eclipse0->startTime < eclipse1->startTime)
  261.             return -1;
  262.         else if (eclipse1->startTime < eclipse0->startTime)
  263.             return 1;
  264.         else
  265.             return 0;
  266.     }
  267. }
  269. BOOL APIENTRY EclipseListViewProc(HWND hWnd,
  270.                                   UINT message,
  271.                                   UINT wParam,
  272.                                   LONG lParam)
  273. {
  274.     switch(message)
  275.     {
  276.     case WM_LBUTTONDBLCLK:
  277.         {
  278.             LVHITTESTINFO lvHit;
  279.             lvHit.pt.x = LOWORD(lParam);
  280.             lvHit.pt.y = HIWORD(lParam);
  281.             int listIndex = ListView_HitTest(hWnd, &lvHit);
  282.             if (listIndex >= 0)
  283.             {
  284.                 SendMessage(GetParent(hWnd), WM_COMMAND, MAKEWPARAM(IDSETDATEANDGO, 0), NULL);
  285.             }
  286.         }
  287.         break;
  288.     }
  290.     return CallWindowProc(oldListViewProc, hWnd, message, wParam, lParam);
  291. }
  293. BOOL APIENTRY EclipseFinderProc(HWND hDlg,
  294.                                 UINT message,
  295.                                 UINT wParam,
  296.                                 LONG lParam)
  297. {
  298.     EclipseFinderDialog* eclipseFinderDlg = reinterpret_cast<EclipseFinderDialog*>(GetWindowLong(hDlg, DWL_USER));
  300.     switch (message)
  301.     {
  302.     case WM_INITDIALOG:
  303.         {
  304.             EclipseFinderDialog* efd = reinterpret_cast<EclipseFinderDialog*>(lParam);
  305.             if (efd == NULL)
  306.                 return EndDialog(hDlg, 0);
  307.             SetWindowLong(hDlg, DWL_USER, lParam);
  308.             HWND hwnd = GetDlgItem(hDlg, IDC_ECLIPSES_LIST);
  309.             InitEclipseFinderColumns(hwnd);
  310.             SendDlgItemMessage(hDlg, IDC_ECLIPSES_LIST, LVM_SETEXTENDEDLISTVIEWSTYLE, 0, LVS_EX_FULLROWSELECT);
  312.             bind_textdomain_codeset("celestia", CurrentCP());
  313.             CheckRadioButton(hDlg, IDC_SOLARECLIPSE, IDC_LUNARECLIPSE, IDC_SOLARECLIPSE);
  314.             efd->bSolar = true;
  316.             SendDlgItemMessage(hDlg, IDC_ECLIPSETARGET, CB_ADDSTRING, 0, (LPARAM)_("Earth"));
  317.             SendDlgItemMessage(hDlg, IDC_ECLIPSETARGET, CB_ADDSTRING, 0, (LPARAM)_("Jupiter"));
  318.             SendDlgItemMessage(hDlg, IDC_ECLIPSETARGET, CB_ADDSTRING, 0, (LPARAM)_("Saturn"));
  319.             SendDlgItemMessage(hDlg, IDC_ECLIPSETARGET, CB_ADDSTRING, 0, (LPARAM)_("Uranus"));
  320.             SendDlgItemMessage(hDlg, IDC_ECLIPSETARGET, CB_ADDSTRING, 0, (LPARAM)_("Neptune"));
  321.             SendDlgItemMessage(hDlg, IDC_ECLIPSETARGET, CB_ADDSTRING, 0, (LPARAM)_("Pluto"));
  322.             SendDlgItemMessage(hDlg, IDC_ECLIPSETARGET, CB_SETCURSEL, 0, 0);
  323.             efd->strPlaneteToFindOn = "Earth";
  324.             bind_textdomain_codeset("celestia", "UTF8");
  326.             InitDateControls(hDlg, astro::Date(efd->appCore->getSimulation()->getTime()), efd->fromTime, efd->toTime);
  328.             // Subclass the ListView to intercept WM_LBUTTONUP messages
  329.             HWND hCtrl;
  330.             if (hCtrl = GetDlgItem(hDlg, IDC_ECLIPSES_LIST))
  331.                 oldListViewProc = (WNDPROC) SetWindowLong(hCtrl, GWL_WNDPROC, (DWORD) EclipseListViewProc);
  332.         }
  333.         return(TRUE);
  335.     case WM_DESTROY:
  336.         if (eclipseFinderDlg != NULL && eclipseFinderDlg->parent != NULL)
  337.         {
  338.             SendMessage(eclipseFinderDlg->parent, WM_COMMAND, IDCLOSE,
  339.                         reinterpret_cast<LPARAM>(eclipseFinderDlg));
  340.         }
  341.         break;
  343.     case WM_CLOSE:
  344.         DestroyWindow(hDlg);
  345.         return TRUE;
  347.     case WM_COMMAND:
  348.         switch (LOWORD(wParam))
  349.         {
  350.         case IDCOMPUTE:
  351.             {
  352.                 HWND hwnd = GetDlgItem(hDlg, IDC_ECLIPSES_LIST);
  353.                 ListView_DeleteAllItems(hwnd);
  354.                 if (eclipseFinderDlg->strPlaneteToFindOn.empty())
  355.                     eclipseFinderDlg->strPlaneteToFindOn = "Earth";
  356.                 SetMouseCursor(IDC_WAIT);
  359.                 astro::Date from(eclipseFinderDlg->fromTime.wYear,
  360.                                  eclipseFinderDlg->fromTime.wMonth,
  361.                                  eclipseFinderDlg->fromTime.wDay);
  362.                 astro::Date to(eclipseFinderDlg->toTime.wYear,
  363.                                eclipseFinderDlg->toTime.wMonth,
  364.                                eclipseFinderDlg->toTime.wDay);
  365.                 EclipseFinder ef(eclipseFinderDlg->appCore,
  366.                                  eclipseFinderDlg->strPlaneteToFindOn,
  367.                                  eclipseFinderDlg->bSolar ? Eclipse::Solar : Eclipse::Moon,
  368.                                  (double) from,
  369.                                  (double) to);
  370.                 eclipseList = ef.getEclipses();
  371.                 InitEclipseFinderItems(hwnd, eclipseList);
  372.                 SetMouseCursor(IDC_ARROW);
  373.                 break;
  374.             }
  376.         case IDCLOSE:
  377.             {
  378.                 if (eclipseFinderDlg != NULL && eclipseFinderDlg->parent != NULL)
  379.                 {
  380.                     SendMessage(eclipseFinderDlg->parent, WM_COMMAND, IDCLOSE,
  381.                                 reinterpret_cast<LPARAM>(eclipseFinderDlg));
  382.                 }
  383.                 EndDialog(hDlg, 0);
  384.                 break;
  385.             }
  387.         case IDSETDATEANDGO:
  388.             if (eclipseFinderDlg->BodytoSet_)
  389.             {
  390.                 Simulation* sim = eclipseFinderDlg->appCore->getSimulation();
  391.                 sim->setTime(eclipseFinderDlg->TimetoSet_);
  392.                 Selection target(eclipseFinderDlg->BodytoSet_);
  393.                 Selection ref(eclipseFinderDlg->BodytoSet_->getSystem()->getStar());
  394.                 // Use the phase lock coordinate system to set a position
  395.                 // on the line between the sun and the body where the eclipse
  396.                 // is occurring.
  397.                 sim->setFrame(ObserverFrame::PhaseLock, target, ref);
  398.                 sim->update(0.0);
  400.                 double distance = astro::kilometersToMicroLightYears(target.radius() * 4.0);
  401.                 sim->gotoLocation(Point3d(distance, 0, 0), Quatd::yrotation(-PI / 2) * Quatd::xrotation(-PI / 2), 2.5);
  402.             }
  403.             break;
  404.         case IDC_SOLARECLIPSE:
  405.                 eclipseFinderDlg->bSolar = true;
  406.             break;
  407.         case IDC_LUNARECLIPSE:
  408.                 eclipseFinderDlg->bSolar = false;
  409.             break;
  410.         case IDC_ECLIPSETARGET:
  411.             if(HIWORD(wParam) == CBN_SELCHANGE)
  412.             {
  413.                 switch(SendMessage((HWND)lParam, CB_GETCURSEL, 0, 0))
  414.                 {
  415.                 case 0:
  416.                     eclipseFinderDlg->strPlaneteToFindOn = "Earth";
  417.                     break;
  418.                 case 1:
  419.                     eclipseFinderDlg->strPlaneteToFindOn = "Jupiter";
  420.                     break;
  421.                 case 2:
  422.                     eclipseFinderDlg->strPlaneteToFindOn = "Saturn";
  423.                     break;
  424.                 case 3:
  425.                     eclipseFinderDlg->strPlaneteToFindOn = "Uranus";
  426.                     break;
  427.                 case 4:
  428.                     eclipseFinderDlg->strPlaneteToFindOn = "Neptune";
  429.                     break;
  430.                 case 5:
  431.                     eclipseFinderDlg->strPlaneteToFindOn = "Pluto";
  432.                     break;
  433.                 }
  434.             }
  435.         }
  436.         return TRUE;
  438.     case WM_NOTIFY:
  439.         {
  440.             LPNMHDR hdr = (LPNMHDR) lParam;
  442.             if(hdr->idFrom == IDC_ECLIPSES_LIST)
  443.             {
  444.                 switch(hdr->code)
  445.                 {
  446.                 case LVN_GETDISPINFO:
  447.                     EclipseFinderDisplayItem((LPNMLVDISPINFOA) lParam);
  448.                     break;
  449.                 case LVN_ITEMCHANGED:
  450.                     {
  451.                         LPNMLISTVIEW nm = (LPNMLISTVIEW) lParam;
  452.                         if ((nm->uNewState & LVIS_SELECTED) != 0)
  453.                         {
  454.                             Eclipse* eclipse = reinterpret_cast<Eclipse*>(nm->lParam);
  455.                             if (eclipse != NULL)
  456.                             {
  457.                                 eclipseFinderDlg->TimetoSet_ = 
  458.                                     (eclipse->startTime + eclipse->endTime) / 2.0f;
  459.                                 eclipseFinderDlg->BodytoSet_ = eclipse->body;
  460.                             }
  461.                         }
  462.                         break;
  463.                     }
  464.                 case LVN_COLUMNCLICK:
  465.                     {
  466.                         HWND hwnd = GetDlgItem(hDlg, IDC_ECLIPSES_LIST);
  467.                         if (hwnd != 0)
  468.                         {
  469.                             LPNMLISTVIEW nm = (LPNMLISTVIEW) lParam;
  470.                             EclipseFinderSortInfo sortInfo;
  471.                             sortInfo.subItem = nm->iSubItem;
  472. //                            sortInfo.sattelite = ;
  473. //                            sortInfo.pos = eclipseFinderDlg->pos;
  474.                             ListView_SortItems(hwnd, EclipseFinderCompareFunc,
  475.                                                reinterpret_cast<LPARAM>(&sortInfo));
  476.                         }
  477.                     }
  479.                 }
  480.             }
  481.             if (hdr->code == DTN_DATETIMECHANGE)
  482.             {
  483.                 LPNMDATETIMECHANGE change = (LPNMDATETIMECHANGE) lParam;
  484.                 if (change->dwFlags == GDT_VALID)
  485.                 {
  486.                     if (wParam == IDC_DATEFROM)
  487.                     {
  488.                         eclipseFinderDlg->fromTime.wYear = change->st.wYear;
  489.                         eclipseFinderDlg->fromTime.wMonth = change->st.wMonth;
  490.                         eclipseFinderDlg->fromTime.wDay = change->st.wDay;
  491.                     }
  492.                     else if (wParam == IDC_DATETO)
  493.                     {
  494.                         eclipseFinderDlg->toTime.wYear = change->st.wYear;
  495.                         eclipseFinderDlg->toTime.wMonth = change->st.wMonth;
  496.                         eclipseFinderDlg->toTime.wDay = change->st.wDay;
  497.                     }
  498.                 }
  499.             }
  500.         }
  501.         break;
  502.     }
  504.     return FALSE;
  505. }
  508. EclipseFinderDialog::EclipseFinderDialog(HINSTANCE appInstance,
  509.                                          HWND _parent,
  510.                                          CelestiaCore* _appCore) :
  511.     appCore(_appCore),
  512.     parent(_parent),
  513.     BodytoSet_(NULL)
  514. {
  515.     hwnd = CreateDialogParam(appInstance,
  516.                              MAKEINTRESOURCE(IDD_ECLIPSEFINDER),
  517.                              parent,
  518.                              EclipseFinderProc,
  519.                              reinterpret_cast<LONG>(this));
  520. }