Aegisub/vsfilter/subtitles/STS.cpp

3031 lines
69 KiB
C++
Raw Normal View History

/*
* Copyright (C) 2003-2006 Gabest
* http://www.gabest.org
*
* This Program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2, or (at your option)
* any later version.
*
* This Program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with GNU Make; see the file COPYING. If not, write to
* the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
* http://www.gnu.org/copyleft/gpl.html
*
*/
#include "stdafx.h"
#include "STS.h"
#include <atlbase.h>
// gathered from http://www.netwave.or.jp/~shikai/shikai/shcolor.htm
struct htmlcolor {TCHAR* name; DWORD color;} hmtlcolors[] =
{
{_T("white"), 0xffffff},
{_T("whitesmoke"), 0xf5f5f5},
{_T("ghostwhite"), 0xf8f8ff},
{_T("snow"), 0xfffafa},
{_T("gainsboro"), 0xdcdcdc},
{_T("lightgrey"), 0xd3d3d3},
{_T("silver"), 0xc0c0c0},
{_T("darkgray"), 0xa9a9a9},
{_T("gray"), 0x808080},
{_T("dimgray"), 0x696969},
{_T("lightslategray"), 0x778899},
{_T("slategray"), 0x708090},
{_T("darkslategray"), 0x2f4f4f},
{_T("black"), 0x000000},
{_T("azure"), 0xf0ffff},
{_T("aliceblue"), 0xf0f8ff},
{_T("mintcream"), 0xf5fffa},
{_T("honeydew"), 0xf0fff0},
{_T("lightcyan"), 0xe0ffff},
{_T("paleturqoise"), 0xafeeee},
{_T("powderblue"), 0xb0e0e6},
{_T("lightblue"), 0xadd8ed},
{_T("lightsteelblue"), 0xb0c4de},
{_T("skyblue"), 0x87ceeb},
{_T("lightskyblue"), 0x87cefa},
{_T("cyan"), 0x00ffff},
{_T("aqua"), 0x00ff80},
{_T("deepskyblue"), 0x00bfff},
{_T("aquamarine"), 0x7fffd4},
{_T("turquoise"), 0x40e0d0},
{_T("darkturquoise"), 0x00ced1},
{_T("lightseagreen"), 0x20b2aa},
{_T("mediumturquoise"), 0x40e0dd},
{_T("mediumaquamarine"), 0x66cdaa},
{_T("cadetblue"), 0x5f9ea0},
{_T("teal"), 0x008080},
{_T("darkcyan"), 0x008b8b},
{_T("comflowerblue"), 0x6495ed},
{_T("dodgerblue"), 0x1e90ff},
{_T("steelblue"), 0x4682b4},
{_T("royalblue"), 0x4169e1},
{_T("blue"), 0x0000ff},
{_T("mediumblue"), 0x0000cd},
{_T("mediumslateblue"), 0x7b68ee},
{_T("slateblue"), 0x6a5acd},
{_T("darkslateblue"), 0x483d8b},
{_T("darkblue"), 0x00008b},
{_T("midnightblue"), 0x191970},
{_T("navy"), 0x000080},
{_T("palegreen"), 0x98fb98},
{_T("lightgreen"), 0x90ee90},
{_T("mediumspringgreen"), 0x00fa9a},
{_T("springgreen"), 0x00ff7f},
{_T("chartreuse"), 0x7fff00},
{_T("lawngreen"), 0x7cfc00},
{_T("lime"), 0x00ff00},
{_T("limegreen"), 0x32cd32},
{_T("greenyellow"), 0xadff2f},
{_T("yellowgreen"), 0x9acd32},
{_T("darkseagreen"), 0x8fbc8f},
{_T("mediumseagreen"), 0x3cb371},
{_T("seagreen"), 0x2e8b57},
{_T("olivedrab"), 0x6b8e23},
{_T("forestgreen"), 0x228b22},
{_T("green"), 0x008000},
{_T("darkkhaki"), 0xbdb76b},
{_T("olive"), 0x808000},
{_T("darkolivegreen"), 0x556b2f},
{_T("darkgreen"), 0x006400},
{_T("floralwhite"), 0xfffaf0},
{_T("seashell"), 0xfff5ee},
{_T("ivory"), 0xfffff0},
{_T("beige"), 0xf5f5dc},
{_T("cornsilk"), 0xfff8dc},
{_T("lemonchiffon"), 0xfffacd},
{_T("lightyellow"), 0xffffe0},
{_T("lightgoldenrodyellow"), 0xfafad2},
{_T("papayawhip"), 0xffefd5},
{_T("blanchedalmond"), 0xffedcd},
{_T("palegoldenrod"), 0xeee8aa},
{_T("khaki"), 0xf0eb8c},
{_T("bisque"), 0xffe4c4},
{_T("moccasin"), 0xffe4b5},
{_T("navajowhite"), 0xffdead},
{_T("peachpuff"), 0xffdab9},
{_T("yellow"), 0xffff00},
{_T("gold"), 0xffd700},
{_T("wheat"), 0xf5deb3},
{_T("orange"), 0xffa500},
{_T("darkorange"), 0xff8c00},
{_T("oldlace"), 0xfdf5e6},
{_T("linen"), 0xfaf0e6},
{_T("antiquewhite"), 0xfaebd7},
{_T("lightsalmon"), 0xffa07a},
{_T("darksalmon"), 0xe9967a},
{_T("salmon"), 0xfa8072},
{_T("lightcoral"), 0xf08080},
{_T("indianred"), 0xcd5c5c},
{_T("coral"), 0xff7f50},
{_T("tomato"), 0xff6347},
{_T("orangered"), 0xff4500},
{_T("red"), 0xff0000},
{_T("crimson"), 0xdc143c},
{_T("firebrick"), 0xb22222},
{_T("maroon"), 0x800000},
{_T("darkred"), 0x8b0000},
{_T("lavender"), 0xe6e6fe},
{_T("lavenderblush"), 0xfff0f5},
{_T("mistyrose"), 0xffe4e1},
{_T("thistle"), 0xd8bfd8},
{_T("pink"), 0xffc0cb},
{_T("lightpink"), 0xffb6c1},
{_T("palevioletred"), 0xdb7093},
{_T("hotpink"), 0xff69b4},
{_T("fuchsia"), 0xff00ee},
{_T("magenta"), 0xff00ff},
{_T("mediumvioletred"), 0xc71585},
{_T("deeppink"), 0xff1493},
{_T("plum"), 0xdda0dd},
{_T("violet"), 0xee82ee},
{_T("orchid"), 0xda70d6},
{_T("mediumorchid"), 0xba55d3},
{_T("mediumpurple"), 0x9370db},
{_T("purple"), 0x9370db},
{_T("blueviolet"), 0x8a2be2},
{_T("darkviolet"), 0x9400d3},
{_T("darkorchid"), 0x9932cc},
{_T("tan"), 0xd2b48c},
{_T("burlywood"), 0xdeb887},
{_T("sandybrown"), 0xf4a460},
{_T("peru"), 0xcd853f},
{_T("goldenrod"), 0xdaa520},
{_T("darkgoldenrod"), 0xb8860b},
{_T("chocolate"), 0xd2691e},
{_T("rosybrown"), 0xbc8f8f},
{_T("sienna"), 0xa0522d},
{_T("saddlebrown"), 0x8b4513},
{_T("brown"), 0xa52a2a},
};
CHtmlColorMap::CHtmlColorMap()
{
for(int i = 0; i < countof(hmtlcolors); i++)
SetAt(hmtlcolors[i].name, hmtlcolors[i].color);
}
CHtmlColorMap g_colors;
//
BYTE CharSetList[] =
{
ANSI_CHARSET,
DEFAULT_CHARSET,
SYMBOL_CHARSET,
SHIFTJIS_CHARSET,
HANGEUL_CHARSET,
HANGUL_CHARSET,
GB2312_CHARSET,
CHINESEBIG5_CHARSET,
OEM_CHARSET,
JOHAB_CHARSET,
HEBREW_CHARSET,
ARABIC_CHARSET,
GREEK_CHARSET,
TURKISH_CHARSET,
VIETNAMESE_CHARSET,
THAI_CHARSET,
EASTEUROPE_CHARSET,
RUSSIAN_CHARSET,
MAC_CHARSET,
BALTIC_CHARSET
};
TCHAR* CharSetNames[] =
{
_T("ANSI"),
_T("DEFAULT"),
_T("SYMBOL"),
_T("SHIFTJIS"),
_T("HANGEUL"),
_T("HANGUL"),
_T("GB2312"),
_T("CHINESEBIG5"),
_T("OEM"),
_T("JOHAB"),
_T("HEBREW"),
_T("ARABIC"),
_T("GREEK"),
_T("TURKISH"),
_T("VIETNAMESE"),
_T("THAI"),
_T("EASTEUROPE"),
_T("RUSSIAN"),
_T("MAC"),
_T("BALTIC"),
};
int CharSetLen = countof(CharSetList);
//
static DWORD CharSetToCodePage(DWORD dwCharSet)
{
CHARSETINFO cs={0};
::TranslateCharsetInfo((DWORD *)dwCharSet, &cs, TCI_SRCCHARSET);
return cs.ciACP;
}
int FindChar(CStringW str, WCHAR c, int pos, bool fUnicode, int CharSet)
{
if(fUnicode) return(str.Find(c, pos));
int fStyleMod = 0;
DWORD cp = CharSetToCodePage(CharSet);
int OrgCharSet = CharSet;
for(int i = 0, j = str.GetLength(), k; i < j; i++)
{
WCHAR c2 = str[i];
if(IsDBCSLeadByteEx(cp, (BYTE)c2)) i++;
else if(i >= pos)
{
if(c2 == c) return(i);
}
if(c2 == '{') fStyleMod++;
else if(fStyleMod > 0)
{
if(c2 == '}') fStyleMod--;
else if(c2 == 'e' && i >= 3 && i < j-1 && str.Mid(i-2, 3) == L"\\fe")
{
CharSet = 0;
for(k = i+1; _istdigit(str[k]); k++) CharSet = CharSet*10 + (str[k] - '0');
if(k == i+1) CharSet = OrgCharSet;
cp = CharSetToCodePage(CharSet);
}
}
}
return(-1);
}
/*
int FindChar(CStringA str, char c, int pos, bool fUnicode, int CharSet)
{
ASSERT(!fUnicode);
return(FindChar(AToW(str), c, pos, false, CharSet));
}
*/
static CStringW ToMBCS(CStringW str, DWORD CharSet)
{
CStringW ret;
DWORD cp = CharSetToCodePage(CharSet);
for(int i = 0, j = str.GetLength(); i < j; i++)
{
WCHAR wc = str.GetAt(i);
char c[8];
int len;
if((len = WideCharToMultiByte(cp, 0, &wc, 1, c, 8, NULL, NULL)) > 0)
{
for(int k = 0; k < len; k++)
ret += (WCHAR)(BYTE)c[k];
}
else
{
ret += '?';
}
}
return(ret);
}
static CStringW UnicodeSSAToMBCS(CStringW str, DWORD CharSet)
{
CStringW ret;
int OrgCharSet = CharSet;
for(int j = 0; j < str.GetLength(); )
{
j = str.Find('{', j);
if(j >= 0)
{
ret += ToMBCS(str.Left(j), CharSet);
str = str.Mid(j);
j = str.Find('}');
if(j < 0)
{
ret += ToMBCS(str, CharSet);
break;
}
else
{
int k = str.Find(L"\\fe");
if(k >= 0 && k < j)
{
CharSet = 0;
int l = k+3;
for(; _istdigit(str[l]); l++) CharSet = CharSet*10 + (str[l] - '0');
if(l == k+3) CharSet = OrgCharSet;
}
j++;
ret += ToMBCS(str.Left(j), OrgCharSet);
str = str.Mid(j);
j = 0;
}
}
else
{
ret += ToMBCS(str, CharSet);
break;
}
}
return(ret);
}
static CStringW ToUnicode(CStringW str, DWORD CharSet)
{
CStringW ret;
DWORD cp = CharSetToCodePage(CharSet);
for(int i = 0, j = str.GetLength(); i < j; i++)
{
WCHAR wc = str.GetAt(i);
char c = wc&0xff;
if(IsDBCSLeadByteEx(cp, (BYTE)wc))
{
i++;
if(i < j)
{
char cc[2];
cc[0] = c;
cc[1] = (char)str.GetAt(i);
MultiByteToWideChar(cp, 0, cc, 2, &wc, 1);
}
}
else
{
MultiByteToWideChar(cp, 0, &c, 1, &wc, 1);
}
ret += wc;
}
return(ret);
}
static CStringW MBCSSSAToUnicode(CStringW str, int CharSet)
{
CStringW ret;
int OrgCharSet = CharSet;
for(int j = 0; j < str.GetLength(); )
{
j = FindChar(str, '{', 0, false, CharSet);
if(j >= 0)
{
ret += ToUnicode(str.Left(j), CharSet);
str = str.Mid(j);
j = FindChar(str, '}', 0, false, CharSet);
if(j < 0)
{
ret += ToUnicode(str, CharSet);
break;
}
else
{
int k = str.Find(L"\\fe");
if(k >= 0 && k < j)
{
CharSet = 0;
int l = k+3;
for(; _istdigit(str[l]); l++) CharSet = CharSet*10 + (str[l] - '0');
if(l == k+3) CharSet = OrgCharSet;
}
j++;
ret += ToUnicode(str.Left(j), OrgCharSet);
str = str.Mid(j);
j = 0;
}
}
else
{
ret += ToUnicode(str, CharSet);
break;
}
}
return(ret);
}
CStringW RemoveSSATags(CStringW str, bool fUnicode, int CharSet)
{
for(int i = 0, j; i < str.GetLength(); )
{
if((i = FindChar(str, '{', i, fUnicode, CharSet)) < 0) break;
if((j = FindChar(str, '}', i, fUnicode, CharSet)) < 0) break;
str.Delete(i, j-i+1);
}
str.Replace(L"\\N", L"\n");
str.Replace(L"\\n", L"\n");
str.Replace(L"\\h", L" ");
return(str);
}
//
static CStringW SubRipper2SSA(CStringW str, int CharSet)
{
str.Replace(L"<i>", L"{\\i1}");
str.Replace(L"</i>", L"{\\i}");
str.Replace(L"<b>", L"{\\b1}");
str.Replace(L"</b>", L"{\\b}");
str.Replace(L"<u>", L"{\\u1}");
str.Replace(L"</u>", L"{\\u}");
return(str);
}
static bool OpenSubRipper(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet)
{
int num = 0;
CStringW buff;
while(file->ReadString(buff))
{
buff.Trim();
if(buff.IsEmpty()) continue;
WCHAR sep;
int hh1, mm1, ss1, ms1, hh2, mm2, ss2, ms2;
int c = swscanf(buff, L"%d%c%d%c%d%c%d --> %d%c%d%c%d%c%d\n",
&hh1, &sep, &mm1, &sep, &ss1, &sep, &ms1,
&hh2, &sep, &mm2, &sep, &ss2, &sep, &ms2);
if(c == 1) // numbering
{
num = hh1;
}
else if(c == 14) // time info
{
CStringW str, tmp;
bool fFoundEmpty = false;
while(file->ReadString(tmp))
{
tmp.Trim();
if(tmp.IsEmpty()) fFoundEmpty = true;
int num2;
WCHAR c;
if(swscanf(tmp, L"%d%c", &num2, &c) == 1 && fFoundEmpty)
{
num = num2;
break;
}
str += tmp + '\n';
}
ret.Add(
SubRipper2SSA(str, CharSet),
file->IsUnicode(),
(((hh1*60 + mm1)*60) + ss1)*1000 + ms1,
(((hh2*60 + mm2)*60) + ss2)*1000 + ms2);
}
else if(c != EOF) // might be another format
{
return(false);
}
}
return(ret.GetCount() > 0);
}
static bool OpenOldSubRipper(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet)
{
CStringW buff;
while(file->ReadString(buff))
{
buff.Trim();
if(buff.IsEmpty()) continue;
for(int i = 0; i < buff.GetLength(); i++)
{
if((i = FindChar(buff, '|', i, file->IsUnicode(), CharSet)) < 0) break;
buff.SetAt(i, '\n');
}
int hh1, mm1, ss1, hh2, mm2, ss2;
int c = swscanf(buff, L"{%d:%d:%d}{%d:%d:%d}", &hh1, &mm1, &ss1, &hh2, &mm2, &ss2);
if(c == 6)
{
ret.Add(
buff.Mid(buff.Find('}', buff.Find('}')+1)+1),
file->IsUnicode(),
(((hh1*60 + mm1)*60) + ss1)*1000,
(((hh2*60 + mm2)*60) + ss2)*1000);
}
else if(c != EOF) // might be another format
{
return(false);
}
}
return(ret.GetCount() > 0);
}
static bool OpenSubViewer(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet)
{
STSStyle def;
CStringW font, color, size;
bool fBold, fItalic, fStriked, fUnderline;
CStringW buff;
while(file->ReadString(buff))
{
buff.Trim();
if(buff.IsEmpty()) continue;
if(buff[0] == '[')
{
for(int i = 0; i < buff.GetLength() && buff[i]== '['; )
{
int j = buff.Find(']', ++i);
if(j < i) break;
CStringW tag = buff.Mid(i,j-i);
tag.Trim();
tag.MakeLower();
i += j-i;
j = buff.Find('[', ++i);
if(j < 0) j = buff.GetLength();
CStringW param = buff.Mid(i,j-i);
param.Trim(L" \\t,");
i = j;
if(tag == L"font")
font = def.fontName.CompareNoCase(WToT(param)) ? param : L"";
else if(tag == L"colf")
color = def.colors[0] != wcstol(((LPCWSTR)param)+2, 0, 16) ? param : L"";
else if(tag == L"size")
size = def.fontSize != wcstol(param, 0, 10) ? param : L"";
else if(tag == L"style")
{
if(param.Find(L"no") >= 0)
{
fBold = fItalic = fStriked = fUnderline = false;
}
else
{
fBold = def.fontWeight < FW_BOLD && param.Find(L"bd") >= 0;
fItalic = def.fItalic && param.Find(L"it") >= 0;
fStriked = def.fStrikeOut && param.Find(L"st") >= 0;
fUnderline = def.fUnderline && param.Find(L"ud") >= 0;
}
}
}
continue;
}
WCHAR sep;
int hh1, mm1, ss1, hs1, hh2, mm2, ss2, hs2;
int c = swscanf(buff, L"%d:%d:%d%c%d,%d:%d:%d%c%d\n",
&hh1, &mm1, &ss1, &sep, &hs1, &hh2, &mm2, &ss2, &sep, &hs2);
if(c == 10)
{
CStringW str;
file->ReadString(str);
str.Replace(L"[br]", L"\\N");
CStringW prefix;
if(!font.IsEmpty()) prefix += L"\\fn" + font;
if(!color.IsEmpty()) prefix += L"\\c" + color;
if(!size.IsEmpty()) prefix += L"\\fs" + size;
if(fBold) prefix += L"\\b1";
if(fItalic) prefix += L"\\i1";
if(fStriked) prefix += L"\\s1";
if(fUnderline) prefix += L"\\u1";
if(!prefix.IsEmpty()) str = L"{" + prefix + L"}" + str;
ret.Add(str,
file->IsUnicode(),
(((hh1*60 + mm1)*60) + ss1)*1000 + hs1*10,
(((hh2*60 + mm2)*60) + ss2)*1000 + hs2*10);
}
else if(c != EOF) // might be another format
{
return(false);
}
}
return(ret.GetCount() > 0);
}
static STSStyle* GetMicroDVDStyle(CString str, int CharSet)
{
STSStyle* ret = new STSStyle();
if(!ret) return(NULL);
for(int i = 0, len = str.GetLength(); i < len; i++)
{
int j = str.Find('{', i);
if(j < 0) j = len;
if(j >= len) break;
int k = str.Find('}', j);
if(k < 0) k = len;
CString code = str.Mid(j, k-j);
if(code.GetLength() > 2) code.SetAt(1, (TCHAR)towlower(code[1]));
if(!_tcsnicmp(code, _T("{c:$"), 4))
{
_stscanf(code, _T("{c:$%x"), &ret->colors[0]);
}
else if(!_tcsnicmp(code, _T("{f:"), 3))
{
ret->fontName = code.Mid(3);
}
else if(!_tcsnicmp(code, _T("{s:"), 3))
{
float f;
if(1 == _stscanf(code, _T("{s:%f"), &f))
ret->fontSize = f;
}
else if(!_tcsnicmp(code, _T("{h:"), 3))
{
_stscanf(code, _T("{h:%d"), &ret->charSet);
}
else if(!_tcsnicmp(code, _T("{y:"), 3))
{
code.MakeLower();
if(code.Find('b') >= 0) ret->fontWeight = FW_BOLD;
if(code.Find('i') >= 0) ret->fItalic = true;
if(code.Find('u') >= 0) ret->fUnderline = true;
if(code.Find('s') >= 0) ret->fStrikeOut = true;
}
else if(!_tcsnicmp(code, _T("{p:"), 3))
{
int p;
_stscanf(code, _T("{p:%d"), &p);
ret->scrAlignment = (p == 0) ? 8 : 2;
}
i = k;
}
return(ret);
}
static CStringW MicroDVD2SSA(CStringW str, bool fUnicode, int CharSet)
{
CStringW ret;
enum {COLOR=0, FONTNAME, FONTSIZE, FONTCHARSET, BOLD, ITALIC, UNDERLINE, STRIKEOUT};
bool fRestore[8];
int fRestoreLen = 8;
memset(fRestore, 0, sizeof(bool)*fRestoreLen);
for(int pos = 0, eol; pos < str.GetLength(); pos++)
{
if((eol = FindChar(str, '|', pos, fUnicode, CharSet)) < 0) eol = str.GetLength();
CStringW line = str.Mid(pos, eol-pos);
pos = eol;
for(int i = 0, j, k, len = line.GetLength(); i < len; i++)
{
if((j = FindChar(line, '{', i, fUnicode, CharSet)) < 0) j = str.GetLength();
ret += line.Mid(i, j-i);
if(j >= len) break;
if((k = FindChar(line, '}', j, fUnicode, CharSet)) < 0) k = len;
{
CStringW code = line.Mid(j, k-j);
if(!wcsnicmp(code, L"{c:$", 4))
{
fRestore[COLOR] = (iswupper(code[1]) == 0);
code.MakeLower();
int color;
swscanf(code, L"{c:$%x", &color);
code.Format(L"{\\c&H%x&}", color);
ret += code;
}
else if(!wcsnicmp(code, L"{f:", 3))
{
fRestore[FONTNAME] = (iswupper(code[1]) == 0);
code.Format(L"{\\fn%s}", code.Mid(3));
ret += code;
}
else if(!wcsnicmp(code, L"{s:", 3))
{
fRestore[FONTSIZE] = (iswupper(code[1]) == 0);
code.MakeLower();
float size;
swscanf(code, L"{s:%f", &size);
code.Format(L"{\\fs%f}", size);
ret += code;
}
else if(!wcsnicmp(code, L"{h:", 3))
{
fRestore[COLOR] = (_istupper(code[1]) == 0);
code.MakeLower();
int CharSet;
swscanf(code, L"{h:%d", &CharSet);
code.Format(L"{\\fe%d}", CharSet);
ret += code;
}
else if(!wcsnicmp(code, L"{y:", 3))
{
bool f = (_istupper(code[1]) == 0);
code.MakeLower();
ret += '{';
if(code.Find('b') >= 0) {ret += L"\\b1"; fRestore[BOLD] = f;}
if(code.Find('i') >= 0) {ret += L"\\i1"; fRestore[ITALIC] = f;}
if(code.Find('u') >= 0) {ret += L"\\u1"; fRestore[UNDERLINE] = f;}
if(code.Find('s') >= 0) {ret += L"\\s1"; fRestore[STRIKEOUT] = f;}
ret += '}';
}
else if(!wcsnicmp(code, L"{o:", 3))
{
code.MakeLower();
int x, y;
TCHAR c;
swscanf(code, L"{o:%d%c%d", &x, &c, &y);
code.Format(L"{\\move(%d,%d,0,0,0,0)}", x, y);
ret += code;
}
else ret += code;
}
i = k;
}
if(pos >= str.GetLength()) break;
for(int i = 0; i < fRestoreLen; i++)
{
if(fRestore[i])
{
switch(i)
{
case COLOR: ret += L"{\\c}"; break;
case FONTNAME: ret += L"{\\fn}"; break;
case FONTSIZE: ret += L"{\\fs}"; break;
case FONTCHARSET: ret += L"{\\fe}"; break;
case BOLD: ret += L"{\\b}"; break;
case ITALIC: ret += L"{\\i}"; break;
case UNDERLINE: ret += L"{\\u}"; break;
case STRIKEOUT: ret += L"{\\s}"; break;
default: break;
}
}
}
memset(fRestore, 0, sizeof(bool)*fRestoreLen);
ret += L"\\N";
}
return(ret);
}
static bool OpenMicroDVD(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet)
{
bool fCheck = false, fCheck2 = false;
CString style(_T("Default"));
CStringW buff;;
while(file->ReadString(buff))
{
buff.Trim();
if(buff.IsEmpty()) continue;
int start, end;
int c = swscanf(buff, L"{%d}{%d}", &start, &end);
if(c != 2) {c = swscanf(buff, L"{%d}{}", &start)+1; end = start + 60; fCheck = true;}
if(c != 2)
{
int i;
if(buff.Find('{') == 0 && (i = buff.Find('}')) > 1 && i < buff.GetLength())
{
if(STSStyle* s = GetMicroDVDStyle(WToT(buff.Mid(i+1)), CharSet))
{
style = buff.Mid(1, i-1);
style.MakeUpper();
if(style.GetLength()) {CString str = style.Mid(1); str.MakeLower(); style = style.Left(1) + str;}
ret.AddStyle(style, s);
CharSet = s->charSet;
continue;
}
}
}
if(c == 2)
{
if(fCheck2 && ret.GetCount())
{
STSEntry& stse = ret[ret.GetCount()-1];
stse.end = min(stse.end, start);
fCheck2 = false;
}
ret.Add(
MicroDVD2SSA(buff.Mid(buff.Find('}', buff.Find('}')+1)+1), file->IsUnicode(), CharSet),
file->IsUnicode(),
start, end,
style);
if(fCheck)
{
fCheck = false;
fCheck2 = true;
}
}
else if(c != EOF) // might be another format
{
return(false);
}
}
return(ret.GetCount() > 0);
}
static void ReplaceNoCase(CStringW& str, CStringW from, CStringW to)
{
CStringW lstr = str;
lstr.MakeLower();
int i, j, k;
for(i = 0, j = str.GetLength(); i < j; )
{
if((k = lstr.Find(from, i)) >= 0)
{
str.Delete(k, from.GetLength()); lstr.Delete(k, from.GetLength());
str.Insert(k, to); lstr.Insert(k, to);
i = k + to.GetLength();
j = str.GetLength();
}
else break;
}
}
static CStringW SMI2SSA(CStringW str, int CharSet)
{
ReplaceNoCase(str, L"&nbsp;", L" ");
ReplaceNoCase(str, L"&quot;", L"\"");
ReplaceNoCase(str, L"<br>", L"\\N");
ReplaceNoCase(str, L"<i>", L"{\\i1}");
ReplaceNoCase(str, L"</i>", L"{\\i}");
ReplaceNoCase(str, L"<b>", L"{\\b1}");
ReplaceNoCase(str, L"</b>", L"{\\b}");
CStringW lstr = str;
lstr.MakeLower();
// maven@maven.de
// now parse line
for(int i = 0, j = str.GetLength(); i < j; )
{
int k;
if((k = lstr.Find('<', i)) < 0) break;
int chars_inserted = 0;
int l = 1;
for(; k+l < j && lstr[k+l] != '>'; l++);
l++;
// Modified by Cookie Monster
if (lstr.Find(L"<font ", k) == k)
{
CStringW args = lstr.Mid(k+6, l-6); // delete "<font "
CStringW arg ;
args.Remove('\"'); args.Remove('#'); // may include 2 * " + #
arg.TrimLeft(); arg.TrimRight(L" >");
for (;;)
{
args.TrimLeft();
arg = args.SpanExcluding(L" \t>");
args = args.Mid(arg.GetLength());
if(arg.IsEmpty())
break;
if (arg.Find(L"color=") == 0 )
{
DWORD color;
arg = arg.Mid(6); // delete "color="
if ( arg.IsEmpty())
continue;
DWORD val;
if(g_colors.Lookup(CString(arg), val))
color = (DWORD)val;
else if((color = wcstol(arg, NULL, 16) ) == 0)
color = 0x00ffffff; // default is white
arg.Format(L"%02x%02x%02x", color&0xff, (color>>8)&0xff, (color>>16)&0xff);
lstr.Insert(k + l + chars_inserted, CStringW(L"{\\c&H") + arg + L"&}");
str.Insert(k + l + chars_inserted, CStringW(L"{\\c&H") + arg + L"&}");
chars_inserted += 5 + arg.GetLength() + 2;
}
/*
else if (arg.Find(_T("size=" )) == 0 )
{
uint fsize;
arg = arg.Mid(5); // delete "size="
if ( arg.GetLength() == 0)
continue;
if ( fsize = _tcstol(arg, &tmp, 10) == 0 )
continue;
lstr.Insert(k + l + chars_inserted, CString(_T("{\\fs")) + arg + _T("&}"));
str.Insert(k + l + chars_inserted, CString(_T("{\\fs")) + arg + _T("&}"));
chars_inserted += 4 + arg.GetLength() + 2;
}
*/
}
}
// Original Code
/*
if (lstr.Find(L"<font color=", k) == k)
{
CStringW arg = lstr.Mid(k+12, l-12); // may include 2 * " + #
arg.Remove('\"');
arg.Remove('#');
arg.TrimLeft(); arg.TrimRight(L" >");
if(arg.GetLength() > 0)
{
DWORD color;
CString key = WToT(arg);
void* val;
if(g_colors.Lookup(key, val)) color = (DWORD)val;
else color = wcstol(arg, NULL, 16);
arg.Format(L"%02x%02x%02x", color&0xff, (color>>8)&0xff, (color>>16)&0xff);
}
lstr.Insert(k + l + chars_inserted, L"{\\c&H" + arg + L"&}");
str.Insert(k + l + chars_inserted, L"{\\c&H" + arg + L"&}");
chars_inserted += 5 + arg.GetLength() + 2;
}
*/
else if (lstr.Find(L"</font>", k) == k)
{
lstr.Insert(k + l + chars_inserted, L"{\\c}");
str.Insert(k + l + chars_inserted, L"{\\c}");
chars_inserted += 4;
}
str.Delete(k, l); lstr.Delete(k, l);
i = k + chars_inserted;
j = str.GetLength();
}
return(str);
}
static bool OpenSami(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet)
{
CStringW buff, caption;
ULONGLONG pos = file->GetPosition();
bool fSAMI = false;
while(file->ReadString(buff) && !fSAMI)
{
if(buff.MakeUpper().Find(L"<SAMI>") >= 0) fSAMI = true;
}
if(!fSAMI) return(false);
file->Seek(pos, 0);
bool fComment = false;
int start_time = 0;
while(file->ReadString(buff))
{
buff.Trim();
if(buff.IsEmpty()) continue;
CStringW ubuff = buff;
ubuff.MakeUpper();
if(ubuff.Find(L"<!--") >= 0 || ubuff.Find(L"<TITLE>") >= 0)
fComment = true;
if(!fComment)
{
int i;
if((i = ubuff.Find(L"<SYNC START=")) >= 0)
{
int time = 0;
for(i = 12; i < ubuff.GetLength(); i++)
{
if(ubuff[i] != '>' && ubuff[i] != 'M')
{
if(iswdigit(ubuff[i]))
{
time *= 10;
time += ubuff[i] - 0x30;
}
}
else break;
}
ret.Add(
SMI2SSA(caption, CharSet),
file->IsUnicode(),
start_time, time);
start_time = time;
caption.Empty();
}
caption += buff;
}
if(ubuff.Find(L"-->") >= 0 || ubuff.Find(L"</TITLE>") >= 0)
fComment = false;
}
ret.Add(
SMI2SSA(caption, CharSet),
file->IsUnicode(),
start_time, MAXLONG);
return(true);
}
static bool OpenVPlayer(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet)
{
CStringW buff;
while(file->ReadString(buff))
{
buff.Trim();
if(buff.IsEmpty()) continue;
for(int i = 0; i < buff.GetLength(); i++)
{
if((i = FindChar(buff, '|', i, file->IsUnicode(), CharSet)) < 0) break;
buff.SetAt(i, '\n');
}
int hh, mm, ss;
int c = swscanf(buff, L"%d:%d:%d:", &hh, &mm, &ss);
if(c == 3)
{
CStringW str = buff.Mid(buff.Find(':', buff.Find(':', buff.Find(':')+1)+1)+1);
ret.Add(str,
file->IsUnicode(),
(((hh*60 + mm)*60) + ss)*1000,
(((hh*60 + mm)*60) + ss)*1000 + 1000 + 50*str.GetLength());
}
else if(c != EOF) // might be another format
{
return(false);
}
}
return(ret.GetCount() > 0);
}
CStringW GetStr(CStringW& buff, char sep = ',') //throw(...)
{
buff.TrimLeft();
int pos = buff.Find(sep);
if(pos < 0)
{
pos = buff.GetLength();
if(pos < 1) throw 1;
}
CStringW ret = buff.Left(pos);
if(pos < buff.GetLength()) buff = buff.Mid(pos+1);
return(ret);
}
int GetInt(CStringW& buff, char sep = ',') //throw(...)
{
CStringW str;
str = GetStr(buff, sep);
str.MakeLower();
CStringW fmtstr = str.GetLength() > 2 && (str.Left(2) == L"&h" || str.Left(2) == L"0x")
? str = str.Mid(2), L"%x"
: L"%d";
int ret;
if(swscanf(str, fmtstr, &ret) != 1) throw 1;
return(ret);
}
double GetFloat(CStringW& buff, char sep = ',') //throw(...)
{
CStringW str;
str = GetStr(buff, sep);
str.MakeLower();
float ret;
if(swscanf(str, L"%f", &ret) != 1) throw 1;
return((double)ret);
}
static bool LoadFont(CString& font)
{
int len = font.GetLength();
CAutoVectorPtr<BYTE> pData;
if(len == 0 || (len&3) == 1 || !pData.Allocate(len))
return(false);
const TCHAR* s = font;
const TCHAR* e = s + len;
for(BYTE* p = pData; s < e; s++, p++) *p = *s - 33;
for(int i = 0, j = 0, k = len&~3; i < k; i+=4, j+=3)
{
pData[j+0] = ((pData[i+0]&63)<<2)|((pData[i+1]>>4)& 3);
pData[j+1] = ((pData[i+1]&15)<<4)|((pData[i+2]>>2)&15);
pData[j+2] = ((pData[i+2]& 3)<<6)|((pData[i+3]>>0)&63);
}
int datalen = (len&~3)*3/4;
if((len&3) == 2)
{
pData[datalen++] = ((pData[(len&~3)+0]&63)<<2)|((pData[(len&~3)+1]>>4)&3);
}
else if((len&3) == 3)
{
pData[datalen++] = ((pData[(len&~3)+0]&63)<<2)|((pData[(len&~3)+1]>>4)& 3);
pData[datalen++] = ((pData[(len&~3)+1]&15)<<4)|((pData[(len&~3)+2]>>2)&15);
}
HANDLE hFont = INVALID_HANDLE_VALUE;
if(HMODULE hModule = LoadLibrary(_T("GDI32.DLL")))
{
typedef HANDLE (WINAPI *PAddFontMemResourceEx)( IN PVOID, IN DWORD, IN PVOID , IN DWORD*);
if(PAddFontMemResourceEx f = (PAddFontMemResourceEx)GetProcAddress(hModule, "AddFontMemResourceEx"))
{
DWORD cFonts;
hFont = f(pData, datalen, NULL, &cFonts);
}
FreeLibrary(hModule);
}
if(hFont == INVALID_HANDLE_VALUE)
{
TCHAR path[MAX_PATH];
GetTempPath(MAX_PATH, path);
DWORD chksum = 0;
for(int i = 0, j = datalen>>2; i < j; i++)
chksum += ((DWORD*)(BYTE*)pData)[i];
CString fn;
fn.Format(_T("%sfont%08x.ttf"), path, chksum);
CFileStatus fs;
if(!CFileGetStatus(fn, fs))
{
CFile f;
if(f.Open(fn, CFile::modeCreate|CFile::modeWrite|CFile::typeBinary|CFile::shareDenyWrite))
{
f.Write(pData, datalen);
f.Close();
}
}
AddFontResource(fn);
}
return(true);
}
static bool LoadUUEFont(CTextFile* file)
{
CString s, font;
while(file->ReadString(s))
{
s.Trim();
if(s.IsEmpty() || s[0] == '[') break;
if(s.Find(_T("fontname:")) == 0) {LoadFont(font); font.Empty(); continue;}
font += s;
}
if(!font.IsEmpty())
LoadFont(font);
return(true);
}
static bool OpenSubStationAlpha(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet)
{
bool fRet = false;
int version = 3, sver = 3;
CStringW buff;
while(file->ReadString(buff))
{
buff.Trim();
if(buff.IsEmpty() || buff.GetAt(0) == ';') continue;
CStringW entry;
// try {
entry = GetStr(buff, ':');
// }
// catch(...) {continue;}
entry.MakeLower();
if(entry == L"[script info]")
{
fRet = true;
}
else if(entry == L"playresx")
{
try {ret.m_dstScreenSize.cx = GetInt(buff);}
catch(...) {ret.m_dstScreenSize = CSize(0, 0); return(false);}
if(ret.m_dstScreenSize.cy <= 0)
{
ret.m_dstScreenSize.cy = (ret.m_dstScreenSize.cx == 1280)
? 1024
: ret.m_dstScreenSize.cx * 3 / 4;
}
}
else if(entry == L"playresy")
{
try {ret.m_dstScreenSize.cy = GetInt(buff);}
catch(...) {ret.m_dstScreenSize = CSize(0, 0); return(false);}
if(ret.m_dstScreenSize.cx <= 0)
{
ret.m_dstScreenSize.cx = (ret.m_dstScreenSize.cy == 1024)
? 1280
: ret.m_dstScreenSize.cy * 4 / 3;
}
}
else if(entry == L"wrapstyle")
{
try {ret.m_defaultWrapStyle = GetInt(buff);}
catch(...) {ret.m_defaultWrapStyle = 1; return(false);}
}
else if(entry == L"scripttype")
{
if(buff.GetLength() >= 4 && !buff.Right(4).CompareNoCase(L"4.00")) version = sver = 4;
else if(buff.GetLength() >= 5 && !buff.Right(5).CompareNoCase(L"4.00+")) version = sver = 5;
else if(buff.GetLength() >= 6 && !buff.Right(6).CompareNoCase(L"4.00++")) version = sver = 6;
}
else if(entry == L"collisions")
{
buff = GetStr(buff);
buff.MakeLower();
ret.m_collisions = buff.Find(L"reverse") >= 0 ? 1 : 0;
}
else if(entry == L"scaledborderandshadow")
{
buff = GetStr(buff);
buff.MakeLower();
ret.m_fScaledBAS = buff.Find(L"yes") >= 0;
}
else if(entry == L"[v4 styles]")
{
fRet = true;
sver = 4;
}
else if(entry == L"[v4+ styles]")
{
fRet = true;
sver = 5;
}
else if(entry == L"[v4++ styles]")
{
fRet = true;
sver = 6;
}
else if(entry == L"style")
{
STSStyle* style = new STSStyle;
if(!style) return(false);
try
{
CString StyleName;
int alpha;
StyleName = WToT(GetStr(buff));
style->fontName = WToT(GetStr(buff));
style->fontSize = GetFloat(buff);
for(int i = 0; i < 4; i++) style->colors[i] = (COLORREF)GetInt(buff);
style->fontWeight = !!GetInt(buff) ? FW_BOLD : FW_NORMAL;
style->fItalic = !!GetInt(buff);
if(sver >= 5) style->fUnderline = !!GetInt(buff);
if(sver >= 5) style->fStrikeOut = !!GetInt(buff);
if(sver >= 5) style->fontScaleX = GetFloat(buff);
if(sver >= 5) style->fontScaleY = GetFloat(buff);
if(sver >= 5) style->fontSpacing = GetFloat(buff);
if(sver >= 5) style->fontAngleZ = GetFloat(buff);
if(sver >= 4) style->borderStyle = GetInt(buff);
style->outlineWidth = GetFloat(buff);
style->shadowDepth = GetFloat(buff);
style->scrAlignment = GetInt(buff);
style->marginRect.left = GetInt(buff);
style->marginRect.right = GetInt(buff);
style->marginRect.top = style->marginRect.bottom = GetInt(buff);
if(sver >= 6) style->marginRect.bottom = GetInt(buff);
if(sver <= 4) alpha = GetInt(buff);
style->charSet = GetInt(buff);
if(sver >= 6) style->relativeTo = GetInt(buff);
if(sver <= 4) style->colors[2] = style->colors[3]; // style->colors[2] is used for drawing the outline
if(sver <= 4) alpha = max(min(alpha, 0xff), 0);
if(sver <= 4) {for(int i = 0; i < 3; i++) style->alpha[i] = alpha; style->alpha[3] = 0x80;}
if(sver >= 5) for(int i = 0; i < 4; i++) {style->alpha[i] = (BYTE)(style->colors[i]>>24); style->colors[i] &= 0xffffff;}
if(sver >= 5) style->fontScaleX = max(style->fontScaleX, 0);
if(sver >= 5) style->fontScaleY = max(style->fontScaleY, 0);
if(sver >= 5) style->fontSpacing = max(style->fontSpacing, 0);
style->fontAngleX = style->fontAngleY = 0;
style->borderStyle = style->borderStyle == 1 ? 0 : style->borderStyle == 3 ? 1 : 0;
style->outlineWidth = max(style->outlineWidth, 0);
style->shadowDepth = max(style->shadowDepth, 0);
if(sver <= 4) style->scrAlignment = (style->scrAlignment&4) ? ((style->scrAlignment&3)+6) // top
: (style->scrAlignment&8) ? ((style->scrAlignment&3)+3) // mid
: (style->scrAlignment&3); // bottom
StyleName.TrimLeft('*');
ret.AddStyle(StyleName, style);
}
catch(...)
{
delete style;
return(false);
}
}
else if(entry == L"[events]")
{
fRet = true;
}
else if(entry == _T("dialogue"))
{
try
{
int hh1, mm1, ss1, ms1_div10, hh2, mm2, ss2, ms2_div10, layer = 0;
CString Style, Actor, Effect;
CRect marginRect;
if(version <= 4){GetStr(buff, '='); GetInt(buff);} /* Marked = */
if(version >= 5)layer = GetInt(buff);
hh1 = GetInt(buff, ':');
mm1 = GetInt(buff, ':');
ss1 = GetInt(buff, '.');
ms1_div10 = GetInt(buff);
hh2 = GetInt(buff, ':');
mm2 = GetInt(buff, ':');
ss2 = GetInt(buff, '.');
ms2_div10 = GetInt(buff);
Style = WToT(GetStr(buff));
Actor = WToT(GetStr(buff));
marginRect.left = GetInt(buff);
marginRect.right = GetInt(buff);
marginRect.top = marginRect.bottom = GetInt(buff);
if(version >= 6)marginRect.bottom = GetInt(buff);
Effect = WToT(GetStr(buff));
int len = min(Effect.GetLength(), buff.GetLength());
if(Effect.Left(len) == WToT(buff.Left(len))) Effect.Empty();
Style.TrimLeft('*');
if(!Style.CompareNoCase(_T("Default"))) Style = _T("Default");
ret.Add(buff,
file->IsUnicode(),
(((hh1*60 + mm1)*60) + ss1)*1000 + ms1_div10*10,
(((hh2*60 + mm2)*60) + ss2)*1000 + ms2_div10*10,
Style, Actor, Effect,
marginRect,
layer);
}
catch(...)
{
return(false);
}
}
else if(entry == L"fontname")
{
LoadUUEFont(file);
}
}
return(fRet);
}
static bool OpenXombieSub(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet)
{
float version = 0;
// CMapStringToPtr stylemap;
CStringW buff;
while(file->ReadString(buff))
{
buff.Trim();
if(buff.IsEmpty() || buff.GetAt(0) == ';') continue;
CStringW entry;
// try {
entry = GetStr(buff, '=');
// }
// catch(...) {continue;}
entry.MakeLower();
if(entry == L"version")
{
version = (float)GetFloat(buff);
}
else if(entry == L"screenhorizontal")
{
try {ret.m_dstScreenSize.cx = GetInt(buff);}
catch(...) {ret.m_dstScreenSize = CSize(0, 0); return(false);}
if(ret.m_dstScreenSize.cy <= 0)
{
ret.m_dstScreenSize.cy = (ret.m_dstScreenSize.cx == 1280)
? 1024
: ret.m_dstScreenSize.cx * 3 / 4;
}
}
else if(entry == L"screenvertical")
{
try {ret.m_dstScreenSize.cy = GetInt(buff);}
catch(...) {ret.m_dstScreenSize = CSize(0, 0); return(false);}
if(ret.m_dstScreenSize.cx <= 0)
{
ret.m_dstScreenSize.cx = (ret.m_dstScreenSize.cy == 1024)
? 1280
: ret.m_dstScreenSize.cy * 4 / 3;
}
}
else if(entry == L"style")
{
STSStyle* style = new STSStyle;
if(!style) return(false);
try
{
CString StyleName;
StyleName = WToT(GetStr(buff)) + _T("_") + WToT(GetStr(buff));
style->fontName = WToT(GetStr(buff));
style->fontSize = GetFloat(buff);
for(int i = 0; i < 4; i++) style->colors[i] = (COLORREF)GetInt(buff);
for(int i = 0; i < 4; i++) style->alpha[i] = GetInt(buff);
style->fontWeight = !!GetInt(buff) ? FW_BOLD : FW_NORMAL;
style->fItalic = !!GetInt(buff);
style->fUnderline = !!GetInt(buff);
style->fStrikeOut = !!GetInt(buff);
style->fBlur = !!GetInt(buff);
style->fontScaleX = GetFloat(buff);
style->fontScaleY = GetFloat(buff);
style->fontSpacing = GetFloat(buff);
style->fontAngleX = GetFloat(buff);
style->fontAngleY = GetFloat(buff);
style->fontAngleZ = GetFloat(buff);
style->borderStyle = GetInt(buff);
style->outlineWidth = GetFloat(buff);
style->shadowDepth = GetFloat(buff);
style->scrAlignment = GetInt(buff);
style->marginRect.left = GetInt(buff);
style->marginRect.right = GetInt(buff);
style->marginRect.top = style->marginRect.bottom = GetInt(buff);
style->charSet = GetInt(buff);
style->fontScaleX = max(style->fontScaleX, 0);
style->fontScaleY = max(style->fontScaleY, 0);
style->fontSpacing = max(style->fontSpacing, 0);
style->borderStyle = style->borderStyle == 1 ? 0 : style->borderStyle == 3 ? 1 : 0;
style->outlineWidth = max(style->outlineWidth, 0);
style->shadowDepth = max(style->shadowDepth, 0);
ret.AddStyle(StyleName, style);
}
catch(...)
{
delete style;
return(false);
}
}
else if(entry == L"line")
{
try
{
CString id;
int hh1, mm1, ss1, ms1, hh2, mm2, ss2, ms2, layer = 0;
CString Style, Actor;
CRect marginRect;
if(GetStr(buff) != L"D") continue;
id = GetStr(buff);
layer = GetInt(buff);
hh1 = GetInt(buff, ':');
mm1 = GetInt(buff, ':');
ss1 = GetInt(buff, '.');
ms1 = GetInt(buff);
hh2 = GetInt(buff, ':');
mm2 = GetInt(buff, ':');
ss2 = GetInt(buff, '.');
ms2 = GetInt(buff);
Style = WToT(GetStr(buff)) + _T("_") + WToT(GetStr(buff));
Actor = WToT(GetStr(buff));
marginRect.left = GetInt(buff);
marginRect.right = GetInt(buff);
marginRect.top = marginRect.bottom = GetInt(buff);
Style.TrimLeft('*');
if(!Style.CompareNoCase(_T("Default"))) Style = _T("Default");
ret.Add(buff,
file->IsUnicode(),
(((hh1*60 + mm1)*60) + ss1)*1000 + ms1,
(((hh2*60 + mm2)*60) + ss2)*1000 + ms2,
Style, Actor, _T(""),
marginRect,
layer);
}
catch(...)
{
return(false);
}
}
else if(entry == L"fontname")
{
LoadUUEFont(file);
}
}
return(ret.GetCount() > 0);
}
#include "USFSubtitles.h"
static bool OpenUSF(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet)
{
CString str;
while(file->ReadString(str))
{
if(str.Find(_T("USFSubtitles")) >= 0)
{
CUSFSubtitles usf;
if(usf.Read(file->GetFilePath()) && usf.ConvertToSTS(ret))
return(true);
break;
}
}
return(false);
}
static CStringW MPL22SSA(CStringW str)
{
CAtlList<CStringW> sl;
Explode(str, sl, '|');
POSITION pos = sl.GetHeadPosition();
while(pos)
{
CStringW& s = sl.GetNext(pos);
if(s[0] == '/') {s = L"{\\i1}" + s.Mid(1) + L"{\\i0}";}
}
str = Implode(sl, '\n');
str.Replace(L"\n", L"\\N");
return str;
}
static bool OpenMPL2(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet)
{
CStringW buff;;
while(file->ReadString(buff))
{
buff.Trim();
if(buff.IsEmpty()) continue;
int start, end;
int c = swscanf(buff, L"[%d][%d]", &start, &end);
if(c == 2)
{
ret.Add(
MPL22SSA(buff.Mid(buff.Find(']', buff.Find(']')+1)+1)),
file->IsUnicode(),
start*100, end*100);
}
else if(c != EOF) // might be another format
{
return(false);
}
}
return(ret.GetCount() > 0);
}
typedef bool (*STSOpenFunct)(CTextFile* file, CSimpleTextSubtitle& ret, int CharSet);
typedef struct {STSOpenFunct open; tmode mode;} OpenFunctStruct;
static OpenFunctStruct OpenFuncts[] =
{
OpenSubRipper, TIME,
OpenOldSubRipper, TIME,
OpenSubViewer, TIME,
OpenMicroDVD, FRAME,
OpenSami, TIME,
OpenVPlayer, TIME,
OpenSubStationAlpha, TIME,
OpenXombieSub, TIME,
OpenUSF, TIME,
OpenMPL2, TIME,
};
static int nOpenFuncts = countof(OpenFuncts);
//
CSimpleTextSubtitle::CSimpleTextSubtitle()
{
m_mode = TIME;
m_dstScreenSize = CSize(0, 0);
m_defaultWrapStyle = 0;
m_collisions = 0;
m_fScaledBAS = false;
m_encoding = CTextFile::ASCII;
}
CSimpleTextSubtitle::~CSimpleTextSubtitle()
{
Empty();
}
/*
CSimpleTextSubtitle::CSimpleTextSubtitle(CSimpleTextSubtitle& sts)
{
*this = sts;
}
CSimpleTextSubtitle& CSimpleTextSubtitle::operator = (CSimpleTextSubtitle& sts)
{
Empty();
m_name = sts.m_name;
m_mode = sts.m_mode;
m_dstScreenSize = sts.m_dstScreenSize;
m_defaultWrapStyle = sts.m_defaultWrapStyle;
m_collisions = sts.m_collisions;
m_fScaledBAS = sts.m_fScaledBAS;
m_fSSA = sts.m_fSSA;
m_fUsingAutoGeneratedDefaultStyle = sts.m_fUsingAutoGeneratedDefaultStyle;
CopyStyles(sts.m_styles);
m_segments.Copy(sts.m_segments);
Copy(sts);
return(*this);
}
*/
void CSimpleTextSubtitle::Copy(CSimpleTextSubtitle& sts)
{
Empty();
m_name = sts.m_name;
m_mode = sts.m_mode;
m_dstScreenSize = sts.m_dstScreenSize;
m_defaultWrapStyle = sts.m_defaultWrapStyle;
m_collisions = sts.m_collisions;
m_fScaledBAS = sts.m_fScaledBAS;
m_encoding = sts.m_encoding;
m_fUsingAutoGeneratedDefaultStyle = sts.m_fUsingAutoGeneratedDefaultStyle;
CopyStyles(sts.m_styles);
m_segments.Copy(sts.m_segments);
__super::Copy(sts);
}
void CSimpleTextSubtitle::Append(CSimpleTextSubtitle& sts, int timeoff)
{
if(timeoff < 0)
{
timeoff = GetCount() > 0 ? GetAt(GetCount()-1).end : 0;
}
for(int i = 0, j = GetCount(); i < j; i++)
{
if(GetAt(i).start > timeoff)
{
RemoveAt(i, j - i);
break;
}
}
CopyStyles(sts.m_styles, true);
for(int i = 0, j = sts.GetCount(); i < j; i++)
{
STSEntry stse = sts.GetAt(i);
stse.start += timeoff;
stse.end += timeoff;
stse.readorder += GetCount();
__super::Add(stse);
}
CreateSegments();
}
void CSTSStyleMap::Free()
{
POSITION pos = GetStartPosition();
while(pos)
{
CString key;
STSStyle* val;
GetNextAssoc(pos, key, val);
delete val;
}
RemoveAll();
}
bool CSimpleTextSubtitle::CopyStyles(const CSTSStyleMap& styles, bool fAppend)
{
if(!fAppend) m_styles.Free();
POSITION pos = styles.GetStartPosition();
while(pos)
{
CString key;
STSStyle* val;
styles.GetNextAssoc(pos, key, val);
STSStyle* s = new STSStyle;
if(!s) return(false);
*s = *val;
AddStyle(key, s);
}
return(true);
}
void CSimpleTextSubtitle::Empty()
{
m_dstScreenSize = CSize(0, 0);
m_styles.Free();
m_segments.RemoveAll();
RemoveAll();
}
void CSimpleTextSubtitle::Add(CStringW str, bool fUnicode, int start, int end, CString style, CString actor, CString effect, CRect marginRect, int layer, int readorder)
{
if(str.Trim().IsEmpty() || start > end) return;
str.Remove('\r');
str.Replace(L"\n", L"\\N");
if(style.IsEmpty()) style = _T("Default");
style.TrimLeft('*');
STSEntry sub;
sub.str = str;
sub.fUnicode = fUnicode;
sub.style = style;
sub.actor = actor;
sub.effect = effect;
sub.marginRect = marginRect;
sub.layer = layer;
sub.start = start;
sub.end = end;
sub.readorder = readorder < 0 ? GetCount() : readorder;
int n = __super::Add(sub);
int len = m_segments.GetCount();
if(len == 0)
{
STSSegment stss(start, end);
stss.subs.Add(n);
m_segments.Add(stss);
}
else if(end <= m_segments[0].start)
{
STSSegment stss(start, end);
stss.subs.Add(n);
m_segments.InsertAt(0, stss);
}
else if(start >= m_segments[len-1].end)
{
STSSegment stss(start, end);
stss.subs.Add(n);
m_segments.Add(stss);
}
else
{
if(start < m_segments[0].start)
{
STSSegment stss(start, m_segments[0].start);
stss.subs.Add(n);
start = m_segments[0].start;
m_segments.InsertAt(0, stss);
}
for(int i = 0; i < m_segments.GetCount(); i++)
{
STSSegment& s = m_segments[i];
if(start >= s.end)
continue;
if(end <= s.start)
break;
if(s.start < start && start < s.end)
{
STSSegment stss(s.start, start);
stss.subs.Copy(s.subs);
s.start = start;
m_segments.InsertAt(i, stss);
continue;
}
if(start <= s.start && s.end <= end)
{
for(int j = 0, k = s.subs.GetCount(); j <= k; j++)
{
if(j == k || sub.readorder < GetAt(s.subs[j]).readorder)
s.subs.InsertAt(j, n);
}
// s.subs.Add(n);
}
if(s.start < end && end < s.end)
{
STSSegment stss(s.start, end);
stss.subs.Copy(s.subs);
for(int j = 0, k = s.subs.GetCount(); j <= k; j++)
{
if(j == k || sub.readorder < GetAt(stss.subs[j]).readorder)
stss.subs.InsertAt(j, n);
}
// stss.subs.Add(n);
s.start = end;
m_segments.InsertAt(i, stss);
}
}
if(end > m_segments[m_segments.GetCount()-1].end)
{
STSSegment stss(m_segments[m_segments.GetCount()-1].end, end);
stss.subs.Add(n);
m_segments.Add(stss);
}
}
/*
str.Remove('\r');
str.Replace(L"\n", L"\\N");
if(style.IsEmpty()) style = _T("Default");
int j = m_segments.GetCount();
for(int i = j-1; i >= 0; i--)
{
if(m_segments[i].end <= start)
{
break;
}
else if(m_segments[i].start >= start)
{
m_segments.SetCount(m_segments.GetCount()-1);
j--;
}
else if(m_segments[i].end > start)
{
if(i < j-1) m_segments.RemoveAt(i+1, j-i-1);
m_segments[i].end = start;
break;
}
}
if(m_segments.GetCount() == 0 && j > 0)
CSTSArray::RemoveAll();
STSSegment stss(start, end);
int len = GetCount();
stss.subs.Add(len);
m_segments.Add(stss);
STSEntry sub;
sub.str = str;
sub.fUnicode = fUnicode;
sub.style = style;
sub.actor = actor;
sub.effect = effect;
sub.marginRect = marginRect;
sub.layer = layer;
sub.start = start;
sub.end = end;
sub.readorder = GetCount();
CSTSArray::Add(sub);
*/
}
STSStyle* CSimpleTextSubtitle::CreateDefaultStyle(int CharSet)
{
CString def(_T("Default"));
STSStyle* ret = NULL;
if(!m_styles.Lookup(def, ret))
{
STSStyle* style = new STSStyle();
style->charSet = CharSet;
AddStyle(def, style);
m_styles.Lookup(def, ret);
m_fUsingAutoGeneratedDefaultStyle = true;
}
else
{
m_fUsingAutoGeneratedDefaultStyle = false;
}
return ret;
}
void CSimpleTextSubtitle::ChangeUnknownStylesToDefault()
{
CAtlMap<CString, STSStyle*, CStringElementTraits<CString> > unknown;
bool fReport = true;
for(int i = 0; i < GetCount(); i++)
{
STSEntry& stse = GetAt(i);
STSStyle* val;
if(!m_styles.Lookup(stse.style, val))
{
if(!unknown.Lookup(stse.style, val))
{
if(fReport)
{
CString msg;
msg.Format(_T("Unknown style found: \"%s\", changed to \"Default\"!\n\nPress Cancel to ignore further warnings."), stse.style);
if(MessageBox(NULL, msg, _T("Warning"), MB_OKCANCEL|MB_ICONWARNING) != IDOK) fReport = false;
}
unknown[stse.style] = NULL;
}
stse.style = _T("Default");
}
}
}
void CSimpleTextSubtitle::AddStyle(CString name, STSStyle* style)
{
int i, j;
if(name.IsEmpty()) name = _T("Default");
STSStyle* val;
if(m_styles.Lookup(name, val))
{
if(*val == *style)
{
delete style;
return;
}
int len = name.GetLength();
for(i = len; i > 0 && _istdigit(name[i-1]); i--);
int idx = 1;
CString name2 = name;
if(i < len && _stscanf(name.Right(len-i), _T("%d"), &idx) == 1)
{
name2 = name.Left(i);
}
idx++;
CString name3;
do
{
name3.Format(_T("%s%d"), name2, idx);
idx++;
}
while(m_styles.Lookup(name3));
m_styles.RemoveKey(name);
m_styles[name3] = val;
for(i = 0, j = GetCount(); i < j; i++)
{
STSEntry& stse = GetAt(i);
if(stse.style == name) stse.style = name3;
}
}
m_styles[name] = style;
}
bool CSimpleTextSubtitle::SetDefaultStyle(STSStyle& s)
{
STSStyle* val;
if(!m_styles.Lookup(_T("Default"), val)) return false;
*val = s;
m_fUsingAutoGeneratedDefaultStyle = false;
return true;
}
bool CSimpleTextSubtitle::GetDefaultStyle(STSStyle& s)
{
STSStyle* val;
if(!m_styles.Lookup(_T("Default"), val)) return false;
s = *val;
return true;
}
void CSimpleTextSubtitle::ConvertToTimeBased(double fps)
{
if(m_mode == TIME) return;
for(int i = 0, j = GetCount(); i < j; i++)
{
STSEntry& stse = (*this)[i];
stse.start = int(1.0 * stse.start * 1000 / fps + 0.5);
stse.end = int(1.0 * stse.end * 1000 / fps + 0.5);
}
m_mode = TIME;
CreateSegments();
}
void CSimpleTextSubtitle::ConvertToFrameBased(double fps)
{
if(m_mode == FRAME) return;
for(int i = 0, j = GetCount(); i < j; i++)
{
STSEntry& stse = (*this)[i];
stse.start = int(1.0 * stse.start * fps / 1000 + 0.5);
stse.end = int(1.0 * stse.end * fps / 1000 + 0.5);
}
m_mode = FRAME;
CreateSegments();
}
int CSimpleTextSubtitle::SearchSub(int t, double fps)
{
int i = 0, j = GetCount() - 1, ret = -1;
if(j >= 0 && t >= TranslateStart(j, fps))
{
return(j);
}
while(i < j)
{
int mid = (i + j) >> 1;
int midt = TranslateStart(mid, fps);
if(t == midt)
{
while(mid > 0 && t == TranslateStart(mid-1, fps)) mid--;
ret = mid;
break;
}
else if(t < midt)
{
ret = -1;
if(j == mid) mid--;
j = mid;
}
else if(t > midt)
{
ret = mid;
if(i == mid) mid++;
i = mid;
}
}
return(ret);
}
const STSSegment* CSimpleTextSubtitle::SearchSubs(int t, double fps, /*[out]*/ int* iSegment, int* nSegments)
{
int i = 0, j = m_segments.GetCount() - 1, ret = -1;
if(nSegments) *nSegments = j+1;
if(j >= 0 && t >= TranslateSegmentStart(j, fps) && t < TranslateSegmentEnd(j, fps))
{
if(iSegment) *iSegment = j;
return(&m_segments[j]);
}
if(j >= 0 && t >= TranslateSegmentEnd(j, fps))
{
if(iSegment) *iSegment = j+1;
return(NULL);
}
if(j > 0 && t < TranslateSegmentStart(i, fps))
{
if(iSegment) *iSegment = -1;
return(NULL);
}
while(i < j)
{
int mid = (i + j) >> 1;
int midt = TranslateSegmentStart(mid, fps);
if(t == midt)
{
ret = mid;
break;
}
else if(t < midt)
{
ret = -1;
if(j == mid) mid--;
j = mid;
}
else if(t > midt)
{
ret = mid;
if(i == mid) mid++;
i = mid;
}
}
if(0 <= ret && ret < m_segments.GetCount())
{
if(iSegment) *iSegment = ret;
}
if(0 <= ret && ret < m_segments.GetCount()
&& m_segments[ret].subs.GetCount() > 0
&& TranslateSegmentStart(ret, fps) <= t && t < TranslateSegmentEnd(ret, fps))
{
return(&m_segments[ret]);
}
return(NULL);
}
int CSimpleTextSubtitle::TranslateStart(int i, double fps)
{
return(i < 0 || GetCount() <= i ? -1 :
m_mode == TIME ? GetAt(i).start :
m_mode == FRAME ? (int)(GetAt(i).start*1000/fps) :
0);
}
int CSimpleTextSubtitle::TranslateEnd(int i, double fps)
{
return(i < 0 || GetCount() <= i ? -1 :
m_mode == TIME ? GetAt(i).end :
m_mode == FRAME ? (int)(GetAt(i).end*1000/fps) :
0);
}
int CSimpleTextSubtitle::TranslateSegmentStart(int i, double fps)
{
return(i < 0 || m_segments.GetCount() <= i ? -1 :
m_mode == TIME ? m_segments[i].start :
m_mode == FRAME ? (int)(m_segments[i].start*1000/fps) :
0);
}
int CSimpleTextSubtitle::TranslateSegmentEnd(int i, double fps)
{
return(i < 0 || m_segments.GetCount() <= i ? -1 :
m_mode == TIME ? m_segments[i].end :
m_mode == FRAME ? (int)(m_segments[i].end*1000/fps) :
0);
}
STSStyle* CSimpleTextSubtitle::GetStyle(int i)
{
CString def = _T("Default");
STSStyle* style = NULL;
m_styles.Lookup(GetAt(i).style, style);
STSStyle* defstyle = NULL;
m_styles.Lookup(def, defstyle);
if(!style)
{
style = defstyle;
}
ASSERT(style);
return style;
}
bool CSimpleTextSubtitle::GetStyle(int i, STSStyle& stss)
{
CString def = _T("Default");
STSStyle* style = NULL;
m_styles.Lookup(GetAt(i).style, style);
STSStyle* defstyle = NULL;
m_styles.Lookup(def, defstyle);
if(!style)
{
if(!defstyle)
{
defstyle = CreateDefaultStyle(DEFAULT_CHARSET);
}
style = defstyle;
}
if(!style) {ASSERT(0); return false;}
stss = *style;
if(stss.relativeTo == 2 && defstyle)
stss.relativeTo = defstyle->relativeTo;
return true;
}
int CSimpleTextSubtitle::GetCharSet(int i)
{
STSStyle stss;
GetStyle(i, stss);
return(stss.charSet);
}
bool CSimpleTextSubtitle::IsEntryUnicode(int i)
{
return(GetAt(i).fUnicode);
}
void CSimpleTextSubtitle::ConvertUnicode(int i, bool fUnicode)
{
STSEntry& stse = GetAt(i);
if(stse.fUnicode ^ fUnicode)
{
int CharSet = GetCharSet(i);
stse.str = fUnicode
? MBCSSSAToUnicode(stse.str, CharSet)
: UnicodeSSAToMBCS(stse.str, CharSet);
stse.fUnicode = fUnicode;
}
}
CStringA CSimpleTextSubtitle::GetStrA(int i, bool fSSA)
{
return(WToA(GetStrWA(i, fSSA)));
}
CStringW CSimpleTextSubtitle::GetStrW(int i, bool fSSA)
{
bool fUnicode = IsEntryUnicode(i);
int CharSet = GetCharSet(i);
CStringW str = GetAt(i).str;
if(!fUnicode)
str = MBCSSSAToUnicode(str, CharSet);
if(!fSSA)
str = RemoveSSATags(str, fUnicode, CharSet);
return(str);
}
CStringW CSimpleTextSubtitle::GetStrWA(int i, bool fSSA)
{
bool fUnicode = IsEntryUnicode(i);
int CharSet = GetCharSet(i);
CStringW str = GetAt(i).str;
if(fUnicode)
str = UnicodeSSAToMBCS(str, CharSet);
if(!fSSA)
str = RemoveSSATags(str, fUnicode, CharSet);
return(str);
}
void CSimpleTextSubtitle::SetStr(int i, CStringA str, bool fUnicode)
{
SetStr(i, AToW(str), false);
}
void CSimpleTextSubtitle::SetStr(int i, CStringW str, bool fUnicode)
{
STSEntry& stse = GetAt(i);
str.Replace(L"\n", L"\\N");
if(stse.fUnicode && !fUnicode) stse.str = MBCSSSAToUnicode(str, GetCharSet(i));
else if(!stse.fUnicode && fUnicode) stse.str = UnicodeSSAToMBCS(str, GetCharSet(i));
else stse.str = str;
}
static int comp1(const void* a, const void* b)
{
int ret = ((STSEntry*)a)->start - ((STSEntry*)b)->start;
if(ret == 0) ret = ((STSEntry*)a)->layer - ((STSEntry*)b)->layer;
if(ret == 0) ret = ((STSEntry*)a)->readorder - ((STSEntry*)b)->readorder;
return(ret);
}
static int comp2(const void* a, const void* b)
{
return(((STSEntry*)a)->readorder - ((STSEntry*)b)->readorder);
}
void CSimpleTextSubtitle::Sort(bool fRestoreReadorder)
{
qsort(GetData(), GetCount(), sizeof(STSEntry), !fRestoreReadorder ? comp1 : comp2);
CreateSegments();
}
static int intcomp(const void* i1, const void* i2)
{
return(*((int*)i1) - *((int*)i2));
}
void CSimpleTextSubtitle::CreateSegments()
{
m_segments.RemoveAll();
int i, j;
CAtlArray<int> breakpoints;
for(i = 0; i < GetCount(); i++)
{
STSEntry& stse = GetAt(i);
breakpoints.Add(stse.start);
breakpoints.Add(stse.end);
}
qsort(breakpoints.GetData(), breakpoints.GetCount(), sizeof(int), intcomp);
int* ptr = breakpoints.GetData(), prev = ptr ? *ptr : NULL;
for(i = breakpoints.GetCount(); i > 0; i--, ptr++)
{
if(*ptr != prev)
{
m_segments.Add(STSSegment(prev, *ptr));
prev = *ptr;
}
}
for(i = 0; i < GetCount(); i++)
{
STSEntry& stse = GetAt(i);
for(j = 0; j < m_segments.GetCount() && m_segments[j].start < stse.start; j++);
for(; j < m_segments.GetCount() && m_segments[j].end <= stse.end; j++)
m_segments[j].subs.Add(i);
}
OnChanged();
/*
for(i = 0, j = m_segments.GetCount(); i < j; i++)
{
STSSegment& stss = m_segments[i];
TRACE(_T("%d - %d"), stss.start, stss.end);
for(int k = 0, l = stss.subs.GetCount(); k < l; k++)
{
TRACE(_T(", %d"), stss.subs[k]);
}
TRACE(_T("\n"));
}
*/
}
bool CSimpleTextSubtitle::Open(CString fn, int CharSet, CString name)
{
Empty();
CWebTextFile f;
if(!f.Open(fn)) return(false);
fn.Replace('\\', '/');
if(name.IsEmpty())
{
name = fn.Left(fn.ReverseFind('.'));
name = name.Mid(name.ReverseFind('/')+1);
name = name.Mid(name.ReverseFind('.')+1);
}
return(Open(&f, CharSet, name));
}
static int CountLines(CTextFile* f, ULONGLONG from, ULONGLONG to)
{
int n = 0;
CString s;
f->Seek(from, 0);
while(f->ReadString(s) && f->GetPosition() < to) n++;
return(n);
}
bool CSimpleTextSubtitle::Open(CTextFile* f, int CharSet, CString name)
{
Empty();
ULONGLONG pos = f->GetPosition();
for(int i = 0; i < nOpenFuncts; i++)
{
if(!OpenFuncts[i].open(f, *this, CharSet) /*|| !GetCount()*/)
{
if(GetCount() > 0)
{
int n = CountLines(f, pos, f->GetPosition());
CString s;
s.Format(_T("Syntax error at line %d!\t"), n+1);
AfxMessageBox(s, MB_OK|MB_ICONERROR);
Empty();
break;
}
f->Seek(pos, 0);
Empty();
continue;
}
m_name = name;
m_mode = OpenFuncts[i].mode;
m_encoding = f->GetEncoding();
m_path = f->GetFilePath();
// Sort();
CreateSegments();
CWebTextFile f2;
if(f2.Open(f->GetFilePath() + _T(".style")))
OpenSubStationAlpha(&f2, *this, CharSet);
CreateDefaultStyle(CharSet);
ChangeUnknownStylesToDefault();
if(m_dstScreenSize == CSize(0, 0)) m_dstScreenSize = CSize(384, 288);
return(true);
}
return(false);
}
bool CSimpleTextSubtitle::Open(BYTE* data, int len, int CharSet, CString name)
{
TCHAR path[MAX_PATH];
if(!GetTempPath(MAX_PATH, path)) return(false);
TCHAR fn[MAX_PATH];
if(!GetTempFileName(path, _T("vs"), 0, fn)) return(false);
FILE* tmp = _tfopen(fn, _T("wb"));
if(!tmp) return(false);
int i = 0;
for(; i <= (len-1024); i += 1024) fwrite(&data[i], 1024, 1, tmp);
if(len > i) fwrite(&data[i], len - i, 1, tmp);
fclose(tmp);
bool fRet = Open(fn, CharSet, name);
_tremove(fn);
return(fRet);
}
bool CSimpleTextSubtitle::SaveAs(CString fn, exttype et, double fps, CTextFile::enc e)
{
if(fn.Mid(fn.ReverseFind('.')+1).CompareNoCase(exttypestr[et]))
{
if(fn[fn.GetLength()-1] != '.') fn += _T(".");
fn += exttypestr[et];
}
CTextFile f;
if(!f.Save(fn, e))
return(false);
if(et == EXTSMI)
{
CString str;
str += _T("<SAMI>\n<HEAD>\n");
str += _T("<STYLE TYPE=\"text/css\">\n");
str += _T("<!--\n");
str += _T("P {margin-left: 16pt; margin-right: 16pt; margin-bottom: 16pt; margin-top: 16pt;\n");
str += _T(" text-align: center; font-size: 18pt; font-family: arial; font-weight: bold; color: #f0f0f0;}\n");
str += _T(".UNKNOWNCC {Name:Unknown; lang:en-US; SAMIType:CC;}\n");
str += _T("-->\n");
str += _T("</STYLE>\n");
str += _T("</HEAD>\n");
str += _T("\n");
str += _T("<BODY>\n");
f.WriteString(str);
}
else if(et == EXTSSA || et == EXTASS)
{
CString str;
str = _T("[Script Info]\n");
str += (et == EXTSSA) ? _T("; This is a Sub Station Alpha v4 script.\n") : _T("; This is an Advanced Sub Station Alpha v4+ script.\n");
str += _T("; For Sub Station Alpha info and downloads,\n");
str += _T("; go to http://www.eswat.demon.co.uk/\n");
str += _T("; or email kotus@eswat.demon.co.uk\n");
str += _T("; \n");
if(et == EXTASS)
{
str += _T("; Advanced Sub Station Alpha script format developed by #Anime-Fansubs@EfNET\n");
str += _T("; http://www.anime-fansubs.org\n");
str += _T("; \n");
str += _T("; For additional info and downloads go to http://gabest.org/\n");
str += _T("; or email gabest@freemail.hu\n");
str += _T("; \n");
}
str += _T("; Note: This file was saved by Subresync.\n");
str += _T("; \n");
str += (et == EXTSSA) ? _T("ScriptType: v4.00\n") : _T("ScriptType: v4.00+\n");
str += (m_collisions == 0) ? _T("Collisions: Normal\n") : _T("Collisions: Reverse\n");
if(et == EXTASS && m_fScaledBAS) str += _T("ScaledBorderAndShadow: Yes\n");
str += _T("PlayResX: %d\n");
str += _T("PlayResY: %d\n");
str += _T("Timer: 100.0000\n");
str += _T("\n");
str += (et == EXTSSA)
? _T("[V4 Styles]\nFormat: Name, Fontname, Fontsize, PrimaryColour, SecondaryColour, TertiaryColour, BackColour, Bold, Italic, BorderStyle, Outline, Shadow, Alignment, MarginL, MarginR, MarginV, AlphaLevel, Encoding\n")
: _T("[V4+ Styles]\nFormat: Name, Fontname, Fontsize, PrimaryColour, SecondaryColour, OutlineColour, BackColour, Bold, Italic, Underline, StrikeOut, ScaleX, ScaleY, Spacing, Angle, BorderStyle, Outline, Shadow, Alignment, MarginL, MarginR, MarginV, Encoding\n");
CString str2;
str2.Format(str, m_dstScreenSize.cx, m_dstScreenSize.cy);
f.WriteString(str2);
str = (et == EXTSSA)
? _T("Style: %s,%s,%d,&H%06x,&H%06x,&H%06x,&H%06x,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d\n")
: _T("Style: %s,%s,%d,&H%08x,&H%08x,&H%08x,&H%08x,%d,%d,%d,%d,%d,%d,%d,%.2f,%d,%d,%d,%d,%d,%d,%d,%d\n");
POSITION pos = m_styles.GetStartPosition();
while(pos)
{
CString key;
STSStyle* s;
m_styles.GetNextAssoc(pos, key, s);
if(et == EXTSSA)
{
CString str2;
str2.Format(str, key,
s->fontName, (int)s->fontSize,
s->colors[0]&0xffffff,
s->colors[1]&0xffffff,
s->colors[2]&0xffffff,
s->colors[3]&0xffffff,
s->fontWeight > FW_NORMAL ? -1 : 0, s->fItalic ? -1 : 0,
s->borderStyle == 0 ? 1 : s->borderStyle == 1 ? 3 : 0,
(int)s->outlineWidth, (int)s->shadowDepth,
s->scrAlignment <= 3 ? s->scrAlignment : s->scrAlignment <= 6 ? ((s->scrAlignment-3)|8) : s->scrAlignment <= 9 ? ((s->scrAlignment-6)|4) : 2,
s->marginRect.left, s->marginRect.right, (s->marginRect.top + s->marginRect.bottom) / 2,
s->alpha[0],
s->charSet);
f.WriteString(str2);
}
else
{
CString str2;
str2.Format(str, key,
s->fontName, (int)s->fontSize,
(s->colors[0]&0xffffff) | (s->alpha[0]<<24),
(s->colors[1]&0xffffff) | (s->alpha[1]<<24),
(s->colors[2]&0xffffff) | (s->alpha[2]<<24),
(s->colors[3]&0xffffff) | (s->alpha[3]<<24),
s->fontWeight > FW_NORMAL ? -1 : 0,
s->fItalic ? -1 : 0, s->fUnderline ? -1 : 0, s->fStrikeOut ? -1 : 0,
(int)s->fontScaleX, (int)s->fontScaleY,
(int)s->fontSpacing, (float)s->fontAngleZ,
s->borderStyle == 0 ? 1 : s->borderStyle == 1 ? 3 : 0,
(int)s->outlineWidth, (int)s->shadowDepth,
s->scrAlignment,
s->marginRect.left, s->marginRect.right, (s->marginRect.top + s->marginRect.bottom) / 2,
s->charSet);
f.WriteString(str2);
}
}
if(GetCount() > 0)
{
str = _T("\n");
str += _T("[Events]\n");
str += (et == EXTSSA)
? _T("Format: Marked, Start, End, Style, Name, MarginL, MarginR, MarginV, Effect, Text\n")
: _T("Format: Layer, Start, End, Style, Actor, MarginL, MarginR, MarginV, Effect, Text\n");
f.WriteString(str);
}
}
CStringW fmt =
et == EXTSRT ? L"%d\n%02d:%02d:%02d,%03d --> %02d:%02d:%02d,%03d\n%s\n\n" :
et == EXTSUB ? L"{%d}{%d}%s\n" :
et == EXTSMI ? L"<SYNC Start=%d><P Class=UNKNOWNCC>\n%s\n<SYNC Start=%d><P Class=UNKNOWNCC>&nbsp;\n" :
et == EXTPSB ? L"{%d:%02d:%02d}{%d:%02d:%02d}%s\n" :
et == EXTSSA ? L"Dialogue: Marked=0,%d:%02d:%02d.%02d,%d:%02d:%02d.%02d,%s,%s,%04d,%04d,%04d,%s,%s\n" :
et == EXTASS ? L"Dialogue: %d,%d:%02d:%02d.%02d,%d:%02d:%02d.%02d,%s,%s,%04d,%04d,%04d,%s,%s\n" :
L"";
// Sort(true);
for(int i = 0, j = GetCount(), k = 0; i < j; i++)
{
STSEntry& stse = GetAt(i);
int t1 = TranslateStart(i, fps);
if(t1 < 0) {k++; continue;}
int t2 = TranslateEnd(i, fps);
int hh1 = (t1/60/60/1000);
int mm1 = (t1/60/1000)%60;
int ss1 = (t1/1000)%60;
int ms1 = (t1)%1000;
int hh2 = (t2/60/60/1000);
int mm2 = (t2/60/1000)%60;
int ss2 = (t2/1000)%60;
int ms2 = (t2)%1000;
CStringW str = f.IsUnicode()
? GetStrW(i, et == EXTSSA || et == EXTASS)
: GetStrWA(i, et == EXTSSA || et == EXTASS);
CStringW str2;
if(et == EXTSRT)
{
str2.Format(fmt, i-k+1, hh1, mm1, ss1, ms1, hh2, mm2, ss2, ms2, str);
}
else if(et == EXTSUB)
{
str.Replace('\n', '|');
str2.Format(fmt, int(t1*fps/1000), int(t2*fps/1000), str);
}
else if(et == EXTSMI)
{
str.Replace(L"\n", L"<br>");
str2.Format(fmt, t1, str, t2);
}
else if(et == EXTPSB)
{
str.Replace('\n', '|');
str2.Format(fmt, hh1, mm1, ss1, hh2, mm2, ss2, str);
}
else if(et == EXTSSA)
{
str.Replace(L"\n", L"\\N");
str2.Format(fmt,
hh1, mm1, ss1, ms1/10,
hh2, mm2, ss2, ms2/10,
TToW(stse.style), TToW(stse.actor),
stse.marginRect.left, stse.marginRect.right, (stse.marginRect.top + stse.marginRect.bottom) / 2,
TToW(stse.effect), str);
}
else if(et == EXTASS)
{
str.Replace(L"\n", L"\\N");
str2.Format(fmt,
stse.layer,
hh1, mm1, ss1, ms1/10,
hh2, mm2, ss2, ms2/10,
TToW(stse.style), TToW(stse.actor),
stse.marginRect.left, stse.marginRect.right, (stse.marginRect.top + stse.marginRect.bottom) / 2,
TToW(stse.effect), str);
}
f.WriteString(str2);
}
// Sort();
if(et == EXTSMI)
{
f.WriteString(_T("</BODY>\n</SAMI>\n"));
}
STSStyle* s;
if(!m_fUsingAutoGeneratedDefaultStyle && m_styles.Lookup(_T("Default"), s) && et != EXTSSA && et != EXTASS)
{
CTextFile f;
if(!f.Save(fn + _T(".style"), e))
return(false);
CString str, str2;
str += _T("ScriptType: v4.00+\n");
str += _T("PlayResX: %d\n");
str += _T("PlayResY: %d\n");
str += _T("\n");
str += _T("[V4+ Styles]\nFormat: Name, Fontname, Fontsize, PrimaryColour, SecondaryColour, OutlineColour, BackColour, Bold, Italic, Underline, StrikeOut, ScaleX, ScaleY, Spacing, Angle, BorderStyle, Outline, Shadow, Alignment, MarginL, MarginR, MarginV, Encoding\n");
str2.Format(str, m_dstScreenSize.cx, m_dstScreenSize.cy);
f.WriteString(str2);
str = _T("Style: Default,%s,%d,&H%08x,&H%08x,&H%08x,&H%08x,%d,%d,%d,%d,%d,%d,%d,%.2f,%d,%d,%d,%d,%d,%d,%d,%d\n");
str2.Format(str,
s->fontName, (int)s->fontSize,
(s->colors[0]&0xffffff) | (s->alpha[0]<<24),
(s->colors[1]&0xffffff) | (s->alpha[1]<<24),
(s->colors[2]&0xffffff) | (s->alpha[2]<<24),
(s->colors[3]&0xffffff) | (s->alpha[3]<<24),
s->fontWeight > FW_NORMAL ? -1 : 0,
s->fItalic ? -1 : 0, s->fUnderline ? -1 : 0, s->fStrikeOut ? -1 : 0,
(int)s->fontScaleX, (int)s->fontScaleY,
(int)s->fontSpacing, (float)s->fontAngleZ,
s->borderStyle == 0 ? 1 : s->borderStyle == 1 ? 3 : 0,
(int)s->outlineWidth, (int)s->shadowDepth,
s->scrAlignment,
s->marginRect.left, s->marginRect.right, (s->marginRect.top + s->marginRect.bottom) / 2,
s->charSet);
f.WriteString(str2);
}
return(true);
}
////////////////////////////////////////////////////////////////////
STSStyle::STSStyle()
{
SetDefault();
}
void STSStyle::SetDefault()
{
marginRect = CRect(20, 20, 20, 20);
scrAlignment = 2;
borderStyle = 0;
outlineWidth = 2;
shadowDepth = 3;
colors[0] = 0x00ffffff;
colors[1] = 0x0000ffff;
colors[2] = 0x00000000;
colors[3] = 0x00000000;
alpha[0] = 0x00;
alpha[1] = 0x00;
alpha[2] = 0x00;
alpha[3] = 0x80;
charSet = DEFAULT_CHARSET;
fontName = _T("Arial");
fontSize = 18;
fontScaleX = fontScaleY = 100;
fontSpacing = 0;
fontWeight = FW_BOLD;
fItalic = false;
fUnderline = false;
fStrikeOut = false;
fBlur = false;
fontShiftX = fontShiftY = fontAngleZ = fontAngleX = fontAngleY = 0;
relativeTo = 2;
}
bool STSStyle::operator == (STSStyle& s)
{
return(marginRect == s.marginRect
&& scrAlignment == s.scrAlignment
&& borderStyle == s.borderStyle
&& outlineWidth == s.outlineWidth
&& shadowDepth == s.shadowDepth
&& *((int*)&colors[0]) == *((int*)&s.colors[0])
&& *((int*)&colors[1]) == *((int*)&s.colors[1])
&& *((int*)&colors[2]) == *((int*)&s.colors[2])
&& *((int*)&colors[3]) == *((int*)&s.colors[3])
&& alpha[0] == s.alpha[0]
&& alpha[1] == s.alpha[1]
&& alpha[2] == s.alpha[2]
&& alpha[3] == s.alpha[3]
&& fBlur == s.fBlur
&& relativeTo == s.relativeTo
&& IsFontStyleEqual(s));
}
bool STSStyle::IsFontStyleEqual(STSStyle& s)
{
return(
charSet == s.charSet
&& fontName == s.fontName
&& fontSize == s.fontSize
&& fontScaleX == s.fontScaleX
&& fontScaleY == s.fontScaleY
&& fontSpacing == s.fontSpacing
&& fontWeight == s.fontWeight
&& fItalic == s.fItalic
&& fUnderline == s.fUnderline
&& fStrikeOut == s.fStrikeOut
&& fontAngleZ == s.fontAngleZ
&& fontAngleX == s.fontAngleX
&& fontAngleY == s.fontAngleY);
}
void STSStyle::operator = (LOGFONT& lf)
{
charSet = lf.lfCharSet;
fontName = lf.lfFaceName;
HDC hDC = GetDC(0);
//fontSize = -MulDiv(lf.lfHeight, 72, GetDeviceCaps(hDC, LOGPIXELSY));
fontSize = lf.lfHeight;
ReleaseDC(0, hDC);
// fontAngleZ = (float)(1.0*lf.lfEscapement/10);
fontWeight = lf.lfWeight;
fItalic = !!lf.lfItalic;
fUnderline = !!lf.lfUnderline;
fStrikeOut = !!lf.lfStrikeOut;
}
LOGFONTA& operator <<= (LOGFONTA& lfa, STSStyle& s)
{
lfa.lfCharSet = s.charSet;
strncpy_s(lfa.lfFaceName, LF_FACESIZE, CStringA(s.fontName), _TRUNCATE);
HDC hDC = GetDC(0);
//lfa.lfHeight = -MulDiv((int)(s.fontSize+0.5), GetDeviceCaps(hDC, LOGPIXELSY), 72);
lfa.lfHeight = (LONG)(s.fontSize + 0.5);
ReleaseDC(0, hDC);
lfa.lfWeight = s.fontWeight;
lfa.lfItalic = s.fItalic?-1:0;
lfa.lfUnderline = s.fUnderline?-1:0;
lfa.lfStrikeOut = s.fStrikeOut?-1:0;
return(lfa);
}
LOGFONTW& operator <<= (LOGFONTW& lfw, STSStyle& s)
{
lfw.lfCharSet = s.charSet;
wcsncpy_s(lfw.lfFaceName, LF_FACESIZE, CStringW(s.fontName), _TRUNCATE);
HDC hDC = GetDC(0);
//lfw.lfHeight = -MulDiv((int)(s.fontSize+0.5), GetDeviceCaps(hDC, LOGPIXELSY), 72);
lfw.lfHeight = (LONG)(s.fontSize + 0.5);
ReleaseDC(0, hDC);
lfw.lfWeight = s.fontWeight;
lfw.lfItalic = s.fItalic?-1:0;
lfw.lfUnderline = s.fUnderline?-1:0;
lfw.lfStrikeOut = s.fStrikeOut?-1:0;
return(lfw);
}
CString& operator <<= (CString& style, STSStyle& s)
{
style.Format(_T("%d,%d,%d,%d,%d,%d,%f,%f,0x%06x,0x%06x,0x%06x,0x%06x,0x%02x,0x%02x,0x%02x,0x%02x,%d,%s,%f,%f,%f,%f,%d,%d,%d,%d,%d,%f,%f,%f,%d"),
s.marginRect.left,s.marginRect.right,s.marginRect.top,s.marginRect.bottom,
s.scrAlignment, s.borderStyle, s.outlineWidth, s.shadowDepth,
s.colors[0], s.colors[1], s.colors[2], s.colors[3], s.alpha[0], s.alpha[1], s.alpha[2], s.alpha[3],
s.charSet,
s.fontName, s.fontSize, s.fontScaleX, s.fontScaleY, s.fontSpacing, s.fontWeight,
(int)s.fItalic, (int)s.fUnderline, (int)s.fStrikeOut, (int)s.fBlur,
s.fontAngleZ, s.fontAngleX, s.fontAngleY,
s.relativeTo);
return(style);
}
STSStyle& operator <<= (STSStyle& s, CString& style)
{
s.SetDefault();
try
{
CStringW str = TToW(style);
s.marginRect.left = GetInt(str); s.marginRect.right = GetInt(str); s.marginRect.top = GetInt(str); s.marginRect.bottom = GetInt(str);
s.scrAlignment = GetInt(str); s.borderStyle = GetInt(str); s.outlineWidth = GetFloat(str); s.shadowDepth = GetFloat(str);
for(int i = 0; i < 4; i++) s.colors[i] = (COLORREF)GetInt(str);
for(int i = 0; i < 4; i++) s.alpha[i] = GetInt(str);
s.charSet = GetInt(str);
s.fontName = WToT(GetStr(str)); s.fontSize = GetFloat(str);
s.fontScaleX = GetFloat(str); s.fontScaleY = GetFloat(str);
s.fontSpacing = GetFloat(str); s.fontWeight = GetInt(str);
s.fItalic = !!GetInt(str); s.fUnderline = !!GetInt(str); s.fStrikeOut = !!GetInt(str); s.fBlur = !!GetInt(str);
s.fontAngleZ = GetFloat(str); s.fontAngleX = GetFloat(str); s.fontAngleY = GetFloat(str);
s.relativeTo = GetInt(str);
}
catch(...)
{
s.SetDefault();
}
return(s);
}