1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
|
/*
This file is part of the KDE libraries
Copyright (C) 2004 Jaroslaw Staniek <js@iidea.pl>
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License version 2 as published by the Free Software Foundation.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Library General Public License for more details.
You should have received a copy of the GNU Library General Public License
along with this library; see the file COPYING.LIB. If not, write to
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Boston, MA 02110-1301, USA.
*/
#include <windows.h>
#include <string.h>
#include <stdlib.h>
#include <io.h>
#include <sys/file.h>
#include <stdio.h>
#include "qeventloopex.h"
QEventLoopEx* qeventloopex = 0;
/**
Actions to perform at very early stage of KDE application life on MS Windows.
Currently not much is performed here but later, who knows...
Additional algorithm for win9x (including Millenium), where are problems with
easy setting environment variables:
- try to tqfind HOME env. variable
- if not found, try to tqfind USERPROFILE env. variable
- if not found, try to tqfind both HOMEDRIVE and HOMEPATH env. variables
- if not found, try in the Windows Registry:
- try get 'Software\KDE' value from HKEY_CURRENT_USER section of Windows Registry
- if not found, try to get from
'Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\AppData'
- if one of above two found, put the value as HOME environment variable
using putenv() function.
Once HOME variable is set, Qt handles it well.
*/
KDEWIN32_EXPORT void kde_bootstrap()
{
OSVERSIONINFOA osver;
osver.dwOSVersionInfoSize = sizeof(osver);
DWORD rc = GetVersionExA( &osver );
WSADATA wsadata;
WSAStartup(MAKEWORD(2,2),&wsadata);
qeventloopex = new QEventLoopEx();
//for win9x only:
if (osver.dwPlatformId == VER_PLATFORM_WIN32_WINDOWS) {
//set $HOME if not available
char *s, *s2;
s = getenv("HOME");
if (!s)
s = getenv("USERPROFILE");
if (!s) {
s = getenv("HOMEDRIVE");
s2 = getenv("HOMEPATH");
if (!s2)
s = 0;
}
if (!s) {
//no $HOME! : set a value from registry:
HKEY hKey;
DWORD len;
char path[1024];
char path2[1024];
bool ok;
#define KEY "Software\\KDE"
ok = (ERROR_SUCCESS == RegOpenKeyExA( HKEY_CURRENT_USER, KEY, 0, KEY_QUERY_VALUE, &hKey ));
if (ok) {
len = sizeof(path);
ok = (ERROR_SUCCESS == RegQueryValueExA( hKey, "HOME", 0, 0, (LPBYTE)path, &len ));
fprintf(stderr,"RegQueryValueExA = %d, %s\n", ok, path);
}
#define KEY2 "Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Shell Folders"
if (!ok) {
ok = (ERROR_SUCCESS == RegOpenKeyExA( HKEY_CURRENT_USER, KEY, 0, KEY_QUERY_VALUE, &hKey ));
if (ok) {
len = sizeof(path);
ok = (ERROR_SUCCESS == RegQueryValueExA( hKey, "AppData", 0, 0, (LPBYTE)path, &len ));
fprintf(stderr,"RegQueryValueExA = %d, %s\n", ok, path);
}
}
if (ok) {
ok = (0==access(path, R_OK));
if (!ok) {
CreateDirectoryA(path,NULL);
ok = (0==access(path, R_OK));
fprintf(stderr,"CreateDirectoryA(%s) = %d\n", path, ok);
}
if (ok) {
//it's not a problem with encoding, because Qt will use fromLocal8Bit()
strcpy(path2, "HOME=");
strncat(path2, path, sizeof(path2)-1-strlen(path2));
rc = putenv(path2);
fprintf(stderr,"putenv(HOME) = %d\n",(int)rc);
/*
path[0]=0;
char *p = getenv( "HOME" );
fprintf(stderr,"getenv(HOME) = %s\n", p);*/
}
else
fprintf(stderr,"'%s' doesn't exist\n",path);
}
else
fprintf(stderr,"$HOME not found!\n",path);
RegCloseKey( hKey );
}
}
}
/**
Actions to perform after destroying KDE application on MS Windows.
Currently, custom even loop (QEventLoopEx) is deleted here.
*/
KDEWIN32_EXPORT void kde_destroy()
{
delete qeventloopex;
}
|
