th-libs: th_util.c annotate

annotate th_util.c @ 194:87dac812cac4

Define some argument identifiers in function prototypes and rename some arguments.

author	Matti Hamalainen <ccr@tnsp.org>
date	Thu, 11 Feb 2016 16:42:00 +0200
parents	7d25d43a3ce2
children	a16e8272bdda

rev	line source
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1 /*
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	2 * Generic utility-functions, macros and defaults
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	3 * Programmed and designed by Matti 'ccr' Hamalainen
144 51eec969b07a Update copyrights. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	4 * (C) Copyright 2002-2015 Tecnic Software productions (TNSP)
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	5 *
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	6 * Please read file 'COPYING' for information on license and distribution.
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	7 */
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	8 #include "th_util.h"
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	9 #include <stdio.h>
96 3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	10 #include <errno.h>
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	11
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	12
4 67f4a4233372 Move defaults to header file. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	13 /* Default settings
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	14 */
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	15 static BOOL th_initialized = FALSE;
60 eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	16 int th_verbosityLevel = 2;
eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	17 char *th_prog_name = NULL,
eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	18 *th_prog_desc = NULL,
eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	19 *th_prog_version = NULL,
eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	20 *th_prog_author = NULL,
eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	21 *th_prog_license = NULL;
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	22
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	23
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	24 /* Initialize th_util-library and global variables
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	25 */
60 eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	26 void th_init(char name, char desc, char *version,
eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	27 char author, char license)
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	28 {
60 eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	29 th_prog_name = name;
eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	30 th_prog_desc = desc;
eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	31 th_prog_version = version;
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	32
60 eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	33 if (author)
eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	34 th_prog_author = author;
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	35 else
a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	36 th_prog_author = TH_PROG_AUTHOR;
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	37
60 eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	38 if (license)
eef9c6312b88 Change some internals. Matti Hamalainen <ccr@tnsp.org> parents: 59 diff changeset	39 th_prog_license = license;
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	40 else
a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	41 th_prog_license = TH_PROG_LICENSE;
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	42
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	43 th_initialized = TRUE;
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	44 }
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	45
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	46
64 40b6e8dca885 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 61 diff changeset	47 void th_print_banner(FILE outFile, const char name, const char *usage)
45 e031a062b731 Separate program "banner" printing from th_args_help() to th_print_banner(). Matti Hamalainen <ccr@tnsp.org> parents: 40 diff changeset	48 {
177 2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	49 fprintf(outFile, "\n%s", th_prog_name);
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	50 if (th_prog_version != NULL)
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	51 fprintf(outFile, " v%s", th_prog_version);
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	52 if (th_prog_desc != NULL)
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	53 fprintf(outFile, " (%s)", th_prog_desc);
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	54 fprintf(outFile, "\n");
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	55
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	56 if (th_prog_author != NULL)
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	57 fprintf(outFile, "%s\n", th_prog_author);
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	58
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	59 if (th_prog_license != NULL)
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	60 fprintf(outFile, "%s\n", th_prog_license);
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	61
2b07e452fd78 Adjust program banner printing. Matti Hamalainen <ccr@tnsp.org> parents: 162 diff changeset	62 fprintf(outFile, "Usage: %s %s\n", name, usage);
45 e031a062b731 Separate program "banner" printing from th_args_help() to th_print_banner(). Matti Hamalainen <ccr@tnsp.org> parents: 40 diff changeset	63 }
e031a062b731 Separate program "banner" printing from th_args_help() to th_print_banner(). Matti Hamalainen <ccr@tnsp.org> parents: 40 diff changeset	64
e031a062b731 Separate program "banner" printing from th_args_help() to th_print_banner(). Matti Hamalainen <ccr@tnsp.org> parents: 40 diff changeset	65
143 c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	66 int th_term_width()
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	67 {
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	68 char *var = getenv("COLUMNS");
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	69 int res = (var != NULL) ? atoi(var) : 80;
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	70 if (res < 5) res = 80;
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	71 return res;
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	72 }
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	73
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	74
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	75 int th_term_height()
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	76 {
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	77 char *var = getenv("LINESS");
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	78 int res = (var != NULL) ? atoi(var) : 25;
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	79 if (res < 1) res = 1;
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	80 return res;
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	81 }
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	82
c878cdcfea9d Implement terminal width. Matti Hamalainen <ccr@tnsp.org> parents: 129 diff changeset	83
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	84 /* Print formatted error, warning and information messages
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	85 * TODO: Implement th_vfprintf() and friends?
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	86 */
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	87 void THERR_V(const char *fmt, va_list ap)
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	88 {
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	89 assert(th_initialized == TRUE);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	90
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	91 fprintf(stderr, "%s: ", th_prog_name);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	92 vfprintf(stderr, fmt, ap);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	93 }
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	94
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	95
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	96 void THMSG_V(int level, const char *fmt, va_list ap)
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	97 {
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	98 assert(th_initialized == TRUE);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	99
48 55e36ec05881 Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 45 diff changeset	100 if (th_verbosityLevel >= level)
55e36ec05881 Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 45 diff changeset	101 {
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	102 fprintf(stderr, "%s: ", th_prog_name);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	103 vfprintf(stderr, fmt, ap);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	104 }
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	105 }
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	106
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	107
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	108 void THPRINT_V(int level, const char *fmt, va_list ap)
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	109 {
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	110 assert(th_initialized == TRUE);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	111
48 55e36ec05881 Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 45 diff changeset	112 if (th_verbosityLevel >= level)
55e36ec05881 Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 45 diff changeset	113 {
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	114 vfprintf(stderr, fmt, ap);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	115 }
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	116 }
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	117
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	118
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	119 void THERR(const char *fmt, ...)
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	120 {
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	121 va_list ap;
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	122 assert(th_initialized == TRUE);
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	123
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	124 va_start(ap, fmt);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	125 THERR_V(fmt, ap);
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	126 va_end(ap);
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	127 }
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	128
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	129
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	130 void THMSG(int level, const char *fmt, ...)
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	131 {
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	132 va_list ap;
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	133 assert(th_initialized == TRUE);
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	134
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	135 va_start(ap, fmt);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	136 THMSG_V(level, fmt, ap);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	137 va_end(ap);
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	138 }
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	139
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	140
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	141 void THPRINT(int level, const char *fmt, ...)
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	142 {
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	143 va_list ap;
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	144 assert(th_initialized == TRUE);
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	145
11 e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	146 va_start(ap, fmt);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	147 THPRINT_V(level, fmt, ap);
e467b3586e4d Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 10 diff changeset	148 va_end(ap);
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	149 }
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	150
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	151
96 3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	152 /* Error handling
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	153 */
101 a8f732601fdc Rename th_get_errno() to th_get_error(), it's more appropriate since it does Matti Hamalainen <ccr@tnsp.org> parents: 99 diff changeset	154 int th_get_error()
96 3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	155 {
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	156 return TH_SYSTEM_ERRORS + errno;
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	157 }
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	158
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	159
99 5819454a28a4 Add th_errno_to_error(). Matti Hamalainen <ccr@tnsp.org> parents: 98 diff changeset	160 int th_errno_to_error(int error)
5819454a28a4 Add th_errno_to_error(). Matti Hamalainen <ccr@tnsp.org> parents: 98 diff changeset	161 {
5819454a28a4 Add th_errno_to_error(). Matti Hamalainen <ccr@tnsp.org> parents: 98 diff changeset	162 return TH_SYSTEM_ERRORS + error;
5819454a28a4 Add th_errno_to_error(). Matti Hamalainen <ccr@tnsp.org> parents: 98 diff changeset	163 }
5819454a28a4 Add th_errno_to_error(). Matti Hamalainen <ccr@tnsp.org> parents: 98 diff changeset	164
5819454a28a4 Add th_errno_to_error(). Matti Hamalainen <ccr@tnsp.org> parents: 98 diff changeset	165
96 3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	166 const char *th_error_str(int error)
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	167 {
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	168 if (error >= TH_SYSTEM_ERRORS)
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	169 return strerror(error - TH_SYSTEM_ERRORS);
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	170
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	171 switch (error)
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	172 {
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	173 case THERR_OK: return "No error";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	174 case THERR_FOPEN: return "File open error";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	175 case THERR_FREAD: return "Read error";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	176 case THERR_FWRITE: return "Write error";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	177 case THERR_FSEEK: return "Seek error";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	178 case THERR_NOT_FOUND: return "Resource not found";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	179
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	180 case THERR_INVALID_DATA: return "Invalid data";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	181 case THERR_MALLOC: return "Memory allocation failure";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	182 case THERR_ALREADY_INIT: return "Already initialized";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	183 case THERR_INIT_FAIL: return "Initialization failed";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	184 case THERR_INVALID_ARGS: return "Invalid arguments";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	185
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	186 case THERR_NULLPTR: return "NULL pointer";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	187 case THERR_NOT_SUPPORTED: return "Operation not supported";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	188 case THERR_OUT_OF_DATA: return "Out of data";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	189 case THERR_EXTRA_DATA: return "Extra data";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	190 case THERR_BOUNDS: return "Bounds check failed";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	191
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	192 case THERR_TIMED_OUT: return "Operation timed out";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	193
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	194 case THERR_AUTH_FAILED: return "Authentication failed";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	195
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	196 default: return "Unknown error";
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	197 }
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	198 }
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	199
3df6bec3c6b1 Add error handling stuff. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	200
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	201 /* Memory handling routines
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	202 */
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	203 void *th_malloc(size_t l)
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	204 {
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	205 return malloc(l);
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	206 }
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	207
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	208
68 29f9651465c6 Added a new memory allocator function, th_malloc0(size), which is the same as calloc(1, size). Matti Hamalainen <ccr@tnsp.org> parents: 66 diff changeset	209 void *th_malloc0(size_t l)
29f9651465c6 Added a new memory allocator function, th_malloc0(size), which is the same as calloc(1, size). Matti Hamalainen <ccr@tnsp.org> parents: 66 diff changeset	210 {
29f9651465c6 Added a new memory allocator function, th_malloc0(size), which is the same as calloc(1, size). Matti Hamalainen <ccr@tnsp.org> parents: 66 diff changeset	211 return calloc(1, l);
29f9651465c6 Added a new memory allocator function, th_malloc0(size), which is the same as calloc(1, size). Matti Hamalainen <ccr@tnsp.org> parents: 66 diff changeset	212 }
29f9651465c6 Added a new memory allocator function, th_malloc0(size), which is the same as calloc(1, size). Matti Hamalainen <ccr@tnsp.org> parents: 66 diff changeset	213
29f9651465c6 Added a new memory allocator function, th_malloc0(size), which is the same as calloc(1, size). Matti Hamalainen <ccr@tnsp.org> parents: 66 diff changeset	214
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	215 void *th_calloc(size_t n, size_t l)
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	216 {
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	217 return calloc(n, l);
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	218 }
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	219
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	220
194 87dac812cac4 Define some argument identifiers in function prototypes and rename some arguments. Matti Hamalainen <ccr@tnsp.org> parents: 192 diff changeset	221 void th_realloc(void ptr, size_t l)
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	222 {
194 87dac812cac4 Define some argument identifiers in function prototypes and rename some arguments. Matti Hamalainen <ccr@tnsp.org> parents: 192 diff changeset	223 return realloc(ptr, l);
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	224 }
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	225
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	226
194 87dac812cac4 Define some argument identifiers in function prototypes and rename some arguments. Matti Hamalainen <ccr@tnsp.org> parents: 192 diff changeset	227 void th_free(void *ptr)
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	228 {
10 a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	229 /* Check for NULL pointers for portability due to some libc
a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	230 * implementations not handling free(NULL) too well.
a25f5d22483e Updates. Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	231 */
194 87dac812cac4 Define some argument identifiers in function prototypes and rename some arguments. Matti Hamalainen <ccr@tnsp.org> parents: 192 diff changeset	232 if (ptr != NULL) free(ptr);
0 bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	233 }
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	234
bd61a80a6c54 Initial import into Mercurial repository. Discarding old cvs/svn history Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	235
194 87dac812cac4 Define some argument identifiers in function prototypes and rename some arguments. Matti Hamalainen <ccr@tnsp.org> parents: 192 diff changeset	236 void th_free_r(void **ptr)
192 7d25d43a3ce2 Add new function th_free_r(void *ptr) that calls th_free(ptr) and sets ptr to NULL. Matti Hamalainen <ccr@tnsp.org>* parents: 177 diff changeset	237 {
7d25d43a3ce2 Add new function th_free_r(void *ptr) that calls th_free(ptr) and sets ptr to NULL. Matti Hamalainen <ccr@tnsp.org>* parents: 177 diff changeset	238 if (p != NULL)
7d25d43a3ce2 Add new function th_free_r(void *ptr) that calls th_free(ptr) and sets ptr to NULL. Matti Hamalainen <ccr@tnsp.org>* parents: 177 diff changeset	239 {
194 87dac812cac4 Define some argument identifiers in function prototypes and rename some arguments. Matti Hamalainen <ccr@tnsp.org> parents: 192 diff changeset	240 th_free(*ptr);
87dac812cac4 Define some argument identifiers in function prototypes and rename some arguments. Matti Hamalainen <ccr@tnsp.org> parents: 192 diff changeset	241 *ptr = NULL;
192 7d25d43a3ce2 Add new function th_free_r(void *ptr) that calls th_free(ptr) and sets ptr to NULL. Matti Hamalainen <ccr@tnsp.org>* parents: 177 diff changeset	242 }
7d25d43a3ce2 Add new function th_free_r(void *ptr) that calls th_free(ptr) and sets ptr to NULL. Matti Hamalainen <ccr@tnsp.org>* parents: 177 diff changeset	243 }
7d25d43a3ce2 Add new function th_free_r(void *ptr) that calls th_free(ptr) and sets ptr to NULL. Matti Hamalainen <ccr@tnsp.org>* parents: 177 diff changeset	244
7d25d43a3ce2 Add new function th_free_r(void *ptr) that calls th_free(ptr) and sets ptr to NULL. Matti Hamalainen <ccr@tnsp.org>* parents: 177 diff changeset	245
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	246 /* Doubly linked list handling
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	247 *
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	248 * In this implementation first node's prev points to last node of the list,
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	249 * and last node's next is NULL. This way we can semi-efficiently traverse to
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	250 * beginning and end of the list, assuming user does not do weird things.
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	251 */
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	252 th_llist_t * th_llist_new(void *data)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	253 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	254 th_llist_t *res = th_malloc0(sizeof(th_llist_t));
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	255 res->data = data;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	256 return res;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	257 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	258
154 a6f175e301cc Cosmetic. Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	259
156 f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	260 void th_llist_free_func_node(th_llist_t list, void (freefunc)(th_llist_t *))
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	261 {
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	262 th_llist_t *curr = list;
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	263
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	264 while (curr != NULL)
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	265 {
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	266 th_llist_t *next = curr->next;
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	267 freefunc(curr);
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	268 curr = next;
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	269 }
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	270 }
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	271
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	272
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	273 void th_llist_free_func(th_llist_t list, void (freefunc)(void *data))
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	274 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	275 th_llist_t *curr = list;
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	276
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	277 while (curr != NULL)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	278 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	279 th_llist_t *next = curr->next;
156 f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	280 if (curr->data != NULL)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	281 freefunc(curr->data);
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	282 th_free(curr);
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	283 curr = next;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	284 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	285 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	286
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	287
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	288 void th_llist_free(th_llist_t *list)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	289 {
156 f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	290 th_llist_t *curr = list;
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	291
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	292 while (curr != NULL)
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	293 {
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	294 th_llist_t *next = curr->next;
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	295 th_free(curr);
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	296 curr = next;
f9254c34ad05 Add new utility function for linked lists, th_llist_free_func_node(). Matti Hamalainen <ccr@tnsp.org> parents: 152 diff changeset	297 }
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	298 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	299
53 2c90b33d3617 Add th_llist_append_node() and th_llist_prepend_node() to public header. Matti Hamalainen <ccr@tnsp.org> parents: 49 diff changeset	300
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	301 void th_llist_append_node(th_llist_t *list, th_llist_t node)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	302 {
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	303 if (*list != NULL)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	304 {
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	305 node->prev = (*list)->prev;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	306 (*list)->prev->next = node;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	307 (*list)->prev = node;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	308 (*list)->num++;
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	309 }
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	310 else
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	311 {
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	312 *list = node;
59 82cfbebaa8b9 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 55 diff changeset	313 node->prev = node;
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	314 (*list)->num = 1;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	315 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	316
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	317 node->next = NULL;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	318 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	319
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	320
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	321 th_llist_t th_llist_append(th_llist_t list, void data)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	322 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	323 th_llist_t *node = th_llist_new(data);
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	324
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	325 th_llist_append_node(list, node);
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	326
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	327 return node;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	328 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	329
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	330
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	331 void th_llist_prepend_node(th_llist_t *list, th_llist_t node)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	332 {
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	333 if (*list != NULL)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	334 {
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	335 node->prev = (*list)->prev;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	336 node->next = *list;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	337 (*list)->prev = node;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	338 node->num = (*list)->num + 1;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	339 *list = node;
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	340 }
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	341 else
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	342 {
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	343 *list = node->prev = node;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	344 node->next = NULL;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	345 (*list)->num = 1;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	346 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	347
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	348 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	349
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	350
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	351 th_llist_t th_llist_prepend(th_llist_t list, void data)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	352 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	353 th_llist_t *node = th_llist_new(data);
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	354
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	355 th_llist_prepend_node(list, node);
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	356
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	357 return node;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	358 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	359
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	360 /*
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	361 1) Remove a middle node
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	362
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	363 node0->prev->next = node->next (node1)
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	364 node0->next->prev = node->prev (list)
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	365
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	366 node2 <- list <=> node0 <=> node1 <=> node2 -> NULL
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	367 node2 <- list <=> node1 <=> node2 -> NULL
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	368
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	369 2) Remove first node when many items
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	370
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	371
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	372 node2 <- list <=> node0 <=> node1 <=> node2 -> NULL
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	373 node2 <- node0 <=> node1 <=> node2 -> NULL
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	374
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	375 *list = node0
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	376
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	377 3) Remove last node in list
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	378
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	379 if (node->next == NULL) {
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	380 list->prev = node->prev;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	381 node->prev->next = NULL;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	382 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	383
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	384 node2 <- list <=> node0 <=> node1 <=> node2 -> NULL
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	385 node1 <- list <=> node0 <=> node1 -> NULL
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	386
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	387 4) Remove last
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	388
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	389 list <- list -> NULL
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	390
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	391
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	392 */
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	393 void th_llist_delete_node_fast(th_llist_t *list, th_llist_t node)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	394 {
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	395 if (node == *list)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	396 {
129 aa2d608fb3f3 Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 125 diff changeset	397 // First node in list
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	398 th_llist_t tmp = (list)->next;
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	399 if (tmp != NULL)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	400 {
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	401 tmp->num = (*list)->num - 1;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	402 tmp->prev = (*list)->prev;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	403 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	404 *list = tmp;
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	405 }
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	406 else
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	407 {
129 aa2d608fb3f3 Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 125 diff changeset	408 // Somewhere in middle or end
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	409 if (node->prev != NULL)
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	410 node->prev->next = node->next;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	411
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	412 if (node->next != NULL)
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	413 node->next->prev = node->prev;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	414 else
129 aa2d608fb3f3 Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 125 diff changeset	415 (*list)->prev = node; // Last node
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	416
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	417 (*list)->num--;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	418 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	419
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	420 node->next = node->prev = NULL;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	421 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	422
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	423
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	424 void th_llist_delete_node(th_llist_t *list, th_llist_t node)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	425 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	426 th_llist_t curr = list;
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	427
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	428 while (curr != NULL)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	429 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	430 th_llist_t *next = curr->next;
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	431 if (curr == node)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	432 {
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	433 th_llist_delete_node_fast(list, curr);
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	434 th_free(node);
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	435 break;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	436 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	437 curr = next;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	438 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	439 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	440
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	441
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	442 void th_llist_delete(th_llist_t *list, const void data)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	443 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	444 th_llist_t curr = list;
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	445
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	446 while (curr != NULL)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	447 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	448 th_llist_t *next = curr->next;
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	449 if (curr->data == data)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	450 {
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	451 th_llist_delete_node_fast(list, curr);
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	452 th_free(curr);
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	453 break;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	454 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	455 curr = next;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	456 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	457 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	458
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	459
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	460 th_llist_t * th_llist_get_nth(th_llist_t *list, const size_t n)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	461 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	462 th_llist_t *curr = list;
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	463 size_t i;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	464
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	465 for (i = 0; curr != NULL && i < n; curr = curr->next, i++);
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	466
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	467 return curr;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	468 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	469
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	470
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	471 size_t th_llist_length(const th_llist_t *list)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	472 {
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	473 if (list == NULL)
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	474 return 0;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	475 else
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	476 return list->num;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	477 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	478
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	479
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	480 ssize_t th_llist_position(const th_llist_t list, const th_llist_t node)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	481 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	482 const th_llist_t *curr = list;
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	483 ssize_t i = 0;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	484
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	485 while (curr != NULL)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	486 {
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	487 if (curr == node)
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	488 return i;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	489 else
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	490 i++;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	491
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	492 curr = curr->next;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	493 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	494
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	495 return -1;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	496 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	497
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	498
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	499 void th_llist_foreach(th_llist_t list, void (func)(th_llist_t node, void userdata), void *data)
54 48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	500 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	501 th_llist_t *curr = list;
54 48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	502
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	503 while (curr != NULL)
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	504 {
55 300fba04b7ad Adjust the foreach linked list functions a bit. Matti Hamalainen <ccr@tnsp.org> parents: 54 diff changeset	505 func(curr, data);
54 48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	506 curr = curr->next;
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	507 }
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	508 }
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	509
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	510
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	511 int th_llist_foreach_cond(th_llist_t list, int (func)(th_llist_t node, void userdata), void data, th_llist_t *ret)
54 48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	512 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	513 th_llist_t *curr = list;
54 48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	514
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	515 while (curr != NULL)
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	516 {
55 300fba04b7ad Adjust the foreach linked list functions a bit. Matti Hamalainen <ccr@tnsp.org> parents: 54 diff changeset	517 int res = func(curr, data);
54 48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	518 if (res != 0)
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	519 {
55 300fba04b7ad Adjust the foreach linked list functions a bit. Matti Hamalainen <ccr@tnsp.org> parents: 54 diff changeset	520 *ret = curr;
300fba04b7ad Adjust the foreach linked list functions a bit. Matti Hamalainen <ccr@tnsp.org> parents: 54 diff changeset	521 return res;
54 48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	522 }
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	523 curr = curr->next;
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	524 }
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	525
55 300fba04b7ad Adjust the foreach linked list functions a bit. Matti Hamalainen <ccr@tnsp.org> parents: 54 diff changeset	526 return 0;
54 48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	527 }
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	528
48926b3ff598 Add new linked list handling functions: th_llist_foreach() and th_llist_foreach_cond() Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	529
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	530 th_llist_t * th_llist_find(th_llist_t list, const void data)
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	531 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	532 th_llist_t *curr = list;
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	533
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	534 while (curr != NULL)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	535 {
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	536 if (curr->data == data)
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	537 return curr;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	538 curr = curr->next;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	539 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	540
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	541 return NULL;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	542 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	543
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	544
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	545 th_llist_t * th_llist_find_func(th_llist_t list, const void userdata, int (compare)(const void , const void ))
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	546 {
152 b4e1b15a64e1 Rename qlist_t doubly linked list structure to th_llist_t. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	547 th_llist_t *curr = list;
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	548
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	549 while (curr != NULL)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	550 {
16 0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	551 if (compare(curr->data, userdata) == 0)
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	552 return curr;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	553 curr = curr->next;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	554 }
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	555
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	556 return NULL;
0cea9c0cfce7 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 11 diff changeset	557 }
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	558
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	559
26 04187ae0b3b6 Comment. Matti Hamalainen <ccr@tnsp.org> parents: 25 diff changeset	560 /*
04187ae0b3b6 Comment. Matti Hamalainen <ccr@tnsp.org> parents: 25 diff changeset	561 * Ringbuffers
04187ae0b3b6 Comment. Matti Hamalainen <ccr@tnsp.org> parents: 25 diff changeset	562 */
157 e96c900ca6f1 Rename qringbuf_t to th_ringbuf_t. Matti Hamalainen <ccr@tnsp.org> parents: 156 diff changeset	563 th_ringbuf_t * th_ringbuf_new(const size_t size, void (mdeallocator)(void data))
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	564 {
157 e96c900ca6f1 Rename qringbuf_t to th_ringbuf_t. Matti Hamalainen <ccr@tnsp.org> parents: 156 diff changeset	565 th_ringbuf_t *res = th_malloc0(sizeof(th_ringbuf_t));
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	566
33 06a72c643460 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 28 diff changeset	567 res->data = (char *) th_calloc(size, sizeof(char ));
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	568 res->size = size;
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	569 res->n = 0;
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	570 res->deallocator = mdeallocator;
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	571
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	572 return res;
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	573 }
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	574
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	575
157 e96c900ca6f1 Rename qringbuf_t to th_ringbuf_t. Matti Hamalainen <ccr@tnsp.org> parents: 156 diff changeset	576 BOOL th_ringbuf_grow(th_ringbuf_t *buf, const size_t n)
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	577 {
33 06a72c643460 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 28 diff changeset	578 buf->data = (char *) th_realloc(buf->data, (buf->size + n) sizeof(char *));
40 5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	579 if (buf->data != NULL)
5b1e38a41bac Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 33 diff changeset	580 {
98 1760e7f53359 Remove th_memset(). Matti Hamalainen <ccr@tnsp.org> parents: 96 diff changeset	581 memset(buf->data + buf->size, 0, sizeof(char ) n);
33 06a72c643460 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 28 diff changeset	582 buf->size += n;
06a72c643460 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 28 diff changeset	583 return TRUE;
06a72c643460 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 28 diff changeset	584 } else
06a72c643460 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 28 diff changeset	585 return FALSE;
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	586 }
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	587
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	588
157 e96c900ca6f1 Rename qringbuf_t to th_ringbuf_t. Matti Hamalainen <ccr@tnsp.org> parents: 156 diff changeset	589 void th_ringbuf_free(th_ringbuf_t *buf)
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	590 {
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	591 int i;
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	592
33 06a72c643460 Sync. Matti Hamalainen <ccr@tnsp.org> parents: 28 diff changeset	593 for (i = 0; i < buf->size; i++)
58 c12b66ec0362 Add braces, mostly cosmetic. Matti Hamalainen <ccr@tnsp.org> parents: 55 diff changeset	594 {
25 2f7270a9d593 Make ringbuffer deallocator function call only happen if data pointer is != NULL Matti Hamalainen <ccr@tnsp.org> parents: 23 diff changeset	595 if (buf->data[i] != NULL)
2f7270a9d593 Make ringbuffer deallocator function call only happen if data pointer is != NULL Matti Hamalainen <ccr@tnsp.org> parents: 23 diff changeset	596 buf->deallocator(buf->data[i]);
58 c12b66ec0362 Add braces, mostly cosmetic. Matti Hamalainen <ccr@tnsp.org> parents: 55 diff changeset	597 }
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	598
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	599 th_free(buf->data);
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	600 th_free(buf);
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	601 }
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	602
a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	603
157 e96c900ca6f1 Rename qringbuf_t to th_ringbuf_t. Matti Hamalainen <ccr@tnsp.org> parents: 156 diff changeset	604 void th_ringbuf_add(th_ringbuf_t buf, void ptr)
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	605 {
28 c47dcb8a4ffe Change how ringbuffer actually works to be more sensible. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	606 if (buf->n < buf->size)
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	607 buf->n++;
28 c47dcb8a4ffe Change how ringbuffer actually works to be more sensible. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	608
c47dcb8a4ffe Change how ringbuffer actually works to be more sensible. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	609 th_free(buf->data[0]);
c47dcb8a4ffe Change how ringbuffer actually works to be more sensible. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	610 memmove(&(buf->data[0]), &(buf->data[1]), (buf->size - 1) * sizeof(void *));
c47dcb8a4ffe Change how ringbuffer actually works to be more sensible. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	611 buf->data[buf->size - 1] = ptr;
23 a4f894105953 Add ringbuffer implementation. Matti Hamalainen <ccr@tnsp.org> parents: 16 diff changeset	612 }
109 fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	613
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	614
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	615 /*
115 13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	616 * Simple legacy string growing buffer
109 fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	617 */
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	618 BOOL th_strbuf_grow(char *buf, size_t bufsize, size_t *len, size_t grow)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	619 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	620 if (*buf == NULL)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	621 bufsize = len = 0;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	622
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	623 if (buf == NULL \|\| len + grow >= *bufsize)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	624 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	625 *bufsize += grow + TH_BUFGROW;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	626 buf = th_realloc(buf, *bufsize);
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	627 if (*buf == NULL)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	628 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	629 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	630 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	631 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	632
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	633
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	634 BOOL th_strbuf_putch(char *buf, size_t bufsize, size_t *len, const char ch)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	635 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	636 if (!th_strbuf_grow(buf, bufsize, len, 1))
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	637 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	638
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	639 (buf)[len] = ch;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	640 (*len)++;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	641
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	642 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	643 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	644
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	645
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	646 BOOL th_strbuf_puts(char *buf, size_t bufsize, size_t len, const char str)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	647 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	648 size_t slen;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	649 if (str == NULL)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	650 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	651
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	652 slen = strlen(str);
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	653 if (!th_strbuf_grow(buf, bufsize, len, slen + 1))
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	654 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	655
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	656 memcpy(buf + len, str, slen + 1);
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	657 (*len) += slen;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	658
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	659 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	660 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	661
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	662
115 13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	663 /*
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	664 * Growing buffer
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	665 */
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	666 void th_growbuf_clear(th_growbuf_t *buf)
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	667 {
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	668 // Simply reset the current "length"
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	669 buf->len = 0;
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	670 }
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	671
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	672
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	673 void th_growbuf_init(th_growbuf_t *buf, const size_t mingrow)
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	674 {
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	675 // Initialize the buffer structure
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	676 memset(buf, 0, sizeof(th_growbuf_t));
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	677 buf->mingrow = mingrow;
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	678 }
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	679
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	680
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	681 th_growbuf_t *th_growbuf_new(const size_t mingrow)
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	682 {
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	683 th_growbuf_t *buf;
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	684
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	685 if ((buf = th_malloc(sizeof(th_growbuf_t))) == NULL)
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	686 return NULL;
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	687
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	688 th_growbuf_init(buf, mingrow);
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	689 buf->allocated = TRUE;
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	690
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	691 return buf;
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	692 }
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	693
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	694
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	695 void th_growbuf_free(th_growbuf_t *buf)
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	696 {
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	697 th_free(buf->data);
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	698
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	699 if (buf->allocated)
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	700 th_free(buf);
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	701 }
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	702
13f001f1ad6e More work on growbuf stuff. Matti Hamalainen <ccr@tnsp.org> parents: 111 diff changeset	703
109 fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	704 BOOL th_growbuf_grow(th_growbuf_t *buf, const size_t grow)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	705 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	706 if (buf == NULL)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	707 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	708
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	709 if (buf->data == NULL \|\| buf->len + grow >= buf->size)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	710 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	711 buf->size += grow + (buf->mingrow > 0 ? buf->mingrow : TH_BUFGROW);
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	712 buf->data = (uint8_t *) th_realloc(buf->data, buf->size);
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	713 if (buf->data == NULL)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	714 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	715 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	716 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	717 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	718
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	719
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	720 BOOL th_growbuf_puts(th_growbuf_t buf, const char str, BOOL eos)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	721 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	722 size_t slen;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	723 if (str == NULL)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	724 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	725
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	726 slen = strlen(str);
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	727 if (!th_growbuf_grow(buf, slen + 1))
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	728 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	729
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	730 memcpy(buf->data + buf->len, str, slen + 1);
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	731 buf->len += eos ? (slen + 1) : slen;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	732
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	733 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	734 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	735
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	736
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	737 BOOL th_growbuf_putch(th_growbuf_t *buf, const char ch)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	738 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	739 if (!th_growbuf_grow(buf, sizeof(char)))
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	740 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	741
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	742 buf->data[buf->len++] = (uint8_t) ch;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	743
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	744 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	745 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	746
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	747
120 41c2638ee537 Use void* instead of uint8_t* in th_growbuf_put_str() Matti Hamalainen <ccr@tnsp.org> parents: 115 diff changeset	748 BOOL th_growbuf_put_str(th_growbuf_t buf, const void s, const size_t len)
111 cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	749 {
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	750 if (s == NULL)
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	751 return FALSE;
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	752
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	753 if (!th_growbuf_grow(buf, len + 1))
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	754 return FALSE;
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	755
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	756 memcpy(buf->data + buf->len, s, len + 1);
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	757 buf->len += len;
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	758
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	759 return TRUE;
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	760 }
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	761
cddfc43a4e45 More functions for growbuf. Matti Hamalainen <ccr@tnsp.org> parents: 109 diff changeset	762
109 fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	763 BOOL th_growbuf_put_u8(th_growbuf_t *buf, const uint8_t val)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	764 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	765 if (!th_growbuf_grow(buf, sizeof(uint8_t)))
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	766 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	767
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	768 buf->data[buf->len++] = val;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	769
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	770 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	771 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	772
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	773
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	774 BOOL th_growbuf_put_u16_be(th_growbuf_t *buf, const uint16_t val)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	775 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	776 if (!th_growbuf_grow(buf, sizeof(uint16_t)))
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	777 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	778
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	779 buf->data[buf->len++] = (val >> 8) & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	780 buf->data[buf->len++] = val & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	781
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	782 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	783 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	784
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	785
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	786 BOOL th_growbuf_put_u16_le(th_growbuf_t *buf, const uint16_t val)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	787 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	788 if (!th_growbuf_grow(buf, sizeof(uint16_t)))
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	789 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	790
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	791 buf->data[buf->len++] = val & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	792 buf->data[buf->len++] = (val >> 8) & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	793
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	794 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	795 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	796
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	797
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	798 BOOL th_growbuf_put_u32_be(th_growbuf_t *buf, const uint32_t val)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	799 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	800 if (!th_growbuf_grow(buf, sizeof(uint32_t)))
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	801 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	802
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	803 buf->data[buf->len++] = (val >> 24) & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	804 buf->data[buf->len++] = (val >> 16) & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	805 buf->data[buf->len++] = (val >> 8) & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	806 buf->data[buf->len++] = val & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	807
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	808 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	809 }
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	810
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	811
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	812 BOOL th_growbuf_put_u32_le(th_growbuf_t *buf, const uint32_t val)
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	813 {
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	814 if (!th_growbuf_grow(buf, sizeof(uint32_t)))
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	815 return FALSE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	816
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	817 buf->data[buf->len++] = val & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	818 buf->data[buf->len++] = (val >> 8) & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	819 buf->data[buf->len++] = (val >> 16) & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	820 buf->data[buf->len++] = (val >> 24) & 0xff;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	821
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	822 return TRUE;
fedad0ed894f Remove th_growbuf, move to th_util. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	823 }

Mercurial > hg > th-libs

annotate th_util.c @ 194:87dac812cac4