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
|
/*
* Copyright (c) 1999 Olaf Flebbe o.flebbe@gmx.de
*
* You may distribute under the terms of either the GNU General Public
* License or the Artistic License, as specified in the README file.
*
*/
/* This is C++ Code !! */
#include <e32std.h>
#include <stdlib.h>
#include <estlib.h>
#include <string.h>
extern "C" {
#if 1
int
epoc_spawn( char *cmd, char *cmdline) {
RProcess p;
TRequestStatus status;
TInt rc;
rc = p.Create( _L( cmd), _L( cmdline));
if (rc != KErrNone) {
return -1;
}
p.Resume();
p.Logon( status);
User::WaitForRequest( status);
p.Kill( 0);
if (status!=KErrNone) {
return -1;
}
return 0;
}
#else
int
epoc_spawn( char *cmd, char *cmdline) {
int len = strlen(cmd) + strlen(cmdline) + 4;
char *n = (char *) malloc( len);
int r;
strcpy( n, cmd);
strcat( n, " ");
strcat( n, cmdline);
r = system( n);
free( n);
return r;
}
#endif
/* Workaround for defect strtoul(). Values with leading + are zero */
unsigned long int epoc_strtoul(const char *nptr, char **endptr,
int base) {
if (nptr && *nptr == '+')
nptr++;
return strtoul( nptr, endptr, base);
}
/* Workaround for defect atof(), see java defect list for epoc */
double epoc_atof( char* str) {
TReal64 aRes;
while (TChar( *str).IsSpace()) {
str++;
}
TLex lex( _L( str));
TInt err = lex.Val( aRes, TChar( '.'));
return aRes;
}
void epoc_gcvt( double x, int digits, unsigned char *buf) {
TRealFormat trel;
trel.iPlaces = digits;
trel.iPoint = TChar( '.');
TPtr result( buf, 80);
result.Num( x, trel);
result.Append( TChar( 0));
}
}
#if 0
void epoc_spawn_posix_server() {
SpawnPosixServerThread();
}
#endif
|
