| 181 | | char *p; |
|---|
| 182 | | |
|---|
| 183 | | switch (err) |
|---|
| 184 | | { |
|---|
| 185 | | case WSAEINTR: |
|---|
| 186 | | p = "Call interrupted."; |
|---|
| 187 | | break; |
|---|
| 188 | | case WSAEBADF: |
|---|
| 189 | | p = "Bad file"; |
|---|
| 190 | | break; |
|---|
| 191 | | case WSAEACCES: |
|---|
| 192 | | p = "Bad access"; |
|---|
| 193 | | break; |
|---|
| 194 | | case WSAEFAULT: |
|---|
| 195 | | p = "Bad argument"; |
|---|
| 196 | | break; |
|---|
| 197 | | case WSAEINVAL: |
|---|
| 198 | | p = "Invalid arguments"; |
|---|
| 199 | | break; |
|---|
| 200 | | case WSAEMFILE: |
|---|
| 201 | | p = "Out of file descriptors"; |
|---|
| 202 | | break; |
|---|
| 203 | | case WSAEWOULDBLOCK: |
|---|
| 204 | | p = "Call would block"; |
|---|
| 205 | | break; |
|---|
| 206 | | case WSAEINPROGRESS: |
|---|
| 207 | | case WSAEALREADY: |
|---|
| 208 | | p = "Blocking call in progress"; |
|---|
| 209 | | break; |
|---|
| 210 | | case WSAENOTSOCK: |
|---|
| 211 | | p = "Descriptor is not a socket."; |
|---|
| 212 | | break; |
|---|
| 213 | | case WSAEDESTADDRREQ: |
|---|
| 214 | | p = "Need destination address"; |
|---|
| 215 | | break; |
|---|
| 216 | | case WSAEMSGSIZE: |
|---|
| 217 | | p = "Bad message size"; |
|---|
| 218 | | break; |
|---|
| 219 | | case WSAEPROTOTYPE: |
|---|
| 220 | | p = "Bad protocol"; |
|---|
| 221 | | break; |
|---|
| 222 | | case WSAENOPROTOOPT: |
|---|
| 223 | | p = "Protocol option is unsupported"; |
|---|
| 224 | | break; |
|---|
| 225 | | case WSAEPROTONOSUPPORT: |
|---|
| 226 | | p = "Protocol is unsupported"; |
|---|
| 227 | | break; |
|---|
| 228 | | case WSAESOCKTNOSUPPORT: |
|---|
| 229 | | p = "Socket is unsupported"; |
|---|
| 230 | | break; |
|---|
| 231 | | case WSAEOPNOTSUPP: |
|---|
| 232 | | p = "Operation not supported"; |
|---|
| 233 | | break; |
|---|
| 234 | | case WSAEAFNOSUPPORT: |
|---|
| 235 | | p = "Address family not supported"; |
|---|
| 236 | | break; |
|---|
| 237 | | case WSAEPFNOSUPPORT: |
|---|
| 238 | | p = "Protocol family not supported"; |
|---|
| 239 | | break; |
|---|
| 240 | | case WSAEADDRINUSE: |
|---|
| 241 | | p = "Address already in use"; |
|---|
| 242 | | break; |
|---|
| 243 | | case WSAEADDRNOTAVAIL: |
|---|
| 244 | | p = "Address not available"; |
|---|
| 245 | | break; |
|---|
| 246 | | case WSAENETDOWN: |
|---|
| 247 | | p = "Network down"; |
|---|
| 248 | | break; |
|---|
| 249 | | case WSAENETUNREACH: |
|---|
| 250 | | p = "Network unreachable"; |
|---|
| 251 | | break; |
|---|
| 252 | | case WSAENETRESET: |
|---|
| 253 | | p = "Network has been reset"; |
|---|
| 254 | | break; |
|---|
| 255 | | case WSAECONNABORTED: |
|---|
| 256 | | p = "Connection was aborted"; |
|---|
| 257 | | break; |
|---|
| 258 | | case WSAECONNRESET: |
|---|
| 259 | | p = "Connection was reset"; |
|---|
| 260 | | break; |
|---|
| 261 | | case WSAENOBUFS: |
|---|
| 262 | | p = "No buffer space"; |
|---|
| 263 | | break; |
|---|
| 264 | | case WSAEISCONN: |
|---|
| 265 | | p = "Socket is already connected"; |
|---|
| 266 | | break; |
|---|
| 267 | | case WSAENOTCONN: |
|---|
| 268 | | p = "Socket is not connected"; |
|---|
| 269 | | break; |
|---|
| 270 | | case WSAESHUTDOWN: |
|---|
| 271 | | p = "Socket has been shut down"; |
|---|
| 272 | | break; |
|---|
| 273 | | case WSAETOOMANYREFS: |
|---|
| 274 | | p = "Too many references"; |
|---|
| 275 | | break; |
|---|
| 276 | | case WSAETIMEDOUT: |
|---|
| 277 | | p = "Timed out"; |
|---|
| 278 | | break; |
|---|
| 279 | | case WSAECONNREFUSED: |
|---|
| 280 | | p = "Connection refused"; |
|---|
| 281 | | break; |
|---|
| 282 | | case WSAELOOP: |
|---|
| 283 | | p = "Loop??"; |
|---|
| 284 | | break; |
|---|
| 285 | | case WSAENAMETOOLONG: |
|---|
| 286 | | p = "Name too long"; |
|---|
| 287 | | break; |
|---|
| 288 | | case WSAEHOSTDOWN: |
|---|
| 289 | | p = "Host down"; |
|---|
| 290 | | break; |
|---|
| 291 | | case WSAEHOSTUNREACH: |
|---|
| 292 | | p = "Host unreachable"; |
|---|
| 293 | | break; |
|---|
| 294 | | case WSAENOTEMPTY: |
|---|
| 295 | | p = "Not empty"; |
|---|
| 296 | | break; |
|---|
| 297 | | case WSAEPROCLIM: |
|---|
| 298 | | p = "Process limit reached"; |
|---|
| 299 | | break; |
|---|
| 300 | | case WSAEUSERS: |
|---|
| 301 | | p = "Too many users"; |
|---|
| 302 | | break; |
|---|
| 303 | | case WSAEDQUOT: |
|---|
| 304 | | p = "Bad quota"; |
|---|
| 305 | | break; |
|---|
| 306 | | case WSAESTALE: |
|---|
| 307 | | p = "Something is stale"; |
|---|
| 308 | | break; |
|---|
| 309 | | case WSAEREMOTE: |
|---|
| 310 | | p = "Remote error"; |
|---|
| 311 | | break; |
|---|
| 312 | | case WSAEDISCON: |
|---|
| 313 | | p = "Disconnected"; |
|---|
| 314 | | break; |
|---|
| 315 | | |
|---|
| 316 | | /* Extended Winsock errors */ |
|---|
| 317 | | case WSASYSNOTREADY: |
|---|
| 318 | | p = "Winsock library is not ready"; |
|---|
| 319 | | break; |
|---|
| 320 | | case WSANOTINITIALISED: |
|---|
| 321 | | p = "Winsock library not initalised"; |
|---|
| 322 | | break; |
|---|
| 323 | | case WSAVERNOTSUPPORTED: |
|---|
| 324 | | p = "Winsock version not supported."; |
|---|
| 325 | | break; |
|---|
| 326 | | |
|---|
| 327 | | /* getXbyY() errors (already handled in herrmsg): |
|---|
| 328 | | Authoritative Answer: Host not found */ |
|---|
| 329 | | case WSAHOST_NOT_FOUND: |
|---|
| 330 | | p = "Host not found"; |
|---|
| 331 | | break; |
|---|
| 332 | | |
|---|
| 333 | | /* Non-Authoritative: Host not found, or SERVERFAIL */ |
|---|
| 334 | | case WSATRY_AGAIN: |
|---|
| 335 | | p = "Host not found, try again"; |
|---|
| 336 | | break; |
|---|
| 337 | | |
|---|
| 338 | | /* Non recoverable errors, FORMERR, REFUSED, NOTIMP */ |
|---|
| 339 | | case WSANO_RECOVERY: |
|---|
| 340 | | p = "Unrecoverable error in call to nameserver"; |
|---|
| 341 | | break; |
|---|
| 342 | | |
|---|
| 343 | | /* Valid name, no data record of requested type */ |
|---|
| 344 | | case WSANO_DATA: |
|---|
| 345 | | p = "No data record of requested type"; |
|---|
| 346 | | break; |
|---|
| 347 | | |
|---|
| 348 | | default: |
|---|
| 349 | | return (NULL); |
|---|
| 350 | | } |
|---|
| 351 | | strncpy (buf, p, len); |
|---|
| 352 | | buf [len-1] = '\0'; |
|---|
| 353 | | return buf; |
|---|
| 354 | | } |
|---|
| | 195 | char *p; |
|---|
| | 196 | |
|---|
| | 197 | switch (err) { |
|---|
| | 198 | case WSAEINTR: |
|---|
| | 199 | p = "Call interrupted."; |
|---|
| | 200 | break; |
|---|
| | 201 | case WSAEBADF: |
|---|
| | 202 | p = "Bad file"; |
|---|
| | 203 | break; |
|---|
| | 204 | case WSAEACCES: |
|---|
| | 205 | p = "Bad access"; |
|---|
| | 206 | break; |
|---|
| | 207 | case WSAEFAULT: |
|---|
| | 208 | p = "Bad argument"; |
|---|
| | 209 | break; |
|---|
| | 210 | case WSAEINVAL: |
|---|
| | 211 | p = "Invalid arguments"; |
|---|
| | 212 | break; |
|---|
| | 213 | case WSAEMFILE: |
|---|
| | 214 | p = "Out of file descriptors"; |
|---|
| | 215 | break; |
|---|
| | 216 | case WSAEWOULDBLOCK: |
|---|
| | 217 | p = "Call would block"; |
|---|
| | 218 | break; |
|---|
| | 219 | case WSAEINPROGRESS: |
|---|
| | 220 | case WSAEALREADY: |
|---|
| | 221 | p = "Blocking call in progress"; |
|---|
| | 222 | break; |
|---|
| | 223 | case WSAENOTSOCK: |
|---|
| | 224 | p = "Descriptor is not a socket."; |
|---|
| | 225 | break; |
|---|
| | 226 | case WSAEDESTADDRREQ: |
|---|
| | 227 | p = "Need destination address"; |
|---|
| | 228 | break; |
|---|
| | 229 | case WSAEMSGSIZE: |
|---|
| | 230 | p = "Bad message size"; |
|---|
| | 231 | break; |
|---|
| | 232 | case WSAEPROTOTYPE: |
|---|
| | 233 | p = "Bad protocol"; |
|---|
| | 234 | break; |
|---|
| | 235 | case WSAENOPROTOOPT: |
|---|
| | 236 | p = "Protocol option is unsupported"; |
|---|
| | 237 | break; |
|---|
| | 238 | case WSAEPROTONOSUPPORT: |
|---|
| | 239 | p = "Protocol is unsupported"; |
|---|
| | 240 | break; |
|---|
| | 241 | case WSAESOCKTNOSUPPORT: |
|---|
| | 242 | p = "Socket is unsupported"; |
|---|
| | 243 | break; |
|---|
| | 244 | case WSAEOPNOTSUPP: |
|---|
| | 245 | p = "Operation not supported"; |
|---|
| | 246 | break; |
|---|
| | 247 | case WSAEAFNOSUPPORT: |
|---|
| | 248 | p = "Address family not supported"; |
|---|
| | 249 | break; |
|---|
| | 250 | case WSAEPFNOSUPPORT: |
|---|
| | 251 | p = "Protocol family not supported"; |
|---|
| | 252 | break; |
|---|
| | 253 | case WSAEADDRINUSE: |
|---|
| | 254 | p = "Address already in use"; |
|---|
| | 255 | break; |
|---|
| | 256 | case WSAEADDRNOTAVAIL: |
|---|
| | 257 | p = "Address not available"; |
|---|
| | 258 | break; |
|---|
| | 259 | case WSAENETDOWN: |
|---|
| | 260 | p = "Network down"; |
|---|
| | 261 | break; |
|---|
| | 262 | case WSAENETUNREACH: |
|---|
| | 263 | p = "Network unreachable"; |
|---|
| | 264 | break; |
|---|
| | 265 | case WSAENETRESET: |
|---|
| | 266 | p = "Network has been reset"; |
|---|
| | 267 | break; |
|---|
| | 268 | case WSAECONNABORTED: |
|---|
| | 269 | p = "Connection was aborted"; |
|---|
| | 270 | break; |
|---|
| | 271 | case WSAECONNRESET: |
|---|
| | 272 | p = "Connection was reset"; |
|---|
| | 273 | break; |
|---|
| | 274 | case WSAENOBUFS: |
|---|
| | 275 | p = "No buffer space"; |
|---|
| | 276 | break; |
|---|
| | 277 | case WSAEISCONN: |
|---|
| | 278 | p = "Socket is already connected"; |
|---|
| | 279 | break; |
|---|
| | 280 | case WSAENOTCONN: |
|---|
| | 281 | p = "Socket is not connected"; |
|---|
| | 282 | break; |
|---|
| | 283 | case WSAESHUTDOWN: |
|---|
| | 284 | p = "Socket has been shut down"; |
|---|
| | 285 | break; |
|---|
| | 286 | case WSAETOOMANYREFS: |
|---|
| | 287 | p = "Too many references"; |
|---|
| | 288 | break; |
|---|
| | 289 | case WSAETIMEDOUT: |
|---|
| | 290 | p = "Timed out"; |
|---|
| | 291 | break; |
|---|
| | 292 | case WSAECONNREFUSED: |
|---|
| | 293 | p = "Connection refused"; |
|---|
| | 294 | break; |
|---|
| | 295 | case WSAELOOP: |
|---|
| | 296 | p = "Loop??"; |
|---|
| | 297 | break; |
|---|
| | 298 | case WSAENAMETOOLONG: |
|---|
| | 299 | p = "Name too long"; |
|---|
| | 300 | break; |
|---|
| | 301 | case WSAEHOSTDOWN: |
|---|
| | 302 | p = "Host down"; |
|---|
| | 303 | break; |
|---|
| | 304 | case WSAEHOSTUNREACH: |
|---|
| | 305 | p = "Host unreachable"; |
|---|
| | 306 | break; |
|---|
| | 307 | case WSAENOTEMPTY: |
|---|
| | 308 | p = "Not empty"; |
|---|
| | 309 | break; |
|---|
| | 310 | case WSAEPROCLIM: |
|---|
| | 311 | p = "Process limit reached"; |
|---|
| | 312 | break; |
|---|
| | 313 | case WSAEUSERS: |
|---|
| | 314 | p = "Too many users"; |
|---|
| | 315 | break; |
|---|
| | 316 | case WSAEDQUOT: |
|---|
| | 317 | p = "Bad quota"; |
|---|
| | 318 | break; |
|---|
| | 319 | case WSAESTALE: |
|---|
| | 320 | p = "Something is stale"; |
|---|
| | 321 | break; |
|---|
| | 322 | case WSAEREMOTE: |
|---|
| | 323 | p = "Remote error"; |
|---|
| | 324 | break; |
|---|
| | 325 | case WSAEDISCON: |
|---|
| | 326 | p = "Disconnected"; |
|---|
| | 327 | break; |
|---|
| | 328 | |
|---|
| | 329 | /* Extended Winsock errors |
|---|
| | 330 | */ |
|---|
| | 331 | case WSASYSNOTREADY: |
|---|
| | 332 | p = "Winsock library is not ready"; |
|---|
| | 333 | break; |
|---|
| | 334 | case WSANOTINITIALISED: |
|---|
| | 335 | p = "Winsock library not initalised"; |
|---|
| | 336 | break; |
|---|
| | 337 | case WSAVERNOTSUPPORTED: |
|---|
| | 338 | p = "Winsock version not supported."; |
|---|
| | 339 | break; |
|---|
| | 340 | |
|---|
| | 341 | /* getXbyY() errors (already handled in herrmsg): |
|---|
| | 342 | * Authoritative Answer: Host not found |
|---|
| | 343 | */ |
|---|
| | 344 | case WSAHOST_NOT_FOUND: |
|---|
| | 345 | p = "Host not found"; |
|---|
| | 346 | break; |
|---|
| | 347 | |
|---|
| | 348 | /* Non-Authoritative: Host not found, or SERVERFAIL |
|---|
| | 349 | */ |
|---|
| | 350 | case WSATRY_AGAIN: |
|---|
| | 351 | p = "Host not found, try again"; |
|---|
| | 352 | break; |
|---|
| | 353 | |
|---|
| | 354 | /* Non recoverable errors, FORMERR, REFUSED, NOTIMP |
|---|
| | 355 | */ |
|---|
| | 356 | case WSANO_RECOVERY: |
|---|
| | 357 | p = "Unrecoverable error in call to nameserver"; |
|---|
| | 358 | break; |
|---|
| | 359 | |
|---|
| | 360 | /* Valid name, no data record of requested type |
|---|
| | 361 | */ |
|---|
| | 362 | case WSANO_DATA: |
|---|
| | 363 | p = "No data record of requested type"; |
|---|
| | 364 | break; |
|---|
| | 365 | |
|---|
| | 366 | default: |
|---|
| | 367 | return (NULL); |
|---|
| | 368 | } |
|---|
| | 369 | strncpy (buf, p, len); |
|---|
| | 370 | buf [len-1] = '\0'; |
|---|
| | 371 | return buf; |
|---|
| | 372 | } |
|---|
| | 373 | |
|---|
| 361 | | static char buf[512]; /* !! not thread-safe */ |
|---|
| 362 | | DWORD lang = MAKELANGID (LANG_NEUTRAL, SUBLANG_DEFAULT); |
|---|
| 363 | | DWORD flags = FORMAT_MESSAGE_FROM_SYSTEM | |
|---|
| 364 | | FORMAT_MESSAGE_IGNORE_INSERTS | |
|---|
| 365 | | FORMAT_MESSAGE_MAX_WIDTH_MASK; |
|---|
| 366 | | char *p; |
|---|
| 367 | | |
|---|
| 368 | | if (err >= 0 && err < sys_nerr) |
|---|
| 369 | | { |
|---|
| 370 | | strncpy (buf, strerror(err), sizeof(buf)-1); |
|---|
| 371 | | buf [sizeof(buf)-1] = '\0'; |
|---|
| 372 | | } |
|---|
| 373 | | else |
|---|
| 374 | | { |
|---|
| 375 | | if (!get_winsock_error (err, buf, sizeof(buf)) && |
|---|
| 376 | | !FormatMessage (flags, NULL, err, |
|---|
| 377 | | lang, buf, sizeof(buf)-1, NULL)) |
|---|
| 378 | | sprintf (buf, "Unknown error %d (%#x)", err, err); |
|---|
| 379 | | } |
|---|
| 380 | | |
|---|
| 381 | | /* strip trailing '\r\n' or '\n'. */ |
|---|
| 382 | | if ((p = strrchr(buf,'\n')) != NULL && (p - buf) >= 2) |
|---|
| 383 | | *p = '\0'; |
|---|
| 384 | | if ((p = strrchr(buf,'\r')) != NULL && (p - buf) >= 1) |
|---|
| 385 | | *p = '\0'; |
|---|
| 386 | | return (buf); |
|---|
| | 380 | static char buf[512]; /* !! not thread-safe */ |
|---|
| | 381 | DWORD lang = MAKELANGID (LANG_NEUTRAL, SUBLANG_DEFAULT); |
|---|
| | 382 | DWORD flags = FORMAT_MESSAGE_FROM_SYSTEM | |
|---|
| | 383 | FORMAT_MESSAGE_IGNORE_INSERTS | |
|---|
| | 384 | FORMAT_MESSAGE_MAX_WIDTH_MASK; |
|---|
| | 385 | char *p; |
|---|
| | 386 | |
|---|
| | 387 | if (err >= 0 && err < sys_nerr) { |
|---|
| | 388 | strncpy (buf, strerror(err), sizeof(buf)-1); |
|---|
| | 389 | buf [sizeof(buf)-1] = '\0'; |
|---|
| | 390 | } else { |
|---|
| | 391 | if (!get_winsock_error (err, buf, sizeof(buf)) && |
|---|
| | 392 | !FormatMessage (flags, NULL, err, lang, |
|---|
| | 393 | buf, sizeof(buf)-1, NULL)) |
|---|
| | 394 | sprintf (buf, "Unknown error %d (%#x)", err, err); |
|---|
| | 395 | } |
|---|
| | 396 | |
|---|
| | 397 | /* strip trailing '\r\n' or '\n'. |
|---|
| | 398 | */ |
|---|
| | 399 | if ((p = strrchr(buf,'\n')) != NULL && (p - buf) >= 2) |
|---|
| | 400 | *p = '\0'; |
|---|
| | 401 | if ((p = strrchr(buf,'\r')) != NULL && (p - buf) >= 1) |
|---|
| | 402 | *p = '\0'; |
|---|
| | 403 | return (buf); |
|---|
| 457 | | struct mmap_list *map = NULL; |
|---|
| 458 | | HANDLE os_handle, os_map; |
|---|
| 459 | | DWORD os_prot; |
|---|
| 460 | | void *file_ptr; |
|---|
| 461 | | |
|---|
| 462 | | if (fd < 0 || size == 0 || !(prot & (PROT_READ|PROT_WRITE))) |
|---|
| 463 | | { |
|---|
| 464 | | SetLastError (errno = EINVAL); |
|---|
| 465 | | return (MAP_FAILED); |
|---|
| 466 | | } |
|---|
| 467 | | |
|---|
| 468 | | /* todo: |
|---|
| 469 | | prot 0 -> PAGE_NOACCESS |
|---|
| 470 | | PROT_READ -> PAGE_READONLY |
|---|
| 471 | | PROT_READ|PROT_WRITE -> PAGE_READWRITE |
|---|
| 472 | | PROT_WRITE -> PAGE_WRITECOPY |
|---|
| 473 | | */ |
|---|
| 474 | | |
|---|
| 475 | | os_handle = (HANDLE) _get_osfhandle (fd); |
|---|
| 476 | | if (!os_handle) |
|---|
| 477 | | return (MAP_FAILED); |
|---|
| 478 | | |
|---|
| 479 | | os_prot = (prot == PROT_READ) ? PAGE_READONLY : PAGE_WRITECOPY; |
|---|
| 480 | | os_map = CreateFileMapping (os_handle, NULL, os_prot, 0, 0, NULL); |
|---|
| 481 | | if (!os_map) |
|---|
| 482 | | return (MAP_FAILED); |
|---|
| 483 | | |
|---|
| 484 | | os_prot = (prot == PROT_READ) ? FILE_MAP_READ : FILE_MAP_WRITE; |
|---|
| 485 | | file_ptr = MapViewOfFile (os_map, os_prot, 0, 0, 0); |
|---|
| 486 | | if (file_ptr) |
|---|
| 487 | | { |
|---|
| 488 | | map = add_mmap_node (file_ptr, os_map, size); |
|---|
| 489 | | if (!map) |
|---|
| 490 | | { |
|---|
| 491 | | FlushViewOfFile (file_ptr, size); |
|---|
| 492 | | UnmapViewOfFile (file_ptr); |
|---|
| 493 | | } |
|---|
| 494 | | } |
|---|
| 495 | | file_ptr = (map ? (void*)map->file_ptr : NULL); |
|---|
| 496 | | if (!file_ptr) |
|---|
| 497 | | CloseHandle (os_map); |
|---|
| | 480 | struct mmap_list *map = NULL; |
|---|
| | 481 | HANDLE os_handle, os_map; |
|---|
| | 482 | DWORD os_prot; |
|---|
| | 483 | void *file_ptr; |
|---|
| | 484 | |
|---|
| | 485 | if (fd < 0 || size == 0 || !(prot & (PROT_READ|PROT_WRITE))) { |
|---|
| | 486 | SetLastError (errno = EINVAL); |
|---|
| | 487 | return (MAP_FAILED); |
|---|
| | 488 | } |
|---|
| | 489 | |
|---|
| | 490 | /* TODO: |
|---|
| | 491 | * prot 0 -> PAGE_NOACCESS |
|---|
| | 492 | * PROT_READ -> PAGE_READONLY |
|---|
| | 493 | * PROT_READ|PROT_WRITE -> PAGE_READWRITE |
|---|
| | 494 | * PROT_WRITE -> PAGE_WRITECOPY |
|---|
| | 495 | */ |
|---|
| | 496 | |
|---|
| | 497 | os_handle = (HANDLE) _get_osfhandle (fd); |
|---|
| | 498 | if (!os_handle) |
|---|
| | 499 | return (MAP_FAILED); |
|---|
| | 500 | |
|---|
| | 501 | os_prot = (prot == PROT_READ) ? PAGE_READONLY : PAGE_WRITECOPY; |
|---|
| | 502 | os_map = CreateFileMapping (os_handle, NULL, os_prot, 0, 0, NULL); |
|---|
| | 503 | if (!os_map) |
|---|
| | 504 | return (MAP_FAILED); |
|---|
| | 505 | |
|---|
| | 506 | os_prot = (prot == PROT_READ) ? FILE_MAP_READ : FILE_MAP_WRITE; |
|---|
| | 507 | file_ptr = MapViewOfFile (os_map, os_prot, 0, 0, 0); |
|---|
| | 508 | if (file_ptr) { |
|---|
| | 509 | map = add_mmap_node (file_ptr, os_map, size); |
|---|
| | 510 | if (!map) { |
|---|
| | 511 | FlushViewOfFile (file_ptr, size); |
|---|
| | 512 | UnmapViewOfFile (file_ptr); |
|---|
| | 513 | } |
|---|
| | 514 | } |
|---|
| | 515 | file_ptr = (map ? (void*)map->file_ptr : NULL); |
|---|
| | 516 | if (!file_ptr) |
|---|
| | 517 | CloseHandle (os_map); |
|---|
| 553 | | HINSTANCE hnd = (HINSTANCE)dll_handle; |
|---|
| 554 | | void *rc; |
|---|
| 555 | | |
|---|
| 556 | | if (!hnd) |
|---|
| 557 | | hnd = GetModuleHandle (NULL); |
|---|
| 558 | | |
|---|
| 559 | | last_error = 0; |
|---|
| 560 | | last_func = "win_dlsym"; |
|---|
| 561 | | |
|---|
| 562 | | rc = (void*) GetProcAddress (hnd, func_name); |
|---|
| 563 | | if (rc == NULL) |
|---|
| 564 | | last_error = GetLastError(); |
|---|
| 565 | | |
|---|
| 566 | | TRACE ("dlfcn", "func=%s result=%s error=%d\n", |
|---|
| 567 | | func_name, rc ? "ok" : "fail", last_error); |
|---|
| 568 | | |
|---|
| 569 | | return rc; |
|---|
| 570 | | } |
|---|
| | 577 | HINSTANCE hnd = (HINSTANCE)dll_handle; |
|---|
| | 578 | void *rc; |
|---|
| | 579 | |
|---|
| | 580 | if (!hnd) |
|---|
| | 581 | hnd = GetModuleHandle (NULL); |
|---|
| | 582 | |
|---|
| | 583 | last_error = 0; |
|---|
| | 584 | last_func = "win_dlsym"; |
|---|
| | 585 | |
|---|
| | 586 | rc = (void*) GetProcAddress (hnd, func_name); |
|---|
| | 587 | if (rc == NULL) |
|---|
| | 588 | last_error = GetLastError(); |
|---|
| | 589 | |
|---|
| | 590 | TRACE ("dlfcn", "func=%s result=%s error=%d\n", |
|---|
| | 591 | func_name, rc ? "ok" : "fail", last_error); |
|---|
| | 592 | |
|---|
| | 593 | return rc; |
|---|
| | 594 | } |
|---|
| | 595 | |
|---|
| 680 | | static const char digits[] = "0123456789"; |
|---|
| 681 | | int saw_digit, octets, ch; |
|---|
| 682 | | u_char tmp[INADDRSZ], *tp; |
|---|
| 683 | | |
|---|
| 684 | | saw_digit = 0; |
|---|
| 685 | | octets = 0; |
|---|
| 686 | | *(tp = tmp) = 0; |
|---|
| 687 | | while ((ch = *src++) != '\0') |
|---|
| 688 | | { |
|---|
| 689 | | const char *pch = strchr(digits, ch); |
|---|
| 690 | | |
|---|
| 691 | | if (pch) |
|---|
| 692 | | { |
|---|
| 693 | | u_int new = *tp * 10 + (pch - digits); |
|---|
| 694 | | |
|---|
| 695 | | if (new > 255) |
|---|
| 696 | | return (0); |
|---|
| 697 | | *tp = new; |
|---|
| 698 | | if (! saw_digit) |
|---|
| 699 | | { |
|---|
| 700 | | if (++octets > 4) |
|---|
| 701 | | return (0); |
|---|
| 702 | | saw_digit = 1; |
|---|
| 703 | | } |
|---|
| 704 | | } |
|---|
| 705 | | else if (ch == '.' && saw_digit) |
|---|
| 706 | | { |
|---|
| 707 | | if (octets == 4) |
|---|
| 708 | | return (0); |
|---|
| 709 | | *++tp = 0; |
|---|
| 710 | | saw_digit = 0; |
|---|
| 711 | | } |
|---|
| 712 | | else |
|---|
| 713 | | return (0); |
|---|
| 714 | | } |
|---|
| 715 | | if (octets < 4) |
|---|
| 716 | | return (0); |
|---|
| 717 | | |
|---|
| 718 | | memcpy (dst, tmp, INADDRSZ); |
|---|
| 719 | | return (1); |
|---|
| | 711 | static const char digits[] = "0123456789"; |
|---|
| | 712 | int saw_digit, octets, ch; |
|---|
| | 713 | u_char tmp[INADDRSZ], *tp; |
|---|
| | 714 | |
|---|
| | 715 | saw_digit = 0; |
|---|
| | 716 | octets = 0; |
|---|
| | 717 | *(tp = tmp) = 0; |
|---|
| | 718 | |
|---|
| | 719 | while ((ch = *src++) != '\0') { |
|---|
| | 720 | const char *pch = strchr(digits, ch); |
|---|
| | 721 | |
|---|
| | 722 | if (pch) { |
|---|
| | 723 | u_int new = *tp * 10 + (pch - digits); |
|---|
| | 724 | |
|---|
| | 725 | if (new > 255) |
|---|
| | 726 | return (0); |
|---|
| | 727 | |
|---|
| | 728 | *tp = new; |
|---|
| | 729 | if (! saw_digit) { |
|---|
| | 730 | if (++octets > 4) |
|---|
| | 731 | return (0); |
|---|
| | 732 | saw_digit = 1; |
|---|
| | 733 | } |
|---|
| | 734 | } else |
|---|
| | 735 | if (ch == '.' && saw_digit) { |
|---|
| | 736 | if (octets == 4) |
|---|
| | 737 | return (0); |
|---|
| | 738 | *++tp = 0; |
|---|
| | 739 | saw_digit = 0; |
|---|
| | 740 | } else { |
|---|
| | 741 | return (0); |
|---|
| | 742 | } |
|---|
| | 743 | } |
|---|
| | 744 | |
|---|
| | 745 | if (octets < 4) |
|---|
| | 746 | return (0); |
|---|
| | 747 | |
|---|
| | 748 | memcpy (dst, tmp, INADDRSZ); |
|---|
| | 749 | |
|---|
| | 750 | return (1); |
|---|