Файловый менеджер - Редактировать - /var/www/html/examples.zip
Ðазад
PK ! ���]v" v" json_process.cnu �[��� /* * Copyright (c) 2009-2016 Petri Lehtinen <petri@digip.org> * * Jansson is free software; you can redistribute it and/or modify * it under the terms of the MIT license. See LICENSE for details. */ #ifdef HAVE_CONFIG_H #include <jansson_private_config.h> #endif #include <ctype.h> #include <jansson.h> #include <stdio.h> #include <stdlib.h> #include <string.h> #ifdef HAVE_LOCALE_H #include <locale.h> #endif #if _WIN32 #include <fcntl.h> /* for _O_BINARY */ #include <io.h> /* for _setmode() */ static const char dir_sep = '\\'; #else static const char dir_sep = '/'; #endif struct config { int indent; int compact; int preserve_order; int ensure_ascii; int sort_keys; int strip; int use_env; int have_hashseed; int hashseed; int precision; } conf; #define l_isspace(c) ((c) == ' ' || (c) == '\n' || (c) == '\r' || (c) == '\t') /* Return a pointer to the first non-whitespace character of str. Modifies str so that all trailing whitespace characters are replaced by '\0'. */ static const char *strip(char *str) { size_t length; char *result = str; while (*result && l_isspace(*result)) result++; length = strlen(result); if (length == 0) return result; while (l_isspace(result[length - 1])) result[--length] = '\0'; return result; } static char *loadfile(FILE *file) { long fsize, ret; char *buf; fseek(file, 0, SEEK_END); fsize = ftell(file); fseek(file, 0, SEEK_SET); buf = malloc(fsize + 1); ret = fread(buf, 1, fsize, file); if (ret != fsize) exit(1); buf[fsize] = '\0'; return buf; } static void read_conf(FILE *conffile) { char *buffer, *line, *val; buffer = loadfile(conffile); for (line = strtok(buffer, "\r\n"); line; line = strtok(NULL, "\r\n")) { if (!strncmp(line, "export ", 7)) continue; val = strchr(line, '='); if (!val) { printf("invalid configuration line\n"); break; } *val++ = '\0'; if (!strcmp(line, "JSON_INDENT")) conf.indent = atoi(val); if (!strcmp(line, "JSON_COMPACT")) conf.compact = atoi(val); if (!strcmp(line, "JSON_ENSURE_ASCII")) conf.ensure_ascii = atoi(val); if (!strcmp(line, "JSON_PRESERVE_ORDER")) conf.preserve_order = atoi(val); if (!strcmp(line, "JSON_SORT_KEYS")) conf.sort_keys = atoi(val); if (!strcmp(line, "JSON_REAL_PRECISION")) conf.precision = atoi(val); if (!strcmp(line, "STRIP")) conf.strip = atoi(val); if (!strcmp(line, "HASHSEED")) { conf.have_hashseed = 1; conf.hashseed = atoi(val); } else { conf.have_hashseed = 0; } } free(buffer); } static int cmpfile(const char *str, const char *path, const char *fname) { char filename[1024], *buffer; int ret; FILE *file; sprintf(filename, "%s%c%s", path, dir_sep, fname); file = fopen(filename, "rb"); if (!file) { if (conf.strip) strcat(filename, ".strip"); else strcat(filename, ".normal"); file = fopen(filename, "rb"); } if (!file) { printf("Error: test result file could not be opened.\n"); exit(1); } buffer = loadfile(file); if (strcmp(buffer, str) != 0) ret = 1; else ret = 0; free(buffer); fclose(file); return ret; } int use_conf(char *test_path) { int ret; size_t flags = 0; char filename[1024], errstr[1024]; char *buffer; FILE *infile, *conffile; json_t *json; json_error_t error; sprintf(filename, "%s%cinput", test_path, dir_sep); if (!(infile = fopen(filename, "rb"))) { fprintf(stderr, "Could not open \"%s\"\n", filename); return 2; } sprintf(filename, "%s%cenv", test_path, dir_sep); conffile = fopen(filename, "rb"); if (conffile) { read_conf(conffile); fclose(conffile); } if (conf.indent < 0 || conf.indent > 31) { fprintf(stderr, "invalid value for JSON_INDENT: %d\n", conf.indent); fclose(infile); return 2; } if (conf.indent) flags |= JSON_INDENT(conf.indent); if (conf.compact) flags |= JSON_COMPACT; if (conf.ensure_ascii) flags |= JSON_ENSURE_ASCII; if (conf.preserve_order) flags |= JSON_PRESERVE_ORDER; if (conf.sort_keys) flags |= JSON_SORT_KEYS; if (conf.precision < 0 || conf.precision > 31) { fprintf(stderr, "invalid value for JSON_REAL_PRECISION: %d\n", conf.precision); fclose(infile); return 2; } if (conf.precision) flags |= JSON_REAL_PRECISION(conf.precision); if (conf.have_hashseed) json_object_seed(conf.hashseed); if (conf.strip) { /* Load to memory, strip leading and trailing whitespace */ buffer = loadfile(infile); json = json_loads(strip(buffer), 0, &error); free(buffer); } else json = json_loadf(infile, 0, &error); fclose(infile); if (!json) { sprintf(errstr, "%d %d %d\n%s\n", error.line, error.column, error.position, error.text); ret = cmpfile(errstr, test_path, "error"); return ret; } buffer = json_dumps(json, flags); ret = cmpfile(buffer, test_path, "output"); free(buffer); json_decref(json); return ret; } static int getenv_int(const char *name) { char *value, *end; long result; value = getenv(name); if (!value) return 0; result = strtol(value, &end, 10); if (*end != '\0') return 0; return (int)result; } int use_env() { int indent, precision; size_t flags = 0; json_t *json; json_error_t error; #ifdef _WIN32 /* On Windows, set stdout and stderr to binary mode to avoid outputting DOS line terminators */ _setmode(_fileno(stdout), _O_BINARY); _setmode(_fileno(stderr), _O_BINARY); #endif indent = getenv_int("JSON_INDENT"); if (indent < 0 || indent > 31) { fprintf(stderr, "invalid value for JSON_INDENT: %d\n", indent); return 2; } if (indent > 0) flags |= JSON_INDENT(indent); if (getenv_int("JSON_COMPACT") > 0) flags |= JSON_COMPACT; if (getenv_int("JSON_ENSURE_ASCII")) flags |= JSON_ENSURE_ASCII; if (getenv_int("JSON_PRESERVE_ORDER")) flags |= JSON_PRESERVE_ORDER; if (getenv_int("JSON_SORT_KEYS")) flags |= JSON_SORT_KEYS; precision = getenv_int("JSON_REAL_PRECISION"); if (precision < 0 || precision > 31) { fprintf(stderr, "invalid value for JSON_REAL_PRECISION: %d\n", precision); return 2; } if (getenv("HASHSEED")) json_object_seed(getenv_int("HASHSEED")); if (precision > 0) flags |= JSON_REAL_PRECISION(precision); if (getenv_int("STRIP")) { /* Load to memory, strip leading and trailing whitespace */ size_t size = 0, used = 0; char *buffer = NULL, *buf_ck = NULL; while (1) { size_t count; size = (size == 0 ? 128 : size * 2); buf_ck = realloc(buffer, size); if (!buf_ck) { fprintf(stderr, "Unable to allocate %d bytes\n", (int)size); free(buffer); return 1; } buffer = buf_ck; count = fread(buffer + used, 1, size - used, stdin); if (count < size - used) { buffer[used + count] = '\0'; break; } used += count; } json = json_loads(strip(buffer), 0, &error); free(buffer); } else json = json_loadf(stdin, 0, &error); if (!json) { fprintf(stderr, "%d %d %d\n%s\n", error.line, error.column, error.position, error.text); return 1; } json_dumpf(json, stdout, flags); json_decref(json); return 0; } int main(int argc, char *argv[]) { int i; char *test_path = NULL; #ifdef HAVE_SETLOCALE setlocale(LC_ALL, ""); #endif if (argc < 2) { goto usage; } for (i = 1; i < argc; i++) { if (!strcmp(argv[i], "--strip")) conf.strip = 1; else if (!strcmp(argv[i], "--env")) conf.use_env = 1; else test_path = argv[i]; } if (conf.use_env) return use_env(); else { if (!test_path) goto usage; return use_conf(test_path); } usage: fprintf(stderr, "argc =%d\n", argc); fprintf(stderr, "usage: %s [--strip] [--env] test_dir\n", argv[0]); return 2; } PK ! wx7q� � macros.d/macro.3.shnu �[��� #silent S Sort selection TMPFILE=`mktemp ${MC_TMPDIR:-/tmp}/up.XXXXXX` || exit 1 cat %b > $TMPFILE cat $TMPFILE| sort >%b rm -f $TMPFILE PK ! l�/� � macros.d/macro.7.shnu �[��� #silent w delete trailing whitespace TMPFILE=`mktemp ${MC_TMPDIR:-/tmp}/up.XXXXXX` || exit 1 cat %b > $TMPFILE cat $TMPFILE | sed 's/[ \t]*$//' > %b PK ! ��+F� � macros.d/macro.6.shnu �[��� #silent e execute something TMPFILE=`mktemp ${MC_TMPDIR:-/tmp}/up.XXXXXX` || exit 1 cat %b > $TMPFILE sh $TMPFILE > %b PK ! �h"�� � macros.d/macro.1.shnu �[��� #silent u Upper case selection TMPFILE=`mktemp ${MC_TMPDIR:-/tmp}/up.XXXXXX` || exit 1 cat %b > $TMPFILE cat $TMPFILE| sed 's/\(.*\)/\U\1/' >%b rm -f $TMPFILE PK ! �Vhm m macros.d/macro.4.shnu �[��� #silent t Indent `C' formatter indent -gnu -fc1 -i4 -bli0 -nut -bap -l100 %b 1>/dev/null 2> %e PK ! �%R� � macros.d/macro.5.shnu �[��� #silent s snippets a=`cat %b` if [ "$a" = "fori" ]; then echo "for (i = 0; i _; i++)" > %b fi if [ "$a" = "ife" ]; then cat <<EOF > %b if ( ) { } else { } EOF fi if [ "$a" = "GPL" ]; then cat >>%b <<EOF /* * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see <http://www.gnu.org/licenses/>. */ EOF fi if [ "$a" = "type" ]; then cat <<EOF > %b typedef struct { ; } ?; EOF fi PK ! ��W�� � macros.d/macro.0.shnu �[��� m make TMPFILE=`mktemp ${MC_TMPDIR:-/tmp}/up.XXXXXX` || exit 1 make 2> $TMPFILE mcedit $TMPFILE rm $TMPFILE PK ! ���]v" v" json_process.cnu �[��� PK ! wx7q� � �" macros.d/macro.3.shnu �[��� PK ! l�/� � �# macros.d/macro.7.shnu �[��� PK ! ��+F� � �$ macros.d/macro.6.shnu �[��� PK ! �h"�� � t% macros.d/macro.1.shnu �[��� PK ! �Vhm m |& macros.d/macro.4.shnu �[��� PK ! �%R� � ,' macros.d/macro.5.shnu �[��� PK ! ��W�� � R, macros.d/macro.0.shnu �[��� PK � '-
| ver. 1.1 | |
.
| PHP 8.4.18 | Ð“ÐµÐ½ÐµÑ€Ð°Ñ†Ð¸Ñ Ñтраницы: 0 |
proxy
|
phpinfo
|
ÐаÑтройка