From da5d88e6bda4320fbdbe78a07ea277320098009f Mon Sep 17 00:00:00 2001
From: Vsevolod Stakhov <vsevolod@highsecure.ru>
Date: Tue, 13 Oct 2015 12:26:29 +0100
Subject: [PATCH] Add textpart:get_words_count method

---
 src/lua/lua_mimepart.c | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

diff --git a/src/lua/lua_mimepart.c b/src/lua/lua_mimepart.c
index d8e04024d..dc97de3db 100644
--- a/src/lua/lua_mimepart.c
+++ b/src/lua/lua_mimepart.c
@@ -78,6 +78,12 @@ LUA_FUNCTION_DEF (textpart, get_raw_length);
  * @return {integer} number of lines in the part
  */
 LUA_FUNCTION_DEF (textpart, get_lines_count);
+/***
+ * @method mime_part:get_words_count()
+ * Get words number in the part
+ * @return {integer} number of words in the part
+ */
+LUA_FUNCTION_DEF (textpart, get_words_count);
 /***
  * @method text_part:is_empty()
  * Returns `true` if the specified part is empty
@@ -115,6 +121,7 @@ static const struct luaL_reg textpartlib_m[] = {
 	LUA_INTERFACE_DEF (textpart, get_length),
 	LUA_INTERFACE_DEF (textpart, get_raw_length),
 	LUA_INTERFACE_DEF (textpart, get_lines_count),
+	LUA_INTERFACE_DEF (textpart, get_words_count),
 	LUA_INTERFACE_DEF (textpart, is_empty),
 	LUA_INTERFACE_DEF (textpart, is_html),
 	LUA_INTERFACE_DEF (textpart, get_html),
@@ -338,6 +345,26 @@ lua_textpart_get_lines_count (lua_State * L)
 	return 1;
 }
 
+static gint
+lua_textpart_get_words_count (lua_State *L)
+{
+	struct mime_text_part *part = lua_check_textpart (L);
+
+	if (part == NULL) {
+		lua_pushnil (L);
+		return 1;
+	}
+
+	if (IS_PART_EMPTY (part) || part->normalized_words == NULL) {
+		lua_pushnumber (L, 0);
+	}
+	else {
+		lua_pushnumber (L, part->normalized_words->len);
+	}
+
+	return 1;
+}
+
 static gint
 lua_textpart_is_empty (lua_State * L)
 {
-- 
2.39.5