mirrors/cosmopolitan
1
0
Fork 0
mirror of https://github.com/jart/cosmopolitan.git synced 2025-06-03 03:02:28 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Get rid of some legacy code

Browse source
This commit is contained in:
Justine Tunney 2024-08-24 17:53:30 -07:00
parent 37ca1badaf
commit 38cc4b3c68
No known key found for this signature in database
GPG key ID: BE714B4575D6E328
27 changed files with 123 additions and 600 deletions
Download patch file Download diff file Expand all files Collapse all files

29
libc/x/utf16to8.c
View file

@ -17,21 +17,13 @@
│ PERFORMANCE OF THIS SOFTWARE. │
╚─────────────────────────────────────────────────────────────────────────────*/
#include "libc/intrin/bsr.h"
#include "libc/intrin/packsswb.h"
#include "libc/intrin/pandn.h"
#include "libc/intrin/pcmpgtb.h"
#include "libc/intrin/pcmpgtw.h"
#include "libc/intrin/pmovmskb.h"
#include "libc/intrin/punpckhbw.h"
#include "libc/intrin/punpcklbw.h"
#include "libc/mem/mem.h"
#include "libc/serialize.h"
#include "libc/str/str.h"
#include "libc/str/thompike.h"
#include "libc/str/utf16.h"
#include "libc/x/x.h"
static const int16_t kDel16[8] = {127, 127, 127, 127, 127, 127, 127, 127};
#include "third_party/intel/emmintrin.internal.h"
/**
* Transcodes UTF-16 to UTF-8.
@ -45,28 +37,27 @@ char *utf16to8(const char16_t *p, size_t n, size_t *z) {
char *r, *q;
wint_t x, y;
const char16_t *e;
int16_t v1[8], v2[8], v3[8], vz[8];
if (z)
*z = 0;
if (n == -1)
n = p ? strlen16(p) : 0;
if ((q = r = malloc(n * 4 + 8 + 1))) {
for (e = p + n; p < e;) {
if (p + 8 < e) { /* 17x ascii */
bzero(vz, 16);
#if defined(__x86_64__)
if (p + 8 < e) {
do {
memcpy(v1, p, 16);
pcmpgtw(v2, v1, vz);
pcmpgtw(v3, v1, kDel16);
pandn((void *)v2, (void *)v3, (void *)v2);
if (pmovmskb((void *)v2) != 0xFFFF)
__m128i v1 = _mm_loadu_si128((__m128i *)p);
__m128i v2 = _mm_cmpgt_epi16(v1, _mm_setzero_si128());
__m128i v3 = _mm_cmpgt_epi16(v1, _mm_set1_epi16(127));
v2 = _mm_andnot_si128(v3, v2);
if (_mm_movemask_epi8(v2) != 0xFFFF)
break;
packsswb((void *)v1, v1, v1);
memcpy(q, v1, 8);
_mm_storel_epi64((__m128i *)q, _mm_packs_epi16(v1, v1));
p += 8;
q += 8;
} while (p + 8 < e);
}
#endif
x = *p++ & 0xffff;
if (!IsUcs2(x)) {
if (p < e) {

40
libc/x/utf8to32.c
View file

@ -16,18 +16,12 @@
│ TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR │
│ PERFORMANCE OF THIS SOFTWARE. │
╚─────────────────────────────────────────────────────────────────────────────*/
#include "libc/intrin/likely.h"
#include "libc/intrin/pcmpgtb.h"
#include "libc/intrin/pmovmskb.h"
#include "libc/intrin/punpckhbw.h"
#include "libc/intrin/punpckhwd.h"
#include "libc/intrin/punpcklbw.h"
#include "libc/intrin/punpcklwd.h"
#include "libc/mem/mem.h"
#include "libc/str/str.h"
#include "libc/str/thompike.h"
#include "libc/str/utf16.h"
#include "libc/x/x.h"
#include "third_party/intel/emmintrin.internal.h"
/**
* Transcodes UTF-8 to UTF-32.
@ -41,35 +35,35 @@ wchar_t *utf8to32(const char *p, size_t n, size_t *z) {
unsigned m, j;
wint_t x, a, b;
wchar_t *r, *q;
uint8_t v1[16], v2[16], v3[16], v4[16], vz[16];
if (z)
*z = 0;
if (n == -1)
n = p ? strlen(p) : 0;
if ((q = r = malloc(n * sizeof(wchar_t) + sizeof(wchar_t)))) {
for (i = 0; i < n;) {
#ifdef __x86_64__
if (!((uintptr_t)(p + i) & 15) && i + 16 < n) {
/* 10x speedup for ascii */
bzero(vz, 16);
do {
memcpy(v1, p + i, 16);
pcmpgtb((int8_t *)v2, (int8_t *)v1, (int8_t *)vz);
if (pmovmskb(v2) != 0xFFFF)
__m128i v1, v2, v3, v4;
v1 = _mm_loadu_si128((__m128i *)(p + i));
v2 = _mm_cmpgt_epi8(v1, _mm_setzero_si128());
if (_mm_movemask_epi8(v2) != 0xFFFF)
break;
punpcklbw(v3, v1, vz);
punpckhbw(v1, v1, vz);
punpcklwd((void *)v4, (void *)v3, (void *)vz);
punpckhwd((void *)v3, (void *)v3, (void *)vz);
punpcklwd((void *)v2, (void *)v1, (void *)vz);
punpckhwd((void *)v1, (void *)v1, (void *)vz);
memcpy(q + 0, v4, 16);
memcpy(q + 4, v3, 16);
memcpy(q + 8, v2, 16);
memcpy(q + 12, v1, 16);
v3 = _mm_unpacklo_epi8(v1, _mm_setzero_si128());
v1 = _mm_unpackhi_epi8(v1, _mm_setzero_si128());
v4 = _mm_unpacklo_epi16(v3, _mm_setzero_si128());
v3 = _mm_unpackhi_epi16(v3, _mm_setzero_si128());
v2 = _mm_unpacklo_epi16(v1, _mm_setzero_si128());
v1 = _mm_unpackhi_epi16(v1, _mm_setzero_si128());
_mm_storeu_si128((__m128i *)(q + 0), v4);
_mm_storeu_si128((__m128i *)(q + 4), v3);
_mm_storeu_si128((__m128i *)(q + 8), v2);
_mm_storeu_si128((__m128i *)(q + 12), v1);
i += 16;
q += 16;
} while (i + 16 < n);
}
#endif
x = p[i++] & 0xff;
if (x >= 0300) {
a = ThomPikeByte(x);