05d292b2 (kx 2023-03-24 03:51:10 +0300 1)
05d292b2 (kx 2023-03-24 03:51:10 +0300 2) #ifdef HAVE_CONFIG_H
05d292b2 (kx 2023-03-24 03:51:10 +0300 3) #include <config.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 4) #endif
05d292b2 (kx 2023-03-24 03:51:10 +0300 5)
05d292b2 (kx 2023-03-24 03:51:10 +0300 6) #include <stdlib.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 7) #include <stdio.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 8) #include <sys/sysinfo.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 9) #include <sys/types.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 10) #include <stdint.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 11) #include <dirent.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 12) #include <sys/stat.h> /* chmod(2) */
05d292b2 (kx 2023-03-24 03:51:10 +0300 13) #include <sys/file.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 14) #include <sys/mman.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 15) #include <fcntl.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 16) #include <limits.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 17) #include <string.h> /* strdup(3) */
05d292b2 (kx 2023-03-24 03:51:10 +0300 18) #include <libgen.h> /* basename(3) */
05d292b2 (kx 2023-03-24 03:51:10 +0300 19) #include <ctype.h> /* tolower(3) */
05d292b2 (kx 2023-03-24 03:51:10 +0300 20) #include <errno.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 21) #include <time.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 22) #include <sys/time.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 23) #include <pwd.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 24) #include <grp.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 25) #include <stdarg.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 26) #include <unistd.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 27)
05d292b2 (kx 2023-03-24 03:51:10 +0300 28) #define PCRE2_CODE_UNIT_WIDTH 8
05d292b2 (kx 2023-03-24 03:51:10 +0300 29) #include <pcre2.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 30)
05d292b2 (kx 2023-03-24 03:51:10 +0300 31) #include <nls.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 32)
05d292b2 (kx 2023-03-24 03:51:10 +0300 33) #include <defs.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 34) #include <wrapper.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 35) #include <strbuf.h>
05d292b2 (kx 2023-03-24 03:51:10 +0300 36)
05d292b2 (kx 2023-03-24 03:51:10 +0300 37)
05d292b2 (kx 2023-03-24 03:51:10 +0300 38) struct symbol *strbuf_envtab = (struct symbol *)0;
05d292b2 (kx 2023-03-24 03:51:10 +0300 39)
05d292b2 (kx 2023-03-24 03:51:10 +0300 40) struct symbol *envtab_install( struct symbol **sym, const char *n, const char *v, envtab_error fatal )
05d292b2 (kx 2023-03-24 03:51:10 +0300 41) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 42) struct symbol *ep = NULL;
05d292b2 (kx 2023-03-24 03:51:10 +0300 43) size_t len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 44)
05d292b2 (kx 2023-03-24 03:51:10 +0300 45) if( !sym || !n || !v || !fatal )
05d292b2 (kx 2023-03-24 03:51:10 +0300 46) return (struct symbol *)NULL;
05d292b2 (kx 2023-03-24 03:51:10 +0300 47)
05d292b2 (kx 2023-03-24 03:51:10 +0300 48) ep = (struct symbol *)malloc( sizeof(struct symbol) );
05d292b2 (kx 2023-03-24 03:51:10 +0300 49) if( !ep )
05d292b2 (kx 2023-03-24 03:51:10 +0300 50) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 51) fatal( "cannot allocate memory for symbol '%s'", n );
05d292b2 (kx 2023-03-24 03:51:10 +0300 52) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 53) bzero( (void *)ep, sizeof(struct symbol) );
05d292b2 (kx 2023-03-24 03:51:10 +0300 54)
05d292b2 (kx 2023-03-24 03:51:10 +0300 55) len = strlen( n ) + 1;
05d292b2 (kx 2023-03-24 03:51:10 +0300 56) ep->name = (char *)malloc( len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 57) if( !ep->name )
05d292b2 (kx 2023-03-24 03:51:10 +0300 58) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 59) fatal( "cannot allocate memory for symbol name '%s'", n );
05d292b2 (kx 2023-03-24 03:51:10 +0300 60) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 61) bzero( (void *)ep->name, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 62) strncpy( ep->name, n, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 63)
05d292b2 (kx 2023-03-24 03:51:10 +0300 64) len = strlen( v ) + 1;
05d292b2 (kx 2023-03-24 03:51:10 +0300 65) ep->value = (char *)malloc( len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 66) if( !ep->value )
05d292b2 (kx 2023-03-24 03:51:10 +0300 67) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 68) fatal( "cannot allocate memory for symbol value '%s'", v );
05d292b2 (kx 2023-03-24 03:51:10 +0300 69) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 70) bzero( (void *)ep->value, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 71) strncpy( ep->value, v, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 72)
05d292b2 (kx 2023-03-24 03:51:10 +0300 73) ep->next = *sym;
05d292b2 (kx 2023-03-24 03:51:10 +0300 74) *sym = ep;
05d292b2 (kx 2023-03-24 03:51:10 +0300 75)
05d292b2 (kx 2023-03-24 03:51:10 +0300 76) return ep;
05d292b2 (kx 2023-03-24 03:51:10 +0300 77) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 78)
05d292b2 (kx 2023-03-24 03:51:10 +0300 79) struct symbol *envtab_lookup( struct symbol **sym, const char *n )
05d292b2 (kx 2023-03-24 03:51:10 +0300 80) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 81) struct symbol *ep = NULL;
05d292b2 (kx 2023-03-24 03:51:10 +0300 82)
05d292b2 (kx 2023-03-24 03:51:10 +0300 83) if( !sym || !n )
05d292b2 (kx 2023-03-24 03:51:10 +0300 84) return (struct symbol *)NULL;
05d292b2 (kx 2023-03-24 03:51:10 +0300 85)
05d292b2 (kx 2023-03-24 03:51:10 +0300 86) for( ep = *sym; ep != (struct symbol *)0; ep = ep->next )
05d292b2 (kx 2023-03-24 03:51:10 +0300 87) if( strcmp( ep->name, n ) == 0 ) return( ep );
05d292b2 (kx 2023-03-24 03:51:10 +0300 88)
05d292b2 (kx 2023-03-24 03:51:10 +0300 89) return (struct symbol *)NULL;
05d292b2 (kx 2023-03-24 03:51:10 +0300 90) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 91)
05d292b2 (kx 2023-03-24 03:51:10 +0300 92) void envtab_release( struct symbol **sym )
05d292b2 (kx 2023-03-24 03:51:10 +0300 93) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 94) struct symbol *tab = *sym;
05d292b2 (kx 2023-03-24 03:51:10 +0300 95)
05d292b2 (kx 2023-03-24 03:51:10 +0300 96) while( tab )
05d292b2 (kx 2023-03-24 03:51:10 +0300 97) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 98) struct symbol *ep = tab;
05d292b2 (kx 2023-03-24 03:51:10 +0300 99) tab = ep->next;
05d292b2 (kx 2023-03-24 03:51:10 +0300 100) if( ep->name ) free( ep->name );
05d292b2 (kx 2023-03-24 03:51:10 +0300 101) if( ep->value ) free( ep->value );
05d292b2 (kx 2023-03-24 03:51:10 +0300 102) free( ep );
05d292b2 (kx 2023-03-24 03:51:10 +0300 103) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 104) *sym = (struct symbol *)NULL;
05d292b2 (kx 2023-03-24 03:51:10 +0300 105) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 106)
05d292b2 (kx 2023-03-24 03:51:10 +0300 107)
05d292b2 (kx 2023-03-24 03:51:10 +0300 108) #define STRBUF_ERRMSG_SIZE 4096
05d292b2 (kx 2023-03-24 03:51:10 +0300 109)
05d292b2 (kx 2023-03-24 03:51:10 +0300 110) void strbuf_fatal( const char *fmt, ... )
05d292b2 (kx 2023-03-24 03:51:10 +0300 111) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 112) va_list arg_ptr;
05d292b2 (kx 2023-03-24 03:51:10 +0300 113) char buf[STRBUF_ERRMSG_SIZE];
05d292b2 (kx 2023-03-24 03:51:10 +0300 114) char msg[STRBUF_ERRMSG_SIZE];
05d292b2 (kx 2023-03-24 03:51:10 +0300 115) char *format = "%s: %s\n";
05d292b2 (kx 2023-03-24 03:51:10 +0300 116)
05d292b2 (kx 2023-03-24 03:51:10 +0300 117) va_start( arg_ptr, fmt );
05d292b2 (kx 2023-03-24 03:51:10 +0300 118)
05d292b2 (kx 2023-03-24 03:51:10 +0300 119) vsnprintf( msg, STRBUF_ERRMSG_SIZE, (const void *)fmt, arg_ptr );
05d292b2 (kx 2023-03-24 03:51:10 +0300 120)
05d292b2 (kx 2023-03-24 03:51:10 +0300 121) va_end( arg_ptr ); /* Reset variable arguments. */
05d292b2 (kx 2023-03-24 03:51:10 +0300 122)
05d292b2 (kx 2023-03-24 03:51:10 +0300 123) snprintf( buf, STRBUF_ERRMSG_SIZE, format, "strbuf", msg );
05d292b2 (kx 2023-03-24 03:51:10 +0300 124)
05d292b2 (kx 2023-03-24 03:51:10 +0300 125) (void)write( STDERR_FILENO, buf, strlen( buf ) );
05d292b2 (kx 2023-03-24 03:51:10 +0300 126)
05d292b2 (kx 2023-03-24 03:51:10 +0300 127) exit( 1 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 128) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 129)
05d292b2 (kx 2023-03-24 03:51:10 +0300 130) char strbuf_slopbuf[1];
05d292b2 (kx 2023-03-24 03:51:10 +0300 131)
05d292b2 (kx 2023-03-24 03:51:10 +0300 132) #define alloc_nz(x) (((x)+16)*3/2)
05d292b2 (kx 2023-03-24 03:51:10 +0300 133)
05d292b2 (kx 2023-03-24 03:51:10 +0300 134) static void alloc_grow( struct strbuf *sb, size_t size )
05d292b2 (kx 2023-03-24 03:51:10 +0300 135) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 136) if( size > sb->alloc )
05d292b2 (kx 2023-03-24 03:51:10 +0300 137) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 138) if( alloc_nz(sb->alloc) < (size) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 139) sb->alloc = size;
05d292b2 (kx 2023-03-24 03:51:10 +0300 140) else
05d292b2 (kx 2023-03-24 03:51:10 +0300 141) sb->alloc = alloc_nz(sb->alloc);
05d292b2 (kx 2023-03-24 03:51:10 +0300 142)
05d292b2 (kx 2023-03-24 03:51:10 +0300 143) sb->buf = xrealloc( (void *)sb->buf, sb->alloc );
05d292b2 (kx 2023-03-24 03:51:10 +0300 144) memset( (void *)(sb->buf + sb->len), 0, (size_t)(sb->alloc - sb->len) );
05d292b2 (kx 2023-03-24 03:51:10 +0300 145) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 146) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 147)
05d292b2 (kx 2023-03-24 03:51:10 +0300 148) void strbuf_grow( struct strbuf *sb, size_t extra )
05d292b2 (kx 2023-03-24 03:51:10 +0300 149) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 150) int new_buf = !sb->alloc;
05d292b2 (kx 2023-03-24 03:51:10 +0300 151)
05d292b2 (kx 2023-03-24 03:51:10 +0300 152) if( new_buf )
05d292b2 (kx 2023-03-24 03:51:10 +0300 153) sb->buf = NULL;
05d292b2 (kx 2023-03-24 03:51:10 +0300 154)
05d292b2 (kx 2023-03-24 03:51:10 +0300 155) alloc_grow( sb, sb->len + extra + 1 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 156)
05d292b2 (kx 2023-03-24 03:51:10 +0300 157) if( new_buf )
05d292b2 (kx 2023-03-24 03:51:10 +0300 158) sb->buf[0] = '\0';
05d292b2 (kx 2023-03-24 03:51:10 +0300 159) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 160)
05d292b2 (kx 2023-03-24 03:51:10 +0300 161) /*
05d292b2 (kx 2023-03-24 03:51:10 +0300 162) Функцию strbuf_init() надо вызывать в том случае, когда необходимо
05d292b2 (kx 2023-03-24 03:51:10 +0300 163) задать внешнюю функцию обработки фатальной ошибки. Функция обработки
05d292b2 (kx 2023-03-24 03:51:10 +0300 164) фатальной ошибки, в отличие от стандартной, может выводить как JSON
05d292b2 (kx 2023-03-24 03:51:10 +0300 165) ответы, так и файлы 404.html, 50x.html, используя собственный буфер.
05d292b2 (kx 2023-03-24 03:51:10 +0300 166) */
05d292b2 (kx 2023-03-24 03:51:10 +0300 167) void strbuf_init( struct strbuf *sb, strbuf_error fatal, size_t hint )
05d292b2 (kx 2023-03-24 03:51:10 +0300 168) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 169) sb->alloc = sb->len = 0;
05d292b2 (kx 2023-03-24 03:51:10 +0300 170) sb->fatal = strbuf_fatal;
05d292b2 (kx 2023-03-24 03:51:10 +0300 171) sb->buf = strbuf_slopbuf;
05d292b2 (kx 2023-03-24 03:51:10 +0300 172)
05d292b2 (kx 2023-03-24 03:51:10 +0300 173) if( fatal )
05d292b2 (kx 2023-03-24 03:51:10 +0300 174) sb->fatal = fatal;
05d292b2 (kx 2023-03-24 03:51:10 +0300 175)
05d292b2 (kx 2023-03-24 03:51:10 +0300 176) if( hint )
05d292b2 (kx 2023-03-24 03:51:10 +0300 177) strbuf_grow( sb, hint );
05d292b2 (kx 2023-03-24 03:51:10 +0300 178) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 179)
05d292b2 (kx 2023-03-24 03:51:10 +0300 180) void strbuf_release( struct strbuf *sb )
05d292b2 (kx 2023-03-24 03:51:10 +0300 181) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 182) if( sb->alloc )
05d292b2 (kx 2023-03-24 03:51:10 +0300 183) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 184) free( sb->buf );
05d292b2 (kx 2023-03-24 03:51:10 +0300 185) strbuf_init( sb, (strbuf_error)0, 0 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 186) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 187) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 188)
05d292b2 (kx 2023-03-24 03:51:10 +0300 189) char *strbuf_detach( struct strbuf *sb, size_t *sz )
05d292b2 (kx 2023-03-24 03:51:10 +0300 190) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 191) char *ret;
05d292b2 (kx 2023-03-24 03:51:10 +0300 192) strbuf_grow( sb, 0 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 193) ret = sb->buf;
05d292b2 (kx 2023-03-24 03:51:10 +0300 194) if( sz )
05d292b2 (kx 2023-03-24 03:51:10 +0300 195) *sz = sb->len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 196) strbuf_init( sb, sb->fatal, 0 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 197) return ret;
05d292b2 (kx 2023-03-24 03:51:10 +0300 198) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 199)
05d292b2 (kx 2023-03-24 03:51:10 +0300 200) void strbuf_attach( struct strbuf *sb, void *buf, size_t len, size_t alloc )
05d292b2 (kx 2023-03-24 03:51:10 +0300 201) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 202) strbuf_release( sb );
05d292b2 (kx 2023-03-24 03:51:10 +0300 203) sb->buf = buf;
05d292b2 (kx 2023-03-24 03:51:10 +0300 204) sb->len = len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 205) sb->alloc = alloc;
05d292b2 (kx 2023-03-24 03:51:10 +0300 206) strbuf_grow( sb, 0 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 207) sb->buf[sb->len] = '\0';
05d292b2 (kx 2023-03-24 03:51:10 +0300 208) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 209)
05d292b2 (kx 2023-03-24 03:51:10 +0300 210) void strbuf_ltrim( struct strbuf *sb )
05d292b2 (kx 2023-03-24 03:51:10 +0300 211) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 212) char *b = sb->buf;
05d292b2 (kx 2023-03-24 03:51:10 +0300 213) while( sb->len > 0 && isspace(*b) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 214) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 215) b++;
05d292b2 (kx 2023-03-24 03:51:10 +0300 216) sb->len--;
05d292b2 (kx 2023-03-24 03:51:10 +0300 217) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 218) memmove( sb->buf, b, sb->len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 219) sb->buf[sb->len] = '\0';
05d292b2 (kx 2023-03-24 03:51:10 +0300 220) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 221)
05d292b2 (kx 2023-03-24 03:51:10 +0300 222) void strbuf_rtrim( struct strbuf *sb )
05d292b2 (kx 2023-03-24 03:51:10 +0300 223) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 224) while( sb->len > 0 && isspace((unsigned char)sb->buf[sb->len - 1]) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 225) sb->len--;
05d292b2 (kx 2023-03-24 03:51:10 +0300 226) sb->buf[sb->len] = '\0';
05d292b2 (kx 2023-03-24 03:51:10 +0300 227) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 228)
05d292b2 (kx 2023-03-24 03:51:10 +0300 229) void strbuf_trim( struct strbuf *sb )
05d292b2 (kx 2023-03-24 03:51:10 +0300 230) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 231) strbuf_rtrim( sb );
05d292b2 (kx 2023-03-24 03:51:10 +0300 232) strbuf_ltrim( sb );
05d292b2 (kx 2023-03-24 03:51:10 +0300 233) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 234)
05d292b2 (kx 2023-03-24 03:51:10 +0300 235)
05d292b2 (kx 2023-03-24 03:51:10 +0300 236) void strbuf_trim_trailing_dir_sep( struct strbuf *sb )
05d292b2 (kx 2023-03-24 03:51:10 +0300 237) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 238) while( sb->len > 0 && is_dir_sep((unsigned char)sb->buf[sb->len - 1]) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 239) sb->len--;
05d292b2 (kx 2023-03-24 03:51:10 +0300 240) sb->buf[sb->len] = '\0';
05d292b2 (kx 2023-03-24 03:51:10 +0300 241) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 242)
05d292b2 (kx 2023-03-24 03:51:10 +0300 243) void strbuf_trim_trailing_newline( struct strbuf *sb )
05d292b2 (kx 2023-03-24 03:51:10 +0300 244) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 245) if( sb->len > 0 && sb->buf[sb->len - 1] == '\n' )
05d292b2 (kx 2023-03-24 03:51:10 +0300 246) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 247) if( --sb->len > 0 && sb->buf[sb->len - 1] == '\r' )
05d292b2 (kx 2023-03-24 03:51:10 +0300 248) --sb->len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 249) sb->buf[sb->len] = '\0';
05d292b2 (kx 2023-03-24 03:51:10 +0300 250) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 251) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 252)
05d292b2 (kx 2023-03-24 03:51:10 +0300 253) int strbuf_cmp( const struct strbuf *a, const struct strbuf *b )
05d292b2 (kx 2023-03-24 03:51:10 +0300 254) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 255) size_t len = a->len < b->len ? a->len: b->len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 256) int cmp = memcmp( a->buf, b->buf, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 257) if( cmp )
05d292b2 (kx 2023-03-24 03:51:10 +0300 258) return cmp;
05d292b2 (kx 2023-03-24 03:51:10 +0300 259) return a->len < b->len ? -1: a->len != b->len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 260) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 261)
05d292b2 (kx 2023-03-24 03:51:10 +0300 262)
05d292b2 (kx 2023-03-24 03:51:10 +0300 263) /* Adding data to the buffer */
05d292b2 (kx 2023-03-24 03:51:10 +0300 264)
05d292b2 (kx 2023-03-24 03:51:10 +0300 265) void strbuf_add( struct strbuf *sb, const void *data, size_t len )
05d292b2 (kx 2023-03-24 03:51:10 +0300 266) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 267) strbuf_grow( sb, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 268) memcpy( sb->buf + sb->len, data, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 269) strbuf_setlen( sb, sb->len + len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 270) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 271)
05d292b2 (kx 2023-03-24 03:51:10 +0300 272) void strbuf_addbuf( struct strbuf *sb, const struct strbuf *sb2 )
05d292b2 (kx 2023-03-24 03:51:10 +0300 273) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 274) strbuf_grow( sb, sb2->len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 275) memcpy( sb->buf + sb->len, sb2->buf, sb2->len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 276) strbuf_setlen( sb, sb->len + sb2->len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 277) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 278)
05d292b2 (kx 2023-03-24 03:51:10 +0300 279) void strbuf_addbuf_percentquote( struct strbuf *dst, const struct strbuf *src )
05d292b2 (kx 2023-03-24 03:51:10 +0300 280) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 281) size_t i, len = src->len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 282)
05d292b2 (kx 2023-03-24 03:51:10 +0300 283) for (i = 0; i < len; i++) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 284) if( src->buf[i] == '%' )
05d292b2 (kx 2023-03-24 03:51:10 +0300 285) strbuf_addch( dst, '%' );
05d292b2 (kx 2023-03-24 03:51:10 +0300 286) strbuf_addch( dst, src->buf[i] );
05d292b2 (kx 2023-03-24 03:51:10 +0300 287) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 288) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 289)
05d292b2 (kx 2023-03-24 03:51:10 +0300 290) void strbuf_addchars( struct strbuf *sb, int c, size_t n )
05d292b2 (kx 2023-03-24 03:51:10 +0300 291) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 292) strbuf_grow( sb, n );
05d292b2 (kx 2023-03-24 03:51:10 +0300 293) memset( sb->buf + sb->len, c, n );
05d292b2 (kx 2023-03-24 03:51:10 +0300 294) strbuf_setlen( sb, sb->len + n );
05d292b2 (kx 2023-03-24 03:51:10 +0300 295) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 296)
05d292b2 (kx 2023-03-24 03:51:10 +0300 297) void strbuf_vaddf( struct strbuf *sb, const char *fmt, va_list ap )
05d292b2 (kx 2023-03-24 03:51:10 +0300 298) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 299) int len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 300) va_list cp;
05d292b2 (kx 2023-03-24 03:51:10 +0300 301)
05d292b2 (kx 2023-03-24 03:51:10 +0300 302) if( !strbuf_avail( sb ) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 303) strbuf_grow( sb, 64 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 304) va_copy( cp, ap );
05d292b2 (kx 2023-03-24 03:51:10 +0300 305) len = vsnprintf( sb->buf + sb->len, sb->alloc - sb->len, fmt, cp );
05d292b2 (kx 2023-03-24 03:51:10 +0300 306) va_end( cp );
05d292b2 (kx 2023-03-24 03:51:10 +0300 307) if( len < 0 )
05d292b2 (kx 2023-03-24 03:51:10 +0300 308) sb->fatal( "your vsnprintf is broken (returned %d)", len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 309) if( len > strbuf_avail( sb ) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 310) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 311) strbuf_grow( sb, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 312) len = vsnprintf( sb->buf + sb->len, sb->alloc - sb->len, fmt, ap );
05d292b2 (kx 2023-03-24 03:51:10 +0300 313) if( len > strbuf_avail( sb ) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 314) sb->fatal( "your vsnprintf is broken (insatiable)" );
05d292b2 (kx 2023-03-24 03:51:10 +0300 315) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 316) strbuf_setlen( sb, sb->len + len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 317) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 318)
05d292b2 (kx 2023-03-24 03:51:10 +0300 319) void strbuf_addf( struct strbuf *sb, const char *fmt, ... )
05d292b2 (kx 2023-03-24 03:51:10 +0300 320) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 321) va_list ap;
05d292b2 (kx 2023-03-24 03:51:10 +0300 322) va_start( ap, fmt );
05d292b2 (kx 2023-03-24 03:51:10 +0300 323) strbuf_vaddf( sb, fmt, ap );
05d292b2 (kx 2023-03-24 03:51:10 +0300 324) va_end( ap );
05d292b2 (kx 2023-03-24 03:51:10 +0300 325) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 326)
05d292b2 (kx 2023-03-24 03:51:10 +0300 327)
05d292b2 (kx 2023-03-24 03:51:10 +0300 328) size_t strbuf_fread( struct strbuf *sb, FILE *fp )
05d292b2 (kx 2023-03-24 03:51:10 +0300 329) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 330) size_t ret, nb = 64, read = 0;
05d292b2 (kx 2023-03-24 03:51:10 +0300 331) size_t oldalloc = sb->alloc;
05d292b2 (kx 2023-03-24 03:51:10 +0300 332)
05d292b2 (kx 2023-03-24 03:51:10 +0300 333) if( !sb || !fp ) return read;
05d292b2 (kx 2023-03-24 03:51:10 +0300 334)
05d292b2 (kx 2023-03-24 03:51:10 +0300 335) do
05d292b2 (kx 2023-03-24 03:51:10 +0300 336) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 337) strbuf_grow( sb, nb );
05d292b2 (kx 2023-03-24 03:51:10 +0300 338) ret = fread( sb->buf + sb->len, 1, nb, fp );
05d292b2 (kx 2023-03-24 03:51:10 +0300 339) if( ret > 0 )
05d292b2 (kx 2023-03-24 03:51:10 +0300 340) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 341) strbuf_setlen( sb, sb->len + ret );
05d292b2 (kx 2023-03-24 03:51:10 +0300 342) read += ret;
05d292b2 (kx 2023-03-24 03:51:10 +0300 343) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 344) else if( oldalloc == 0 )
05d292b2 (kx 2023-03-24 03:51:10 +0300 345) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 346) strbuf_release( sb );
05d292b2 (kx 2023-03-24 03:51:10 +0300 347) return ret;
05d292b2 (kx 2023-03-24 03:51:10 +0300 348) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 349)
05d292b2 (kx 2023-03-24 03:51:10 +0300 350) } while( ret == nb );
05d292b2 (kx 2023-03-24 03:51:10 +0300 351)
05d292b2 (kx 2023-03-24 03:51:10 +0300 352) return read;
05d292b2 (kx 2023-03-24 03:51:10 +0300 353) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 354)
05d292b2 (kx 2023-03-24 03:51:10 +0300 355)
05d292b2 (kx 2023-03-24 03:51:10 +0300 356) #define NAMELEN_MAX 128
05d292b2 (kx 2023-03-24 03:51:10 +0300 357)
05d292b2 (kx 2023-03-24 03:51:10 +0300 358) size_t strbuf_env_fread( struct strbuf *sb, FILE *fp )
05d292b2 (kx 2023-03-24 03:51:10 +0300 359) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 360) size_t read = 0;
05d292b2 (kx 2023-03-24 03:51:10 +0300 361) char *ln, line[STRBUF_MAXLINE], retline[STRBUF_MAXLINE];
05d292b2 (kx 2023-03-24 03:51:10 +0300 362)
05d292b2 (kx 2023-03-24 03:51:10 +0300 363) if( !sb || !fp ) return read;
05d292b2 (kx 2023-03-24 03:51:10 +0300 364)
05d292b2 (kx 2023-03-24 03:51:10 +0300 365) bzero( (void *)line, STRBUF_MAXLINE );
05d292b2 (kx 2023-03-24 03:51:10 +0300 366) bzero( (void *)retline, STRBUF_MAXLINE );
05d292b2 (kx 2023-03-24 03:51:10 +0300 367)
05d292b2 (kx 2023-03-24 03:51:10 +0300 368) while( (ln = fgets( line, STRBUF_MAXLINE, fp )) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 369) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 370) char *start = NULL, *stop = NULL;
05d292b2 (kx 2023-03-24 03:51:10 +0300 371) char *sp = ln;
05d292b2 (kx 2023-03-24 03:51:10 +0300 372)
05d292b2 (kx 2023-03-24 03:51:10 +0300 373) if( (start = strstr( sp, "${" )) && (stop = strstr( sp, "}" )) && ((stop - start) > 1) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 374) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 375) struct symbol *sym = NULL;
05d292b2 (kx 2023-03-24 03:51:10 +0300 376) char *lp = retline;
05d292b2 (kx 2023-03-24 03:51:10 +0300 377)
05d292b2 (kx 2023-03-24 03:51:10 +0300 378) do
05d292b2 (kx 2023-03-24 03:51:10 +0300 379) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 380) /* may be multiple variables on a single line: */
05d292b2 (kx 2023-03-24 03:51:10 +0300 381)
05d292b2 (kx 2023-03-24 03:51:10 +0300 382) *start = '\0'; *stop++ = '\0';
05d292b2 (kx 2023-03-24 03:51:10 +0300 383) if( (sym = envtab_lookup( &strbuf_envtab, start+2 )) && sym->value && sym->value[0] )
05d292b2 (kx 2023-03-24 03:51:10 +0300 384) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 385) strncpy( lp, (const char *)sp, (size_t)(start - sp + 1) );
05d292b2 (kx 2023-03-24 03:51:10 +0300 386) lp += (start - sp);
05d292b2 (kx 2023-03-24 03:51:10 +0300 387) strcpy( lp, (const char *)sym->value );
05d292b2 (kx 2023-03-24 03:51:10 +0300 388) lp += strlen( sym->value );
05d292b2 (kx 2023-03-24 03:51:10 +0300 389) strcpy( lp, (const char *)stop );
05d292b2 (kx 2023-03-24 03:51:10 +0300 390) sp = stop;
05d292b2 (kx 2023-03-24 03:51:10 +0300 391) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 392) else
05d292b2 (kx 2023-03-24 03:51:10 +0300 393) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 394) strncpy( lp, (const char *)sp, (size_t)(start - sp + 1) );
05d292b2 (kx 2023-03-24 03:51:10 +0300 395) lp += (start - sp);
05d292b2 (kx 2023-03-24 03:51:10 +0300 396) strcpy( lp, (const char *)stop );
05d292b2 (kx 2023-03-24 03:51:10 +0300 397) sp = stop;
05d292b2 (kx 2023-03-24 03:51:10 +0300 398) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 399)
05d292b2 (kx 2023-03-24 03:51:10 +0300 400) } while( (start = strstr( sp, "${" )) && (stop = strstr( sp, "}" )) && ((stop - start) > 1) );
05d292b2 (kx 2023-03-24 03:51:10 +0300 401)
05d292b2 (kx 2023-03-24 03:51:10 +0300 402) strbuf_addstr( sb, retline );
05d292b2 (kx 2023-03-24 03:51:10 +0300 403) read += strlen( retline );;
05d292b2 (kx 2023-03-24 03:51:10 +0300 404) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 405) else
05d292b2 (kx 2023-03-24 03:51:10 +0300 406) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 407) strbuf_addstr( sb, line );
05d292b2 (kx 2023-03-24 03:51:10 +0300 408) read += strlen( line );;
05d292b2 (kx 2023-03-24 03:51:10 +0300 409) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 410)
05d292b2 (kx 2023-03-24 03:51:10 +0300 411) } /* End of while( ln ) */
05d292b2 (kx 2023-03-24 03:51:10 +0300 412)
05d292b2 (kx 2023-03-24 03:51:10 +0300 413) return read;
05d292b2 (kx 2023-03-24 03:51:10 +0300 414) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 415)
05d292b2 (kx 2023-03-24 03:51:10 +0300 416) ssize_t strbuf_read( struct strbuf *sb, int fd, size_t hint )
05d292b2 (kx 2023-03-24 03:51:10 +0300 417) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 418) size_t oldlen = sb->len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 419) size_t oldalloc = sb->alloc;
05d292b2 (kx 2023-03-24 03:51:10 +0300 420)
05d292b2 (kx 2023-03-24 03:51:10 +0300 421) strbuf_grow(sb, hint ? hint : 8192);
05d292b2 (kx 2023-03-24 03:51:10 +0300 422) for( ;; )
05d292b2 (kx 2023-03-24 03:51:10 +0300 423) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 424) ssize_t want = sb->alloc - sb->len - 1;
05d292b2 (kx 2023-03-24 03:51:10 +0300 425) ssize_t got = read_in_full( fd, sb->buf + sb->len, want );
05d292b2 (kx 2023-03-24 03:51:10 +0300 426)
05d292b2 (kx 2023-03-24 03:51:10 +0300 427) if( got < 0 )
05d292b2 (kx 2023-03-24 03:51:10 +0300 428) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 429) if( oldalloc == 0 )
05d292b2 (kx 2023-03-24 03:51:10 +0300 430) strbuf_release( sb );
05d292b2 (kx 2023-03-24 03:51:10 +0300 431) else
05d292b2 (kx 2023-03-24 03:51:10 +0300 432) strbuf_setlen( sb, oldlen );
05d292b2 (kx 2023-03-24 03:51:10 +0300 433) return -1;
05d292b2 (kx 2023-03-24 03:51:10 +0300 434) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 435) sb->len += got;
05d292b2 (kx 2023-03-24 03:51:10 +0300 436) if( got < want )
05d292b2 (kx 2023-03-24 03:51:10 +0300 437) break;
05d292b2 (kx 2023-03-24 03:51:10 +0300 438) strbuf_grow( sb, 8192 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 439) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 440)
05d292b2 (kx 2023-03-24 03:51:10 +0300 441) sb->buf[sb->len] = '\0';
05d292b2 (kx 2023-03-24 03:51:10 +0300 442) return sb->len - oldlen;
05d292b2 (kx 2023-03-24 03:51:10 +0300 443) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 444)
05d292b2 (kx 2023-03-24 03:51:10 +0300 445)
05d292b2 (kx 2023-03-24 03:51:10 +0300 446) size_t strbuf_fwrite( struct strbuf *sb, FILE *fp )
05d292b2 (kx 2023-03-24 03:51:10 +0300 447) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 448) return sb->len ? fwrite( sb->buf, 1, sb->len, fp ) : 0;
05d292b2 (kx 2023-03-24 03:51:10 +0300 449) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 450)
05d292b2 (kx 2023-03-24 03:51:10 +0300 451) ssize_t strbuf_write( struct strbuf *sb, int fd )
05d292b2 (kx 2023-03-24 03:51:10 +0300 452) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 453) return sb->len ? write( fd, (const void *)sb->buf, sb->len ) : 0;
05d292b2 (kx 2023-03-24 03:51:10 +0300 454) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 455)
05d292b2 (kx 2023-03-24 03:51:10 +0300 456)
05d292b2 (kx 2023-03-24 03:51:10 +0300 457) /* XML quoted: */
05d292b2 (kx 2023-03-24 03:51:10 +0300 458)
05d292b2 (kx 2023-03-24 03:51:10 +0300 459) void strbuf_addstr_xml_quoted( struct strbuf *sb, const char *s )
05d292b2 (kx 2023-03-24 03:51:10 +0300 460) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 461) while( *s )
05d292b2 (kx 2023-03-24 03:51:10 +0300 462) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 463) size_t len = strcspn( s, "\"<>&" );
05d292b2 (kx 2023-03-24 03:51:10 +0300 464) strbuf_add( sb, s, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 465) s += len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 466)
05d292b2 (kx 2023-03-24 03:51:10 +0300 467) switch( *s )
05d292b2 (kx 2023-03-24 03:51:10 +0300 468) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 469) case '"':
05d292b2 (kx 2023-03-24 03:51:10 +0300 470) strbuf_addstr( sb, """ );
05d292b2 (kx 2023-03-24 03:51:10 +0300 471) break;
05d292b2 (kx 2023-03-24 03:51:10 +0300 472) case '<':
05d292b2 (kx 2023-03-24 03:51:10 +0300 473) strbuf_addstr( sb, "<" );
05d292b2 (kx 2023-03-24 03:51:10 +0300 474) break;
05d292b2 (kx 2023-03-24 03:51:10 +0300 475) case '>':
05d292b2 (kx 2023-03-24 03:51:10 +0300 476) strbuf_addstr( sb, ">" );
05d292b2 (kx 2023-03-24 03:51:10 +0300 477) break;
05d292b2 (kx 2023-03-24 03:51:10 +0300 478) case '&':
05d292b2 (kx 2023-03-24 03:51:10 +0300 479) strbuf_addstr( sb, "&" );
05d292b2 (kx 2023-03-24 03:51:10 +0300 480) break;
05d292b2 (kx 2023-03-24 03:51:10 +0300 481) case 0:
05d292b2 (kx 2023-03-24 03:51:10 +0300 482) return;
05d292b2 (kx 2023-03-24 03:51:10 +0300 483) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 484) s++;
05d292b2 (kx 2023-03-24 03:51:10 +0300 485) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 486) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 487)
05d292b2 (kx 2023-03-24 03:51:10 +0300 488) static int is_html_quoted( const char *str )
05d292b2 (kx 2023-03-24 03:51:10 +0300 489) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 490) int rc = 0, error = 0;
05d292b2 (kx 2023-03-24 03:51:10 +0300 491) PCRE2_SIZE offset = 0;
05d292b2 (kx 2023-03-24 03:51:10 +0300 492) const char pattern[] = "^(&[#A-Za-z0-9]*;)";
05d292b2 (kx 2023-03-24 03:51:10 +0300 493)
05d292b2 (kx 2023-03-24 03:51:10 +0300 494) pcre2_match_data *match;
05d292b2 (kx 2023-03-24 03:51:10 +0300 495)
05d292b2 (kx 2023-03-24 03:51:10 +0300 496) pcre2_code *regexp = pcre2_compile( (PCRE2_SPTR)pattern, PCRE2_ZERO_TERMINATED, 0, &error, &offset, NULL );
05d292b2 (kx 2023-03-24 03:51:10 +0300 497) if( regexp == NULL )
05d292b2 (kx 2023-03-24 03:51:10 +0300 498) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 499) return 0; /* PCRE compilation failed */
05d292b2 (kx 2023-03-24 03:51:10 +0300 500) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 501)
05d292b2 (kx 2023-03-24 03:51:10 +0300 502) match = pcre2_match_data_create_from_pattern( regexp, NULL );
05d292b2 (kx 2023-03-24 03:51:10 +0300 503)
05d292b2 (kx 2023-03-24 03:51:10 +0300 504) rc = pcre2_match( regexp, (PCRE2_SPTR)str, (PCRE2_SIZE)strlen(str), 0, 0, match, NULL ); /* sizeof(match)/sizeof(match[0]) */
05d292b2 (kx 2023-03-24 03:51:10 +0300 505) if( rc < 0 )
05d292b2 (kx 2023-03-24 03:51:10 +0300 506) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 507) /* not match */
05d292b2 (kx 2023-03-24 03:51:10 +0300 508) pcre2_match_data_free( match );
05d292b2 (kx 2023-03-24 03:51:10 +0300 509) pcre2_code_free( regexp );
05d292b2 (kx 2023-03-24 03:51:10 +0300 510) return 0;
05d292b2 (kx 2023-03-24 03:51:10 +0300 511) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 512) else
05d292b2 (kx 2023-03-24 03:51:10 +0300 513) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 514) /* match */
05d292b2 (kx 2023-03-24 03:51:10 +0300 515) pcre2_match_data_free( match );
05d292b2 (kx 2023-03-24 03:51:10 +0300 516) pcre2_code_free( regexp );
05d292b2 (kx 2023-03-24 03:51:10 +0300 517) return 1;
05d292b2 (kx 2023-03-24 03:51:10 +0300 518) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 519) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 520)
05d292b2 (kx 2023-03-24 03:51:10 +0300 521) void strbuf_addstr_html_quoted( struct strbuf *sb, const char *s )
05d292b2 (kx 2023-03-24 03:51:10 +0300 522) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 523) while( *s )
05d292b2 (kx 2023-03-24 03:51:10 +0300 524) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 525) size_t len = strcspn( s, "\"<>&" );
05d292b2 (kx 2023-03-24 03:51:10 +0300 526) strbuf_add( sb, s, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 527) s += len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 528)
05d292b2 (kx 2023-03-24 03:51:10 +0300 529) switch( *s )
05d292b2 (kx 2023-03-24 03:51:10 +0300 530) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 531) case '"':
05d292b2 (kx 2023-03-24 03:51:10 +0300 532) strbuf_addstr( sb, """ );
05d292b2 (kx 2023-03-24 03:51:10 +0300 533) break;
05d292b2 (kx 2023-03-24 03:51:10 +0300 534) case '<':
05d292b2 (kx 2023-03-24 03:51:10 +0300 535) strbuf_addstr( sb, "<" );
05d292b2 (kx 2023-03-24 03:51:10 +0300 536) break;
05d292b2 (kx 2023-03-24 03:51:10 +0300 537) case '>':
05d292b2 (kx 2023-03-24 03:51:10 +0300 538) strbuf_addstr( sb, ">" );
05d292b2 (kx 2023-03-24 03:51:10 +0300 539) break;
05d292b2 (kx 2023-03-24 03:51:10 +0300 540) case '&':
05d292b2 (kx 2023-03-24 03:51:10 +0300 541) if( !is_html_quoted( s ) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 542) strbuf_addstr( sb, "&" );
05d292b2 (kx 2023-03-24 03:51:10 +0300 543) else
05d292b2 (kx 2023-03-24 03:51:10 +0300 544) strbuf_addch( sb, *s );
05d292b2 (kx 2023-03-24 03:51:10 +0300 545) break;
05d292b2 (kx 2023-03-24 03:51:10 +0300 546) case 0:
05d292b2 (kx 2023-03-24 03:51:10 +0300 547) return;
05d292b2 (kx 2023-03-24 03:51:10 +0300 548) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 549) s++;
05d292b2 (kx 2023-03-24 03:51:10 +0300 550) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 551) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 552)
05d292b2 (kx 2023-03-24 03:51:10 +0300 553)
05d292b2 (kx 2023-03-24 03:51:10 +0300 554) /* urlencode: */
05d292b2 (kx 2023-03-24 03:51:10 +0300 555)
05d292b2 (kx 2023-03-24 03:51:10 +0300 556) int is_rfc3986_reserved_or_unreserved( char ch )
05d292b2 (kx 2023-03-24 03:51:10 +0300 557) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 558) if( is_rfc3986_unreserved(ch) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 559) return 1;
05d292b2 (kx 2023-03-24 03:51:10 +0300 560) switch( ch )
05d292b2 (kx 2023-03-24 03:51:10 +0300 561) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 562) case '!': case '*': case '\'': case '(': case ')': case ';':
05d292b2 (kx 2023-03-24 03:51:10 +0300 563) case ':': case '@': case '&': case '=': case '+': case '$':
05d292b2 (kx 2023-03-24 03:51:10 +0300 564) case ',': case '/': case '?': case '#': case '[': case ']':
05d292b2 (kx 2023-03-24 03:51:10 +0300 565) return 1;
05d292b2 (kx 2023-03-24 03:51:10 +0300 566) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 567) return 0;
05d292b2 (kx 2023-03-24 03:51:10 +0300 568) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 569)
05d292b2 (kx 2023-03-24 03:51:10 +0300 570) int is_rfc3986_unreserved( char ch )
05d292b2 (kx 2023-03-24 03:51:10 +0300 571) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 572) return isalnum(ch) || ch == '-' || ch == '_' || ch == '.' || ch == '~';
05d292b2 (kx 2023-03-24 03:51:10 +0300 573) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 574)
05d292b2 (kx 2023-03-24 03:51:10 +0300 575) static void
05d292b2 (kx 2023-03-24 03:51:10 +0300 576) strbuf_add_urlencode( struct strbuf *sb, const char *s, size_t len,
05d292b2 (kx 2023-03-24 03:51:10 +0300 577) char_predicate allow_unencoded_fn )
05d292b2 (kx 2023-03-24 03:51:10 +0300 578) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 579) strbuf_grow( sb, len );
05d292b2 (kx 2023-03-24 03:51:10 +0300 580) while( len-- )
05d292b2 (kx 2023-03-24 03:51:10 +0300 581) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 582) char ch = *s++;
05d292b2 (kx 2023-03-24 03:51:10 +0300 583) if( allow_unencoded_fn(ch) )
05d292b2 (kx 2023-03-24 03:51:10 +0300 584) strbuf_addch( sb, ch );
05d292b2 (kx 2023-03-24 03:51:10 +0300 585) else
05d292b2 (kx 2023-03-24 03:51:10 +0300 586) strbuf_addf( sb, "%%%02x", (unsigned char)ch );
05d292b2 (kx 2023-03-24 03:51:10 +0300 587) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 588) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 589)
05d292b2 (kx 2023-03-24 03:51:10 +0300 590) void strbuf_addstr_urlencode( struct strbuf *sb, const char *s, char_predicate allow_unencoded_fn )
05d292b2 (kx 2023-03-24 03:51:10 +0300 591) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 592) strbuf_add_urlencode( sb, s, strlen(s), allow_unencoded_fn );
05d292b2 (kx 2023-03-24 03:51:10 +0300 593) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 594)
05d292b2 (kx 2023-03-24 03:51:10 +0300 595)
05d292b2 (kx 2023-03-24 03:51:10 +0300 596) /* humanise: */
05d292b2 (kx 2023-03-24 03:51:10 +0300 597)
05d292b2 (kx 2023-03-24 03:51:10 +0300 598) static void strbuf_humanise( struct strbuf *sb, off_t bytes, int humanise_rate )
05d292b2 (kx 2023-03-24 03:51:10 +0300 599) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 600) if( bytes > 1 << 30 )
05d292b2 (kx 2023-03-24 03:51:10 +0300 601) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 602) strbuf_addf( sb,
05d292b2 (kx 2023-03-24 03:51:10 +0300 603) humanise_rate == 0 ?
05d292b2 (kx 2023-03-24 03:51:10 +0300 604) /* TRANSLATORS: IEC 80000-13:2008 gibibyte */
05d292b2 (kx 2023-03-24 03:51:10 +0300 605) _("%u.%2.2u GiB") :
05d292b2 (kx 2023-03-24 03:51:10 +0300 606) /* TRANSLATORS: IEC 80000-13:2008 gibibyte/second */
05d292b2 (kx 2023-03-24 03:51:10 +0300 607) _("%u.%2.2u GiB/s"),
05d292b2 (kx 2023-03-24 03:51:10 +0300 608) (unsigned)(bytes >> 30),
05d292b2 (kx 2023-03-24 03:51:10 +0300 609) (unsigned)(bytes & ((1 << 30) - 1)) / 10737419 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 610) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 611) else if( bytes > 1 << 20 )
05d292b2 (kx 2023-03-24 03:51:10 +0300 612) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 613) unsigned x = bytes + 5243; /* for rounding */
05d292b2 (kx 2023-03-24 03:51:10 +0300 614) strbuf_addf( sb,
05d292b2 (kx 2023-03-24 03:51:10 +0300 615) humanise_rate == 0 ?
05d292b2 (kx 2023-03-24 03:51:10 +0300 616) /* TRANSLATORS: IEC 80000-13:2008 mebibyte */
05d292b2 (kx 2023-03-24 03:51:10 +0300 617) _("%u.%2.2u MiB") :
05d292b2 (kx 2023-03-24 03:51:10 +0300 618) /* TRANSLATORS: IEC 80000-13:2008 mebibyte/second */
05d292b2 (kx 2023-03-24 03:51:10 +0300 619) _("%u.%2.2u MiB/s"),
05d292b2 (kx 2023-03-24 03:51:10 +0300 620) x >> 20, ((x & ((1 << 20) - 1)) * 100) >> 20 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 621) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 622) else if( bytes > 1 << 10 )
05d292b2 (kx 2023-03-24 03:51:10 +0300 623) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 624) unsigned x = bytes + 5; /* for rounding */
05d292b2 (kx 2023-03-24 03:51:10 +0300 625) strbuf_addf( sb,
05d292b2 (kx 2023-03-24 03:51:10 +0300 626) humanise_rate == 0 ?
05d292b2 (kx 2023-03-24 03:51:10 +0300 627) /* TRANSLATORS: IEC 80000-13:2008 kibibyte */
05d292b2 (kx 2023-03-24 03:51:10 +0300 628) _("%u.%2.2u KiB") :
05d292b2 (kx 2023-03-24 03:51:10 +0300 629) /* TRANSLATORS: IEC 80000-13:2008 kibibyte/second */
05d292b2 (kx 2023-03-24 03:51:10 +0300 630) _("%u.%2.2u KiB/s"),
05d292b2 (kx 2023-03-24 03:51:10 +0300 631) x >> 10, ((x & ((1 << 10) - 1)) * 100) >> 10 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 632) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 633) else
05d292b2 (kx 2023-03-24 03:51:10 +0300 634) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 635) strbuf_addf( sb,
05d292b2 (kx 2023-03-24 03:51:10 +0300 636) humanise_rate == 0 ?
05d292b2 (kx 2023-03-24 03:51:10 +0300 637) /* TRANSLATORS: IEC 80000-13:2008 byte */
05d292b2 (kx 2023-03-24 03:51:10 +0300 638) Q_("%u byte", "%u bytes", (unsigned)bytes) :
05d292b2 (kx 2023-03-24 03:51:10 +0300 639) /* TRANSLATORS: IEC 80000-13:2008 byte/second */
05d292b2 (kx 2023-03-24 03:51:10 +0300 640) Q_("%u byte/s", "%u bytes/s", (unsigned)bytes),
05d292b2 (kx 2023-03-24 03:51:10 +0300 641) (unsigned)bytes );
05d292b2 (kx 2023-03-24 03:51:10 +0300 642) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 643) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 644)
05d292b2 (kx 2023-03-24 03:51:10 +0300 645) void strbuf_humanise_bytes( struct strbuf *sb, off_t bytes )
05d292b2 (kx 2023-03-24 03:51:10 +0300 646) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 647) strbuf_humanise( sb, bytes, 0 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 648) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 649)
05d292b2 (kx 2023-03-24 03:51:10 +0300 650) void strbuf_humanise_rate( struct strbuf *sb, off_t bytes )
05d292b2 (kx 2023-03-24 03:51:10 +0300 651) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 652) strbuf_humanise( sb, bytes, 1 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 653) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 654)
05d292b2 (kx 2023-03-24 03:51:10 +0300 655)
05d292b2 (kx 2023-03-24 03:51:10 +0300 656) int is_directory( const char *path )
05d292b2 (kx 2023-03-24 03:51:10 +0300 657) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 658) struct stat st;
05d292b2 (kx 2023-03-24 03:51:10 +0300 659) return ( !stat( path, &st ) && S_ISDIR(st.st_mode) );
05d292b2 (kx 2023-03-24 03:51:10 +0300 660) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 661)
05d292b2 (kx 2023-03-24 03:51:10 +0300 662) void strbuf_selfdir( struct strbuf *sb )
05d292b2 (kx 2023-03-24 03:51:10 +0300 663) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 664) char path[PATH_MAX];
05d292b2 (kx 2023-03-24 03:51:10 +0300 665) ssize_t len;
05d292b2 (kx 2023-03-24 03:51:10 +0300 666)
05d292b2 (kx 2023-03-24 03:51:10 +0300 667) bzero( (void *)path, PATH_MAX );
05d292b2 (kx 2023-03-24 03:51:10 +0300 668)
05d292b2 (kx 2023-03-24 03:51:10 +0300 669) len = readlink( "/proc/self/exe", &path[0], (size_t)PATH_MAX );
05d292b2 (kx 2023-03-24 03:51:10 +0300 670) if( len > 0 && len < PATH_MAX )
05d292b2 (kx 2023-03-24 03:51:10 +0300 671) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 672) strbuf_addstr( sb, (const char *)dirname( (char *)&path[0] ) );
05d292b2 (kx 2023-03-24 03:51:10 +0300 673) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 674) else
05d292b2 (kx 2023-03-24 03:51:10 +0300 675) sb->fatal( "cannot get selfdir" );
05d292b2 (kx 2023-03-24 03:51:10 +0300 676) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 677)
05d292b2 (kx 2023-03-24 03:51:10 +0300 678) void strbuf_relpath( struct strbuf *sb, const char *path )
05d292b2 (kx 2023-03-24 03:51:10 +0300 679) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 680) struct strbuf self = STRBUF_INIT;
05d292b2 (kx 2023-03-24 03:51:10 +0300 681) char p[PATH_MAX];
05d292b2 (kx 2023-03-24 03:51:10 +0300 682)
05d292b2 (kx 2023-03-24 03:51:10 +0300 683) bzero( (void *)p, PATH_MAX );
05d292b2 (kx 2023-03-24 03:51:10 +0300 684)
05d292b2 (kx 2023-03-24 03:51:10 +0300 685) if( realpath( path, (char *)&p[0] ) == NULL )
05d292b2 (kx 2023-03-24 03:51:10 +0300 686) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 687) sb->fatal( "cannot get relative path of '%s'", path );
05d292b2 (kx 2023-03-24 03:51:10 +0300 688) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 689)
05d292b2 (kx 2023-03-24 03:51:10 +0300 690) strbuf_init( &self, sb->fatal, 0 );
05d292b2 (kx 2023-03-24 03:51:10 +0300 691) strbuf_selfdir( &self );
05d292b2 (kx 2023-03-24 03:51:10 +0300 692)
05d292b2 (kx 2023-03-24 03:51:10 +0300 693) strbuf_addstr( sb, (const char *)&p[self.len] );
05d292b2 (kx 2023-03-24 03:51:10 +0300 694)
05d292b2 (kx 2023-03-24 03:51:10 +0300 695) strbuf_release( &self );
05d292b2 (kx 2023-03-24 03:51:10 +0300 696) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 697)
05d292b2 (kx 2023-03-24 03:51:10 +0300 698) void strbuf_abspath( struct strbuf *sb, const char *path )
05d292b2 (kx 2023-03-24 03:51:10 +0300 699) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 700) char p[PATH_MAX];
05d292b2 (kx 2023-03-24 03:51:10 +0300 701)
05d292b2 (kx 2023-03-24 03:51:10 +0300 702) if( realpath( path, (char *)&p[0] ) == NULL )
05d292b2 (kx 2023-03-24 03:51:10 +0300 703) {
05d292b2 (kx 2023-03-24 03:51:10 +0300 704) sb->fatal( "cannot get absolute path of '%s'", path );
05d292b2 (kx 2023-03-24 03:51:10 +0300 705) }
05d292b2 (kx 2023-03-24 03:51:10 +0300 706)
05d292b2 (kx 2023-03-24 03:51:10 +0300 707) strbuf_addstr( sb, (char *)&p[0] );
05d292b2 (kx 2023-03-24 03:51:10 +0300 708) }