Home
last modified time | relevance | path

Searched refs:bstri (Results 1 – 25 of 35) sorted by relevance

12

/dports/lang/seed7/seed7/src/
H A Dcon_rtl.c154 bstriType bstri; in conWrite() local
157 bstri = stri_to_bstri8(stri); in conWrite()
159 bstri = stri_to_bstriw(stri, &err_info); in conWrite()
161 bstri = stri_to_bstri(stri, &err_info); in conWrite()
163 if (unlikely(bstri == NULL)) { in conWrite()
171 size = bstri->size / sizeof(os_charType); in conWrite()
173 size = bstri->size; in conWrite()
175 conText(cursor_line, cursor_column, (console_striType) bstri->mem, size); in conWrite()
176 FREE_BSTRI(bstri, bstri->size); in conWrite()
H A Dbstlib.c375 bstriType bstri; in bst_idx() local
381 bstri = take_bstri(arg_1(arguments)); in bst_idx()
402 bstriType bstri; in bst_lng() local
406 bstri = take_bstri(arg_1(arguments)); in bst_lng()
408 if (unlikely(bstri->size > MAX_MEM_INDEX)) { in bst_lng()
410 bstriAsUnquotedCStri(bstri));); in bst_lng()
414 return bld_int_temp((intType) bstri->size); in bst_lng()
486 bstriType bstri; in bst_value() local
500 bstri = take_bstri(aReference); in bst_value()
504 result->size = bstri->size; in bst_value()
[all …]
H A Dbst_rtl.c322 intType bstHashCode (const const_bstriType bstri) in bstHashCode() argument
328 if (bstri->size == 0) { in bstHashCode()
331 result = (intType) ((memSizeType) bstri->mem[0] << 5 ^ in bstHashCode()
332 bstri->size << 3 ^ bstri->mem[bstri->size - 1]); in bstHashCode()
375 striType bstStr (const const_bstriType bstri) in bstStr() argument
381 logFunction(printf("bstStr(\"%s\")\n", bstriAsUnquotedCStri(bstri));); in bstStr()
382 if (unlikely(!ALLOC_STRI_CHECK_SIZE(result, bstri->size))) { in bstStr()
385 result->size = bstri->size; in bstStr()
386 memcpy_to_strelem(result->mem, bstri->mem, bstri->size); in bstStr()
H A Dstriutl.c1789 bstriType bstri; in stri_to_bstri() local
1797 FREE_BSTRI(bstri, bstri->size); in stri_to_bstri()
1802 return bstri; in stri_to_bstri()
1820 bstriType bstri; in stri_to_bstri8() local
1824 bstri = NULL; in stri_to_bstri8()
1826 bstri->size = stri_to_utf8(bstri->mem, stri->mem, stri->size); in stri_to_bstri8()
1836 return bstri; in stri_to_bstri8()
1856 bstriType bstri; in stri_to_bstriw() local
1861 bstri = NULL; in stri_to_bstriw()
1885 return bstri; in stri_to_bstriw()
[all …]
H A Dbst_rtl.h38 intType bstHashCode (const const_bstriType bstri);
40 striType bstStr (const const_bstriType bstri);
H A Dsql_fire.c1078 bstriType bstri; in getBlob() local
1097 bstri = NULL; in getBlob()
1104 bstri = NULL; in getBlob()
1106 bstri->size = copyBlobContents(blob_handle, blobLength, bstri->mem); in getBlob()
1109 bstri = NULL; in getBlob()
1119 bstri = NULL; in getBlob()
1124 return bstri; in getBlob()
1651 memcpy(sqlvar->sqldata, bstri->mem, bstri->size); in sqlBindBStri()
1667 bstri->mem, bstri->size); in sqlBindBStri()
2034 bstriType bstri; in sqlBindStri() local
[all …]
H A Dflistutl.c272 if (count.bstri != 0) { in heapStatistic()
274 count.bstri * SIZ_BSTRI(0), in heapStatistic()
275 count.bstri, in heapStatistic()
277 bytes_used += count.bstri * SIZ_BSTRI(0); in heapStatistic()
280 count.bstri, in heapStatistic()
281 (unsigned long) ((count.bstri_elems * sizeof(ucharType)) / count.bstri)); in heapStatistic()
642 bytes_total += count.bstri * SIZ_BSTRI(0); in compute_hs()
850 ((memSizeType) count.bstri) * SIZ_BSTRI(0) + in check_heap()
H A Dsql_cli.c2029 bstriType bstri; in setNumericBigInt() local
2049 bstri = NULL; in setNumericBigInt()
2057 if (bstri == NULL) { in setNumericBigInt()
2069 memcpy(numStruct->val, bstri->mem, bstri->size); in setNumericBigInt()
2070 memset(&numStruct->val[bstri->size], 0, SQL_MAX_NUMERIC_LEN - bstri->size); in setNumericBigInt()
2072 bstDestr(bstri); in setNumericBigInt()
2089 bstriType bstri; in setNumericBigRat() local
2122 bstri = NULL; in setNumericBigRat()
2142 memcpy(numStruct->val, bstri->mem, bstri->size); in setNumericBigRat()
3185 minimum_size = bstri->size == 0 ? 1 : bstri->size; in sqlBindBStri()
[all …]
H A Dbig_gmp.c750 bigIntType bigFromBStriBe (const const_bstriType bstri, const boolType isSigned) in bigFromBStriBe() argument
754 bstriAsUnquotedCStri(bstri), isSigned);); in bigFromBStriBe()
755 return bigFromByteBufferBe(bstri->size, bstri->mem, isSigned); in bigFromBStriBe()
770 bigIntType bigFromBStriLe (const const_bstriType bstri, const boolType isSigned) in bigFromBStriLe() argument
774 bstriAsUnquotedCStri(bstri), isSigned);); in bigFromBStriLe()
775 return bigFromByteBufferLe(bstri->size, bstri->mem, isSigned); in bigFromBStriLe()
H A Dbig_drv.h71 bigIntType bigFromBStriBe (const const_bstriType bstri, const boolType isSigned);
72 bigIntType bigFromBStriLe (const const_bstriType bstri, const boolType isSigned);
H A Dtraceutl.h64 void prot_bstri (bstriType bstri);
H A Dref_data.c1050 bstriType bstri; in bstValue() local
1056 (bstri = take_bstri(aReference)) == NULL)) { in bstValue()
1063 if (unlikely(!ALLOC_BSTRI_SIZE_OK(result, bstri->size))) { in bstValue()
1066 result->size = bstri->size; in bstValue()
1067 memcpy(result->mem, bstri->mem, (size_t) (result->size)); in bstValue()
H A Dsql_my.c1080 const const_bstriType bstri) in sqlBindBStri() argument
1089 (memSizeType) sqlStatement, pos, bstriAsUnquotedCStri(bstri));); in sqlBindBStri()
1097 if (unlikely(bstri->size > MAX_LONG_BLOB_LENGTH)) { in sqlBindBStri()
1100 if (preparedStmt->param_data_array[pos - 1].buffer_capacity < bstri->size) { in sqlBindBStri()
1102 if (unlikely((param->buffer = malloc(bstri->size)) == NULL)) { in sqlBindBStri()
1106 preparedStmt->param_data_array[pos - 1].buffer_capacity = bstri->size; in sqlBindBStri()
1112 if (bstri->size <= MAX_TINY_BLOB_LENGTH) { in sqlBindBStri()
1114 } else if (bstri->size <= MAX_BLOB_LENGTH) { in sqlBindBStri()
1116 } else if (bstri->size <= MAX_MEDIUM_BLOB_LENGTH) { in sqlBindBStri()
1126 memcpy(param->buffer, bstri->mem, bstri->size); in sqlBindBStri()
[all …]
H A Dsoc_rtl.c2237 bstriType bstri = NULL; in socWrite() local
2261 bstri = stri_to_bstri(stri, &err_info); in socWrite()
2262 if (unlikely(bstri == NULL)) { in socWrite()
2270 buf = bstri->mem; in socWrite()
2271 bytes_to_send = bstri->size; in socWrite()
2290 if (bstri != NULL) { in socWrite()
2291 FREE_BSTRI(bstri, bstri->size); in socWrite()
H A Dsql_oci.c2129 bstriType bstri; in getBlob() local
2144 bstri = NULL; in getBlob()
2148 bstri = NULL; in getBlob()
2158 bstri->mem, in getBlob()
2168 bstri = NULL; in getBlob()
2173 return bstri; in getBlob()
2404 byte_amount = bstri->size; in setBlob()
2411 (dvoid *) bstri->mem, in setBlob()
2412 (oraub8) bstri->size, in setBlob()
2675 const const_bstriType bstri) in sqlBindBStri() argument
[all …]
H A Dsql_rtl.h39 const const_bstriType bstri);
H A Dsql_rtl.c188 const const_bstriType bstri) in sqlBindBStri() argument
192 (memSizeType) sqlStatement, pos, bstriAsUnquotedCStri(bstri));); in sqlBindBStri()
198 (memSizeType) sqlStatement, pos, bstriAsUnquotedCStri(bstri));); in sqlBindBStri()
201 ((preparedStmtType) sqlStatement)->sqlFunc->sqlBindBStri(sqlStatement, pos, bstri); in sqlBindBStri()
H A Dsqllib.c315 bstriType bstri; in sql_column_bstri() local
320 bstri = sqlColumnBStri(take_sqlstmt(arg_1(arguments)), in sql_column_bstri()
322 return bld_bstri_temp(bstri); in sql_column_bstri()
H A Dsql_drv.h42 const const_bstriType bstri);
H A Dsql_lite.c707 const const_bstriType bstri) in sqlBindBStri() argument
716 (memSizeType) sqlStatement, pos, bstriAsUnquotedCStri(bstri));); in sqlBindBStri()
736 } else if (unlikely(bstri->size > INT_MAX || in sqlBindBStri()
737 !ALLOC_CSTRI(blob, bstri->size))) { in sqlBindBStri()
741 memcpy(blob, bstri->mem, bstri->size); in sqlBindBStri()
745 (int) bstri->size, in sqlBindBStri()
H A Dsql_tds.c1340 const const_bstriType bstri) in sqlBindBStri() argument
1351 (memSizeType) sqlStatement, pos, bstriAsUnquotedCStri(bstri));); in sqlBindBStri()
1359 if (unlikely(bstri->size > (MAX_STRI_LEN - 2) / 2 || in sqlBindBStri()
1360 !ALLOC_STRI_CHECK_SIZE(stri, 2 + 2 * bstri->size))) { in sqlBindBStri()
1363 stri->size = 2 + 2 * bstri->size; in sqlBindBStri()
1366 for (idx = 0; idx < bstri->size; idx++) { in sqlBindBStri()
1367 stri->mem[(idx << 1) + 2] = digit[bstri->mem[idx] >> 4]; in sqlBindBStri()
1368 stri->mem[(idx << 1) + 3] = digit[bstri->mem[idx] & 0xf]; in sqlBindBStri()
/dports/lang/seed7/seed7/prg/
H A Dchkbst.sd733 return bstri;
165 bstri := bstri;
167 writeln(" ***** 'bstri := bstri' does not work correct.");
170 do_assign(bstri, bstri);
172 writeln(" ***** 'bstri := bstri' does not work correct.");
548 bstri := TRUE ? thenValue : elseValue; ok := ok and bstri = thenValue;
549 bstri := FALSE ? thenValue : elseValue; ok := ok and bstri = elseValue;
550 bstri := TRUE ? thenValue : bstriExpr(elseValue); ok := ok and bstri = thenValue;
551 bstri := FALSE ? thenValue : bstriExpr(elseValue); ok := ok and bstri = elseValue;
556 bstri := boolExpr( TRUE) ? thenValue : elseValue; ok := ok and bstri = thenValue;
[all …]
/dports/lang/seed7/seed7/lib/
H A Dbstring.s7i66 const func string: literal (in bstring: bstri) is
67 return "bstring(" & literal(str(bstri)) & ")";
149 const proc: for (inout char: forVar) range (in bstring: bstri) do
155 for number range 1 to length(bstri) do
156 forVar := bstri[number];
164 * @param bstri Bstring to be converted. The bytes are interpreted
166 * @param isSigned Defines if ''bstri'' is interpreted as signed value.
172 const func bigInteger: bStriBe2BigInt (in bstring: bstri,
178 * @param bstri Bstring to be converted. The bytes are interpreted
180 * @param isSigned Defines if ''bstri'' is interpreted as signed value.
[all …]
/dports/lang/seed7/seed7/lib/comp/
H A Dliteral.s7i109 const func string: bstriLiteral (in bstring: bstri) is func
114 if bstri not in bstri_const_table then
115 bstri_const_table @:= [bstri] length(bstri_const_table);
121 expr &:= str(bstri_const_table[bstri]);
H A Dbst_act.s7i195 const proc: process_const_bst_idx (in bstring: bstri,
206 if index_value < 1 or index_value > length(bstri) then
210 c_expr.expr &:= charLiteral(bstri[index_value]);
214 c_expr.expr &:= bstriLiteral(bstri);
244 c_expr.expr &:= integerLiteral(length(bstri));

12