Hi again,

thanks for the updated patch.
TAMMON is not implemented, because glibc doesn't provide an alternative form for abbreviated month names. It is a question if it is better to raise an error, return a non alternative name or just ignore this flag. I have not strong opinion about this. Inside DCH_to_char the prefix TM is ignored when it is not used. So I did the same.
The Locale standard actually mentions abbreviated alternative month names as "ab_alt_mon" (see [1]). I tested this by setting your TAMMONTH strftime call to '%Ob'. If we set the locale to Russian and call the function for May this actually returns
an abbreviated version of the month name:

Breakpoint 1, cache_locale_time () at pg_locale.c:772
772           if (strftime_l(bufptr, MAX_L10N_DATA, "%Ob", timeinfo, locale) <= 0)
(gdb) n
774                     bufptr += MAX_L10N_DATA;
(gdb) print bufptr
$4 = 0x7ffde4554630 "май"

Compared to the TMMON form of May in Russian this actually makes a difference:

postgres=# set lc_time='ru_RU.UTF8';
SET
postgres=# select to_char('2026-05-01'::date, 'TMMON');
 to_char
---------
 МАЯ
(1 row)

postgres=# select to_char('2026-05-01'::date, 'TAMMONTH');
 to_char
---------
 МАЙ
(1 row)

Again, TAMMONTH uses %Ob here. So I would argue for implementing the abbreviated
forms too.


    Code Review
    ===========
    I am not sure if this condition can be ever true:

    + if (IS_SUFFIX_TM(n->suffix) && IS_SUFFIX_TAM(n->suffix))

    In case this is not possible the subsequent error message will
    never be
    thrown and the whole block is dead code.

    However, if there is a reason for this check, it would be nice to
    have a comment mention it.


Yes, I badly expected that prefixes could be mixed. I checked the code, and this is not possible, so I removed this check

I think you missed one occurrence in the current patch:

[bernd@paco patches]$ cat v2-0001-introduce-tam-modifier-for-date-timestamp-formatting.patch | grep -B4 together
+
+ if (IS_SUFFIX_TM(n->suffix) && IS_SUFFIX_TAM(n->suffix))
+         ereturn(escontext,,
+                         (errcode(ERRCODE_INVALID_DATETIME_FORMAT),
+                          errmsg("TM and TAM prefixes cannot be used together")));


    One thing I am not entirely sure about is this line:

    + if (strftime_l(bufptr, MAX_L10N_DATA, "%OB", timeinfo, locale) <= 0)
    +     strftimefail = true;

    As far as I checked %OB is not supported on Windows:

https://learn.microsoft.com/en-us/cpp/c-runtime-library/reference/strftime-wcsftime-strftime-l-wcsftime-l?view=msvc-170

    I was, however, not able to confirm this on a Windows machine
    right now.
    I might be able to do so on the weekend.

    However, the same problem exists with older glibc versions not
    supporting
    %OB. As far as I understand strftime_l this will lead to it
    returning 0 and
    therefore setting strftimefail to true always. Since this if
    statement
    is evaluated
    unconditionally I expect this to also influence the behaviour of TM.


I am afraid about this case too, and I expect maybe some fallback mode there. But because I have not a Window machine or some machine with older glibc I decided to don't touch it
for this moment.

glibc older than 2.28 doesn't support %OB. On the second hand the result of %B is probably
equal to expected result %B.

Turns out I was wrong about this one. For one, although %OB is not supported, Windows
actually does fall back to %B when used:

postgres=# set lc_time='cs-CZ.UTF8';
SET
postgres=# SELECT to_char('2026-08-01'::date, 'TMMONTH');
 to_char
---------
 SRPEN
(1 row)

postgres=# SELECT to_char('2026-08-01'::date, 'TAMMONTH');
 to_char
---------
 SRPEN
(1 row)

The documentation for wcsftime even mentions this behaviour (see [2]).

