Added bc_convert_vector_to_char() and bc_convert_vector_to_char_with_skip()

Author: SakiTakamachi

ext/bcmath/libbcmath/src/convert.h

@@ -85,4 +85,50 @@ static inline void bc_convert_to_vector_with_zero_pad(BC_VECTOR *n_vector, const
 	bc_convert_to_vector(n_vector, nend, nlen);
 }
 
+static inline void bc_convert_vector_to_char(char *nptr, char *nend, BC_VECTOR *vectors, size_t array_size)
+{
+	size_t i;
+	for (i = 0; i < array_size - 1; i++) {
+#if BC_VECTOR_SIZE == 4
+		bc_write_bcd_representation(vectors[i], nend - 3);
+		nend -= 4;
+#else
+		bc_write_bcd_representation(vectors[i] / 10000, nend - 7);
+		bc_write_bcd_representation(vectors[i] % 10000, nend - 3);
+		nend -= 8;
+#endif
+	}
+
+	while (nend >= nptr) {
+		*nend-- = vectors[i] % BASE;
+		vectors[i] /= BASE;
+	}
+}
+
+static inline void bc_convert_vector_to_char_with_skip(char *nptr, char *nend, BC_VECTOR *vectors, size_t array_size, size_t skip)
+{
+	/* bulk skip */
+	size_t array_skip = skip / BC_VECTOR_SIZE;
+	array_size -= array_skip;
+	vectors += array_skip;
+
+	/* skip */
+	skip %= BC_VECTOR_SIZE;
+	if (skip > 0) {
+		BC_VECTOR current_vector = *vectors;
+		current_vector /= BC_POW_10_LUT[skip];
+		size_t write_size = MIN(nend - nptr + 1, BC_VECTOR_SIZE - skip);
+		for (size_t i = 0; i < write_size; i++) {
+			*nend-- = current_vector % BASE;
+			current_vector /= BASE;
+		}
+		vectors++;
+		array_size--;
+	}
+
+	if (array_size > 0) {
+		bc_convert_vector_to_char(nptr, nend, vectors, array_size);
+	}
+}
+
 #endif

ext/bcmath/libbcmath/src/div.c

@@ -286,23 +286,7 @@ static void bc_do_div(
 	/* Convert to bc_num */
 	char *qptr = (*quot)->n_value;
 	char *qend = qptr + (*quot)->n_len + (*quot)->n_scale - 1;
-
-	size_t i;
-	for (i = 0; i < quot_real_arr_size - 1; i++) {
-#if BC_VECTOR_SIZE == 4
-		bc_write_bcd_representation(quot_vectors[i], qend - 3);
-		qend -= 4;
-#else
-		bc_write_bcd_representation(quot_vectors[i] / 10000, qend - 7);
-		bc_write_bcd_representation(quot_vectors[i] % 10000, qend - 3);
-		qend -= 8;
-#endif
-	}
-
-	while (qend >= qptr) {
-		*qend-- = quot_vectors[i] % BASE;
-		quot_vectors[i] /= BASE;
-	}
+	bc_convert_vector_to_char(qptr, qend, quot_vectors, quot_real_arr_size);
 
 	efree(numerator_vectors);
 }