Implement operator_length

Author: adazem009

src/dev/blocks/operatorblocks.cpp

@@ -34,6 +34,7 @@ void OperatorBlocks::registerBlocks(IEngine *engine)
     engine->addCompileFunction(this, "operator_not", &compileNot);
     engine->addCompileFunction(this, "operator_join", &compileJoin);
     engine->addCompileFunction(this, "operator_letter_of", &compileLetterOf);
+    engine->addCompileFunction(this, "operator_length", &compileLength);
 }
 
 CompilerValue *OperatorBlocks::compileAdd(Compiler *compiler)
@@ -107,6 +108,12 @@ CompilerValue *OperatorBlocks::compileLetterOf(Compiler *compiler)
     return compiler->addFunctionCall("operator_letter_of", Compiler::StaticType::String, { Compiler::StaticType::Number, Compiler::StaticType::String }, { letter, string });
 }
 
+CompilerValue *OperatorBlocks::compileLength(Compiler *compiler)
+{
+    auto string = compiler->addInput("STRING");
+    return compiler->addFunctionCall("operator_length", Compiler::StaticType::Number, { Compiler::StaticType::String }, { string });
+}
+
 extern "C" char *operator_join(const char *string1, const char *string2)
 {
     const size_t len1 = strlen(string1);
@@ -142,3 +149,9 @@ extern "C" char *operator_letter_of(double letter, const char *string)
 
     return ret;
 }
+
+extern "C" double operator_length(const char *string)
+{
+    // TODO: Rewrite this
+    return utf8::utf8to16(std::string(string)).size();
+}

src/dev/blocks/operatorblocks.h

@@ -31,6 +31,7 @@ class OperatorBlocks : public IExtension
         static CompilerValue *compileNot(Compiler *compiler);
         static CompilerValue *compileJoin(Compiler *compiler);
         static CompilerValue *compileLetterOf(Compiler *compiler);
+        static CompilerValue *compileLength(Compiler *compiler);
 };
 
 } // namespace libscratchcpp

test/dev/blocks/operator_blocks_test.cpp

@@ -421,3 +421,31 @@ TEST_F(OperatorBlocksTest, LetterOf)
     ASSERT_EQ(Value(values[3]), "");
     ASSERT_EQ(Value(values[4]), "Á");
 }
+
+TEST_F(OperatorBlocksTest, Length)
+{
+    auto target = std::make_shared<Sprite>();
+    ScriptBuilder builder(m_extension.get(), m_engine, target);
+
+    builder.addBlock("operator_length");
+    builder.addValueInput("STRING", "abc");
+    builder.captureBlockReturnValue();
+
+    builder.addBlock("operator_length");
+    builder.addValueInput("STRING", "Hello world");
+    builder.captureBlockReturnValue();
+
+    builder.addBlock("operator_length");
+    builder.addValueInput("STRING", "dOádčĐaší");
+    builder.captureBlockReturnValue();
+
+    builder.build();
+    builder.run();
+
+    List *valueList = builder.capturedValues();
+    ValueData *values = valueList->data();
+    ASSERT_EQ(valueList->size(), 3);
+    ASSERT_EQ(Value(values[0]), 3);
+    ASSERT_EQ(Value(values[1]), 11);
+    ASSERT_EQ(Value(values[2]), 9);
+}