Furthermore, strftime_l only returns 0 when the result string does not
fit the buffer (or the result is in fact empty, see [3]). The return value of
a function call with unrecognized format is not defined. glibc seems to
default to returning the format string itself:

PS C:\Users\bernd> docker run --rm -it debian:8 bash -c 'LC_TIME=C date "+%B"'
August
PS C:\Users\bernd> docker run --rm -it debian:8 bash -c 'LC_TIME=C date "+%OB"'
%OB

In my opinion this function call is very unlikely to ever return 0 because %OB is not defined. So I don't see an issue with that code segment after all, as this patch does not interfere with TM and the current documentation of this patch mentions the platform dependency of this feature. However, one could argue for checking whether %OB/%Ob is literally returned and manually falling back to %B/%b to cover all bases
and make behaviour more consistent.


    Nitpicking & Conclusion
    =======================
    I feel like the documentation could explicitly mention the difference
    between TMMONTH and TAMMONTH (i.e., mentioning genitive and nominative
    like the Locale docs you mentioned do). I also think it would be
    beneficial to
    mention that this linguistic detail is specific to certain languages.


please, if you can write this part of the doc. My English is not good enough to write well about these linguistic details. It is a problem primarily for slavic languages - like Czech or Russian - but maybe it can be a wide problem.

I attached a revised version of your patch to this message explaining the
difference from a linguistic standpoint. I also fixed the second listitem not
mentioning the suppression of trailing white space by TAM.

As English is also not my first language, I would be very glad if any native speaker reading this could have a look over it. Any feedback is appreciated!

Thank you very much for this immediate review
You are most welcome 🙂

Best
Bernd

[1] https://pubs.opengroup.org/onlinepubs/9799919799/basedefs/V1_chap07.html
[2] https://en.cppreference.com/cpp/chrono/c/wcsftime
[3] https://man7.org/linux/man-pages/man3/strftime.3.html
From 40ac8c6f05df816d10259fe7deaab2d7be91401f Mon Sep 17 00:00:00 2001
From: "[email protected]" <[email protected]>
Date: Wed, 12 Aug 2026 07:03:28 +0200
Subject: [PATCH v3] introduce 'tam' modifier for date/timestamp formatting
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

glibc returns localized month names in the genitive case, but it also
provides alternative month names in the nominative case. The TAM prefix
allows you to retrieve this alternative name.

example:

SELECT to_char(date '2026-08-01', 'TMMONTH');
┌─────────┐
│ to_char │
╞═════════╡
│ SRPNA   │
└─────────┘
(1 row)

SELECT to_char(date '2026-08-01', 'TAMMONTH');
┌─────────┐
│ to_char │
╞═════════╡
│ SRPEN   │
└─────────┘
(1 row)
---
 doc/src/sgml/func/func-formatting.sgml        |  31 +++++-
 src/backend/utils/adt/formatting.c            | 103 +++++++++++++++---
 src/backend/utils/adt/pg_locale.c             |   9 +-
 src/include/utils/pg_locale.h                 |   1 +
 .../regress/expected/collate.linux.utf8.out   |  28 +++++
 src/test/regress/sql/collate.linux.utf8.sql   |  12 ++
 6 files changed, 165 insertions(+), 19 deletions(-)

diff --git a/doc/src/sgml/func/func-formatting.sgml b/doc/src/sgml/func/func-formatting.sgml
index e4edaf4f42..2c356e7e8e 100644
--- a/doc/src/sgml/func/func-formatting.sgml
+++ b/doc/src/sgml/func/func-formatting.sgml
@@ -477,6 +477,12 @@
          <xref linkend="guc-lc-time"/>)</entry>
         <entry><literal>TMMonth</literal></entry>
        </row>
+       <row>
+        <entry><literal>TAM</literal> prefix</entry>
+        <entry>translation alternative mode (use localized alternative month names based on
+         <xref linkend="guc-lc-time"/>; see usage notes)</entry>
+        <entry><literal>TAMMonth</literal></entry>
+       </row>
        <row>
         <entry><literal>SP</literal> suffix</entry>
         <entry>spell mode (not implemented)</entry>
