mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-07-09 04:38:29 +00:00
Get life.com in MODE=tiny back down to 12kb
This commit is contained in:
Justine Tunney
parent
23b72eb617
commit
b90fa996b4
14 changed files with 199 additions and 72 deletions
|
|
@ -47,13 +47,12 @@ static const char *DescribeDisposition(int x) {
|
|||
*
|
||||
* @return handle, or -1 on failure
|
||||
* @note this wrapper takes care of ABI, STRACE(), and __winerr()
|
||||
* @see MapViewOfFileExNuma()
|
||||
*/
|
||||
int64_t CreateFile(const char16_t *lpFileName, uint32_t dwDesiredAccess,
|
||||
uint32_t dwShareMode,
|
||||
struct NtSecurityAttributes *opt_lpSecurityAttributes,
|
||||
int dwCreationDisposition, uint32_t dwFlagsAndAttributes,
|
||||
int64_t opt_hTemplateFile) {
|
||||
textwindows int64_t CreateFile(
|
||||
const char16_t *lpFileName, uint32_t dwDesiredAccess, uint32_t dwShareMode,
|
||||
struct NtSecurityAttributes *opt_lpSecurityAttributes,
|
||||
int dwCreationDisposition, uint32_t dwFlagsAndAttributes,
|
||||
int64_t opt_hTemplateFile) {
|
||||
int64_t hHandle;
|
||||
hHandle = __imp_CreateFileW(lpFileName, dwDesiredAccess, dwShareMode,
|
||||
opt_lpSecurityAttributes, dwCreationDisposition,
|
||||
|
|
|
|||
50
libc/intrin/createfilemapping.greg.c
Normal file
50
libc/intrin/createfilemapping.greg.c
Normal file
|
|
@ -0,0 +1,50 @@
|
|||
/*-*- mode:c;indent-tabs-mode:nil;c-basic-offset:2;tab-width:8;coding:utf-8 -*-│
|
||||
│vi: set net ft=c ts=2 sts=2 sw=2 fenc=utf-8 :vi│
|
||||
╞══════════════════════════════════════════════════════════════════════════════╡
|
||||
│ Copyright 2022 Justine Alexandra Roberts Tunney │
|
||||
│ │
|
||||
│ Permission to use, copy, modify, and/or distribute this software for │
|
||||
│ any purpose with or without fee is hereby granted, provided that the │
|
||||
│ above copyright notice and this permission notice appear in all copies. │
|
||||
│ │
|
||||
│ THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL │
|
||||
│ WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED │
|
||||
│ WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE │
|
||||
│ AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL │
|
||||
│ DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR │
|
||||
│ PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER │
|
||||
│ TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR │
|
||||
│ PERFORMANCE OF THIS SOFTWARE. │
|
||||
╚─────────────────────────────────────────────────────────────────────────────*/
|
||||
#include "libc/calls/internal.h"
|
||||
#include "libc/calls/strace.internal.h"
|
||||
#include "libc/intrin/describeflags.internal.h"
|
||||
#include "libc/nt/memory.h"
|
||||
#include "libc/nt/struct/securityattributes.h"
|
||||
|
||||
extern typeof(CreateFileMapping) *const __imp_CreateFileMappingW __msabi;
|
||||
|
||||
/**
|
||||
* Creates file mapping object on the New Technology.
|
||||
*
|
||||
* @param opt_hFile may be -1 for MAP_ANONYMOUS behavior
|
||||
* @return handle, or 0 on failure
|
||||
* @note this wrapper takes care of ABI, STRACE(), and __winerr()
|
||||
* @see MapViewOfFileEx()
|
||||
*/
|
||||
textwindows int64_t CreateFileMapping(
|
||||
int64_t opt_hFile,
|
||||
const struct NtSecurityAttributes *opt_lpFileMappingAttributes,
|
||||
uint32_t flProtect, uint32_t dwMaximumSizeHigh, uint32_t dwMaximumSizeLow,
|
||||
const char16_t *opt_lpName) {
|
||||
int64_t hHandle;
|
||||
hHandle = __imp_CreateFileMappingW(opt_hFile, opt_lpFileMappingAttributes,
|
||||
flProtect, dwMaximumSizeHigh,
|
||||
dwMaximumSizeLow, opt_lpName);
|
||||
if (!hHandle) __winerr();
|
||||
STRACE("CreateFileMapping(%ld, %s, max:%'zu, name:%#hs) → %ld% m", opt_hFile,
|
||||
DescribeNtPageFlags(flProtect),
|
||||
(uint64_t)dwMaximumSizeHigh << 32 | dwMaximumSizeLow, opt_lpName,
|
||||
hHandle);
|
||||
return hHandle;
|
||||
}
|
||||
|
|
@ -18,6 +18,7 @@
|
|||
╚─────────────────────────────────────────────────────────────────────────────*/
|
||||
#include "libc/calls/internal.h"
|
||||
#include "libc/calls/strace.internal.h"
|
||||
#include "libc/dce.h"
|
||||
#include "libc/intrin/describeflags.internal.h"
|
||||
#include "libc/nt/memory.h"
|
||||
#include "libc/nt/struct/securityattributes.h"
|
||||
|
|
@ -33,7 +34,7 @@ extern typeof(CreateFileMappingNuma) *const
|
|||
* @note this wrapper takes care of ABI, STRACE(), and __winerr()
|
||||
* @see MapViewOfFileExNuma()
|
||||
*/
|
||||
int64_t CreateFileMappingNuma(
|
||||
textwindows int64_t CreateFileMappingNuma(
|
||||
int64_t opt_hFile,
|
||||
const struct NtSecurityAttributes *opt_lpFileMappingAttributes,
|
||||
uint32_t flProtect, uint32_t dwMaximumSizeHigh, uint32_t dwMaximumSizeLow,
|
||||
|
|
|
|||
53
libc/intrin/mapviewoffileex.greg.c
Normal file
53
libc/intrin/mapviewoffileex.greg.c
Normal file
|
|
@ -0,0 +1,53 @@
|
|||
/*-*- mode:c;indent-tabs-mode:nil;c-basic-offset:2;tab-width:8;coding:utf-8 -*-│
|
||||
│vi: set net ft=c ts=2 sts=2 sw=2 fenc=utf-8 :vi│
|
||||
╞══════════════════════════════════════════════════════════════════════════════╡
|
||||
│ Copyright 2022 Justine Alexandra Roberts Tunney │
|
||||
│ │
|
||||
│ Permission to use, copy, modify, and/or distribute this software for │
|
||||
│ any purpose with or without fee is hereby granted, provided that the │
|
||||
│ above copyright notice and this permission notice appear in all copies. │
|
||||
│ │
|
||||
│ THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL │
|
||||
│ WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED │
|
||||
│ WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE │
|
||||
│ AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL │
|
||||
│ DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR │
|
||||
│ PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER │
|
||||
│ TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR │
|
||||
│ PERFORMANCE OF THIS SOFTWARE. │
|
||||
╚─────────────────────────────────────────────────────────────────────────────*/
|
||||
#include "libc/assert.h"
|
||||
#include "libc/calls/internal.h"
|
||||
#include "libc/calls/strace.internal.h"
|
||||
#include "libc/intrin/describeflags.internal.h"
|
||||
#include "libc/nt/enum/filemapflags.h"
|
||||
#include "libc/nt/memory.h"
|
||||
|
||||
extern typeof(MapViewOfFileEx) *const __imp_MapViewOfFileEx __msabi;
|
||||
|
||||
/**
|
||||
* Maps view of file mapping into memory on the New Technology.
|
||||
*
|
||||
* @param hFileMappingObject was returned by CreateFileMapping()
|
||||
* @param dwDesiredAccess has kNtFileMap... flags
|
||||
* @param opt_lpDesiredBaseAddress may be NULL to let o/s choose
|
||||
* @return base address, or NULL on failure
|
||||
* @note this wrapper takes care of ABI, STRACE(), and __winerr()
|
||||
*/
|
||||
textwindows void *MapViewOfFileEx(int64_t hFileMappingObject,
|
||||
uint32_t dwDesiredAccess,
|
||||
uint32_t dwFileOffsetHigh,
|
||||
uint32_t dwFileOffsetLow,
|
||||
size_t dwNumberOfBytesToMap,
|
||||
void *opt_lpDesiredBaseAddress) {
|
||||
void *pStartingAddress;
|
||||
pStartingAddress = __imp_MapViewOfFileEx(
|
||||
hFileMappingObject, dwDesiredAccess, dwFileOffsetHigh, dwFileOffsetLow,
|
||||
dwNumberOfBytesToMap, opt_lpDesiredBaseAddress);
|
||||
if (!pStartingAddress) __winerr();
|
||||
STRACE("MapViewOfFileEx(%ld, %s, off:%'ld, size:%'zu, %p) → %p% m",
|
||||
hFileMappingObject, DescribeNtFileMapFlags(dwDesiredAccess),
|
||||
(uint64_t)dwFileOffsetHigh << 32 | dwFileOffsetLow,
|
||||
dwNumberOfBytesToMap, opt_lpDesiredBaseAddress, pStartingAddress);
|
||||
return pStartingAddress;
|
||||
}
|
||||
|
|
@ -19,6 +19,7 @@
|
|||
#include "libc/assert.h"
|
||||
#include "libc/calls/internal.h"
|
||||
#include "libc/calls/strace.internal.h"
|
||||
#include "libc/dce.h"
|
||||
#include "libc/intrin/describeflags.internal.h"
|
||||
#include "libc/nt/enum/filemapflags.h"
|
||||
#include "libc/nt/memory.h"
|
||||
|
|
@ -34,11 +35,13 @@ extern typeof(MapViewOfFileExNuma) *const __imp_MapViewOfFileExNuma __msabi;
|
|||
* @return base address, or NULL on failure
|
||||
* @note this wrapper takes care of ABI, STRACE(), and __winerr()
|
||||
*/
|
||||
void *MapViewOfFileExNuma(int64_t hFileMappingObject, uint32_t dwDesiredAccess,
|
||||
uint32_t dwFileOffsetHigh, uint32_t dwFileOffsetLow,
|
||||
size_t dwNumberOfBytesToMap,
|
||||
void *opt_lpDesiredBaseAddress,
|
||||
uint32_t nndDesiredNumaNode) {
|
||||
textwindows void *MapViewOfFileExNuma(int64_t hFileMappingObject,
|
||||
uint32_t dwDesiredAccess,
|
||||
uint32_t dwFileOffsetHigh,
|
||||
uint32_t dwFileOffsetLow,
|
||||
size_t dwNumberOfBytesToMap,
|
||||
void *opt_lpDesiredBaseAddress,
|
||||
uint32_t nndDesiredNumaNode) {
|
||||
void *pStartingAddress;
|
||||
pStartingAddress = __imp_MapViewOfFileExNuma(
|
||||
hFileMappingObject, dwDesiredAccess, dwFileOffsetHigh, dwFileOffsetLow,
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue