added kdenlive
[feisty_meow.git] / nucleus / library / timely / time_control.cpp
1 // Name   : time_control
2 // Author : Chris Koeritz
3 /******************************************************************************
4 * Copyright (c) 1994-$now By Author.  This program is free software; you can  *
5 * redistribute it and/or modify it under the terms of the GNU General Public  *
6 * License as published by the Free Software Foundation; either version 2 of   *
7 * the License or (at your option) any later version.  This is online at:      *
8 *     http://www.fsf.org/copyleft/gpl.html                                    *
9 * Please send any updates to: fred@gruntose.com                               *
10 \*****************************************************************************/
11
12 #include "time_control.h"
13
14 #include <application/windoze_helper.h>
15 #include <basis/utf_conversion.h>
16
17 #include <time.h>
18 #if defined(__WIN32__) || defined(__UNIX__)
19   #include <sys/timeb.h>
20 #endif
21 #ifdef __UNIX__
22   #include <unistd.h>
23 #endif
24
25 using namespace basis;
26 using namespace structures;
27
28 namespace timely {
29
30 void time_control::sleep_ms(basis::un_int msec)
31 {
32 #ifdef __UNIX__
33   usleep(msec * 1000);
34 #endif
35 #ifdef __WIN32__
36   Sleep(msec);
37 #endif
38 }
39
40 bool time_control::set_time(const time_locus &new_time)
41 {
42 #ifdef __WIN32__
43   SYSTEMTIME os_time;
44   os_time.wYear = WORD(new_time.year);
45   os_time.wMonth = new_time.month;
46   os_time.wDayOfWeek = new_time.day_of_week;
47   os_time.wDay = new_time.day_of_year;
48   os_time.wHour = new_time.hour;
49   os_time.wMinute = new_time.minute;
50   os_time.wSecond = new_time.second;
51   os_time.wMilliseconds = 0;  // currently unused.
52
53   // get our process token for manipulation.
54   HANDLE petoken;
55   OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES
56       | TOKEN_QUERY, &petoken);
57   // get our 
58 //something or other
59 // identifier so we can adjust our privileges.
60   LUID our_id;
61   LookupPrivilegeValue(NULL, to_unicode_temp("SeSystemTimePrivilege"), &our_id);
62   // make up a privilege structure for the adjustment.
63   TOKEN_PRIVILEGES privs;
64   privs.PrivilegeCount = 1;
65   privs.Privileges[0].Luid = our_id;
66   privs.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
67   // enable system-time privileges.
68   AdjustTokenPrivileges(petoken, false, &privs, sizeof(TOKEN_PRIVILEGES),
69       NULL, NULL);
70
71   SetLocalTime(&os_time);  // actually set the time.
72
73   // disable the time adjustment privileges again.
74   AdjustTokenPrivileges(petoken, true, &privs, sizeof(TOKEN_PRIVILEGES),
75       NULL, NULL);
76
77   // let all the main windows know that the time got adjusted.
78 //do we need to do this ourselves?
79   ::PostMessage(HWND_BROADCAST, WM_TIMECHANGE, 0, 0);
80
81 //hmmm: make sure this seems right.
82   CloseHandle(petoken);
83
84   return true;
85 #elif defined(__UNIX__)
86 //no implem yet.
87
88 //temp to shut up warnings
89 time_locus ted = new_time;
90 return ted.year ? 0:1;
91
92 #else
93   return false;
94 #endif
95 }
96
97 } // namespace.
98