@@ -504,8 +510,29 @@
 
      <listitem>
       <para>
-       <literal>TM</literal> suppresses trailing blanks whether or
-       not <literal>FM</literal> is specified.
+       <literal>TM</literal> and <literal>TAM</literal> suppress trailing 
+       blanks whether or not <literal>FM</literal> is specified.
+      </para>
+     </listitem>
+
+     <listitem>
+      <para>
+       <literal>TM</literal> and <literal>TAM</literal> both produce
+       localized month names according to <xref linkend="guc-lc-time"/>, 
+       but they can differ for certain languages that inflect month names 
+       (e.g., Slavic languages).  In such languages <literal>TM</literal>
+       produces the form used together with a day number, which is often the
+       genitive case, while <literal>TAM</literal> produces the standalone
+       (nominative) form.  For example, with <literal>lc_time</literal> set to
+       a Czech locale, <literal>to_char('2026-08-01'::date, 'TMMONTH')</literal>
+       returns <literal>SRPNA</literal> (genitive), whereas
+       <literal>to_char('2026-08-01'::date, 'TAMMONTH')</literal> returns
+       <literal>SRPEN</literal> (nominative).  For languages that do not draw
+       this distinction, and for the <literal>C</literal> locale, the two
+       modifiers produce the same result.  This distinction relies on
+       alternative month names being available from the underlying operating
+       system's locale support, so <literal>TAM</literal> may not be effective
+       on all platforms. 
       </para>
      </listitem>
 
diff --git a/src/backend/utils/adt/formatting.c b/src/backend/utils/adt/formatting.c
index effad4c37d..42f7935ac7 100644
--- a/src/backend/utils/adt/formatting.c
+++ b/src/backend/utils/adt/formatting.c
@@ -553,6 +553,7 @@ do { \
 #define DCH_SUFFIX_th	0x04
 #define DCH_SUFFIX_SP	0x08
 #define DCH_SUFFIX_TM	0x10
+#define DCH_SUFFIX_TAM	0x20
 
 /*
  * Suffix tests
@@ -594,16 +595,25 @@ IS_SUFFIX_TM(uint8 _s)
 	return (_s & DCH_SUFFIX_TM);
 }
 
+static inline bool
+IS_SUFFIX_TAM(uint8 _s)
+{
+	return (_s & DCH_SUFFIX_TAM);
+}
+
 /*
  * Suffixes definition for DATE-TIME TO/FROM CHAR
  */
 #define TM_SUFFIX_LEN	2
+#define TAM_SUFFIX_LEN	3
 
 static const KeySuffix DCH_suff[] = {
 	{"FM", 2, DCH_SUFFIX_FM, SUFFTYPE_PREFIX},
 	{"fm", 2, DCH_SUFFIX_FM, SUFFTYPE_PREFIX},
 	{"TM", TM_SUFFIX_LEN, DCH_SUFFIX_TM, SUFFTYPE_PREFIX},
+	{"TAM", TAM_SUFFIX_LEN, DCH_SUFFIX_TAM, SUFFTYPE_PREFIX},
 	{"tm", 2, DCH_SUFFIX_TM, SUFFTYPE_PREFIX},
+	{"tam", 3, DCH_SUFFIX_TAM, SUFFTYPE_PREFIX},
 	{"TH", 2, DCH_SUFFIX_TH, SUFFTYPE_POSTFIX},
 	{"th", 2, DCH_SUFFIX_th, SUFFTYPE_POSTFIX},
 	{"SP", 2, DCH_SUFFIX_SP, SUFFTYPE_POSTFIX},
@@ -2786,11 +2796,26 @@ DCH_to_char(FormatNode *node, bool is_interval, TmToChar *in, char *out, Oid col
 				INVALID_FOR_INTERVAL;
 				if (!tm->tm_mon)
 					break;
-				if (IS_SUFFIX_TM(n->suffix))
+				if (IS_SUFFIX_TM(n->suffix) || IS_SUFFIX_TAM(n->suffix))
 				{
-					char	   *str = str_toupper_z(localized_full_months[tm->tm_mon - 1], collid);
+					char	   *str;
+					char	   **localized_months;
+					int			suffix_len;
 
-					if (strlen(str) <= (n->key->len + TM_SUFFIX_LEN) * DCH_MAX_ITEM_SIZ)
+					if (IS_SUFFIX_TM(n->suffix))
+					{
+						localized_months = localized_full_months;
+						suffix_len = TM_SUFFIX_LEN;
+					}
+					else
+					{
+						localized_months = localized_alt_full_months;
+						suffix_len = TAM_SUFFIX_LEN;
+					}
+
+					str = str_toupper_z(localized_months[tm->tm_mon - 1], collid);
+
+					if (strlen(str) <= (n->key->len + suffix_len) * DCH_MAX_ITEM_SIZ)
 						strcpy(s, str);
 					else
 						ereport(ERROR,
@@ -2806,11 +2831,26 @@ DCH_to_char(FormatNode *node, bool is_interval, TmToChar *in, char *out, Oid col
 				INVALID_FOR_INTERVAL;
 				if (!tm->tm_mon)
 					break;
-				if (IS_SUFFIX_TM(n->suffix))
+				if (IS_SUFFIX_TM(n->suffix) || IS_SUFFIX_TAM(n->suffix))
 				{
-					char	   *str = str_initcap_z(localized_full_months[tm->tm_mon - 1], collid);
+					char	   *str;
+					char	   **localized_months;
+					int			suffix_len;
 
-					if (strlen(str) <= (n->key->len + TM_SUFFIX_LEN) * DCH_MAX_ITEM_SIZ)
+					if (IS_SUFFIX_TM(n->suffix))
+					{
+						localized_months = localized_full_months;
+						suffix_len = TM_SUFFIX_LEN;
+					}
+					else
+					{
+						localized_months = localized_alt_full_months;
+						suffix_len = TAM_SUFFIX_LEN;
+					}
+
+					str = str_initcap_z(localized_months[tm->tm_mon - 1], collid);
+
+					if (strlen(str) <= (n->key->len + suffix_len) * DCH_MAX_ITEM_SIZ)
 						strcpy(s, str);
 					else
 						ereport(ERROR,
@@ -2826,11 +2866,26 @@ DCH_to_char(FormatNode *node, bool is_interval, TmToChar *in, char *out, Oid col
 				INVALID_FOR_INTERVAL;
 				if (!tm->tm_mon)
 					break;
-				if (IS_SUFFIX_TM(n->suffix))
+				if (IS_SUFFIX_TM(n->suffix) || IS_SUFFIX_TAM(n->suffix))
 				{
-					char	   *str = str_tolower_z(localized_full_months[tm->tm_mon - 1], collid);
+					char	   *str;
+					char	   **localized_months;
+					int			suffix_len;
 
-					if (strlen(str) <= (n->key->len + TM_SUFFIX_LEN) * DCH_MAX_ITEM_SIZ)
+					if (IS_SUFFIX_TM(n->suffix))
+					{
+						localized_months = localized_full_months;
+						suffix_len = TM_SUFFIX_LEN;
+					}
+					else
+					{
+						localized_months = localized_alt_full_months;
+						suffix_len = TAM_SUFFIX_LEN;
+					}
+
+					str = str_tolower_z(localized_months[tm->tm_mon - 1], collid);
+
+					if (strlen(str) <= (n->key->len + suffix_len) * DCH_MAX_ITEM_SIZ)
 						strcpy(s, str);
 					else
 						ereport(ERROR,
@@ -3565,13 +3620,29 @@ DCH_from_char(FormatNode *node, const char *in, TmFromChar *out,
 			case DCH_MONTH:
 			case DCH_Month:
 			case DCH_month:
-				if (!from_char_seq_search(&value, &s, months_full,
-										  IS_SUFFIX_TM(n->suffix) ? localized_full_months : NULL,
-										  collid,
-										  n, escontext))
-					return;
-				if (!from_char_set_int(&out->mm, value + 1, n, escontext))
-					return;
+				{
+					char	  **months;
+
+					if (IS_SUFFIX_TM(n->suffix) && IS_SUFFIX_TAM(n->suffix))
+						ereturn(escontext,,
+								(errcode(ERRCODE_INVALID_DATETIME_FORMAT),
+								 errmsg("TM and TAM prefixes cannot be used together")));
+
+					if (IS_SUFFIX_TM(n->suffix))
+						months = localized_full_months;
+					else if (IS_SUFFIX_TAM(n->suffix))
+						months = localized_alt_full_months;
+					else
+						months = NULL;
+
+					if (!from_char_seq_search(&value, &s, months_full,
+											  months,
+											  collid,
+											  n, escontext))
+						return;
+					if (!from_char_set_int(&out->mm, value + 1, n, escontext))
+						return;
+				}
 				break;
 			case DCH_MON:
 			case DCH_Mon:
diff --git a/src/backend/utils/adt/pg_locale.c b/src/backend/utils/adt/pg_locale.c
index 9eb99487e5..34d758486b 100644
--- a/src/backend/utils/adt/pg_locale.c
+++ b/src/backend/utils/adt/pg_locale.c
@@ -102,6 +102,7 @@ char	   *localized_abbrev_days[7 + 1];
 char	   *localized_full_days[7 + 1];
 char	   *localized_abbrev_months[12 + 1];
 char	   *localized_full_months[12 + 1];
+char	   *localized_alt_full_months[12 + 1];
 
 static pg_locale_t default_locale = NULL;
 
@@ -701,7 +702,7 @@ cache_single_string(char **dst, const char *src, int encoding)
 void
 cache_locale_time(void)
 {
-	char		buf[(2 * 7 + 2 * 12) * MAX_L10N_DATA];
+	char		buf[(2 * 7 + 3 * 12) * MAX_L10N_DATA];
 	char	   *bufptr;
 	time_t		timenow;
 	struct tm  *timeinfo;
@@ -768,6 +769,9 @@ cache_locale_time(void)
 		if (strftime_l(bufptr, MAX_L10N_DATA, "%B", timeinfo, locale) <= 0)
 			strftimefail = true;
 		bufptr += MAX_L10N_DATA;
+		if (strftime_l(bufptr, MAX_L10N_DATA, "%OB", timeinfo, locale) <= 0)
+			strftimefail = true;
+		bufptr += MAX_L10N_DATA;
 	}
 
 #ifdef WIN32
@@ -824,9 +828,12 @@ cache_locale_time(void)
 		bufptr += MAX_L10N_DATA;
 		cache_single_string(&localized_full_months[i], bufptr, encoding);
 		bufptr += MAX_L10N_DATA;
+		cache_single_string(&localized_alt_full_months[i], bufptr, encoding);
+		bufptr += MAX_L10N_DATA;
 	}
 	localized_abbrev_months[12] = NULL;
 	localized_full_months[12] = NULL;
+	localized_alt_full_months[12] = NULL;
 
 	CurrentLCTimeValid = true;
 }
diff --git a/src/include/utils/pg_locale.h b/src/include/utils/pg_locale.h
index b74821fdfa..3f79d4f0c1 100644
--- a/src/include/utils/pg_locale.h
+++ b/src/include/utils/pg_locale.h
@@ -43,6 +43,7 @@ extern PGDLLIMPORT char *localized_abbrev_days[];
 extern PGDLLIMPORT char *localized_full_days[];
 extern PGDLLIMPORT char *localized_abbrev_months[];
 extern PGDLLIMPORT char *localized_full_months[];
+extern PGDLLIMPORT char *localized_alt_full_months[];
 
 extern bool check_locale(int category, const char *locale, char **canonname);
 extern char *pg_perm_setlocale(int category, const char *locale);
diff --git a/src/test/regress/expected/collate.linux.utf8.out b/src/test/regress/expected/collate.linux.utf8.out
index e0a39e4c30..26a03ac453 100644
--- a/src/test/regress/expected/collate.linux.utf8.out
+++ b/src/test/regress/expected/collate.linux.utf8.out
@@ -463,7 +463,22 @@ SELECT to_char(date '2010-04-01', 'DD TMMON YYYY' COLLATE "tr_TR");
  01 NİS 2010
 (1 row)
 
+-- to_char
+SET lc_time TO 'cs_CZ';
+SELECT to_char(date '2010-02-01', 'DD TMMONTH');
+ to_char  
+----------
+ 01 ÚNORA
+(1 row)
+
+SELECT to_char(date '2010-02-01', 'TAMMONTH');
+ to_char 
+---------
+ ÚNOR
+(1 row)
+
 -- to_date
+SET lc_time TO 'tr_TR';
 SELECT to_date('01 ŞUB 2010', 'DD TMMON YYYY');
   to_date   
 ------------
@@ -497,6 +512,19 @@ SELECT to_date('2010 01 araLık', 'YYYY DD TMMONTH');
  12-01-2010
 (1 row)
 
+SET lc_time TO 'cs_CZ';
+SELECT to_date('1 srpna 2010', 'DD TMMONTH YYYY');
+  to_date   
+------------
+ 08-01-2010
+(1 row)
+
+SELECT to_date('1 srpen 2010', 'DD TAMMONTH YYYY');
+  to_date   
+------------
+ 08-01-2010
+(1 row)
+
 -- backwards parsing
 CREATE VIEW collview1 AS SELECT * FROM collate_test1 WHERE b COLLATE "C" >= 'bbc';
 CREATE VIEW collview2 AS SELECT a, b FROM collate_test1 ORDER BY b COLLATE "C";
diff --git a/src/test/regress/sql/collate.linux.utf8.sql b/src/test/regress/sql/collate.linux.utf8.sql
index 6d726ee9c9..3e7c356adb 100644
--- a/src/test/regress/sql/collate.linux.utf8.sql
+++ b/src/test/regress/sql/collate.linux.utf8.sql
@@ -182,7 +182,14 @@ SELECT to_char(date '2010-02-01', 'DD TMMON YYYY' COLLATE "tr_TR");
 SELECT to_char(date '2010-04-01', 'DD TMMON YYYY');
 SELECT to_char(date '2010-04-01', 'DD TMMON YYYY' COLLATE "tr_TR");
 
+-- to_char
+SET lc_time TO 'cs_CZ';
+
+SELECT to_char(date '2010-02-01', 'DD TMMONTH');
+SELECT to_char(date '2010-02-01', 'TAMMONTH');
+
 -- to_date
+SET lc_time TO 'tr_TR';
 
 SELECT to_date('01 ŞUB 2010', 'DD TMMON YYYY');
 SELECT to_date('01 Şub 2010', 'DD TMMON YYYY');
@@ -192,6 +199,11 @@ SELECT to_date('01 Aralık 2010', 'DD TMMONTH YYYY');
 SELECT to_date('01 aralık 2010', 'DD TMMONTH YYYY');
 SELECT to_date('2010 01 araLık', 'YYYY DD TMMONTH');
 
+SET lc_time TO 'cs_CZ';
+
+SELECT to_date('1 srpna 2010', 'DD TMMONTH YYYY');
+SELECT to_date('1 srpen 2010', 'DD TAMMONTH YYYY');
+
 -- backwards parsing
 
 CREATE VIEW collview1 AS SELECT * FROM collate_test1 WHERE b COLLATE "C" >= 'bbc';
-- 
2.55.0

Reply via email to