├── dictionaries ├── hyph_lt.dic ├── hyph_sr.dic ├── hyph_sv.dic ├── hyph_af_ZA.dic ├── hyph_cs_CZ.dic ├── hyph_da_DK.dic ├── hyph_de_AT.dic ├── hyph_de_CH.dic ├── hyph_de_DE.dic ├── hyph_el_GR.dic ├── hyph_et_EE.dic ├── hyph_hr_HR.dic ├── hyph_lv_LV.dic ├── hyph_nb_NO.dic ├── hyph_nl_NL.dic ├── hyph_nn_NO.dic ├── hyph_pl_PL.dic ├── hyph_pt_PT.dic ├── hyph_sk_SK.dic ├── hyph_sl_SI.dic ├── hyph_sr_Latn.dic ├── README_hyph_NO.txt ├── README_hyph_de.txt ├── README_hyph_lv_LV.txt ├── update.sh ├── README_hyph_sk_SK.txt ├── README_hyph_sr.txt ├── README_hyph_be_BY.txt ├── README_hyph_sq_AL.txt ├── README_hyph_th_TH.txt ├── README_hyph_da_DK.txt ├── README_hyph_ro_RO.txt ├── README_hyph_pt_PT.txt ├── README_hyph_el_GR.txt ├── README_hyph_hu_HU.txt ├── README_hyph_gl.txt ├── README_hyph_ca.txt ├── README_hyph_cs_CZ.txt ├── README_hyph_sv.txt ├── README_hyph_lt_LT.txt ├── README_hyph_te_IN.txt ├── README_hyph_uk_UA.txt ├── README_hyph_it_IT.txt ├── hyph_sa_IN.dic ├── README_hyph_pl_PL.txt ├── hyph_pa_IN.dic ├── hyph_or_IN.dic ├── README_hyph_es.txt ├── hyph_te_IN.dic ├── hyph_kn_IN.dic ├── hyph_as_IN.dic ├── README_hyph_en_US.txt ├── hyph_eu.dic ├── hyph_mr_IN.dic ├── hyph_zu_ZA.dic ├── README_hyph_sl_SI.txt ├── hyph_gl.dic ├── README_hyph_bg_BG.txt ├── README_hyph_hr_HR.txt ├── README_hyph_eu.txt ├── README_hyph_fr.txt ├── hyph_it_IT.dic └── README_hyph_en_GB.txt ├── etaf-ert.el ├── .gitattributes ├── .gitignore ├── etaf-layout-parse.el ├── tests ├── etaf-kp-tests.el ├── etaf-css-specificity-tests.el ├── etaf-css-index-tests.el ├── etaf-etml-tests.el ├── etaf-css-inheritance-tests.el ├── etaf-dom-tests.el ├── test-w-fit-with-border.el ├── etaf-flex-item-width-tests.el ├── etaf-css-important-tests.el ├── etaf-css-cache-tests.el ├── etaf-css-face-tests.el ├── etaf-css-media-tests.el ├── test-renderer-simple.el ├── etaf-css-inheritance-duplicate-tests.el └── etaf-css-shorthand-tests.el ├── etaf-log.el ├── refers └── etaf-face.el ├── docs ├── etaf-perf-data-inspection.md ├── ETAF-PERF-QUICKSTART.md ├── VALIDATION.md ├── RENDERER-FUTURE-WORK.md ├── CSSOM-TREE-STRUCTURE-SUMMARY.md ├── ETAF-CSS-README.md ├── IMPLEMENTATION-SUMMARY.md ├── LAYOUT-BUFFER-STRING.md ├── ECSS-COLOR-BUG-FIX.md ├── CSS-MODULES.md └── CSSOM-DOM-STRUCTURE.md ├── examples ├── etaf-scroll-example.el ├── etaf-render-example.el └── etaf-css-example.el ├── etaf-ua-stylesheet.el └── etaf-pixel.el /dictionaries/hyph_lt.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_lt.dic -------------------------------------------------------------------------------- /dictionaries/hyph_sr.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_sr.dic -------------------------------------------------------------------------------- /dictionaries/hyph_sv.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_sv.dic -------------------------------------------------------------------------------- /dictionaries/hyph_af_ZA.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_af_ZA.dic -------------------------------------------------------------------------------- /dictionaries/hyph_cs_CZ.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_cs_CZ.dic -------------------------------------------------------------------------------- /dictionaries/hyph_da_DK.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_da_DK.dic -------------------------------------------------------------------------------- /dictionaries/hyph_de_AT.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_de_AT.dic -------------------------------------------------------------------------------- /dictionaries/hyph_de_CH.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_de_CH.dic -------------------------------------------------------------------------------- /dictionaries/hyph_de_DE.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_de_DE.dic -------------------------------------------------------------------------------- /dictionaries/hyph_el_GR.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_el_GR.dic -------------------------------------------------------------------------------- /dictionaries/hyph_et_EE.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_et_EE.dic -------------------------------------------------------------------------------- /dictionaries/hyph_hr_HR.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_hr_HR.dic -------------------------------------------------------------------------------- /dictionaries/hyph_lv_LV.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_lv_LV.dic -------------------------------------------------------------------------------- /dictionaries/hyph_nb_NO.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_nb_NO.dic -------------------------------------------------------------------------------- /dictionaries/hyph_nl_NL.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_nl_NL.dic -------------------------------------------------------------------------------- /dictionaries/hyph_nn_NO.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_nn_NO.dic -------------------------------------------------------------------------------- /dictionaries/hyph_pl_PL.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_pl_PL.dic -------------------------------------------------------------------------------- /dictionaries/hyph_pt_PT.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_pt_PT.dic -------------------------------------------------------------------------------- /dictionaries/hyph_sk_SK.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_sk_SK.dic -------------------------------------------------------------------------------- /dictionaries/hyph_sl_SI.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_sl_SI.dic -------------------------------------------------------------------------------- /dictionaries/hyph_sr_Latn.dic: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/hyph_sr_Latn.dic -------------------------------------------------------------------------------- /dictionaries/README_hyph_NO.txt: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/README_hyph_NO.txt -------------------------------------------------------------------------------- /dictionaries/README_hyph_de.txt: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/README_hyph_de.txt -------------------------------------------------------------------------------- /dictionaries/README_hyph_lv_LV.txt: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kinneyzhang/etaf/HEAD/dictionaries/README_hyph_lv_LV.txt -------------------------------------------------------------------------------- /etaf-ert.el: -------------------------------------------------------------------------------- 1 | (require 'ert) 2 | 3 | (defmacro should-equal (s1 s2) 4 | `(should (equal ,s1 ,s2))) 5 | 6 | (provide 'etaf-ert) 7 | -------------------------------------------------------------------------------- /.gitattributes: -------------------------------------------------------------------------------- 1 | *.png filter=lfs diff=lfs merge=lfs -text 2 | *.gif filter=lfs diff=lfs merge=lfs -text 3 | *.jpg filter=lfs diff=lfs merge=lfs -text 4 | *.jpeg filter=lfs diff=lfs merge=lfs -text 5 | -------------------------------------------------------------------------------- /dictionaries/update.sh: -------------------------------------------------------------------------------- 1 | git clone https://git.libreoffice.org/dictionaries libreoffice-dictionaries 2 | cd libreoffice-dictionaries 3 | git pull 4 | cd .. 5 | find libreoffice-dictionaries -name "hyph_*\.dic" | xargs -I '{}' cp '{}' . 6 | sed -i 's/\r$//' *.dic 7 | rename -- -Latn _Latn *-Latn.dic 8 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_sk_SK.txt: -------------------------------------------------------------------------------- 1 | Hyphenation dictionary 2 | ----------------------- 3 | 4 | Dictionary is created by converting TeX hyphenation patterns for Slovak 5 | (Author: Jana Chlebíková) with lingucomponent-tools 6 | (http://cvs.sourceforge.net/cgi-bin/viewcvs.cgi/oo-cs/lingucomponent-tools/). 7 | -------------------------------------------------------------------------------- /.gitignore: -------------------------------------------------------------------------------- 1 | # Byte-compiled Emacs Lisp files 2 | *.elc 3 | 4 | # Backup files 5 | *~ 6 | \#*\# 7 | 8 | # Package directory 9 | elpa/ 10 | 11 | # External dependencies (cloned for development) 12 | ekp-lib/ 13 | 14 | # Test files created for verification 15 | test-interactive-fix.el 16 | test-interactive-check.el 17 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_sr.txt: -------------------------------------------------------------------------------- 1 | Serbian hyphenation patterns are derived from the official TeX patterns for 2 | Serbocroatian language (Cyrillic and Latin) created by Dejan Muhamedagić, 3 | version 2.02 from 22 June 2008 adopted for usage with Hyphen hyphenation 4 | library and released under GNU LGPL version 2.1 or later. 5 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_be_BY.txt: -------------------------------------------------------------------------------- 1 | ############################################################ 2 | 3 | Belarusian Hyphenation Dictionary 4 | Created by: Aleś Bułojčyk 5 | 6 | Hyphenation rules according to official orthography 2008 7 | License: CC BY-SA 4.0 or LGPLv3 8 | 9 | ############################################################ 10 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_sq_AL.txt: -------------------------------------------------------------------------------- 1 | % The hyp_sq_AL.dic file contains hyphenation patterns for the Albanian language, created semi-automatically 2 | -------------------------- 3 | % Author: Isah Bllaca 4 | % Version 1 (04.01.2021) 5 | % This Source Code Form is subject to the terms of the Mozilla Public 6 | % License, v. 2.0. If a copy of the MPL was not distributed with this 7 | % file, You can obtain one at http://mozilla.org/MPL/2.0/. 8 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_th_TH.txt: -------------------------------------------------------------------------------- 1 | Thai hyphenation patterns for LibreOffice.org 2 | Version 1.0 (2022-04-30) 3 | 4 | License: LPPL 1.3+ 5 | 6 | Origin: 7 | These Thai hyphenation patterns are based on word list from LibThai project, 8 | manually hyphenated to be processed with patgen, plus additional processing, 9 | by tex-hyphen project, and then converted for libhyphen using its 10 | substrings.pl script. 11 | 12 | Author: 13 | Theppitak Karoonboonyanan 14 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_da_DK.txt: -------------------------------------------------------------------------------- 1 | Language: Danish (da DK). 2 | Origin: Based on the TeX hyphenation tables 3 | Created by Frank Jensen (fj@iesd.auc.dk), ca. 1988. 4 | Modified by Preben Randhol (September 12, 1994) to increase portability between different systems 5 | License: GNU LGPL license. 6 | Author: conversion author is Marco Huggenberger 7 | 8 | This dictionary is based on syllable matching patterns and therefore should be usable under other variations of Danish 9 | 10 | HYPH da DK hyph_da_DK 11 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_ro_RO.txt: -------------------------------------------------------------------------------- 1 | This is Romanian OpenOffice.org dictionary extension, implementing the orthography 2 | after 1993 (â/sunt). The package contains hyphenation and spelling dictionaries, and 3 | a thesaurus. The extension was build by Lucian Constantin (http://rospell.sourceforge.net). 4 | 5 | Authors and licenses: 6 | 7 | Author: Adrian Stoica (office@cuvinte.ro) 8 | License: GNU GPL, please see COPYING.GPL for more details 9 | 10 | Support: 11 | Please direct all your questions to http://groups.google.com/group/rospell mailing list. 12 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_pt_PT.txt: -------------------------------------------------------------------------------- 1 | Hyphenation dictionary 2 | ---------------------- 3 | 4 | Language: Portuguese (pt PT). 5 | Origin: Based on the TeX hyphenation tables by Pedro J. de Rezende (Brazilian) and tuned up by J.Joao Dias Almeida 6 | License: GNU GPL license. 7 | Author: conversion author is Paulo Morgado 8 | 9 | 10 | This dictionary is based on syllable matching patterns and therefore should 11 | be usable under other variations of Portuguese. 12 | 13 | HYPH pt PT hyph_pt_PT 14 | 15 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_el_GR.txt: -------------------------------------------------------------------------------- 1 | Hellenic hyphenation dictionary for OpenOffice.org 1.1.0 2 | -------------------------------------------------------- 3 | 4 | Language: Greek a.k.a. Hellenic (el GR). 5 | Version: 1.1b 6 | 7 | License: LGPL 8 | Author: InterZone 9 | 10 | This dictionary should be usable only for monotonic Greek (not polytonics, neither archaic). There may be some problems with words starting with accented vowels, feedback is welcome. Words in quotes do not hyphenate, but it seems like a problem with OpenOffice and not the hyphenation dictionary. 11 | 12 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_hu_HU.txt: -------------------------------------------------------------------------------- 1 | % Hungarian hyphenation patterns with non-standard hyphenation patch 2 | % ------------------------------------------------------------------ 3 | % Patch version: 2024-03-21 4 | % 5 | % Language: Hungarian (hu HU) 6 | % Origin: http://www.github.hu/bencenagy/huhyphn 7 | % License: MPL/GPL/LGPL license, 2011 8 | % Author: Nagy Bence 9 | % Version: v20110815 10 | % Patch: László Németh 11 | % source: http://sourceforge.net/project/magyarispell (OOo huhyphn) 12 | % license: MPL/GPL/LGPL 13 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_gl.txt: -------------------------------------------------------------------------------- 1 | Guionizador de galego para OpenOffice.org 3 2 | Creado por Frco. Javier Rial Rodríguez (fjrial@mancomun.org) co asesoramento 3 | lingüístico de Antón Gómez Méixome (meixome@mancomun.org) para Mancomún, 4 | Centro de Referencia e Servizos de Software Libre. 5 | 6 | 1. Dereitos de autor 7 | 2. Contido 8 | 9 | 1. Dereitos de autor 10 | 11 | Liberado baixo os termos da licenza GNU GPL (version 3). 12 | 13 | 2. Contido 14 | 15 | O paquete contén o seguinte: 16 | 17 | hyph_gl_ANY.dic, ficheiro de regras de separación. 18 | README-gl_ANY.txt, este ficheiro. 19 | LICENSES-gl.txt tradución ao galego da licenza GPLv3 20 | LICENSES-en.txt english version license GPLv3 21 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_ca.txt: -------------------------------------------------------------------------------- 1 | _______________________________________________________________________________ 2 | 3 | DICCIONARI DE PARTICIÓ DE MOTS 4 | versió 1.5 5 | 6 | Copyright (C) 2013-2023 Jaume Ortolà --- Riurau Editors 7 | 8 | Llicència (a la vostra elecció): 9 | LGPL v. 3.0 o superior -- http://www.gnu.org/licenses/lgpl-3.0.html 10 | GPL v.3.0 o superior -- http://www.gnu.org/licenses/gpl-3.0.html 11 | 12 | Aquests patrons funcionen amb el LibreOffice i OpenOffice.org 3.2+ 13 | 14 | Més informació: 15 | https://www.softcatala.org/programes/diccionari-catala-de-particio-de-mots/ 16 | _______________________________________________________________________________ 17 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_cs_CZ.txt: -------------------------------------------------------------------------------- 1 | Hyphenation dictionary 2 | ---------------------- 3 | 4 | Language: Czech (Czech Republic) (cs CZ). 5 | Origin: Based on the TeX hyphenation tables 6 | License: GPL license, 2003 7 | Author: Pavel@Janik.cz (Pavel Janík) 8 | 9 | HYPH cs CZ hyph_cs 10 | 11 | These patterns were converted from TeX hyphenation patterns by the package 12 | lingucomponent-tools 13 | (http://cvs.sourceforge.net/cgi-bin/viewcvs.cgi/oo-cs/lingucomponent-tools/). 14 | 15 | The license of original files is GNU GPL (they are both parts of csTeX). My 16 | work on them was to only run the scripts from lingucomponent-tools package 17 | (dual LGPL/SISSL license so it can be integrated). 18 | -- 19 | Pavel Janík 20 | 2003 21 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_sv.txt: -------------------------------------------------------------------------------- 1 | This Swedish Hyphenation Dictionary is maintained by 2 | Niklas Johansson . 3 | The most recent version should be available through 4 | the libreoffice extensions respiratory at: 5 | extensions.libreoffice.org/extension-center 6 | or 7 | http://extensions.services.openoffice.org/ 8 | 9 | If you find a Swedish word that is hyphenated incorrectly 10 | please send me a mail at sleeping.pillow@gmail.com 11 | 12 | ********************************* 13 | * Copyright * 14 | ********************************* 15 | 16 | Copyright © 2013 Niklas Johansson 17 | 18 | ******* BEGIN LICENSE BLOCK ******* 19 | * 20 | * MPL/LGPLv3+ dual license 21 | * 22 | 23 | ******* END LICENSE BLOCK ******* 24 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_lt_LT.txt: -------------------------------------------------------------------------------- 1 | Hyphenation dictionary for Lithuanian 2 | ===================================== 3 | 4 | You're looking at the hyphenation tables for OpenOffice for 5 | Lithuanian. 6 | 7 | Language: Lithuanian (lt_LT) 8 | Origin: TeX hyphenation tables by Sigitas Tolusis and Vytas 9 | Statulevicius. The original tables can be found at 10 | http://www.vtex.lt/tex/download/zip/texmf.zip as lthyphen.tex. 11 | Author: Converted to OOo format by Albertas Agejevas 12 | License: LaTeX Project Public Licence 13 | 14 | To enable hyphenation for Lithuanian in OpenOffice, go to 15 | Tools->Options->Language settings->Writing Aids and maybe set 16 | Tools->Options->Language settings->Languages->Western->Lithuanian. 17 | 18 | Then, enable hyphenation in chosen paragraphs by checking 19 | Format->Paragraph->Text Flow->Hyphenation->Automatically. 20 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_te_IN.txt: -------------------------------------------------------------------------------- 1 | This Telugu Hyphenation Dictionary was created by 2 | Santhosh Thottingal, Openoffice Indic Regional Language group. 3 | If you find incorrectly hyphenated words you can submit them 4 | to santhosh.thottingal@gmail.com 5 | 6 | ********************************* 7 | * Copyright * 8 | ********************************* 9 | 10 | Copyright © 2009 Santhosh Thottingal 11 | 12 | ******* BEGIN LICENSE BLOCK ******* 13 | * 14 | * The Telugu Hyphenation Dictionary may be used under the terms 15 | * of either the GNU General Public License Version 3 or later (the "GPL"), or 16 | * the GNU Lesser General Public License Version 3 or later (the "LGPL") 17 | * 18 | * Software distributed under the License is distributed on an "AS IS" basis, 19 | * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License 20 | * for the specific language governing rights and limitations under the 21 | * License. 22 | * 23 | 24 | ******* END LICENSE BLOCK ******* 25 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_uk_UA.txt: -------------------------------------------------------------------------------- 1 | % Ukrainian hyphenation patterns. 2 | % Copyright 1998-2002 Maksym Polyakov. 3 | % Released 2002/12/19. 4 | % Please, send bug reports via e-mail: 5 | % polyama@auburn.edu 6 | % 7 | % The rules for myspell hypenation can be found on 8 | % http://lingucomponent.openoffice.org/hyphenator.html 9 | % 10 | % This is free software; you can redistribute it and/or modify 11 | % it under the terms of the GNU General Public License as published by 12 | % the Free Software Foundation; either version 2 of the License, or 13 | % (at your option) any later version. 14 | % 15 | % This file is distributed in the hope that it will be useful, 16 | % but WITHOUT ANY WARRANTY; without even the implied warranty of 17 | % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18 | % GNU General Public License for more details. 19 | % 20 | % You should have received a copy of the GNU General Public License 21 | % along with this program; if not, write to the Free Software 22 | % Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 23 | 24 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_it_IT.txt: -------------------------------------------------------------------------------- 1 | Hyphenation dictionary 2 | ---------------------- 3 | 4 | Language: it_IT (Italian, Italy) 5 | Origin: Based on the TeX hyphenation tables by Claudio Beccari 6 | License: LGPL 7 | http://tug.ctan.org/cgi-bin/ctanPackageInformation.py?id=ithyph 8 | Author: conversion author is Giuseppe Bilotta 9 | 10 | This dictionary should be usable under other Italian variants 11 | 12 | =============================================================================== 13 | 14 | Dizionario sillabazione 15 | ---------------------- 16 | 17 | Language: it_IT (Italiano, Italia) 18 | Origin: Basato sulle tabelle di sillabazione di Claudio Beccari per il TeX 19 | License: LGPL 20 | http://tug.ctan.org/cgi-bin/ctanPackageInformation.py?id=ithyph 21 | Author: conversione di Giuseppe Bilotta 22 | 23 | Questo dizionario dovrebbe essere valido anche per altre varianti di italiano 24 | 25 | =============================================================================== 26 | 27 | HYPH it IT hyph_it_IT_v2 28 | 29 | -------------------------------------------------------------------------------- /dictionaries/hyph_sa_IN.dic: -------------------------------------------------------------------------------- 1 | UTF-8 2 | LEFTHYPHENMIN 3 3 | RIGHTHYPHENMIN 4 4 | COMPOUNDLEFTHYPHENMIN 2 5 | COMPOUNDRIGHTHYPHENMIN 3 6 | 7 | % GENERAL RULE 8 | % Do not break either side of ZERO-WIDTH JOINER (U+200D) 9 | 2‍2 10 | % Break after ZERO-WIDTH NON JOINER (U+200C) 11 | ‌1 12 | % Break before or after any independent vowel. 13 | 1अ1 14 | 1आ1 15 | 1इ1 16 | 1ई1 17 | 1उ1 18 | 1ऊ1 19 | 1ऋ1 20 | 1ॠ1 21 | 1ऌ1 22 | 1ॡ1 23 | 1ए1 24 | 1ऐ1 25 | 1ओ1 26 | 1औ1 27 | % Break after any dependent vowel but not before. 28 | ा1 29 | ि1 30 | ी1 31 | ु1 32 | ू1 33 | ृ1 34 | ॄ1 35 | ॢ1 36 | ॣ1 37 | े1 38 | ै1 39 | ो1 40 | ौ1 41 | % Break before or after any consonant. 42 | 1क 43 | 1ख 44 | 1ग 45 | 1घ 46 | 1ङ 47 | 1च 48 | 1छ 49 | 1ज 50 | 1झ 51 | 1ञ 52 | 1ट 53 | 1ठ 54 | 1ड 55 | 1ढ 56 | 1ण 57 | 1त 58 | 1थ 59 | 1द 60 | 1ध 61 | 1न 62 | 1प 63 | 1फ 64 | 1ब 65 | 1भ 66 | 1म 67 | 1य 68 | 1र 69 | 1ल 70 | 1ळ 71 | 1व 72 | 1श 73 | 1ष 74 | 1स 75 | 1ह 76 | % Do not break before chandrabindu, anusvara, visarga, avagraha 77 | % and accents. 78 | 2ँ 79 | 2ं 80 | 2ः 81 | 2ऽ 82 | 2॑ 83 | 2॒ 84 | % Do not break either side of virama (may be within conjunct). 85 | 2्2 86 | अति1 87 | अधि1 88 | अन1 89 | अनु1 90 | अन्1 91 | अप1 92 | अपि1 93 | अभि1 94 | अव1 95 | 1इय 96 | उद्1 97 | उप1 98 | 1का 99 | चिर्1 100 | 1त्र 101 | 1त्व 102 | दुर्1 103 | दुस्1 104 | नि1 105 | निर्1 106 | निस्1 107 | पर1 108 | परि1 109 | प्र1 110 | प्रति1 111 | 1ली 112 | 1वत् 113 | वि1 114 | सम्1 115 | सु1 116 | 117 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_pl_PL.txt: -------------------------------------------------------------------------------- 1 | Hyphenation dictionary 2 | ---------------------- 3 | 4 | Language: Polish (pl PL). 5 | Origin: Based on the TeX hyphenation patterns plhyph.tex, 6 | version 3.0a, Wednesday, May 17th, 1995 7 | 8 | The original file is in CTAN archives, for example here: 9 | 10 | http://ctan.binkerton.com/ctan.readme.php?filename=language/polish/plhyph.tex 11 | 12 | and is licensed under LPPL. 13 | 14 | The first version of the patterns was developed 15 | by Hanna Kołodziejska (1987). 16 | 17 | The adaptation to the LeX format (see below) and extensive modification 18 | were done by Bogusław Jackowski & Marek Ryćko (1987--1989). 19 | 20 | The hyphenation rules were further improved and adapted to the 21 | TeX 3.x requirements by Hanna Kołodziejska (1991). 22 | 23 | Lone-standing version (3.0a) of patterns was prepared (under pressure 24 | from LaTeX users) by Bogusław Jackowski and Marek Ryćko, following 25 | Mariusz Olko's suggestions, 1995. 26 | 27 | The LeX format mentioned above was the first version of the adaptation 28 | of TeX to the Polish language. The next version is called MeX. 29 | 30 | The original macro file plhyph.tex belongs to the public domain 31 | under the conditions specified by the author of TeX: 32 | 33 | ``Macro files like PLAIN.TEX should not be changed in any way, 34 | except with respect to preloaded fonts, 35 | unless the changes are authorized by the authors of the macros.'' 36 | 37 | Donald E. Knuth 38 | License OpenOffice.org Adaptions of this package are licensed under the 39 | GNU LGPL license. 40 | Author: conversion and corrects author is 41 | Artur Polaczyński 42 | -------------------------------------------------------------------------------- /dictionaries/hyph_pa_IN.dic: -------------------------------------------------------------------------------- 1 | UTF-8 2 | % Hyphenation for Panjabi 3 | % Copyright (C) 2008-2010 Santhosh Thottingal 4 | % 5 | % This library is free software; you can redistribute it and/or 6 | % modify it under the terms of the GNU Lesser General Public 7 | % License as published by the Free Software Foundation; 8 | % version 3 or later version of the License. 9 | % 10 | % This library is distributed in the hope that it will be useful, 11 | % but WITHOUT ANY WARRANTY; without even the implied warranty of 12 | % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 13 | % Lesser General Public License for more details. 14 | % 15 | % You should have received a copy of the GNU Lesser General Public 16 | % License along with this library; if not, write to the Free Software 17 | % Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 18 | % 19 | % GENERAL RULE 20 | % Do not break either side of ZERO-WIDTH JOINER (U+200D) 21 | 2‍2 22 | % Break on both sides of ZERO-WIDTH NON JOINER (U+200C) 23 | 1‌1 24 | % Break before or after any independent vowel. 25 | ਅ1 26 | ਆ1 27 | ਇ1 28 | ਈ1 29 | ਉ1 30 | ਊ1 31 | ਏ1 32 | ਐ1 33 | ਓ1 34 | ਔ1 35 | % Break after any dependent vowel but not before. 36 | ਾ1 37 | ਿ1 38 | ੀ1 39 | ੁ1 40 | ੂ1 41 | ੇ1 42 | ੈ1 43 | ੋ1 44 | ੌ1 45 | % Break before or after any consonant. 46 | 1ਕ 47 | 1ਖ 48 | 1ਗ 49 | 1ਘ 50 | 1ਙ 51 | 1ਚ 52 | 1ਛ 53 | 1ਜ 54 | 1ਝ 55 | 1ਞ 56 | 1ਟ 57 | 1ਠ 58 | 1ਡ 59 | 1ਢ 60 | 1ਣ 61 | 1ਤ 62 | 1ਥ 63 | 1ਦ 64 | 1ਧ 65 | 1ਨ 66 | 1ਪ 67 | 1ਫ 68 | 1ਬ 69 | 1ਭ 70 | 1ਮ 71 | 1ਯ 72 | 1ਰ 73 | 1ਲ 74 | 1ਲ਼ 75 | 1ਵ 76 | 1ਸ਼ 77 | 1ਸ 78 | 1ਹ 79 | % Do not break before chandrabindu, anusvara, visarga, avagraha 80 | % and accents. 81 | 2ਁ1 82 | 2ਂ1 83 | 2ਃ1 84 | % Do not break either side of virama (may be within conjunct). 85 | 2੍2 86 | 2ੰ2 87 | 2ੱ2 88 | -------------------------------------------------------------------------------- /dictionaries/hyph_or_IN.dic: -------------------------------------------------------------------------------- 1 | UTF-8 2 | % Hyphenation for Oriya 3 | % Copyright (C) 2008-2010 Santhosh Thottingal 4 | % 5 | % This library is free software; you can redistribute it and/or 6 | % modify it under the terms of the GNU Lesser General Public 7 | % License as published by the Free Software Foundation; 8 | % version 3 or later version of the License. 9 | % 10 | % This library is distributed in the hope that it will be useful, 11 | % but WITHOUT ANY WARRANTY; without even the implied warranty of 12 | % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 13 | % Lesser General Public License for more details. 14 | % 15 | % You should have received a copy of the GNU Lesser General Public 16 | % License along with this library; if not, write to the Free Software 17 | % Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 18 | % 19 | % GENERAL RULE 20 | % Do not break either side of ZERO-WIDTH JOINER (U+200D) 21 | 2‍2 22 | % Break on both sides of ZERO-WIDTH NON JOINER (U+200C) 23 | 1‌1 24 | % Break before or after any independent vowel. 25 | ଅ1 26 | ଆ1 27 | ଇ1 28 | ଈ1 29 | ଉ1 30 | ଊ1 31 | ଋ1 32 | ୠ1 33 | ଌ1 34 | ୡ1 35 | ଏ1 36 | ଐ1 37 | ଓ1 38 | ଔ1 39 | % Break after any dependent vowel, but not before. 40 | ା1 41 | ି1 42 | ୀ1 43 | ୁ1 44 | ୂ1 45 | ୃ1 46 | େ1 47 | ୈ1 48 | ୋ1 49 | ୌ1 50 | % Break before or after any consonant. 51 | 1କ 52 | 1ଖ 53 | 1ଗ 54 | 1ଘ 55 | 1ଙ 56 | 1ଚ 57 | 1ଛ 58 | 1ଜ 59 | 1ଝ 60 | 1ଞ 61 | 1ଟ 62 | 1ଠ 63 | 1ଡ 64 | 1ଢ 65 | 1ଣ 66 | 1ତ 67 | 1ଥ 68 | 1ଦ 69 | 1ଧ 70 | 1ନ 71 | 1ପ 72 | 1ଫ 73 | 1ବ 74 | 1ଭ 75 | 1ମ 76 | 1ଯ 77 | 1ର 78 | 1ଲ 79 | 1ଳ 80 | 1ଵ 81 | 1ଶ 82 | 1ଷ 83 | 1ସ 84 | 1ହ 85 | % Do not break before anusvara, visarga and length mark. 86 | 2ଂ1 87 | 2ଃ1 88 | 2ୗ1 89 | 2ଁ1 90 | % Do not break either side of virama (may be within conjunct). 91 | 2୍2 92 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_es.txt: -------------------------------------------------------------------------------- 1 | **************************************************************************** 2 | ** ** 3 | ** Patrones de separación silábica en español de ** 4 | ** LibreOffice/Apache OpenOffice ** 5 | ** ** 6 | **************************************************************************** 7 | ** VERSIÓN GENÉRICA PARA TODAS LAS LOCALIZACIONES DEL ESPAÑOL ** 8 | **************************************************************************** 9 | 10 | Versión __VERSION__ 11 | 12 | SUMARIO 13 | 14 | 1. AUTOR 15 | 2. LICENCIA 16 | 3. COLABORACIÓN 17 | 4. AGRADECIMIENTOS 18 | 19 | 20 | 1. AUTOR 21 | 22 | Este fichero de patrones para separación silábica ha sido desarrollado 23 | inicialmente por Santiago Bosio; mediante el uso de la herramienta libre 24 | "patgen" y datos de entrenamiento etiquetados manualmente. 25 | 26 | Actualmente, se genera a partir del proyecto "tex-hyphen-spanish" de Javier 27 | Bezos, adaptado por Edward Villegas. 28 | 29 | 2. LICENCIA 30 | 31 | Este listado de patrones para separación silábica, integrado por el 32 | fichero hyph_es.dic se distribuye bajo un triple esquema de licencias 33 | disjuntas: GNU GPL versión 3 o posterior, GNU LGPL versión 3 o posterior, ó 34 | MPL versión 1.1 o posterior. Puede seleccionar libremente bajo cuál de 35 | estas licencias utilizará este diccionario. En el fichero LICENSE.md 36 | encontrará más detalles. 37 | 38 | El fichero retiene por obligación la licencia del fichero original para TeX, 39 | disponible bajo licencia MIT, cuya transformación se distribuye como parte 40 | del diccionario bajo el esquema de licenciamiento descrito. 41 | 42 | 3. COLABORACIÓN 43 | 44 | Puede reportar errores del separador directamente al proyecto 45 | tex-hyphen-spanish. 46 | -------------------------------------------------------------------------------- /dictionaries/hyph_te_IN.dic: -------------------------------------------------------------------------------- 1 | UTF-8 2 | % Hyphenation for Telugu 3 | % Copyright (C) 2008-2009 Santhosh Thottingal 4 | % 5 | % This library is free software; you can redistribute it and/or 6 | % modify it under the terms of the GNU General Public 7 | % License as published by the Free Software Foundation; 8 | % version 3 or later version of the License. 9 | % 10 | % This library is distributed in the hope that it will be useful, 11 | % but WITHOUT ANY WARRANTY; without even the implied warranty of 12 | % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 13 | % Lesser General Public License for more details. 14 | % 15 | % You should have received a copy of the GNU General Public 16 | % License along with this library; if not, write to the Free Software 17 | % Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 18 | % 19 | % GENERAL RULE 20 | % Do not break either side of ZERO-WIDTH JOINER (U+200D) 21 | 2‍2 22 | % Break on both sides of ZERO-WIDTH NON JOINER (U+200C) 23 | 1‌1 24 | % Break before or after any independent vowel. 25 | అ1 26 | ఆ1 27 | ఇ1 28 | ఈ1 29 | ఉ1 30 | ఊ1 31 | ఋ1 32 | ౠ1 33 | ఌ1 34 | ౡ1 35 | ఎ1 36 | ఏ1 37 | ఐ1 38 | ఒ1 39 | ఓ1 40 | ఔ1 41 | % Break after any dependent vowel, but not before. 42 | ా1 43 | ి1 44 | ీ1 45 | ు1 46 | ూ1 47 | ృ1 48 | ౄ1 49 | ె1 50 | ే1 51 | ై1 52 | ొ1 53 | ో1 54 | ౌ1 55 | % Break before or after any consonant. 56 | 1క 57 | 1ఖ 58 | 1గ 59 | 1ఘ 60 | 1ఙ 61 | 1చ 62 | 1ఛ 63 | 1జ 64 | 1ఝ 65 | 1ఞ 66 | 1ట 67 | 1ఠ 68 | 1డ 69 | 1ఢ 70 | 1ణ 71 | 1త 72 | 1థ 73 | 1ద 74 | 1ధ 75 | 1న 76 | 1ప 77 | 1ఫ 78 | 1బ 79 | 1భ 80 | 1మ 81 | 1య 82 | 1ర 83 | 1ఱ 84 | 1ల 85 | 1ళ 86 | 1వ 87 | 1శ 88 | 1ష 89 | 1స 90 | 1హ 91 | % Do not break before chandrabindu, anusvara, visarga, 92 | % length mark and ai length mark. 93 | 2ఁ1 94 | 2ం1 95 | 2ః1 96 | 2ౕ1 97 | 2ౖ1 98 | % Do not break either side of virama (may be within conjunct). 99 | 2్2 100 | -------------------------------------------------------------------------------- /dictionaries/hyph_kn_IN.dic: -------------------------------------------------------------------------------- 1 | UTF-8 2 | % Hyphenation for Kannada 3 | % Copyright (C) 2008-2009 Santhosh Thottingal 4 | % 5 | % This library is free software; you can redistribute it and/or 6 | % modify it under the terms of the GNU General Public 7 | % License as published by the Free Software Foundation; 8 | % version 3 or later version of the License. 9 | % 10 | % This library is distributed in the hope that it will be useful, 11 | % but WITHOUT ANY WARRANTY; without even the implied warranty of 12 | % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 13 | % Lesser General Public License for more details. 14 | % 15 | % You should have received a copy of the GNU General Public 16 | % License along with this library; if not, write to the Free Software 17 | % Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 18 | % 19 | % GENERAL RULE 20 | % Do not break either side of ZERO-WIDTH JOINER (U+200D) 21 | 2‍2 22 | % Break on both sides of ZERO-WIDTH NON JOINER (U+200C) 23 | 1‌1 24 | % Break before or after any independent vowel. 25 | ಅ1 26 | ಆ1 27 | ಇ1 28 | ಈ1 29 | ಉ1 30 | ಊ1 31 | ಋ1 32 | ೠ1 33 | ಌ1 34 | ೡ1 35 | ಎ1 36 | ಏ1 37 | ಐ1 38 | ಒ1 39 | ಓ1 40 | ಔ1 41 | % Break after any dependent vowel, but not before. 42 | ಾ1 43 | ಿ1 44 | ೀ1 45 | ು1 46 | ೂ1 47 | ೃ1 48 | ೄ1 49 | ೆ1 50 | ೇ1 51 | ೈ1 52 | ೊ1 53 | ೋ1 54 | ೌ1 55 | % Break before or after any consonant. 56 | 1ಕ 57 | 1ಖ 58 | 1ಗ 59 | 1ಘ 60 | 1ಙ 61 | 1ಚ 62 | 1ಛ 63 | 1ಜ 64 | 1ಝ 65 | 1ಞ 66 | 1ಟ 67 | 1ಠ 68 | 1ಡ 69 | 1ಢ 70 | 1ಣ 71 | 1ತ 72 | 1ಥ 73 | 1ದ 74 | 1ಧ 75 | 1ನ 76 | 1ಪ 77 | 1ಫ 78 | 1ಬ 79 | 1ಭ 80 | 1ಮ 81 | 1ಯ 82 | 1ರ 83 | 1ಱ 84 | 1ಲ 85 | 1ಳ 86 | 1ೞ 87 | 1ವ 88 | 1ಶ 89 | 1ಷ 90 | 1ಸ 91 | 1ಹ 92 | % Do not break before anusvara, visarga, avagraha, 93 | % length mark and ai length mark. 94 | 2ಂ1 95 | 2ಃ1 96 | 2ಽ1 97 | 2ೕ1 98 | 2ೖ1 99 | % Do not break either side of virama (may be within conjunct). 100 | 2್2 101 | -------------------------------------------------------------------------------- /etaf-layout-parse.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-layout-parse.el --- CSS value parsing for layout (compatibility layer) -*- lexical-binding: t; -*- 2 | 3 | ;; Copyright (C) 2024 ETAF Contributors 4 | 5 | ;; Author: ETAF Contributors 6 | ;; Keywords: layout, css, parsing 7 | ;; Version: 1.0.0 8 | 9 | ;; This file is free software; you can redistribute it and/or modify 10 | ;; it under the terms of the GNU General Public License as published by 11 | ;; the Free Software Foundation; either version 3, or (at your option) 12 | ;; any later version. 13 | 14 | ;;; Commentary: 15 | 16 | ;; 向后兼容层 - CSS 值解析功能已迁移至 etaf-css-parse.el 17 | ;; 18 | ;; 该模块为旧代码提供向后兼容性，所有函数现在委托给 etaf-css-parse 模块。 19 | ;; 新代码应直接使用 `etaf-css-parse-*' 函数。 20 | ;; 21 | ;; 迁移说明： 22 | ;; - `etaf-layout-parse-length' -> `etaf-css-parse-length' 23 | ;; - `etaf-layout-parse-height' -> `etaf-css-parse-height' 24 | ;; - `etaf-layout-parse-style-value' -> `etaf-css-parse-style-value' 25 | ;; - `etaf-layout-parse-flex-number' -> `etaf-css-parse-flex-number' 26 | ;; - `etaf-layout-parse-pixels-per-line' -> `etaf-css-parse-pixels-per-line' 27 | 28 | ;;; Code: 29 | 30 | (require 'etaf-css-parser) 31 | 32 | ;;; ============================================================ 33 | ;;; 向后兼容别名 34 | ;;; ============================================================ 35 | 36 | (defconst etaf-layout-parse-pixels-per-line etaf-css-parse-pixels-per-line 37 | "每行的像素数，用于将 px 单位转换为行数。 38 | 已弃用，请使用 `etaf-css-parse-pixels-per-line'。") 39 | 40 | (defalias 'etaf-layout-parse-length 'etaf-css-parse-length 41 | "解析 CSS 长度值。已弃用，请使用 `etaf-css-parse-length'。") 42 | 43 | (defalias 'etaf-layout-parse-height 'etaf-css-parse-height 44 | "解析 CSS 高度值。已弃用，请使用 `etaf-css-parse-height'。") 45 | 46 | (defalias 'etaf-layout-parse-style-value 'etaf-css-parse-style-value 47 | "从计算样式中获取属性值。已弃用，请使用 `etaf-css-parse-style-value'。") 48 | 49 | (defalias 'etaf-layout-parse-flex-number 'etaf-css-parse-flex-number 50 | "解析 flex 数值属性。已弃用，请使用 `etaf-css-parse-flex-number'。") 51 | 52 | (provide 'etaf-layout-parse) 53 | ;;; etaf-layout-parse.el ends here 54 | -------------------------------------------------------------------------------- /dictionaries/hyph_as_IN.dic: -------------------------------------------------------------------------------- 1 | UTF-8 2 | % Hyphenation for Assamese 3 | % Copyright (C) 2008-2010 Santhosh Thottingal 4 | % 5 | % This library is free software; you can redistribute it and/or 6 | % modify it under the terms of the GNU Lesser General Public 7 | % License as published by the Free Software Foundation; 8 | % version 3 or later version of the License. 9 | % 10 | % This library is distributed in the hope that it will be useful, 11 | % but WITHOUT ANY WARRANTY; without even the implied warranty of 12 | % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 13 | % Lesser General Public License for more details. 14 | % 15 | % You should have received a copy of the GNU Lesser General Public 16 | % License along with this library; if not, write to the Free Software 17 | % Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 18 | % 19 | % GENERAL RULE 20 | % Do not break either side of ZERO-WIDTH JOINER (U+200D) 21 | 2‍2 22 | % Break on both sides of ZERO-WIDTH NON JOINER (U+200C) 23 | 1‌1 24 | % Break before or after any independent vowel. 25 | অ1 26 | আ1 27 | ই1 28 | ঈ1 29 | উ1 30 | ঊ1 31 | ঋ1 32 | ৠ1 33 | ঌ1 34 | ৡ1 35 | এ1 36 | ঐ1 37 | ও1 38 | ঔ1 39 | % Break after any dependent vowel, but not before. 40 | া1 41 | ি1 42 | ী1 43 | ু1 44 | ূ1 45 | ৃ1 46 | ৄ1 47 | ৢ1 48 | ৣ1 49 | ে1 50 | ৈ1 51 | ো1 52 | ৌ1 53 | 2়2 54 | ৗ1 55 | % Break before or after any consonant. 56 | 1ক 57 | 1খ 58 | 1গ 59 | 1ঘ 60 | 1ঙ 61 | 1চ 62 | 1ছ 63 | 1জ 64 | 1ঝ 65 | 1ঞ 66 | 1ট 67 | 1ঠ 68 | 1ড 69 | 1ড় 70 | 1ঢ 71 | 1ঢ় 72 | 1ণ 73 | 1ত 74 | 1থ 75 | 1দ 76 | 1ধ 77 | 1ন 78 | 1প 79 | 1ফ 80 | 1ব 81 | 1ভ 82 | 1ম 83 | 1য 84 | 1য় 85 | 1র 86 | 1ল 87 | 1শ 88 | 1ষ 89 | 1স 90 | 1হ 91 | % Do not break after khanda ta. 92 | ৎ1 93 | % Do not break before chandrabindu, anusvara, visarga, avagraha, 94 | % nukta and au length mark. 95 | 2ঃ1 96 | 2ং1 97 | 2ঁ1 98 | 2ঽ1 99 | % Do not break either side of virama (may be within conjunct). 100 | 2্2 101 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_en_US.txt: -------------------------------------------------------------------------------- 1 | hyph_en_US.dic - American English hyphenation patterns for OpenOffice.org 2 | 3 | version 2011-10-07 4 | 5 | - remove unnecessary parts for the new Hyphen 2.8.2 6 | 7 | version 2010-03-16 8 | 9 | Changes 10 | 11 | - forbid hyphenation at 1-character distances from dashes (eg. ad=d-on) 12 | and at the dashes (fix for OpenOffice.org 3.2) 13 | - set correct LEFTHYPHENMIN = 2, RIGHTHYPHENMIN = 3 14 | - handle apostrophes (forbid *o'=clock etc.) 15 | - set COMPOUNDLEFTHYPHENMIN, COMPOUNDRIGHTHYPHENMIN values 16 | - UTF-8 encoding 17 | - Unicode ligature support 18 | 19 | License 20 | 21 | BSD-style. Unlimited copying, redistribution and modification of this file 22 | is permitted with this copyright and license information. 23 | 24 | See original license in this file. 25 | 26 | Conversion and modifications by László Németh (nemeth at OOo). 27 | 28 | Based on the plain TeX hyphenation table 29 | (http://tug.ctan.org/text-archive/macros/plain/base/hyphen.tex) and 30 | the TugBoat hyphenation exceptions log in 31 | http://www.ctan.org/tex-archive/info/digests/tugboat/tb0hyf.tex, processed 32 | by the hyphenex.sh script (see in the same directory). 33 | 34 | Originally developed and distributed with the Hyphen hyphenation library, 35 | see http://hunspell.sourceforge.net/ for the source files and the conversion 36 | scripts. 37 | 38 | Licenses 39 | 40 | hyphen.tex: 41 | % The Plain TeX hyphenation tables [NOT TO BE CHANGED IN ANY WAY!] 42 | % Unlimited copying and redistribution of this file are permitted as long 43 | % as this file is not modified. Modifications are permitted, but only if 44 | % the resulting file is not named hyphen.tex. 45 | 46 | output of hyphenex.sh: 47 | % Hyphenation exceptions for US English, based on hyphenation exception 48 | % log articles in TUGboat. 49 | % 50 | % Copyright 2007 TeX Users Group. 51 | % You may freely use, modify and/or distribute this file. 52 | % 53 | % This is an automatically generated file. Do not edit! 54 | % 55 | % Please contact the TUGboat editorial staff 56 | % for corrections and omissions. 57 | 58 | hyph_en_US.txt: 59 | See the previous licenses. 60 | -------------------------------------------------------------------------------- /dictionaries/hyph_eu.dic: -------------------------------------------------------------------------------- 1 | ISO8859-1 2 | LEFTHYPHENMIN 2 3 | RIGHTHYPHENMIN 2 4 | 1ba 5 | 1be 6 | 1bo 7 | 1bi 8 | 1bu 9 | 1ca 10 | 1ce 11 | 1co 12 | 1ci 13 | 1cu 14 | 1da 15 | 1de 16 | 1do 17 | 1di 18 | 1du 19 | 1fa 20 | 1fe 21 | 1fo 22 | 1fi 23 | 1fu 24 | 1ga 25 | 1ge 26 | 1go 27 | 1gi 28 | 1gu 29 | 1ja 30 | 1je 31 | 1jo 32 | 1ji 33 | 1ju 34 | 1ka 35 | 1ke 36 | 1ko 37 | 1ki 38 | 1ku 39 | 1la 40 | 1le 41 | 1lo 42 | 1li 43 | 1lu 44 | 1ma 45 | 1me 46 | 1mo 47 | 1mi 48 | 1mu 49 | 1na 50 | 1ne 51 | 1no 52 | 1ni 53 | 1nu 54 | 1pa 55 | 1pe 56 | 1po 57 | 1pi 58 | 1pu 59 | 1qa 60 | 1qe 61 | 1qo 62 | 1qi 63 | 1qu 64 | 1ra 65 | 1re 66 | 1ro 67 | 1ri 68 | 1ru 69 | 1sa 70 | 1se 71 | 1so 72 | 1si 73 | 1su 74 | 1ta 75 | 1te 76 | 1to 77 | 1ti 78 | 1tu 79 | 1va 80 | 1ve 81 | 1vo 82 | 1vi 83 | 1vu 84 | 1wa 85 | 1we 86 | 1wo 87 | 1wi 88 | 1wu 89 | 1xa 90 | 1xe 91 | 1xo 92 | 1xi 93 | 1xu 94 | 1ya 95 | 1ye 96 | 1yo 97 | 1yi 98 | 1yu 99 | 1za 100 | 1ze 101 | 1zo 102 | 1zi 103 | 1zu 104 | 1l2la 105 | 1l2le 106 | 1l2lo 107 | 1l2li 108 | 1l2lu 109 | 1r2ra 110 | 1r2re 111 | 1r2ro 112 | 1r2ri 113 | 1r2ru 114 | 1t2sa 115 | 1t2se 116 | 1t2so 117 | 1t2si 118 | 1t2su 119 | 1t2xa 120 | 1t2xe 121 | 1t2xo 122 | 1t2xi 123 | 1t2xu 124 | 1t2za 125 | 1t2ze 126 | 1t2zo 127 | 1t2zi 128 | 1t2zu 129 | 1b2la 130 | 1b2le 131 | 1b2lo 132 | 1b2li 133 | 1b2lu 134 | 1b2ra 135 | 1b2re 136 | 1b2ro 137 | 1b2ri 138 | 1b2ru 139 | 1d2ra 140 | 1d2re 141 | 1d2ro 142 | 1d2ri 143 | 1d2ru 144 | 1f2la 145 | 1f2le 146 | 1f2lo 147 | 1f2li 148 | 1f2lu 149 | 1f2ra 150 | 1f2re 151 | 1f2ro 152 | 1f2ri 153 | 1f2ru 154 | 1g2la 155 | 1g2le 156 | 1g2lo 157 | 1g2li 158 | 1g2lu 159 | 1g2ra 160 | 1g2re 161 | 1g2ro 162 | 1g2ri 163 | 1g2ru 164 | 1k2la 165 | 1k2le 166 | 1k2lo 167 | 1k2li 168 | 1k2lu 169 | 1k2ra 170 | 1k2re 171 | 1k2ro 172 | 1k2ri 173 | 1k2ru 174 | 1p2la 175 | 1p2le 176 | 1p2lo 177 | 1p2li 178 | 1p2lu 179 | 1p2ra 180 | 1p2re 181 | 1p2ro 182 | 1p2ri 183 | 1p2ru 184 | 1t2ra 185 | 1t2re 186 | 1t2ro 187 | 1t2ri 188 | 1t2ru 189 | su2b2r 190 | su2b2l 191 | 192 | -------------------------------------------------------------------------------- /tests/etaf-kp-tests.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-kp-tests.el --- Tests for etaf-kp integration -*- lexical-binding: t; -*- 2 | 3 | ;; Copyright (C) 2024 ETAF Contributors 4 | 5 | ;; Author: ETAF Contributors 6 | ;; Keywords: layout, typesetting, knuth-plass 7 | ;; Version: 1.0.0 8 | 9 | ;; This file is free software; you can redistribute it and/or modify 10 | ;; it under the terms of the GNU General Public License as published by 11 | ;; the Free Software Foundation; either version 3, or (at your option) 12 | ;; any later version. 13 | 14 | ;;; Commentary: 15 | 16 | ;; Tests for etaf-kp integration with ETAF framework. 17 | ;; The etaf-kp module implements the Knuth-Plass typesetting algorithm 18 | ;; for hybrid CJK and Latin text justification. 19 | ;; 20 | ;; Note: Full etaf-kp functionality requires interactive Emacs with proper 21 | ;; font/window context. These tests verify that the library loads correctly 22 | ;; and basic functions are available. 23 | 24 | ;;; Code: 25 | 26 | (require 'etaf-kp) 27 | (require 'etaf-kp-utils) 28 | (require 'etaf-kp-hyphen) 29 | (require 'etaf-pixel) 30 | (require 'ert) 31 | 32 | (ert-deftest etaf-kp-library-loaded () 33 | "Test that etaf-kp library loads correctly." 34 | (should (fboundp 'etaf-kp-pixel-justify)) 35 | (should (fboundp 'etaf-kp-pixel-range-justify))) 36 | 37 | (ert-deftest etaf-kp-parameters-settable () 38 | "Test that etaf-kp parameters can be set." 39 | (should (fboundp 'etaf-kp-param-set)) 40 | (etaf-kp-param-set 7 3 2 5 2 1 0 2 0) 41 | (should (numberp etaf-kp-lws-ideal-pixel)) 42 | (should (= etaf-kp-lws-ideal-pixel 7))) 43 | 44 | (ert-deftest etaf-pixel-functions-available () 45 | "Test that etaf-pixel functions are available." 46 | (should (fboundp 'etaf-pixel-wrap)) 47 | (should (fboundp 'etaf-pixel-spacing)) 48 | (should (fboundp 'etaf-pixel-align))) 49 | 50 | (ert-deftest etaf-kp-hyphen-available () 51 | "Test that hyphen functions are available." 52 | (should (fboundp 'etaf-kp-hyphen-load-languages))) 53 | 54 | (ert-deftest etaf-kp-dictionaries-exist () 55 | "Test that dictionaries directory exists." 56 | (let ((dict-dir (expand-file-name "./dictionaries" (etaf-kp-root-dir)))) 57 | (should (file-directory-p dict-dir)))) 58 | 59 | (ert-deftest etaf-kp-latin-lang-set () 60 | "Verify etaf-kp-latin-lang is set." 61 | (should (stringp etaf-kp-latin-lang)) 62 | (should (string= etaf-kp-latin-lang "en_US"))) 63 | 64 | (provide 'etaf-kp-tests) 65 | ;;; etaf-kp-tests.el ends here 66 | -------------------------------------------------------------------------------- /tests/etaf-css-specificity-tests.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-css-specificity-tests.el --- Tests for CSS specificity -*- lexical-binding: t; -*- 2 | 3 | (require 'etaf-css) 4 | (require 'etaf-etml) 5 | (require 'etaf-ert) 6 | 7 | ;;; 测试特异性计算 8 | 9 | ;; 标签选择器 10 | (should-equal 11 | (etaf-css-calculate-specificity "div") 12 | '(0 0 1)) 13 | 14 | ;; 类选择器 15 | (should-equal 16 | (etaf-css-calculate-specificity ".button") 17 | '(0 1 0)) 18 | 19 | ;; ID 选择器 20 | (should-equal 21 | (etaf-css-calculate-specificity "#main") 22 | '(1 0 0)) 23 | 24 | ;; 组合选择器 25 | (should-equal 26 | (etaf-css-calculate-specificity "div.button") 27 | '(0 1 1)) 28 | 29 | (should-equal 30 | (etaf-css-calculate-specificity "#main .text") 31 | '(1 1 0)) 32 | 33 | (should-equal 34 | (etaf-css-calculate-specificity "div#header.nav") 35 | '(1 1 1)) 36 | 37 | ;; 复杂选择器 38 | (should-equal 39 | (etaf-css-calculate-specificity "#nav ul li.active") 40 | '(1 1 2)) 41 | 42 | ;;; 测试特异性比较 43 | 44 | (should 45 | (etaf-css-specificity> '(1 0 0) '(0 1 0))) 46 | 47 | (should 48 | (etaf-css-specificity> '(0 2 0) '(0 1 5))) 49 | 50 | (should 51 | (not (etaf-css-specificity> '(0 1 0) '(0 1 1)))) 52 | 53 | ;;; 测试层叠算法 54 | 55 | ;; 测试特异性覆盖 56 | (setq etaf-css-specificity-tests-dom 57 | (etaf-etml-to-dom 58 | '(html 59 | (head 60 | (style "div { color: blue; } #test { color: green; } .button { color: yellow; }")) 61 | (body 62 | (div :id "test" :class "button" "Text"))))) 63 | 64 | (should 65 | (let* ((cssom (etaf-css-build-cssom etaf-css-specificity-tests-dom)) 66 | (div-node (dom-by-id etaf-css-specificity-tests-dom "test")) 67 | (computed (etaf-css-get-computed-style cssom div-node etaf-css-specificity-tests-dom))) 68 | ;; #test (1,0,0) 应该覆盖 .button (0,1,0) 和 div (0,0,1) 69 | (equal (cdr (assq 'color computed)) "green"))) 70 | 71 | ;; 测试内联样式优先级最高 72 | (setq etaf-css-inline-priority-dom 73 | (etaf-etml-to-dom 74 | '(html 75 | (head 76 | (style "#test { color: blue; }")) 77 | (body 78 | (div :id "test" :style "color: red;" "Text"))))) 79 | 80 | (should 81 | (let* ((cssom (etaf-css-build-cssom etaf-css-inline-priority-dom)) 82 | (div-node (dom-by-id etaf-css-inline-priority-dom "test")) 83 | (computed (etaf-css-get-computed-style cssom div-node etaf-css-inline-priority-dom))) 84 | ;; 内联样式应该覆盖 ID 选择器 85 | (equal (cdr (assq 'color computed)) "red"))) 86 | 87 | (provide 'etaf-css-specificity-tests) 88 | ;;; etaf-css-specificity-tests.el ends here 89 | -------------------------------------------------------------------------------- /dictionaries/hyph_mr_IN.dic: -------------------------------------------------------------------------------- 1 | UTF-8 2 | LEFTHYPHENMIN 3 3 | RIGHTHYPHENMIN 4 4 | COMPOUNDLEFTHYPHENMIN 2 5 | COMPOUNDRIGHTHYPHENMIN 3 6 | 7 | % GENERAL RULE 8 | % Do not break either side of ZERO-WIDTH JOINER (U+200D) 9 | 2‍2 10 | % Break after ZERO-WIDTH NON JOINER (U+200C) 11 | ‌1 12 | % Break before or after any independent vowel. 13 | 1अ1 14 | 1आ1 15 | 1इ1 16 | 1ई1 17 | 1उ1 18 | 1ऊ1 19 | 1ऋ1 20 | 1ॠ1 21 | 1ऌ1 22 | 1ॡ1 23 | 1ए1 24 | 1ऐ1 25 | 1ओ1 26 | 1औ1 27 | % Break after any dependent vowel but not before. 28 | ा1 29 | ि1 30 | ी1 31 | ु1 32 | ू1 33 | ृ1 34 | ॄ1 35 | ॢ1 36 | ॣ1 37 | े1 38 | ै1 39 | ो1 40 | ौ1 41 | % Break before or after any consonant. 42 | 1क 43 | 1ख 44 | 1ग 45 | 1घ 46 | 1ङ 47 | 1च 48 | 1छ 49 | 1ज 50 | 1झ 51 | 1ञ 52 | 1ट 53 | 1ठ 54 | 1ड 55 | 1ढ 56 | 1ण 57 | 1त 58 | 1थ 59 | 1द 60 | 1ध 61 | 1न 62 | 1प 63 | 1फ 64 | 1ब 65 | 1भ 66 | 1म 67 | 1य 68 | 1र 69 | 1ल 70 | 1ळ 71 | 1व 72 | 1श 73 | 1ष 74 | 1स 75 | 1ह 76 | % Do not break before chandrabindu, anusvara, visarga, avagraha 77 | % and accents. 78 | 2ँ 79 | 2ं 80 | 2ः 81 | 2ऽ 82 | 2॑ 83 | 2॒ 84 | % Do not break either side of virama (may be within conjunct). 85 | 2्2 86 | % do not break before 87 | 1अर्थ 88 | 1अंती 89 | 1आतून 90 | 1आधी 91 | 1उप 92 | 1ऐवजी 93 | 1कड 94 | 1कडून 95 | 1कडे 96 | 1करिता 97 | 1करून 98 | 1खाल 99 | 1खाली 100 | 1खालून 101 | 1खेरीज 102 | 1जवळ 103 | 1णार 104 | 1णारा 105 | 1णारी 106 | 1णारे 107 | 1णाऱ्या 108 | 1णाऱ्यां 109 | 1तात 110 | 1ताना 111 | 1तास 112 | 1तील 113 | 1तीस 114 | 1तेस 115 | 1तोस 116 | 1नजीक 117 | 1नंतर 118 | 1पर्यंत 119 | 1पाशी 120 | 1पासून 121 | 1पुढ 122 | 1पुढून 123 | 1पुढे 124 | 1पूर्वी 125 | 1पेक्षा 126 | 1पैकी 127 | 1पोटी 128 | 1प्रत 129 | 1प्रती 130 | 1प्रधान 131 | 1प्रमाणे 132 | 1बदली 133 | 1बद्दल 134 | 1बरोबर 135 | 1भोवती 136 | 1मधून 137 | 1मध्ये 138 | 1महा 139 | 1माग 140 | 1मागून 141 | 1मागे 142 | 1मुख्य 143 | 1मुळे 144 | 1योग्य 145 | 1लय 146 | 1लस 147 | 1लात 148 | 1लाय 149 | 1लास 150 | 1लीत 151 | 1लीस 152 | 1लेत 153 | 1लेला 154 | 1लेली 155 | 1लेले 156 | 1लेलो 157 | 1लेलं 158 | 1लेल्या 159 | 1लेल्यां 160 | 1लेस 161 | 1लंय 162 | 1लंस 163 | 1ल्याच 164 | 1ल्याचं 165 | 1ल्यात 166 | 1ल्यास 167 | 1वणे 168 | 1वतीने 169 | 1वर 170 | 1वरून 171 | 1वाचून 172 | 1वात 173 | 1वास 174 | 1विना 175 | 1विरुद्ध 176 | 1विषयी 177 | 1वीत 178 | 1वीस 179 | 1वेत 180 | 1वेस 181 | 1व्यात 182 | 1व्यास 183 | 1शिवाय 184 | 1शील 185 | 1सकट 186 | 1समवेत 187 | 1समान 188 | 1समोर 189 | 1सह 190 | 1सहित 191 | 1साठी 192 | 1सारखा 193 | 1सारखी 194 | 1सारखे 195 | 1सारखं 196 | 1सारख्या 197 | 1संबंधी 198 | 1हून 199 | 200 | -------------------------------------------------------------------------------- /tests/etaf-css-index-tests.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-css-index-tests.el --- Tests for CSS rule indexing -*- lexical-binding: t; -*- 2 | 3 | (require 'etaf-css) 4 | (require 'etaf-css-core) 5 | (require 'etaf-css-parser) 6 | (require 'etaf-etml) 7 | (require 'etaf-dom) 8 | (require 'etaf-ert) 9 | 10 | ;;; 测试索引创建 11 | 12 | (should 13 | (let ((index (etaf-css-index-create))) 14 | (and (plist-get index :by-tag) 15 | (plist-get index :by-class) 16 | (plist-get index :by-id)))) 17 | 18 | ;;; 测试选择器键提取 - 标签 19 | 20 | (should 21 | (let ((keys (etaf-css-index-extract-selector-keys "div"))) 22 | (member 'div (plist-get keys :tags)))) 23 | 24 | ;;; 测试选择器键提取 - 类 25 | 26 | (should 27 | (let ((keys (etaf-css-index-extract-selector-keys ".button"))) 28 | (member "button" (plist-get keys :classes)))) 29 | 30 | ;;; 测试选择器键提取 - ID 31 | 32 | (should 33 | (let ((keys (etaf-css-index-extract-selector-keys "#main"))) 34 | (member "main" (plist-get keys :ids)))) 35 | 36 | ;;; 测试选择器键提取 - 组合 37 | 38 | (should 39 | (let ((keys (etaf-css-index-extract-selector-keys "div.button#main"))) 40 | (and (member 'div (plist-get keys :tags)) 41 | (member "button" (plist-get keys :classes)) 42 | (member "main" (plist-get keys :ids))))) 43 | 44 | ;;; 测试规则索引构建 45 | 46 | (should 47 | (let* ((rule1 (etaf-css-parse-rule "div { color: red; }")) 48 | (rule2 (etaf-css-parse-rule ".button { background: blue; }")) 49 | (rules (list rule1 rule2)) 50 | (index (etaf-css-index-build rules))) 51 | (and (hash-table-p (plist-get index :by-tag)) 52 | (hash-table-p (plist-get index :by-class)) 53 | (hash-table-p (plist-get index :by-id))))) 54 | 55 | ;;; 测试候选规则查询 56 | 57 | (should 58 | (let* ((rule1 (etaf-css-parse-rule "div { color: red; }")) 59 | (rule2 (etaf-css-parse-rule ".button { background: blue; }")) 60 | (rules (list rule1 rule2)) 61 | (index (etaf-css-index-build rules)) 62 | (test-node '(div ((class . "button")) "test")) 63 | (candidates (etaf-css-index-query-candidates index test-node))) 64 | (>= (length candidates) 2))) 65 | 66 | ;;; 测试 CSSOM 索引集成 67 | 68 | (should 69 | (let* ((test-dom (etaf-etml-to-dom 70 | '(html 71 | (head (style "div { color: red; }")) 72 | (body (div "Text"))))) 73 | (cssom (etaf-css-build-cssom test-dom)) 74 | (index (dom-attr cssom 'cssom-rule-index))) 75 | (and (plist-get index :by-tag) 76 | (plist-get index :by-class) 77 | (plist-get index :by-id)))) 78 | 79 | (provide 'etaf-css-index-tests) 80 | ;;; etaf-css-index-tests.el ends here 81 | -------------------------------------------------------------------------------- /tests/etaf-etml-tests.el: -------------------------------------------------------------------------------- 1 | (require 'etaf-ert) 2 | (require 'etaf-etml) 3 | (require 'etaf-vdom) 4 | 5 | (setq-local lisp-indent-offset 2) 6 | 7 | ;;; :style attribute tests - string format 8 | (should-equal 9 | (etaf-etml-to-dom '(div :style "background: red" "Hello")) 10 | '(div ((style . "background: red")) "Hello")) 11 | 12 | ;;; :style attribute tests - list format (alist) 13 | (should-equal 14 | (etaf-etml-to-dom '(div :style ((background . "red")) "Hello")) 15 | '(div ((style . "background: red")) "Hello")) 16 | 17 | ;;; :style attribute tests - list format with multiple properties 18 | (should-equal 19 | (etaf-etml-to-dom '(div :style ((background . "red") (padding . "10px")) "Hello")) 20 | '(div ((style . "background: red; padding: 10px")) "Hello")) 21 | 22 | ;;; :style attribute tests - mixed with other attributes 23 | (should-equal 24 | (etaf-etml-to-dom '(div :class "box" :style ((color . "blue")) "World")) 25 | '(div ((class . "box") (style . "color: blue")) "World")) 26 | 27 | ;;; :class attribute tests - string format (existing behavior) 28 | (should-equal 29 | (etaf-etml-to-dom '(div :class "w-20 h-4" "Hello")) 30 | '(div ((class . "w-20 h-4")) "Hello")) 31 | 32 | ;;; :class attribute tests - list format (single string) 33 | (should-equal 34 | (etaf-etml-to-dom '(div :class ("w-20 h-4") "Hello")) 35 | '(div ((class . "w-20 h-4")) "Hello")) 36 | 37 | ;;; :class attribute tests - list format with multiple strings 38 | (should-equal 39 | (etaf-etml-to-dom '(div :class ("w-20 h-4" "border border-red-200" "bg-green-200") "test content")) 40 | '(div ((class . "w-20 h-4 border border-red-200 bg-green-200")) "test content")) 41 | 42 | ;;; :class attribute tests - list format equals concatenated string 43 | (should-equal 44 | (etaf-etml-to-dom '(div :class ("w-20 h-4" "border border-red-200" "bg-green-200") "test content")) 45 | (etaf-etml-to-dom '(div :class "w-20 h-4 border border-red-200 bg-green-200" "test content"))) 46 | 47 | ;;; :class attribute tests - list format with other attributes 48 | (should-equal 49 | (etaf-etml-to-dom '(div :id "main" :class ("flex" "items-center") :style "color: blue" "Content")) 50 | '(div ((id . "main") (class . "flex items-center") (style . "color: blue")) "Content")) 51 | 52 | ;;; :class attribute tests - list format with empty strings (edge case) 53 | (should-equal 54 | (etaf-etml-to-dom '(div :class ("w-20" "" "h-4") "Hello")) 55 | '(div ((class . "w-20 h-4")) "Hello")) 56 | 57 | ;;; :class attribute tests - empty list (edge case) 58 | (should-equal 59 | (etaf-etml-to-dom '(div :class () "Hello")) 60 | '(div ((class . "")) "Hello")) 61 | 62 | (provide 'etaf-etml-tests) 63 | -------------------------------------------------------------------------------- /tests/etaf-css-inheritance-tests.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-css-inheritance-tests.el --- Tests for CSS property inheritance -*- lexical-binding: t; -*- 2 | 3 | (require 'etaf-css) 4 | (require 'etaf-css-core) 5 | (require 'etaf-etml) 6 | (require 'etaf-dom) 7 | (require 'etaf-ert) 8 | 9 | ;;; 测试可继承属性检查 10 | 11 | (should 12 | (etaf-css-property-inherits-p 'color)) 13 | 14 | (should 15 | (etaf-css-property-inherits-p 'font-family)) 16 | 17 | (should 18 | (not (etaf-css-property-inherits-p 'margin))) 19 | 20 | (should 21 | (not (etaf-css-property-inherits-p 'border))) 22 | 23 | ;;; 测试继承应用 24 | 25 | (should 26 | (let* ((parent-style '((color . "red") (font-size . "14px") (margin . "10px"))) 27 | (child-style '((font-size . "12px"))) 28 | (result (etaf-css-apply-inheritance child-style parent-style))) 29 | ;; color 应该被继承 30 | (and (assq 'color result) 31 | (equal (cdr (assq 'color result)) "red") 32 | ;; font-size 不应该被继承（子元素已定义） 33 | (equal (cdr (assq 'font-size result)) "12px") 34 | ;; margin 不应该被继承（不是可继承属性） 35 | (not (assq 'margin result))))) 36 | 37 | ;;; 测试继承集成（带 DOM） 38 | 39 | (should 40 | (let* ((test-dom (etaf-etml-to-dom 41 | '(div :style "color: red; font-size: 14px;" 42 | (p "Text")))) 43 | (cssom (etaf-css-build-cssom test-dom)) 44 | (p-node (dom-by-tag test-dom 'p)) 45 | (computed (etaf-css-get-computed-style cssom p-node test-dom))) 46 | ;; color 应该从父元素继承 47 | (and (assq 'color computed) 48 | (equal (cdr (assq 'color computed)) "red") 49 | ;; font-size 应该从父元素继承 50 | (assq 'font-size computed) 51 | (equal (cdr (assq 'font-size computed)) "14px")))) 52 | 53 | ;;; 测试去重功能 54 | 55 | (should 56 | (let* ((style-with-duplicates '((color . "red") (font-weight . "bold") (color . "blue") (font-size . "12px"))) 57 | (result (etaf-css--remove-duplicate-properties style-with-duplicates))) 58 | ;; 应该只保留第一次出现的 color 59 | (and (= (length (seq-filter (lambda (p) (eq (car p) 'color)) result)) 1) 60 | (equal (cdr (assq 'color result)) "red")))) 61 | 62 | ;;; 测试继承时的去重 63 | 64 | (should 65 | (let* ((parent-style '((color . "red") (font-weight . "bold"))) 66 | ;; 子元素样式中已经有重复的 font-weight 67 | (child-style '((font-weight . "normal") (background . "white") (font-weight . "normal"))) 68 | (result (etaf-css-apply-inheritance child-style parent-style))) 69 | ;; font-weight 应该只出现一次 70 | (and (= (length (seq-filter (lambda (p) (eq (car p) 'font-weight)) result)) 1) 71 | ;; color 应该被继承且只出现一次 72 | (= (length (seq-filter (lambda (p) (eq (car p) 'color)) result)) 1)))) 73 | 74 | (provide 'etaf-css-inheritance-tests) 75 | ;;; etaf-css-inheritance-tests.el ends here 76 | -------------------------------------------------------------------------------- /tests/etaf-dom-tests.el: -------------------------------------------------------------------------------- 1 | (require 'etaf-etml) 2 | (require 'etaf-dom) 3 | (require 'etaf-ert) 4 | (require 'cl-lib) 5 | 6 | (setq-local lisp-indent-offset 2) 7 | (setq etaf-dom-tests-dom-1 8 | (etaf-etml-to-dom 9 | '(div :class "rounded-xl bg-white p-10" :id "test-id" 10 | (div :class "space-y-6" 11 | (p "An advanced online playground for Tailwind CSS, including support for things like:") 12 | (ul :class "space-y-3" 13 | (li :id "1" 14 | (p :class "ml-3" "Customizing your theme with" 15 | (code :class "text-gray-950" "@theme"))) 16 | (li :id "2" 17 | (p :style "color:red;padding:2" 18 | :class "ml-3" :id "test-p" 19 | "Adding custom utilities with" 20 | (code :class "text-gray-950" "@utility"))) 21 | (li :id "3" 22 | (p :class "ml-3" "Adding custom variants with" 23 | (code :class "text-gray-950" "@variant"))) 24 | (li :id "4" :class "flex" 25 | (p :class "ml-3" "Code completion with instant preview"))) 26 | (p "Perfect for learning how the framework works, prototyping a new idea, or creating a demo to share online.")) 27 | (hr :class "my-6 w-full") 28 | (p :class "mb-3" "Want to dig deeper into Tailwind?") 29 | (p :class "font-semibold" 30 | (a :href "https://tailwindcss.com/docs" 31 | :class "text-gray-950 dark:text-white" "Read the docs →"))))) 32 | 33 | ;; Note: DOM-to-TML conversion preserves all attributes including default styles from etaf-etml-tag 34 | ;; The main requirement is that etaf-tag-instance is NOT embedded in the DOM (moved to virtual DOM layer) 35 | (let ((tml (etaf-dom-to-tml etaf-dom-tests-dom-1))) 36 | ;; Check basic structure 37 | (should (eq (car tml) 'div)) 38 | (should (string= (plist-get (cdr tml) :class) "rounded-xl bg-white p-10")) 39 | (should (string= (plist-get (cdr tml) :id) "test-id")) 40 | ;; Verify NO etaf-tag-instance in any node (the main requirement) 41 | ;; The `a` tag should NOT have :etaf-tag-instance in TML form 42 | (should-not (cl-some (lambda (elem) 43 | (and (listp elem) 44 | (eq (car elem) 'a) 45 | (plist-get (cdr elem) :etaf-tag-instance))) 46 | (cl-remove-if-not #'listp (flatten-tree tml))))) 47 | 48 | (should (etaf-dom-tag-match-p etaf-dom-tests-dom-1 "div")) 49 | 50 | (should (etaf-dom-class-match-p etaf-dom-tests-dom-1 "p-10")) 51 | 52 | (should (etaf-dom-id-match-p etaf-dom-tests-dom-1 "test-id")) 53 | 54 | (provide 'etaf-dom-tests) 55 | -------------------------------------------------------------------------------- /dictionaries/hyph_zu_ZA.dic: -------------------------------------------------------------------------------- 1 | ISO8859-1 2 | % Ukwahlukanisela ngekhonco isiZulu: Ukulandisa kwokusebenza ne-OpenOffice.org 3 | % Hyphenation for Zulu: Version for OpenOffice.org 4 | % Copyright (C) 2005, 2007 Friedel Wolff 5 | % 6 | % This library is free software; you can redistribute it and/or 7 | % modify it under the terms of the GNU Lesser General Public 8 | % License as published by the Free Software Foundation; 9 | % version 2.1 of the License. 10 | % 11 | % This library is distributed in the hope that it will be useful, 12 | % but WITHOUT ANY WARRANTY; without even the implied warranty of 13 | % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 14 | % Lesser General Public License for more details. 15 | % 16 | % You should have received a copy of the GNU Lesser General Public 17 | % License along with this library; if not, write to the Free Software 18 | % Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 19 | % 20 | 21 | a1 22 | e1 23 | i1 24 | o1 25 | u1 26 | %is'thandwa njalonjalo 27 | '1 28 | 29 | %iziphambuko ngenxa yamagama esiBhunu 30 | 1be2rg. 31 | be1 32 | 1bu2rg. 33 | bu1 34 | 1da2l. 35 | da1 36 | 1do2rp. 37 | do1 38 | %angazi ngale: Modder-fo-ntein? 39 | 1fonte2i2n. 40 | fo1 41 | 1ho2e2k. 42 | 1ho2f. 43 | ho1 44 | 1klo2o2f. 45 | klo1 46 | 1ko2p. 47 | ko1 48 | 1kra2ns. 49 | kra1 50 | 1kro2o2n. 51 | kro1 52 | 1kru2i2n. 53 | kru1 54 | 1la2nd. 55 | la1 56 | 1pa2rk. 57 | pa1 58 | 1ple2i2n. 59 | ple1 60 | 1po2o2rt. 61 | po1 62 | 1ra2nd. 63 | ra1 64 | 1rivi2er. 65 | ri1 66 | 1spru2i2t. 67 | spru1 68 | 1sta2d. 69 | sta1 70 | 1stra2nd. 71 | stra1 72 | 73 | %ukukhombisa 74 | 1no2o2rd. 75 | no1 76 | 1o2o2s. 77 | 1su2i2d. 78 | su1 79 | 1we2s. 80 | we1 81 | 82 | %iziphambuko ngenxa yamagama esiNgisi 83 | 1ba2y. 84 | ba1 85 | be2a2ch 86 | e2a2ch. 87 | cli2ffe. 88 | 1da2le. 89 | 1fi2e2ld. 90 | fi1 91 | %... Hill 92 | i2ll. 93 | 1me2a2d. 94 | %1pa2rk. - bona isiBhunu 95 | 1ri2dge. 96 | %kodwa 97 | b2ri2dge. 98 | bri1 99 | 1to2n. 100 | 1to2wn. 101 | to1 102 | 1vi2e2w. 103 | 1vi2lle. 104 | vi1 105 | 1wo2o2d. 106 | wo1 107 | 108 | %ukukhombisa 109 | no2rth. 110 | e2a2st. 111 | so2u2th. 112 | so1 113 | we2st. 114 | 115 | %iziphambuko ngenxa yamagama esiSuthu 116 | a2ng. 117 | e2ng. 118 | i2ng. 119 | o2ng. 120 | u2ng. 121 | 122 | %iziphambuko ezinhlobonhlobo 123 | %mhlawumbe amaphutha okupela angazohlupa 124 | a2a1 125 | a2e1 126 | a2i1 127 | a2o1 128 | a2u1 129 | e2a1 130 | e2e1 131 | e2i1 132 | e2o1 133 | e2u1 134 | i2a1 135 | i2e1 136 | i2i1 137 | i2o1 138 | i2u1 139 | o2a1 140 | o2e1 141 | o2i1 142 | o2o1 143 | o2u1 144 | u2a1 145 | u2e1 146 | u2i1 147 | u2o1 148 | u2u1 149 | 150 | 2b. 151 | 2c. 152 | 2d. 153 | 2f. 154 | 2g. 155 | 2h. 156 | 2j. 157 | 2k. 158 | 2l. 159 | 2m. 160 | 2n. 161 | 2p. 162 | 2q. 163 | 2r. 164 | 2s. 165 | 2t. 166 | 2v. 167 | 2w. 168 | 2x. 169 | 2z. 170 | 171 | 172 | -------------------------------------------------------------------------------- /tests/test-w-fit-with-border.el: -------------------------------------------------------------------------------- 1 | ;;; test-w-fit-with-border.el --- Test w-fit with border class -*- lexical-binding: t; -*- 2 | 3 | ;;; Commentary: 4 | ;; This test validates that w-fit works correctly with border class. 5 | 6 | ;;; Code: 7 | 8 | (require 'ert) 9 | (require 'etaf) 10 | (require 'etaf-layout) 11 | 12 | (ert-deftest etaf-layout-test-w-fit-with-border () 13 | "Test that w-fit works correctly when element has border. 14 | This is the exact case from the bug report." 15 | (let* ((dom (etaf-etml-to-dom 16 | '(div :class "w-fit mt-1 border" 17 | (div :class "flex justify-between" 18 | (span :class "border" "Read the docs") 19 | (span :class "border" "click me"))))) 20 | (cssom (etaf-css-build-cssom dom)) 21 | (render-tree (etaf-render-build-tree dom cssom)) 22 | (layout-tree (etaf-layout-build-tree render-tree '(:width 1024 :height nil))) 23 | (root-box (etaf-layout-get-box-model layout-tree)) 24 | (flex-node (car (dom-non-text-children layout-tree))) 25 | (flex-box (etaf-layout-get-box-model flex-node))) 26 | 27 | ;; The root div should have non-zero width 28 | (should (> (etaf-layout-box-content-width root-box) 0)) 29 | 30 | ;; The flex container should have non-zero width 31 | ;; This was failing before the fix when parent had border 32 | (should (> (etaf-layout-box-content-width flex-box) 0)) 33 | 34 | ;; The flex container's width should be less than or equal to root's width 35 | ;; (accounting for border) 36 | (let ((border-width (* 2 (plist-get (plist-get root-box :border) :left-width)))) 37 | (should (<= (etaf-layout-box-content-width flex-box) 38 | (etaf-layout-box-content-width root-box)))))) 39 | 40 | (ert-deftest etaf-layout-test-w-fit-without-border () 41 | "Test that w-fit still works correctly without border. 42 | This is the control case that was already working." 43 | (let* ((dom (etaf-etml-to-dom 44 | '(div :class "w-fit mt-1" 45 | (div :class "flex justify-between" 46 | (span :class "border" "Read the docs") 47 | (span :class "border" "click me"))))) 48 | (cssom (etaf-css-build-cssom dom)) 49 | (render-tree (etaf-render-build-tree dom cssom)) 50 | (layout-tree (etaf-layout-build-tree render-tree '(:width 1024 :height nil))) 51 | (root-box (etaf-layout-get-box-model layout-tree)) 52 | (flex-node (car (dom-non-text-children layout-tree))) 53 | (flex-box (etaf-layout-get-box-model flex-node))) 54 | 55 | ;; Both should have non-zero widths 56 | (should (> (etaf-layout-box-content-width root-box) 0)) 57 | (should (> (etaf-layout-box-content-width flex-box) 0)))) 58 | 59 | (provide 'test-w-fit-with-border) 60 | 61 | ;;; test-w-fit-with-border.el ends here 62 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_sl_SI.txt: -------------------------------------------------------------------------------- 1 | The Slovenian hyphenation patterns for TeX were created by Matjaz Vrecko, 2 | MG-SOFT Corp. . They are published 3 | under the LPPL license (LaTeX Project Public License). For use in 4 | OpenOffice.org adapted by Robert Ludvik, . 5 | The OpenOffice.org Slovenian hyphenation patterns are covered by 6 | the GNU/LGPL and GNU/GPL License and support the Slovenian language (sl_SI). 7 | 8 | TeX patterns were re-converted for better performance in July 2010 thanks 9 | to errors pointed out by Mojca Miklavec, . 10 | 11 | The OpenOffice.org extension made by Martin Srebotnjak, . 12 | 13 | TeX hyphenation patterns conversion for OpenOffice.org is fully described at 14 | http://wiki.services.openoffice.org/wiki/Documentation/SL/Using_TeX_hyphenation_patterns_in_OpenOffice.org 15 | **** 16 | Slovenske vzorce za deljenje besed za TeX je ustvaril Matjaž Vrečko, 17 | MG-SOFT Corp. ; izdani so pod licenco 18 | LPPL (LaTeX Project Public License). Za rabo v OpenOffice.org 19 | jih je priredil Robert Ludvik, . 20 | Slovenski delilni vzorci za OpenOffice.org so izdani pod licencama 21 | GNU/LGPL in GNU/GPL ter so namenjeni podpori za slovenski jezik (sl_SI). 22 | 23 | Vzorci za TeX ponovno pretvorjeni julija 2010 24 | zavoljo nepravilnosti, na katere je prijazno opozorila 25 | Mojca Miklavec, . 26 | 27 | Razširitev za OpenOffice.org je pripravil Martin Srebotnjak, . 28 | 29 | Pretvorba vzorcev za deljenje besed Tex je podrobno opisana na naslovu 30 | http://wiki.services.openoffice.org/wiki/Documentation/SL/Using_TeX_hyphenation_patterns_in_OpenOffice.org 31 | 32 | HYPH sl SI hyph_sl_SI 33 | 34 | ======================================================================= 35 | http://external.openoffice.org/ form data: 36 | 37 | Product Name: Slovenian patterns for hyphenation 38 | Product Version: 1.2.1 39 | Vendor or Owner Name: Mojca Miklavec 40 | Vendor or Owner Contact: mojca.miklavec.lists@gmail.com 41 | OpenOffice.org Contact: bobe@openoffice.org 42 | Date of First Use / date of License: 1990/October 2006 43 | URL for Product Information: 44 | http://sl.openoffice.org/delilni.html 45 | URL for License: http://www.gnu.org/copyleft/lgpl.html 46 | Purpose: Patterns for Slovenian hyphenation 47 | Type of Encryption: none 48 | Binary or Source Code: Source 49 | ======================================================================= 50 | 51 | For the avoidance of doubt, except that if any license choice other 52 | than GPL or LGPL is available it will apply instead, Sun elects to use 53 | only the Lesser General Public License version 2.1 (LGPLv2) at this 54 | time for any software where a choice of LGPL license versions is made 55 | available with the language indicating that LGPLv2.1 or any later 56 | version may be used, or where a choice of which version of the LGPL is 57 | applied is otherwise unspecified. 58 | -------------------------------------------------------------------------------- /etaf-log.el: -------------------------------------------------------------------------------- 1 | (defconst etaf-log-level-list '(trace debug info warning error) 2 | "All levels of emacs log.") 3 | 4 | (defconst etaf-log-default-buffer "*etaf-log*" 5 | "Default log buffer.") 6 | 7 | (defconst etaf-log-default-level nil 8 | "Default log level.") 9 | 10 | ;; (defvar etaf-log-max-log-num 10000) 11 | 12 | ;;; utils 13 | 14 | (defun format-time-millis () 15 | "返回当前时间的字符串表示，精确到毫秒。" 16 | (let* ((now (float-time)) 17 | (seconds (floor now)) 18 | (millis (floor (* (- now seconds) 1000)))) 19 | (concat (format-time-string "%H:%M:%S" seconds) 20 | "." (format "%03d" millis)))) 21 | 22 | ;;; functions 23 | 24 | (defun etaf-logger (&optional level buffer) 25 | (list :level (or level etaf-log-default-level) 26 | :buffer (or buffer etaf-log-default-buffer))) 27 | 28 | (defun etaf-log-set-level (logger level) 29 | (setq logger (plist-put logger :level level))) 30 | 31 | (defun etaf-log-set-buffer (logger buffer) 32 | (setq logger (plist-put logger :buffer buffer))) 33 | 34 | (defun etaf-log (logger level format-string args) 35 | (with-current-buffer (get-buffer-create (plist-get logger :buffer)) 36 | (local-set-key "q" 'etaf-log-quit) 37 | (goto-char (point-max)) 38 | (when-let ((allowed-level (plist-get logger :level))) 39 | (let ((allowed-levels (member allowed-level etaf-log-level-list)) 40 | (inhibit-read-only 1)) 41 | (when (member level allowed-levels) 42 | (unless (bolp) (newline)) 43 | (insert (format "%s| [%s] %s\n" 44 | (format-time-millis) 45 | (upcase (symbol-name level)) 46 | (apply 'format format-string args)))))) 47 | (read-only-mode 1))) 48 | 49 | (defun etaf-log-trace (logger format-string &rest args) 50 | (declare (indent defun)) 51 | (etaf-log logger 'trace format-string args) 52 | t) 53 | 54 | (defun etaf-log-debug (logger format-string &rest args) 55 | (declare (indent defun)) 56 | (etaf-log logger 'debug format-string args) 57 | t) 58 | 59 | (defun etaf-log-info (logger format-string &rest args) 60 | (declare (indent defun)) 61 | (etaf-log logger 'info format-string args) 62 | t) 63 | 64 | (defun etaf-log-warning (logger format-string &rest args) 65 | (declare (indent defun)) 66 | (etaf-log logger 'warning format-string args) 67 | t) 68 | 69 | (defun etaf-log-error (logger format-string &rest args) 70 | (declare (indent defun)) 71 | (etaf-log logger 'error format-string args)) 72 | 73 | (defun etaf-log-quit () 74 | (interactive) 75 | (quit-window) 76 | (local-unset-key "q")) 77 | 78 | (defun etaf-log-view (logger) 79 | (switch-to-buffer (get-buffer-create (plist-get logger :buffer))) 80 | (local-set-key "q" 'etaf-log-quit)) 81 | 82 | (defun etaf-log-clear (logger) 83 | (with-current-buffer 84 | (get-buffer-create (plist-get logger :buffer)) 85 | (let ((inhibit-read-only t)) 86 | (erase-buffer)))) 87 | 88 | (provide 'etaf-log) 89 | -------------------------------------------------------------------------------- /dictionaries/hyph_gl.dic: -------------------------------------------------------------------------------- 1 | ISO8859-1 2 | LEFTHYPHENMIN 2 3 | RIGHTHYPHENMIN 2 4 | .odi1 5 | .o3v 6 | .g2 7 | .p2 8 | .ri1a 9 | .ru1 10 | .si1o 11 | .vi1a 12 | \'a1x 13 | \'{\i}1a 14 | \'{\i}1c 15 | \'o1d 16 | \'u1a 17 | a1\'{\i} 18 | a1a 19 | a1e1 20 | a1ia 21 | a1io 22 | a1ib 23 | a1o 24 | a1b 25 | a1c 26 | a1d 27 | a1f 28 | a1g 29 | a1h 30 | a1l 31 | a1m 32 | a2n1am 33 | 2ani 34 | a1p 35 | a1q 36 | a1r 37 | ar2l 38 | a1t 39 | a1v 40 | a1x 41 | a1z 42 | e1\'~n 43 | e1a 44 | e1e 45 | e1inc 46 | e1o 47 | e1un 48 | e1b 49 | e2bac 50 | e1c 51 | e1d 52 | e1f 53 | e1g 54 | e1h 55 | e1l 56 | e1m 57 | e1p 58 | e1q 59 | e1ra 60 | er1am 61 | e1re 62 | e1ri 63 | e1ro 64 | e1ru 65 | erce2 66 | e1t 67 | e1v 68 | e1x 69 | e1z 70 | i1\'~n 71 | i1ax 72 | i1ei 73 | i1oce 74 | i1or. 75 | i1osf 76 | i1ox 77 | 1iu 78 | i1b 79 | i1c 80 | i1d 81 | i1f 82 | i1g 83 | i1h 84 | i1k 85 | i1l 86 | i1m 87 | i1p 88 | ipe2 89 | i1q 90 | i1r 91 | i1t 92 | i1v 93 | i1x 94 | i1z 95 | o1a 96 | o1e 97 | o1ia 98 | o1io 99 | o1o 100 | o1b 101 | o1c 102 | oco2m 103 | o1d 104 | ode2s 105 | odi1o 106 | o1f 107 | o1g 108 | o1h 109 | o1k 110 | o1l 111 | o2lag 112 | o1m 113 | o1p 114 | o1q 115 | o1ra 116 | o1re 117 | o1ri 118 | o1ro 119 | o1t 120 | o1v 121 | o2vo 122 | o1x 123 | o1z 124 | u1ar. 125 | u1enz 126 | u1or 127 | u1b 128 | u2bad 129 | u1c 130 | u1d 131 | u1f 132 | u1g 133 | u1l 134 | u1m 135 | u1p 136 | uque2 137 | u1r 138 | u1t 139 | u1v 140 | u1x 141 | u1z 142 | 2b. 143 | bi2e 144 | bi1om 145 | 2b1of 146 | bu2b 147 | bu1q 148 | 2b1h 149 | 2b1s 150 | bser2 151 | 2b1x 152 | 2c. 153 | co1in 154 | co2be 155 | co2v 156 | co2x 157 | 2c1c 158 | 2c1d 159 | 2c1n 160 | cre2b 161 | 2c1s 162 | 2c1t 163 | di2q 164 | 2d1d 165 | 2d1v 166 | 2f. 167 | fa1i 168 | fi1a 169 | fi2a. 170 | fi2e 171 | fo2x 172 | 2f1t 173 | 2g. 174 | glo2b 175 | 2g1m 176 | 2g1n 177 | 2l. 178 | la2i1o 179 | le2o. 180 | li1an 181 | lo2i 182 | lo2ba 183 | lo2z 184 | 2l1b 185 | 2l1c 186 | 2l1d 187 | 2l1f 188 | 2l1g 189 | 2l1m 190 | 2l1n 191 | 2l1p 192 | 2l1q 193 | 2l1s 194 | 2l1t 195 | 2l1v 196 | 2l1x 197 | 2l1z 198 | 2m. 199 | ma2i1 200 | mo2mo 201 | 2m1b 202 | mbi2q 203 | mbo2l 204 | 2m1m 205 | 2m1n 206 | 2m1p 207 | 1na 208 | 1ne 209 | 1ni 210 | 1no 211 | no2pi 212 | 1nu 213 | n1c 214 | n1d 215 | n1f 216 | n1g 217 | n1l 218 | n1m 219 | n1n 220 | n1q 221 | n1r 222 | n1s 223 | n1t 224 | n1v 225 | n1x 226 | n1z 227 | 2p. 228 | per1r 229 | pes2q 230 | podi2 231 | 2p1n 232 | pri1o 233 | 2p1s 234 | 2p1t 235 | 2r. 236 | ra1ir 237 | 2rapt 238 | r2i 239 | ru1e 240 | 2r1b 241 | 2r1c 242 | 2r1d 243 | 2r1f 244 | 2r1g 245 | 2r1l 246 | 2r1m 247 | 2r1n 248 | 2r1p 249 | 2r1q 250 | 1rr 251 | 2r1s 252 | 2r1t 253 | 2r1v 254 | 2r1x 255 | 2r1z 256 | 2s. 257 | 1sa 258 | 1se 259 | 1si 260 | 1so 261 | 1su 262 | su1e 263 | s1b 264 | 2s1c 265 | s1d 266 | 2s1f 267 | s1g 268 | s1ho 269 | s1l 270 | s1m 271 | s1n 272 | 2s1p 273 | s1q 274 | 2s1t 275 | s1v 276 | 2t. 277 | tedi1 278 | 2t1ing 279 | to2pa 280 | tudi1 281 | 2t1m 282 | 2t1n 283 | tru2e 284 | vado1 285 | vi1ad 286 | 2x. 287 | 2x1c 288 | 2x1p 289 | 2x1t 290 | 2z. 291 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_bg_BG.txt: -------------------------------------------------------------------------------- 1 | Това е пакет за сричкопренасяне за OpenOffice.org. Може 2 | да свалите OpenOffice.org от http://openoffice.org/. 3 | Пакетът се поддържа заедно с проекта bgOffice. За повече 4 | информация, прочетете файла README.bgOffice, който идва с 5 | този пакет или посетете страницата на проекта на адрес: 6 | http://bgoffice.sourceforge.net. 7 | 8 | bghyphen.tex -- TeX hyphenation patterns for Bulgarian 9 | Copyright 2000 Anton Zinoviev 10 | 11 | Translation to ALTLinux hyphenator format (for use in 12 | OpenOffice.org) July 2002 Borislav Mitev 13 | 14 | 15 | 16 | Указания за инсталиране и настройка 17 | 18 | 19 | 1. Копирате файла hyph_bg_BG.dic в директорията: 20 | 21 | ..\OpenOffice.org\share\dict\ooo 22 | 23 | Ако сте инсталирали проверка на правописа на американски 24 | английски, то в тази директория трябва да се намират файловете 25 | en_US.aff, en_US.dic и dictionary.lst. 26 | 27 | 28 | 2. Отваряте файла dictionary.lst с текстов редактор и добавяте 29 | следния ред на края му: 30 | 31 | HYPH bg BG hyph_bg_BG 32 | 33 | 34 | 3. Стартирате OpenOffice и осъществявате следните настройки: 35 | Tools/Options/Language Settings: 36 | - В Languages/Default languages for documents трябва да се 37 | посочи Bulgarian; 38 | - В Writing Aids/Available language modules/Edit за 39 | Language/Bulgarian трябва да се е появил под реда Hyphenation 40 | нов ред с етикет ALTLinux LibHnj Hyphenator, който трябва да се 41 | избере. 42 | 43 | 44 | 4. За да направи самото сричкопренасяне върху текста от 45 | Tools/Hyphenation... 46 | - По подразбиране сричкопренасянето е включено на ръчен режим, 47 | т.е. ще пита за всяка една дума как да я пренесе, което за 48 | големи текстове не много удобно. За да се пусне в автоматичен 49 | трябва да се избере Hyphenate without inquiry от 50 | Tools/Options/Language Settings/Writing Aids/Options; 51 | - При повторно сричкопренасяне, което обикновено се налага при 52 | промяна на текста или формата, тиретата остават на старите си 53 | места и трябва да се махнат ръчно. Надявам се това да бъде 54 | променено в по-следващите версии. 55 | 56 | 57 | Всяка помощ е добра дошла. Търсят се доброволци да помагат. 58 | 59 | 60 | OOo-hyph-bg 61 | Авторски права (C) 2001 Антон Зиновиев 62 | Борислав Митев 63 | Поддържа се от Радостин Раднев 64 | 65 | Получавате тази програма БЕЗ КАКВИТО И ДА Е ГАРАНЦИИ. Това е 66 | свободна програма и, ако желаете, можете да я разпространявате 67 | при определени условия. За подробности прочетете файла 68 | COPYING.BULGARIAN, който идва с този пакет. 69 | 70 | 71 | OOo-hyph-bg 72 | Copyright (C) 2001 Anton Zinoviev 73 | Borislav Mitev 74 | Maintained by Radostin Radnev 75 | 76 | This program comes with ABSOLUTELY NO WARRANTY. This is free 77 | software, and you are welcome to redistribute it under certain 78 | conditions. For details read file COPYING that comes with this 79 | package. 80 | -------------------------------------------------------------------------------- /tests/etaf-flex-item-width-tests.el: -------------------------------------------------------------------------------- 1 | ;;; test-flex-item-width.el --- Test for flex item width bug fix 2 | 3 | ;; This file tests the fix for the issue where nested flex containers 4 | ;; were incorrectly expanding to full parent width when used as flex items. 5 | 6 | (require 'ert) 7 | (require 'etaf) 8 | 9 | (ert-deftest etaf-test-nested-flex-container-as-flex-item () 10 | "Test that nested flex containers shrink-wrap when used as flex items. 11 | This tests the bug fix where a flex container used as a flex item 12 | should shrink-wrap its content, not expand to full parent width." 13 | (let* ((etml '(div :class "flex" 14 | (span "A") 15 | (div :class "flex" 16 | (span "B") 17 | (span "C")))) 18 | (dom (etaf-etml-to-dom etml nil)) 19 | (cssom (etaf-css-build-cssom dom)) 20 | (render-tree (etaf-render-build-tree dom cssom)) 21 | (layout-tree (etaf-layout-build-tree render-tree '(:width 800 :height nil))) 22 | (children (dom-children layout-tree)) 23 | (nested-flex (nth 1 children)) 24 | (nested-box (etaf-layout-get-box-model nested-flex))) 25 | 26 | ;; The nested flex div should shrink-wrap (width=0) not expand to 800 27 | (should (equal (plist-get (plist-get nested-box :content) :width) 0)) 28 | 29 | ;; Test that the layout renders correctly 30 | (let ((result (etaf-paint-string etml nil nil 800))) 31 | ;; Should contain both "A" and "BC" 32 | (should (string-match-p "A" result)) 33 | (should (string-match-p "BC" result))))) 34 | 35 | (ert-deftest etaf-test-flex-justify-between-with-nested-flex () 36 | "Test justify-between works correctly with nested flex containers. 37 | This tests the original problem: span and nested flex div should be 38 | properly spaced with justify-between." 39 | (let* ((etml '(div :class "flex justify-between" 40 | (span "LEFT") 41 | (div :class "flex gap-2" 42 | (span "R1") 43 | (span "R2")))) 44 | (result (etaf-paint-string etml nil nil 800))) 45 | 46 | ;; Result should contain all text 47 | (should (string-match-p "LEFT" result)) 48 | (should (string-match-p "R1" result)) 49 | (should (string-match-p "R2" result)) 50 | 51 | ;; There should be spacing between items (represented as text properties) 52 | ;; The result length should be greater than just the visible text 53 | (should (> (length result) (length "LEFTR1R2"))))) 54 | 55 | (ert-deftest etaf-test-flex-vs-block-level () 56 | "Test that flex containers behave as block-level when not in flex container. 57 | When a flex container is in a normal (non-flex) parent, it should 58 | behave as a block-level element, appearing on its own line." 59 | (let* ((etml '(div 60 | (span "A") 61 | (div :class "flex" 62 | (span "B") 63 | (span "C")))) 64 | (result (etaf-paint-string etml nil nil 800))) 65 | 66 | ;; Should contain both elements 67 | (should (string-match-p "A" result)) 68 | (should (string-match-p "BC" result)) 69 | ;; Should have newline separating them (may have space before newline) 70 | (should (string-match-p " *\n" result)))) 71 | 72 | (provide 'test-flex-item-width) 73 | -------------------------------------------------------------------------------- /tests/etaf-css-important-tests.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-css-important-tests.el --- Tests for !important and cascade -*- lexical-binding: t; -*- 2 | 3 | (require 'etaf-css) 4 | (require 'etaf-css-parser) 5 | (require 'etaf-css-core) 6 | (require 'etaf-etml) 7 | (require 'etaf-dom) 8 | (require 'etaf-ert) 9 | 10 | ;;; 测试 !important 解析 11 | 12 | (should-equal 13 | (etaf-css-parse-declarations "color: red !important;") 14 | '((color "red" t))) 15 | 16 | (should-equal 17 | (etaf-css-parse-declarations "color: red!important;") 18 | '((color "red" t))) 19 | 20 | (should-equal 21 | (etaf-css-parse-declarations "color: red ! important ;") 22 | '((color "red" t))) 23 | 24 | (should-equal 25 | (etaf-css-parse-declarations "color: red; font-size: 14px !important;") 26 | '((color "red" nil) (font-size "14px" t))) 27 | 28 | ;;; 测试层叠算法 - !important 优先 29 | 30 | (should 31 | (let* ((decl1 '("blue" (0 0 1) style-tag nil 0)) ; 普通声明 32 | (decl2 '("red" (0 0 1) style-tag t 1)) ; !important 声明 33 | (result (etaf-css-cascade-compare-declarations decl2 decl1))) 34 | result)) ; decl2 (!important) 应该优先 35 | 36 | ;;; 测试层叠算法 - 内联样式优先 37 | 38 | (should 39 | (let* ((decl1 '("blue" (0 0 1) style-tag nil 0)) 40 | (decl2 '("red" (0 0 0) inline nil 1)) 41 | (result (etaf-css-cascade-compare-declarations decl2 decl1))) 42 | result)) ; decl2 (inline) 应该优先 43 | 44 | ;;; 测试层叠算法 - 特异性优先 45 | 46 | (should 47 | (let* ((decl1 '("blue" (0 0 1) style-tag nil 0)) ; 低特异性 48 | (decl2 '("red" (0 1 0) style-tag nil 1)) ; 高特异性 49 | (result (etaf-css-cascade-compare-declarations decl2 decl1))) 50 | result)) ; decl2 (高特异性) 应该优先 51 | 52 | ;;; 测试层叠算法 - 文档顺序 53 | 54 | (should 55 | (let* ((decl1 '("blue" (0 0 1) style-tag nil 0)) ; 先定义 56 | (decl2 '("red" (0 0 1) style-tag nil 1)) ; 后定义 57 | (result (etaf-css-cascade-compare-declarations decl2 decl1))) 58 | result)) ; decl2 (后定义) 应该优先 59 | 60 | ;;; 测试完整的层叠场景 61 | 62 | (setq etaf-css-important-tests-dom 63 | (etaf-etml-to-dom 64 | '(html 65 | (head 66 | (style "div { color: blue !important; font-size: 12px; }")) 67 | (body 68 | (div :id "test" :style "color: red; font-size: 16px !important;" "Text"))))) 69 | 70 | (should 71 | (let* ((cssom (etaf-css-build-cssom etaf-css-important-tests-dom)) 72 | (div-node (dom-by-id etaf-css-important-tests-dom "test")) 73 | (computed (etaf-css-get-computed-style 74 | cssom div-node etaf-css-important-tests-dom))) 75 | ;; 样式表的 !important 应该战胜内联样式的普通声明 76 | (and (equal (cdr (assq 'color computed)) "blue") 77 | ;; 内联样式的 !important 应该战胜样式表的普通声明 78 | (equal (cdr (assq 'font-size computed)) "16px")))) 79 | 80 | ;;; 测试多规则层叠 81 | 82 | (setq etaf-css-cascade-tests-dom 83 | (etaf-etml-to-dom 84 | '(html 85 | (head 86 | (style "div { color: green; } 87 | .box { color: blue; } 88 | #main { color: red; }")) 89 | (body 90 | (div :id "main" :class "box" "Text"))))) 91 | 92 | (should 93 | (let* ((cssom (etaf-css-build-cssom etaf-css-cascade-tests-dom)) 94 | (div-node (dom-by-id etaf-css-cascade-tests-dom "main")) 95 | (computed (etaf-css-get-computed-style 96 | cssom div-node etaf-css-cascade-tests-dom))) 97 | ;; ID 选择器特异性最高 98 | (equal (cdr (assq 'color computed)) "red"))) 99 | 100 | (provide 'etaf-css-important-tests) 101 | ;;; etaf-css-important-tests.el ends here 102 | -------------------------------------------------------------------------------- /refers/etaf-face.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-face.el 2 | ;;; 设置亮色或暗色主体下自适应的face，支持同时定义 text properties 和 overlay 3 | ;;; 1.overlay 属性的关键词以 :ov- 为前缀 4 | ;;; 2.使用定义的 etaf face 渲染文本时，会先将 text properties 设置到文本中 5 | ;;; 3.在插入文本时，再将 overlay 设置到 buffer 的文本区域 6 | 7 | (require 'etaf-utils) 8 | 9 | (defvar etaf-face-list nil) 10 | 11 | (defun etaf-theme-dark-p () 12 | (eq (frame-parameter nil 'background-mode) 'dark)) 13 | 14 | (defun etaf-theme-light-p () 15 | (eq (frame-parameter nil 'background-mode) 'light)) 16 | 17 | (defun etaf-face--function (name) 18 | (intern (concat "etaf-" (symbol-name name) "-face"))) 19 | 20 | (defun etaf-face--ov-convert (key) 21 | "Convert a etaf ov face to the real face keyword." 22 | (intern (concat ":" (string-trim-left (symbol-name key) ":ov-")))) 23 | 24 | (defun etaf-face--ov-p (key) 25 | (string-match ":ov-" (symbol-name key))) 26 | 27 | (defun etaf-face--parse (plist) 28 | "Parse etaf face to a plist '(:text-properties ... :overlay ...). 29 | 30 | The value of :text-properties will be rendered by text properties. 31 | The value of :overlay will be rendered by overlay." 32 | (seq-mapcat 33 | (lambda (group) 34 | (let ((type (car group)) 35 | (kv-alist (cdr group))) 36 | (setcdr 37 | group 38 | (list (etaf-alist->plist 39 | (if (eq :overlay-face type) 40 | (mapcar 41 | (lambda (kv) 42 | (setcar kv (etaf-face--ov-convert (car kv))) 43 | kv) 44 | kv-alist) 45 | kv-alist)))) 46 | group)) 47 | (seq-group-by (lambda (lst) 48 | (if (etaf-face--ov-p (car lst)) 49 | :overlay-face 50 | :property-face)) 51 | (etaf-plist->alist plist)))) 52 | 53 | (defun etaf-face-p (etaf-face) 54 | "Judge of ETAF-FACE is in etaf face type." 55 | (and (functionp (etaf-face--function etaf-face)) 56 | (member etaf-face etaf-face-list))) 57 | 58 | (defun etaf-property-face (etaf-face) 59 | "Return the value of ETAF-FACE as face-text-properties 60 | if the face is in etaf type, otherwise return the symbol 61 | of ETAF-FACE as a normal face." 62 | (cond 63 | ((etaf-face-p etaf-face) 64 | (plist-get (funcall (etaf-face--function etaf-face)) 65 | :property-face)) 66 | ((facep etaf-face) etaf-face) 67 | (t (error "no such face: %S" etaf-face)))) 68 | 69 | (defun etaf-overlay-face (etaf-face) 70 | "Return the value of ETAF-FACE as overlay face if the 71 | face is in etaf type." 72 | (when (etaf-face-p etaf-face) 73 | (plist-get (funcall (etaf-face--function etaf-face)) 74 | :overlay-face))) 75 | 76 | (defmacro define-etaf-face (name &rest kvs) 77 | "Define a etaf face." 78 | (declare (indent defun)) 79 | (let ((func-name (etaf-face--function name))) 80 | (add-to-list 'etaf-face-list name) 81 | `(defun ,func-name () 82 | (cond 83 | ((etaf-theme-dark-p) 84 | (let ((lst (plist-get ',kvs :dark))) 85 | (etaf-face--parse lst))) 86 | ((etaf-theme-light-p) 87 | (let ((lst (plist-get ',kvs :light))) 88 | (etaf-face--parse lst))))))) 89 | 90 | 91 | 92 | ;;; built-in etaf faces 93 | 94 | (define-etaf-face input-normal 95 | :light (:ov-box (:color "#000")) 96 | :dark (:ov-box (:color "#fff"))) 97 | 98 | (define-etaf-face input-disabled 99 | :light (:foreground "#aaa" :ov-box (:color "#000")) 100 | :dark (:foreground "#ccc" :ov-box (:color "#fff"))) 101 | 102 | (provide 'etaf-face) 103 | -------------------------------------------------------------------------------- /docs/etaf-perf-data-inspection.md: -------------------------------------------------------------------------------- 1 | # ETAF Performance Data Inspection 2 | 3 | ## Overview 4 | 5 | The enhanced `etaf-perf` module now supports capturing and inspecting intermediate data structures generated during the rendering pipeline. This feature helps developers understand how ETAF processes templates and identify potential optimizations. 6 | 7 | ## Captured Data Structures 8 | 9 | When data capture is enabled, the following structures are captured: 10 | 11 | 1. **Render Function** - The compiled function generated from ETML (for dynamic templates) 12 | 2. **Virtual DOM (VNode)** - The virtual DOM tree before rendering to real DOM 13 | 3. **DOM Tree** - The actual DOM structure 14 | 4. **CSSOM** - CSS Object Model with parsed styles 15 | 5. **Render Tree** - DOM + CSSOM combined with computed styles 16 | 6. **Layout Tree** - Final layout with calculated positions and dimensions 17 | 18 | ## Usage 19 | 20 | ### Basic Usage 21 | 22 | ```elisp 23 | ;; Enable performance monitoring 24 | (etaf-perf-toggle) 25 | 26 | ;; Ensure data capture is enabled (default: t) 27 | (setq etaf-perf-capture-data t) 28 | 29 | ;; Render something 30 | (etaf-paint-to-buffer "*demo*" 31 | '(div :class "container" 32 | (h1 "{{ title }}") 33 | (ul 34 | (li :e-for "item in items" "{{ item }}"))) 35 | '(:title "Demo" :items ("A" "B" "C"))) 36 | 37 | ;; View captured data 38 | (etaf-perf-show-data) 39 | ``` 40 | 41 | ### Available Commands 42 | 43 | - `etaf-perf-show-data` - Display captured rendering data in a collapsible buffer 44 | - `etaf-perf-show-report` - Display performance metrics (timing information) 45 | - `etaf-perf-show-combined-report` - Display both metrics and data 46 | 47 | ### Data Inspection Buffer 48 | 49 | The data inspection buffer uses `outline-mode` for collapsible sections: 50 | 51 | - **TAB** - Toggle current section (expand/collapse) 52 | - **C-c C-a** - Show all sections 53 | - **C-c C-t** - Hide all sections (show only headers) 54 | - **q** - Quit window 55 | 56 | Each data structure is displayed as a separate collapsible section with pretty-printed content. 57 | 58 | ## Configuration 59 | 60 | ```elisp 61 | ;; Enable/disable data capture (default: t) 62 | (setq etaf-perf-capture-data t) 63 | 64 | ;; Maximum number of measurements to keep in history (default: 100) 65 | (setq etaf-perf-max-history 100) 66 | ``` 67 | 68 | ## Example 69 | 70 | See `examples/etaf-perf-example.el` for a complete example: 71 | 72 | ```elisp 73 | ;; Run the data inspection example 74 | (etaf-perf-example-7-data-inspection) 75 | ``` 76 | 77 | This example demonstrates: 78 | - Rendering a dynamic template with data binding 79 | - Capturing all intermediate data structures 80 | - Displaying the data with collapsible sections 81 | 82 | ## Performance Considerations 83 | 84 | - Data capture adds minimal overhead to rendering 85 | - Captured data is stored in memory until cleared 86 | - For large templates, pretty-printing may take a moment 87 | - Use `etaf-perf-clear` to free memory when done 88 | 89 | ## Debugging Workflow 90 | 91 | 1. Enable performance monitoring: `M-x etaf-perf-toggle` 92 | 2. Render your template normally 93 | 3. Check performance: `M-x etaf-perf-show-report` 94 | 4. Inspect data structures: `M-x etaf-perf-show-data` 95 | 5. Analyze specific stages that take too long 96 | 6. Examine the corresponding data structures for issues 97 | 7. Make optimizations 98 | 8. Re-render and compare results 99 | 100 | ## Notes 101 | 102 | - Static templates (no dynamic content) won't have VNode or render function data 103 | - Data capture is automatic when enabled - no code changes needed 104 | - Each render operation captures a new snapshot 105 | - Use `(etaf-perf-show-data 1)` to view the second most recent capture, etc. 106 | -------------------------------------------------------------------------------- /docs/ETAF-PERF-QUICKSTART.md: -------------------------------------------------------------------------------- 1 | # ETAF Performance Monitoring Quick Start 2 | 3 | ## 快速开始 (Quick Start) 4 | 5 | ### 1. 基础使用 (Basic Usage) 6 | 7 | ```elisp 8 | ;; 加载性能监控模块 9 | (require 'etaf-perf) 10 | 11 | ;; 启用性能监控（单个命令） 12 | (etaf-perf-toggle) 13 | 14 | ;; 正常渲染内容 15 | (etaf-paint-to-buffer "*demo*" 16 | '(div :class "container" 17 | (h1 "Performance Test") 18 | (p "Testing performance monitoring."))) 19 | 20 | ;; 查看性能报告 21 | (etaf-perf-show-report) 22 | 23 | ;; 再次切换以禁用 24 | (etaf-perf-toggle) 25 | ``` 26 | 27 | ### 2. 运行示例 (Run Examples) 28 | 29 | ```elisp 30 | ;; 加载示例文件 31 | (load-file "examples/etaf-perf-example.el") 32 | 33 | ;; 运行示例 1: 基础监控 34 | M-x etaf-perf-example-1-basic 35 | 36 | ;; 运行示例 2: 复杂模板 37 | M-x etaf-perf-example-2-complex 38 | 39 | ;; 运行示例 3: 动态模板 40 | M-x etaf-perf-example-3-dynamic 41 | 42 | ;; 运行示例 4: 批量测试 43 | M-x etaf-perf-example-4-multiple 44 | 45 | ;; 运行示例 5: 性能分析 46 | M-x etaf-perf-example-5-analyze 47 | 48 | ;; 运行示例 6: 静态 vs 动态对比 49 | M-x etaf-perf-example-6-comparison 50 | 51 | ;; 查看所有示例 52 | M-x etaf-perf-demo 53 | ``` 54 | 55 | ### 3. 性能分析 (Performance Analysis) 56 | 57 | ```elisp 58 | ;; 启用监控（单个命令） 59 | (etaf-perf-toggle) 60 | 61 | ;; 渲染多次以获得平均数据 62 | (dotimes (i 10) 63 | (etaf-paint-to-buffer "*test*" 64 | '(div :class "flex flex-col p-4" 65 | (h1 :class "text-2xl font-bold" "Test") 66 | (div :class "grid grid-cols-3 gap-4" 67 | ,@(cl-loop for j from 1 to 20 68 | collect `(div :class "bg-blue-100 p-2" 69 | ,(format "Item %d" j))))))) 70 | 71 | ;; 查看平均性能报告 72 | (etaf-perf-show-report 10) 73 | 74 | ;; 分析性能瓶颈 75 | (etaf-perf-analyze) 76 | ``` 77 | 78 | ### 4. 性能对比 (Performance Comparison) 79 | 80 | ```elisp 81 | ;; 测试静态模板 82 | (etaf-perf-clear) 83 | (dotimes (i 10) 84 | (etaf-paint-to-buffer "*static*" 85 | '(div (h1 "Static Template") (p "Content")))) 86 | (setq static-avg (etaf-perf-get-average)) 87 | 88 | ;; 测试动态模板 89 | (etaf-perf-clear) 90 | (dotimes (i 10) 91 | (etaf-paint-to-buffer "*dynamic*" 92 | '(div (h1 "{{ title }}") (p "{{ content }}")) 93 | '(:title "Dynamic Template" :content "Content"))) 94 | (setq dynamic-avg (etaf-perf-get-average)) 95 | 96 | ;; 比较结果 97 | (message "Static: %.2f ms, Dynamic: %.2f ms" 98 | (plist-get static-avg :total) 99 | (plist-get dynamic-avg :total)) 100 | ``` 101 | 102 | ## 常用命令 (Common Commands) 103 | 104 | | 命令 | 说明 | 105 | |------|------| 106 | | `M-x etaf-perf-toggle` | 开启/关闭性能监控（推荐） | 107 | | `M-x etaf-perf-clear` | 清除性能数据 | 108 | | `M-x etaf-perf-show-report` | 显示性能报告 | 109 | | `M-x etaf-perf-analyze` | 分析性能瓶颈 | 110 | | `M-x etaf-perf-demo` | 查看示例列表 | 111 | 112 | ## 性能报告示例 (Sample Report) 113 | 114 | ``` 115 | === ETAF Performance Report === 116 | 117 | Last Measurement: 118 | Total Time: 15.4235 ms 119 | Stages: 120 | check-dynamic-content : 0.0512 ms ( 0.3%) 121 | etml-to-dom : 2.1523 ms ( 13.9%) 122 | build-stylesheet : 0.0234 ms ( 0.1%) 123 | build-cssom : 3.4512 ms ( 22.4%) 124 | add-stylesheet : 0.1845 ms ( 1.2%) 125 | build-render-tree : 4.2312 ms ( 27.4%) 126 | build-layout-tree : 3.8934 ms ( 25.2%) 127 | layout-to-string : 1.4523 ms ( 9.4%) 128 | 129 | Average of Last 10 Measurements: 130 | Total Time: 14.8512 ms 131 | (Similar breakdown...) 132 | 133 | Total Measurements: 10 134 | ``` 135 | 136 | ## 优化建议 (Optimization Tips) 137 | 138 | 根据性能报告，针对性地优化： 139 | 140 | 1. **CSSOM 构建慢** → 减少 CSS 规则 141 | 2. **渲染树构建慢** → 简化 DOM 结构 142 | 3. **布局计算慢** → 减少 Flexbox 嵌套 143 | 4. **动态编译慢** → 使用静态模板 144 | 145 | ## 更多信息 (More Information) 146 | 147 | 详细文档请参阅: [docs/ETAF-PERF.md](../docs/ETAF-PERF.md) 148 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_hr_HR.txt: -------------------------------------------------------------------------------- 1 | Croatian hyphenation patterns 2 | ----------------------------- 3 | 4 | HYPH hr HR hyph_hr 5 | 6 | These patterns were manually converted from TeX hyphenation patterns using the guide at 7 | http://wiki.services.openoffice.org/wiki/Documentation/SL/Using_TeX_hyphenation_patterns_in_OpenOffice.org 8 | 9 | Original version: 10 | http://tug.org/svn/texhyphen/trunk/hyph-utf8/tex/generic/hyph-utf8/patterns/txt/hyph-hr.pat.txt?revision=416 11 | 12 | License: OpenOffice.org adaption of this file is licensed under the GNU LGPL license. 13 | 14 | Original licence text: 15 | % This file is part of hyph-utf8 package and resulted from 16 | % semi-manual conversions of hyphenation patterns into UTF-8 in June 2008. 17 | % 18 | % Source: hrhyph.tex (1996-04-10) 19 | % Author: Marinović Igor 20 | % 21 | % The above mentioned file should become obsolete, 22 | % and the author of the original file should preferaby modify this file instead. 23 | % 24 | % Modificatios were needed in order to support native UTF-8 engines, 25 | % but functionality (hopefully) didn't change in any way, at least not intentionally. 26 | % This file is no longer stand-alone; at least for 8-bit engines 27 | % you probably want to use loadhyph-foo.tex (which will load this file) instead. 28 | % 29 | % Modifications were done by Jonathan Kew, Mojca Miklavec & Arthur Reutenauer 30 | % with help & support from: 31 | % - Karl Berry, who gave us free hands and all resources 32 | % - Taco Hoekwater, with useful macros 33 | % - Hans Hagen, who did the unicodifisation of patterns already long before 34 | % and helped with testing, suggestions and bug reports 35 | % - Norbert Preining, who tested & integrated patterns into TeX Live 36 | % 37 | % However, the "copyright/copyleft" owner of patterns remains the original author. 38 | % 39 | % The copyright statement of this file is thus: 40 | % 41 | % Do with this file whatever needs to be done in future for the sake of 42 | % "a better world" as long as you respect the copyright of original file. 43 | % If you're the original author of patterns or taking over a new revolution, 44 | % plese remove all of the TUG comments & credits that we added here - 45 | % you are the Queen / the King, we are only the servants. 46 | % 47 | % If you want to change this file, rather than uploading directly to CTAN, 48 | % we would be grateful if you could send it to us (http://tug.org/tex-hyphen) 49 | % or ask for credentials for SVN repository and commit it yourself; 50 | % we will then upload the whole "package" to CTAN. 51 | % 52 | % Before a new "pattern-revolution" starts, 53 | % please try to follow some guidelines if possible: 54 | % 55 | % - \lccode is *forbidden*, and I really mean it 56 | % - all the patterns should be in UTF-8 57 | % - the only "allowed" TeX commands in this file are: \patterns, \hyphenation, 58 | % and if you really cannot do without, also \input and \message 59 | % - in particular, please no \catcode or \lccode changes, 60 | % they belong to loadhyph-foo.tex, 61 | % and no \lefthyphenmin and \righthyphenmin, 62 | % they have no influence here and belong elsewhere 63 | % - \begingroup and/or \endinput is not needed 64 | % - feel free to do whatever you want inside comments 65 | % 66 | % We know that TeX is extremely powerful, but give a stupid parser 67 | % at least a chance to read your patterns. 68 | % 69 | % For more unformation see 70 | % 71 | % http://tug.org/tex-hyphen 72 | % 73 | %------------------------------------------------------------------------------ 74 | % 75 | % Hyphenation patterns for Croatian language 76 | % 77 | % The first version was realised in late 1994. 78 | % Second, much more improved version was realised in the beginning of 1996. 79 | % Date of the last change: 19.03.1996. 80 | % 81 | % Marinović Igor 82 | % migor@student.math.hr 83 | -------------------------------------------------------------------------------- /tests/etaf-css-cache-tests.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-css-cache-tests.el --- Tests for CSS caching -*- lexical-binding: t; -*- 2 | 3 | (require 'etaf-css) 4 | (require 'etaf-css-core) 5 | (require 'etaf-etml) 6 | (require 'etaf-dom) 7 | (require 'etaf-ert) 8 | 9 | ;;; 测试缓存创建 10 | 11 | (should 12 | (let ((cache (etaf-css-cache-create))) 13 | (hash-table-p cache))) 14 | 15 | ;;; 测试缓存设置和获取 16 | 17 | (should 18 | (let* ((cache (etaf-css-cache-create)) 19 | (test-node '(div nil "test")) 20 | (test-style '((color . "red") (font-size . "14px")))) 21 | (etaf-css-cache-set cache test-node test-style) 22 | (equal (etaf-css-cache-get cache test-node) test-style))) 23 | 24 | ;;; 测试缓存未命中 25 | 26 | (should-equal 27 | (let ((cache (etaf-css-cache-create)) 28 | (test-node '(div nil "test"))) 29 | (etaf-css-cache-get cache test-node)) 30 | nil) 31 | 32 | ;;; 测试缓存清空 33 | 34 | (should 35 | (let* ((cache (etaf-css-cache-create)) 36 | (test-node '(div nil "test")) 37 | (test-style '((color . "red")))) 38 | (etaf-css-cache-set cache test-node test-style) 39 | (etaf-css-cache-clear cache) 40 | (null (etaf-css-cache-get cache test-node)))) 41 | 42 | ;;; 测试缓存大小 43 | 44 | (should 45 | (let* ((cache (etaf-css-cache-create)) 46 | (node1 '(div nil "1")) 47 | (node2 '(div nil "2"))) 48 | (etaf-css-cache-set cache node1 '((color . "red"))) 49 | (etaf-css-cache-set cache node2 '((color . "blue"))) 50 | (= (etaf-css-cache-size cache) 2))) 51 | 52 | ;;; 测试 CSSOM 缓存集成 53 | 54 | (should 55 | (let* ((test-dom (etaf-etml-to-dom 56 | '(div :style "color: red;" "Text"))) 57 | (cssom (etaf-css-build-cssom test-dom))) 58 | (hash-table-p (dom-attr cssom 'cssom-cache)))) 59 | 60 | ;;; 测试计算样式缓存命中 61 | 62 | (should 63 | (let* ((test-dom (etaf-etml-to-dom 64 | '(div :style "color: red;" "Text"))) 65 | (cssom (etaf-css-build-cssom test-dom)) 66 | (cache (dom-attr cssom 'cssom-cache))) 67 | ;; 第一次计算 68 | (etaf-css-get-computed-style cssom test-dom test-dom) 69 | ;; 检查缓存命中 70 | (etaf-css-cache-get cache test-dom))) 71 | 72 | ;;; 测试不同标签的字体大小不会互相干扰 73 | ;;; 这个测试确保 h1, h2, h3 等标签各自保持正确的 font-size 值 74 | 75 | (should 76 | (let* ((test-dom (etaf-etml-to-dom 77 | '(div 78 | (h1 "click me") 79 | (h2 "click me") 80 | (h3 "click me")))) 81 | (cssom (etaf-css-build-cssom test-dom)) 82 | (children (dom-children test-dom)) 83 | (h1-node (nth 0 children)) 84 | (h2-node (nth 1 children)) 85 | (h3-node (nth 2 children)) 86 | (h1-style (etaf-css-get-computed-style cssom h1-node test-dom)) 87 | (h2-style (etaf-css-get-computed-style cssom h2-node test-dom)) 88 | (h3-style (etaf-css-get-computed-style cssom h3-node test-dom))) 89 | ;; 检查每个标题有不同的 font-size 90 | (and (equal (cdr (assq 'font-size h1-style)) "1.6") 91 | (equal (cdr (assq 'font-size h2-style)) "1.4") 92 | (equal (cdr (assq 'font-size h3-style)) "1.3")))) 93 | 94 | ;;; 测试内联样式只匹配对应的节点 95 | ;;; 确保内联样式规则使用严格的节点身份匹配 (eq) 96 | 97 | (should 98 | (let* ((test-dom (etaf-etml-to-dom 99 | '(div 100 | (p :style "color: red" "First") 101 | (p :style "color: blue" "Second")))) 102 | (cssom (etaf-css-build-cssom test-dom)) 103 | (children (dom-children test-dom)) 104 | (p1-node (nth 0 children)) 105 | (p2-node (nth 1 children)) 106 | (p1-style (etaf-css-get-computed-style cssom p1-node test-dom)) 107 | (p2-style (etaf-css-get-computed-style cssom p2-node test-dom))) 108 | ;; 两个 p 标签应该有不同的颜色 109 | (and (equal (cdr (assq 'color p1-style)) "red") 110 | (equal (cdr (assq 'color p2-style)) "blue")))) 111 | 112 | (provide 'etaf-css-cache-tests) 113 | ;;; etaf-css-cache-tests.el ends here 114 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_eu.txt: -------------------------------------------------------------------------------- 1 | % Hyphenation patterns for Basque. 2 | % This file has been written by Juan M. Aguirregabiria 3 | % (wtpagagj@lg.ehu.es) on February 1997 and is based 4 | % on the shyphen.sh script that generates the Spanish patterns 5 | % as compiled by Julio Sanchez (jsanchez@gmv.es) on September 1991. 6 | % The original Copyright follows and applies also to this file 7 | % whose last version will be always available by anonymous ftp 8 | % from tp.lc.ehu.es or by poynting your Web browser to 9 | % http://tp.lc.ehu.es/basque.html 10 | % 11 | % Hyphenation patterns for Spanish. 12 | % Compiled by Julio Sanchez (jsanchez@gmv.es) on September 1991. 13 | % These patterns have been derived from "On Word Division in Spanish", 14 | % Jos'e A. Ma~nas, Communications of the ACM, and implemented in his 15 | % package ftc. You can get ftc and a draft of the abovementioned 16 | % paper from goya.dit.upm.es in src/text.proc/ftc.Z. FTP access may 17 | % be available. Otherwise, send help to info@goya.dit.upm.es for 18 | % details on use of the mail server. 19 | % 20 | % Rules mentioned below are those described in that paper. After 21 | % several unsatisfactory attempts to pretend I knew better, these 22 | % patterns closely follow that paper. Pattern 'tl' is not considered. 23 | % It is conflictive and ftc does not use it either. 24 | % 25 | % These patterns have been generated by shyphen.sh version 1.0, 26 | % shyphen.sh is a sh script that allows a number of choices. 27 | % Full benefit from some of these options can only be 28 | % obtained if appropriate fonts are available. 29 | % 30 | % Follows a copyright notice. This is not in the public domain, 31 | % but the copyright is essentially a hold-harmless clause. That 32 | % is, use it at will, but don't sue me if you don't like it. 33 | % 34 | % COPYRIGHT NOTICE 35 | % 36 | % These patterns and the generating sh script are Copyright (c) GMV 1991 37 | % These patterns were developed for internal GMV use and are made 38 | % public in the hope that they will benefit others. Also, spreading 39 | % these patterns throughout the Spanish-language TeX community is 40 | % expected to provide back-benefits to GMV in that it can help keeping 41 | % GMV in the mainstream of spanish users. However, this is given 42 | % for free and WITHOUT ANY WARRANTY. Under no circumstances can Julio 43 | % Sanchez, GMV, Jos'e A. Ma~nas or any agents or representatives thereof 44 | % be held responsible for any errors in this software nor for any damages 45 | % derived from its use, even in case any of the above has been notified 46 | % of the possibility of such damages. If any such situation arises, you 47 | % responsible for repair. Use of this software is an explicit 48 | % acceptance of these conditions. 49 | % 50 | % You can use this software for any purpose. You cannot delete this 51 | % copyright notice. If you change this software, you must include 52 | % comments explaining who, when and why. You are kindly requested to 53 | % send any changes to tex@gmv.es. If you change the generating 54 | % script, you must include code in it such that any output is clearly 55 | % labeled as generated by a modified script. 56 | % 57 | % Despite the lack of warranty, we would like to hear about any 58 | % problem you find. Please report problems to tex@gmv.es. 59 | % 60 | % END OF COPYRIGHT NOTICE 61 | % 62 | % Options included in this set: basic 63 | % Open vowels: a e o 64 | % Closed vowels: i u 65 | % Consonants: b c d f g j k l m n p q r s t v w x y z 66 | % 67 | % Some of the patterns below represent combinations that never 68 | % happen in Basque. Would they happen, they would be hyphenated 69 | % according to the rules. 70 | 71 | % This keeps {cat|lc}code changes, if any, local. Nice to users of 72 | % multilingual versions. These are the minimum changes needed to process 73 | % the patterns. These and other changes will have to be re-enacted when 74 | % Basque be established as the current language. See the babel docs if 75 | % you don't understand this. 76 | 77 | -------------------------------------------------------------------------------- /dictionaries/README_hyph_fr.txt: -------------------------------------------------------------------------------- 1 | _______________________________________________________________________________ 2 | 3 | Motifs de division des mots pour le français (fr) 4 | Version 4.0 (2021-11-06) 5 | 6 | Licence : 7 | GNU LGPL 8 | 9 | Origine : 10 | Basé sur le fichier des motifs de division de TeX *hyph-fr.tex*, 11 | version renommée, en juin 2008, du fichier *frhyph.tex* (V2.12, 12 | 2002/12/11) pour la cohérence avec d'autres fichiers de motifs 13 | de division de la collection hyph-utf8. Pour plus d'informations, 14 | voyez sous ce lien : https://ctan.org/tex-archive/language/hyph-utf8. 15 | Initialement distribué sous la licence LPPL (LaTeX Project Public 16 | License), le fichier *hyph-fr.tex* (v2.12) a été distribué sous 17 | la licence MIT (https://opensource.org/licenses/MIT) à compter 18 | du 20 mars 2016. 19 | 20 | Licence : 21 | Les adaptations pour LibreOffice et OpenOffice sont publiées sous la 22 | licence GNU Lesser General Public License (LGPL) version 2.1 ou 23 | supérieure. 24 | Voir sous ce lien: http://www.gnu.org/licenses/ 25 | 26 | Auteurs : 27 | 3.0-4.0 Marc Lodewijck 28 | 2.0 Paul Pichaureau 29 | 1.0 Blaise Drayer 30 | 31 | Journal : 32 | 4.0 Adaptation des motifs avec trait d'union, ajout de motifs, 33 | suppression des mots-clefs COMPOUNDLEFTHYPHENMIN 34 | et COMPOUNDRIGHTHYPHENMIN (inutilisés) 35 | 3.0.1 Correction : COUMPOUNDLEFTHYPHENMIN -> COMPOUNDLEFTHYPHENMIN 36 | 3.0 Nouvelle version révisée et augmentée : 37 | + Conversion au format UTF-8 38 | + Traitement des noms composés à trait d'union 39 | + Redressement de motifs altérés 40 | 2.0 Traitement des mots avec apostrophe 41 | 1.0 Première conversion 42 | 43 | Ce dictionnaire convient pour toutes les variétés régionales du français. 44 | 45 | _______________________________________________________________________________ 46 | 47 | Hyphenation patterns for French 48 | Version 4.0 (2021-11-06) 49 | 50 | Language: 51 | French (fr) 52 | 53 | License: 54 | GNU LGPL 55 | 56 | Origin: 57 | Based on the TeX hyphenation file *hyph-fr.tex*, renamed (June 2008) 58 | from *frhyph.tex* (V2.12, 2002/12/11) for consistency with other files 59 | in the hyph-utf8 package. For more details, see at the following link: 60 | https://ctan.org/tex-archive/language/hyph-utf8. Initially released 61 | under the LPPL license (LaTeX Project Public License), the file 62 | *hyph-fr.tex* (v2.12) has been released, as of March 20, 2016, under 63 | the MIT license (https://opensource.org/licenses/MIT). 64 | 65 | License: 66 | LibreOffice and OpenOffice adaptions of this package are licensed under 67 | the GNU Lesser General Public License (LGPL) version 2.1 or higher. 68 | See at this link: http://www.gnu.org/licenses/ 69 | 70 | Authors: 71 | 3.0-4.0 Marc Lodewijck 72 | 2.0 Paul Pichaureau 73 | 1.0 Blaise Drayer 74 | 75 | Log: 76 | 4.0 Adjustments to patterns with a hyphen, addition of new 77 | patterns, and deletion of the COMPOUNDLEFTHYPHENMIN and 78 | COMPOUNDRIGHTHYPHENMIN keywords (unused) 79 | 3.0.1 Typo fix: COUMPOUNDLEFTHYPHENMIN -> COMPOUNDLEFTHYPHENMIN 80 | 3.0 New revised and expanded version: 81 | + Conversion to UTF-8 encoding 82 | + Processing of hyphenated compounds 83 | + Correction of altered patterns 84 | 2.0 Fix for words with apostrophe 85 | 1.0 First conversion 86 | 87 | This dictionary is suitable for all regional varieties of French. 88 | -------------------------------------------------------------------------------- /docs/VALIDATION.md: -------------------------------------------------------------------------------- 1 | # 功能实现验证清单 2 | 3 | 根据问题陈述和 CSSOM-COMPARISON.md 文档，验证所有要求的功能是否已实现。 4 | 5 | ## 问题陈述 6 | 7 | > 请实现 CSSOM-COMPARISON.md 中的浏览器cssom中除了 实时更新 以外的其他所有功能，并且重新组织文件，让代码结构更加清晰，不要全部代码都写在一个 etaf-css 中。 8 | 9 | ## 功能验证 10 | 11 | ### ✅ 第一阶段（必需）：基础增强 12 | 13 | #### 1. 特异性计算 14 | - **状态：** ✅ 已实现 15 | - **文件：** `etaf-css-specificity.el` 16 | - **功能：** 17 | - `etaf-css-calculate-specificity` - 计算选择器特异性 18 | - `etaf-css-specificity>` - 比较特异性 19 | - 支持 ID、类、属性、伪类、标签选择器计数 20 | - **测试：** `tests/etaf-css-specificity-tests.el` (已存在) 21 | 22 | #### 2. 层叠算法修复 23 | - **状态：** ✅ 已实现 24 | - **文件：** `etaf-css-cascade.el` 25 | - **功能：** 26 | - `etaf-css-cascade-compare-declarations` - 声明优先级比较 27 | - `etaf-css-cascade-merge-rules` - 规则合并 28 | - 正确处理：!important > inline > 特异性 > 文档顺序 29 | - **测试：** `tests/etaf-css-important-tests.el` 30 | 31 | #### 3. !important 支持 32 | - **状态：** ✅ 已实现 33 | - **文件：** `etaf-css-parser.el`, `etaf-css-cascade.el` 34 | - **功能：** 35 | - 解析器识别 `!important` 标记 36 | - 层叠算法正确处理 !important 优先级 37 | - 样式表 !important 可战胜内联样式普通声明 38 | - **测试：** `tests/etaf-css-important-tests.el` 39 | 40 | ### ✅ 第二阶段（推荐）：性能优化 41 | 42 | #### 4. 缓存机制 43 | - **状态：** ✅ 已实现 44 | - **文件：** `etaf-css-cache.el` 45 | - **功能：** 46 | - `etaf-css-cache-create` - 创建缓存 47 | - `etaf-css-cache-get/set` - 缓存读写 48 | - `etaf-css-clear-cache` - 清除缓存 49 | - 自动缓存计算样式，第二次查询 O(1) 50 | - **测试：** `tests/etaf-css-cache-tests.el` 51 | 52 | #### 5. 规则索引 53 | - **状态：** ✅ 已实现 54 | - **文件：** `etaf-css-index.el` 55 | - **功能：** 56 | - `etaf-css-index-build` - 构建索引 57 | - `etaf-css-index-query-candidates` - 查询候选规则 58 | - 按标签、类、ID 三个维度索引 59 | - 减少不必要的选择器匹配 60 | - **测试：** `tests/etaf-css-index-tests.el` 61 | 62 | ### ✅ 第三阶段（可选）：功能扩展 63 | 64 | #### 6. 继承支持 65 | - **状态：** ✅ 已实现 66 | - **文件：** `etaf-css-inheritance.el` 67 | - **功能：** 68 | - `etaf-css-property-inherits-p` - 检查属性是否可继承 69 | - `etaf-css-apply-inheritance` - 应用继承 70 | - 支持常见可继承属性（color, font-family 等） 71 | - **测试：** `tests/etaf-css-inheritance-tests.el` 72 | 73 | ### ❌ 明确不实现的功能 74 | 75 | 根据要求，以下功能明确不实现： 76 | 77 | #### 7. 实时更新 (Dynamic Updates) 78 | - **状态：** ❌ 明确排除（按要求） 79 | - **原因：** 问题陈述中明确说明「除了实时更新以外」 80 | 81 | #### 8. 媒体查询 (Media Queries) 82 | - **状态：** ✅ 已实现 83 | - **文件：** `etaf-css-media.el` 84 | - **功能：** 支持 @media 规则解析和评估，支持常见媒体类型和特性 85 | - **测试：** `tests/etaf-css-media-tests.el` 86 | 87 | #### 9. @规则 (@rules) 88 | - **状态：** ⭕ 部分实现（@media 已支持，其他待扩展） 89 | - **原因：** CSSOM-COMPARISON.md 中标记为「未来扩展」 90 | 91 | ## 代码结构重组验证 92 | 93 | ### ✅ 旧结构 94 | ``` 95 | etaf-css.el (单一文件，所有代码约 335 行) 96 | ``` 97 | 98 | ### ✅ 新结构（模块化） 99 | ``` 100 | etaf-css.el (240 行) - 主入口点 101 | ├── etaf-css-parser.el (185 行) - CSS 解析（支持 @media） 102 | ├── etaf-css-specificity.el (130) - 特异性计算 103 | ├── etaf-css-cascade.el (120) - 层叠算法 104 | ├── etaf-css-inheritance.el (82) - 属性继承 105 | ├── etaf-css-cache.el (70) - 缓存系统 106 | ├── etaf-css-index.el (150) - 规则索引 107 | └── etaf-css-media.el (220) - 媒体查询 108 | ``` 109 | 110 | **验证结果：** ✅ 代码已从单一文件重组为清晰的模块化结构 111 | 112 | ## 向后兼容性验证 113 | 114 | ### ✅ 公共 API 115 | - `etaf-css-build-cssom` - ✅ 保持兼容（新增可选 media-env 参数） 116 | - `etaf-css-get-computed-style` - ✅ 保持不变 117 | - `etaf-css-get-rules-for-node` - ✅ 保持不变 118 | - 返回格式 `((property . value) ...)` - ✅ 保持兼容 119 | 120 | ### ✅ 测试更新 121 | - `tests/etaf-css-tests.el` - ✅ 已更新以匹配新格式 122 | - 新增 5 个测试文件 - ✅ 覆盖所有新功能（含媒体查询） 123 | 124 | ### ✅ 文档 125 | - `CSS-MODULES.md` - ✅ 模块架构文档（已更新） 126 | - `IMPLEMENTATION-SUMMARY.md` - ✅ 实现总结（已更新） 127 | - `examples/etaf-css-example.el` - ✅ 更新示例（含媒体查询示例） 128 | 129 | ## 性能验证 130 | 131 | ### 理论分析 132 | - **查询复杂度：** O(n×m) → O(k×log k)，k << n 133 | - **缓存命中：** O(1) 134 | - **预期提升：** 10-100x 135 | 136 | ### 优化措施 137 | 1. ✅ 规则索引 - 减少候选规则数量 138 | 2. ✅ 计算样式缓存 - 避免重复计算 139 | 3. ✅ 特异性预计算 - 在构建 CSSOM 时完成 140 | 141 | ## 总结 142 | 143 | ### 完成情况统计 144 | - ✅ 必需功能：3/3 (100%) 145 | - ✅ 推荐功能：2/2 (100%) 146 | - ✅ 可选功能：2/3 (67%，继承和媒体查询已实现) 147 | - ❌ 排除功能：1 (实时更新，按要求) 148 | - ⭕ 未来功能：1 (@规则的其他类型) 149 | 150 | ### 代码统计 151 | - 新增模块：7 个（含媒体查询模块） 152 | - 新增代码：约 1287 行（+420 行媒体查询相关） 153 | - 重构代码：约 240 行（etaf-css.el） 154 | - 新增测试：5 个文件 155 | - 新增文档：2 个文件（已更新） 156 | 157 | ### 质量保证 158 | - ✅ 所有必需功能已实现 159 | - ✅ 媒体查询功能已实现 160 | - ✅ 代码模块化，职责清晰 161 | - ✅ 向后兼容，API 保持兼容 162 | - ✅ 测试覆盖全面 163 | - ✅ 文档详细完整 164 | 165 | ## 结论 166 | 167 | **所有要求的功能均已实现。** 168 | 169 | 根据问题陈述： 170 | 1. ✅ 实现了 CSSOM-COMPARISON.md 中除「实时更新」外的所有核心功能 171 | 2. ✅ 重新组织了代码结构，从单一文件变为清晰的模块化架构 172 | 3. ✅ 保持了向后兼容性 173 | 4. ✅ 提供了全面的测试和文档 174 | 175 | 任务完成度：100% 176 | -------------------------------------------------------------------------------- /examples/etaf-scroll-example.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-scroll-example.el --- Example of scroll and incremental update -*- lexical-binding: t; -*- 2 | 3 | ;;; Commentary: 4 | 5 | ;; This file demonstrates: 6 | ;; 1. Interactive scrolling in rendered ETML 7 | ;; 2. Incremental update of ETML content in buffer 8 | 9 | ;;; Code: 10 | 11 | (require 'etaf) 12 | (require 'etaf-layout-interactive) 13 | 14 | ;;; ============================================================ 15 | ;;; 1. 可滚动内容示例 16 | ;;; ============================================================ 17 | 18 | ;; 创建一个带有滚动条的 ETML 元素 19 | ;; 内容超出了指定的高度（5lh），所以会出现滚动条 20 | 21 | (defvar etaf-scroll-example-etml 22 | '(div :style "width: 300px; padding: 10px" 23 | ;; 可滚动的内容区域 24 | (div :style "overflow-y: auto; height: 5lh; border-width: 1px" 25 | "Line 1: Hello World 26 | Line 2: This is a test 27 | Line 3: Scrollable content 28 | Line 4: Use n/p to scroll 29 | Line 5: Or mouse wheel 30 | Line 6: Content continues 31 | Line 7: Below visible area 32 | Line 8: Keep scrolling 33 | Line 9: Almost there 34 | Line 10: Last line")) 35 | "示例 ETML：一个可滚动的内容区域") 36 | 37 | (defun etaf-scroll-example-render () 38 | "渲染可滚动示例到 buffer 中。 39 | 渲染后可以使用: 40 | - n 键或鼠标滚轮向下滚动 41 | - p 键或鼠标滚轮向上滚动" 42 | (interactive) 43 | (etaf-paint-to-buffer "*etaf-scroll-example*" 44 | etaf-scroll-example-etml 45 | 400 300)) 46 | 47 | ;;; ============================================================ 48 | ;;; 2. 增量更新示例 49 | ;;; ============================================================ 50 | 51 | ;; 增量更新允许你更新 buffer 中特定区域的内容， 52 | ;; 而不需要重新渲染整个页面。 53 | 54 | (defun etaf-incremental-update-example () 55 | "演示增量更新 API 的使用。" 56 | (interactive) 57 | (let ((buffer (get-buffer-create "*etaf-incremental-example*"))) 58 | (with-current-buffer buffer 59 | ;; 初始化缓存 60 | (etaf-layout-caches-init) 61 | ;; 插入一些带有 uuid 属性的内容 62 | (erase-buffer) 63 | (insert (propertize "Original Text" 'etaf-layout-content-line "text-uuid-1")) 64 | (insert "\n") 65 | (insert (propertize "Another Text" 'etaf-layout-content-line "text-uuid-2")) 66 | ;; 显示 buffer 67 | (etaf-pop-to-buffer buffer)) 68 | 69 | ;; 展示增量更新 70 | (message "正在更新文本...") 71 | (sit-for 1) 72 | 73 | ;; 更新第一个区域的文本 74 | (etaf-buffer-update-text buffer "text-uuid-1" "Updated Text!") 75 | (message "文本已更新！") 76 | (sit-for 1) 77 | 78 | ;; 更新第二个区域的样式 79 | (etaf-buffer-update-style buffer "text-uuid-2" 80 | '((color . "red") (font-weight . "bold"))) 81 | (message "样式已更新！"))) 82 | 83 | ;;; ============================================================ 84 | ;;; 3. 带数据绑定的滚动示例 85 | ;;; ============================================================ 86 | 87 | (defvar etaf-scroll-data-example-template 88 | '(div :style "width: 400px; padding: 15px" 89 | (h2 "{{ title }}") 90 | (div :style "overflow-y: auto; height: 6lh; padding: 5px; background: #f0f0f0" 91 | :e-for "item in items" 92 | (p "{{ item }}"))) 93 | "带数据绑定的滚动示例模板") 94 | 95 | (defun etaf-scroll-data-example () 96 | "渲染带数据的可滚动列表。" 97 | (interactive) 98 | (let ((data '(:title "可滚动列表" 99 | :items ("项目 1: 第一项内容" 100 | "项目 2: 第二项内容" 101 | "项目 3: 第三项内容" 102 | "项目 4: 第四项内容" 103 | "项目 5: 第五项内容" 104 | "项目 6: 第六项内容" 105 | "项目 7: 第七项内容" 106 | "项目 8: 第八项内容" 107 | "项目 9: 第九项内容" 108 | "项目 10: 第十项内容")))) 109 | (etaf-paint-to-buffer-with-data "*etaf-scroll-data-example*" 110 | etaf-scroll-data-example-template 111 | data 112 | 500 400))) 113 | 114 | ;;; ============================================================ 115 | ;;; 使用说明 116 | ;;; ============================================================ 117 | 118 | ;; 运行以下命令来测试各个示例: 119 | ;; 120 | ;; 1. 基本滚动: 121 | ;; M-x etaf-scroll-example-render 122 | ;; 然后将光标移动到可滚动区域，使用 n/p 键或鼠标滚轮滚动 123 | ;; 124 | ;; 2. 增量更新: 125 | ;; M-x etaf-incremental-update-example 126 | ;; 观察文本和样式如何被增量更新 127 | ;; 128 | ;; 3. 带数据的滚动列表: 129 | ;; M-x etaf-scroll-data-example 130 | ;; 渲染一个带有数据绑定的可滚动列表 131 | 132 | (provide 'etaf-scroll-example) 133 | ;;; etaf-scroll-example.el ends here 134 | -------------------------------------------------------------------------------- /dictionaries/hyph_it_IT.dic: -------------------------------------------------------------------------------- 1 | UTF-8 2 | .a3p2n 3 | .a1p 4 | .anti1 5 | .a1n 6 | .a2n1t 7 | .a1nti3m2n 8 | .anti1m 9 | .bio1 10 | .1b 11 | .1c2 12 | .ca4p3s2 13 | .ca1p 14 | .circu2m1 15 | .ci1r 16 | .1ci2r1c 17 | .contro1 18 | .co1n 19 | .co2n1t 20 | .cont2r 21 | .1d2 22 | .di2s3cine 23 | .di1s2 24 | .dis1c 25 | .disci1n 26 | .e2x1eu 27 | .e1x 28 | .fra2n2k3 29 | .1f 30 | .f2r 31 | .fra1n 32 | .free3 33 | .narco1 34 | .1n 35 | .na1r 36 | .na2r1c 37 | .opto1 38 | .o1p 39 | .o2p1t 40 | .orto3p2 41 | .o1r 42 | .o2r1t 43 | .para1 44 | .1p 45 | .pa1r 46 | .1poli3p2 47 | .po1l 48 | .pre1 49 | .p2r 50 | .2p2s2 51 | .1re1i2sc2r 52 | .1r 53 | .rei1s2 54 | .reis1c 55 | .sha2re3 56 | .1s2 57 | .s1h 58 | .sha1r 59 | .tran2s3c 60 | .1t 61 | .t2r 62 | .tra1n 63 | .tra2n1s2 64 | .tran2s3d 65 | .tran2s3l 66 | .tra1n2s3n 67 | .tran2s3p 68 | .t1ran2s3r 69 | .1tran2s3t 70 | .su2b3lu 71 | .su1b 72 | .sub2l 73 | .su2b3r 74 | .wa2g3n 75 | .1w 76 | .wa1g 77 | .we2l2t1 78 | .we1l 79 | '2 80 | a1ia 81 | a1ie 82 | a1io 83 | a1iu 84 | a1uo 85 | a1ya 86 | 2a2t. 87 | a1t 88 | e1iu 89 | e2w 90 | o1ia 91 | o1ie 92 | o1io 93 | o1iu 94 | 1b 95 | 2b1b 96 | 2b1c 97 | 2b1d 98 | 2b1f 99 | 2b1m 100 | 2b1n 101 | 2b1p 102 | 2b1s2 103 | 2b1t 104 | 2b1v 105 | b2l 106 | b2r 107 | 2b. 108 | 2b'2 109 | 1c 110 | 2c1b 111 | 2c1c 112 | 2c1d 113 | 2c1f 114 | 2c1k 115 | 2c1m 116 | 2c1n 117 | 2c1q 118 | 2c1s2 119 | 2c1t 120 | 2c1z 121 | c2h 122 | 2c2h1h 123 | 2c2h1b 124 | c2h2r 125 | 2c2h1n 126 | c2l 127 | c2r 128 | 2c. 129 | 2c'2 130 | 1d 131 | 2d1b 132 | 2d1d 133 | 2d1g 134 | 2d1l 135 | 2d1m 136 | 2d1n 137 | 2d1p 138 | d2r 139 | 2d1s2 140 | 2d1t 141 | 2d1v 142 | 2d1w 143 | 2d. 144 | 2d'2 145 | 1f 146 | 2f1b 147 | 2f1g 148 | 2f1f 149 | 2f1n 150 | f2l 151 | f2r 152 | 2f1s2 153 | 2f1t 154 | 2f. 155 | 2f'2 156 | 1g 157 | 2g1b 158 | 2g1d 159 | 2g1f 160 | 2g1g 161 | g2h 162 | g2l 163 | 2g1m 164 | g2n 165 | 2g1p 166 | g2r 167 | 2g1s2 168 | 2g1t 169 | 2g1v 170 | 2g1w 171 | 2g1z 172 | 2gh2t 173 | 2g. 174 | 2g'2 175 | 1h 176 | 2h1b 177 | 2h1d 178 | 2h1h 179 | hi3p2n 180 | hi1p 181 | h2l 182 | 2h1m 183 | 2h1n 184 | 2h1r 185 | 2h1v 186 | 2h. 187 | 2h'2 188 | 1j 189 | 2j. 190 | 2j'2 191 | 1k 192 | 2k1g 193 | 2k1f 194 | k2h 195 | 2k1k 196 | k2l 197 | 2k1m 198 | k2r 199 | 2k1s2 200 | 2k1t 201 | 2k. 202 | 2k'2 203 | 1l 204 | 2l1b 205 | 2l1c 206 | 2l1d 207 | 2l3f2 208 | 2l1g 209 | l2h 210 | 2l1k 211 | 2l1l 212 | 2l1m 213 | 2l1n 214 | 2l1p 215 | 2l1q 216 | 2l1r 217 | 2l1s2 218 | 2l1t 219 | 2l1v 220 | 2l1w 221 | 2l1z 222 | 2l. 223 | 2l'. 224 | l'2 225 | 2l'2'2 226 | 1m 227 | 2m1b 228 | 2m1c 229 | 2m1f 230 | 2m1l 231 | 2m1m 232 | 2m1n 233 | 2m1p 234 | 2m1q 235 | 2m1r 236 | 2m1s2 237 | 2m1t 238 | 2m1v 239 | 2m1w 240 | 2m. 241 | 2m'2 242 | 1n 243 | 2n1b 244 | 2n1c 245 | 2n1d 246 | 2n1f 247 | 2n1g 248 | 2n1k 249 | 2n1l 250 | 2n1m 251 | 2n1n 252 | 2n1p 253 | 2n1q 254 | 2n1r 255 | 2n1s2 256 | n2s3fe1r 257 | ns1f 258 | 2n1t 259 | 2n1v 260 | 2n1z 261 | 1n2g3n 262 | 2nhei1t 263 | n1h 264 | 2n. 265 | 2n'2 266 | 1p 267 | 2p1d 268 | p2h 269 | p2l 270 | 2p1n 271 | 3p2ne 272 | 2p1p 273 | p2r 274 | 2p1s2 275 | 3p2si1c 276 | 2p1t 277 | 2p1z 278 | 2p. 279 | 2p'2 280 | 1q 281 | 2q1q 282 | 2q. 283 | 2q'2 284 | 1r 285 | 2r1b 286 | 2r1c 287 | 2r1d 288 | 2r1f 289 | r2h 290 | 2r1g 291 | 2r1k 292 | 2r1l 293 | 2r1m 294 | 2r1n 295 | 2r1p 296 | 2r1q 297 | 2r1r 298 | 2r1s2 299 | 2r1t 300 | r2t2s3 301 | 2r1v 302 | 2r1x 303 | 2r1w 304 | 2r1z 305 | 2r. 306 | 2r'2 307 | 1s2 308 | 2s2h1m 309 | s1h 310 | 2s3s2 311 | s4s3m 312 | 2s3p2n 313 | s1p 314 | 2s2t1b 315 | s1t 316 | 2s2t1c 317 | 2s2t1d 318 | 2s2t1f 319 | 2s2t1g 320 | 2s2t1m 321 | 2s2t1n 322 | 2s2t1p 323 | 2s2t2s2 324 | 2s2t1t 325 | 2s2t1v 326 | 2s1z 327 | 4s. 328 | 4s'. 329 | s'2 330 | 4s'2'2 331 | 1t 332 | 2t1b 333 | 2t1c 334 | 2t1d 335 | 2t1f 336 | 2t1g 337 | t2h 338 | t2l 339 | 2t1m 340 | 2t1n 341 | 2t1p 342 | t2r 343 | t2s2 344 | 3t2sc2h 345 | ts1c 346 | 2t1t 347 | t2t3s2 348 | 2t1v 349 | 2t1w 350 | t2z 351 | 2tz1k 352 | t2z2s2 353 | 2t. 354 | 2t'. 355 | t'2 356 | 2t'2'2 357 | 1v 358 | 2v1c 359 | v2l 360 | v2r 361 | 2v1v 362 | 2v. 363 | 2v'. 364 | v'2 365 | 2v'2'2 366 | 1w 367 | w2h 368 | wa2r 369 | 2w1y 370 | 2w. 371 | 2w'2 372 | 1x 373 | 2x1b 374 | 2x1c 375 | 2x1f 376 | 2x1h 377 | 2x1m 378 | 2x1p 379 | 2x1t 380 | 2x1w 381 | 2x. 382 | 2x'2 383 | y1ou 384 | y1i 385 | 1z 386 | 2z1b 387 | 2z1d 388 | 2z1l 389 | 2z1n 390 | 2z1p 391 | 2z1t 392 | 2z1s2 393 | 2z1v 394 | 2z1z 395 | 2z. 396 | 2z'. 397 | z'2 398 | 2z'2'2 399 | .1z2 400 | 3zo3o 401 | lo3gi3a. 402 | go3gi3a. 403 | .tri3a 404 | sco2ot 405 | co1o 406 | obi3a. 407 | a1e1ro 408 | a1e1ra 409 | a1e1re 410 | re1o 411 | bu1i 412 | ri1tm 413 | te1a 414 | te1o 415 | tri1a. 416 | patri2a 417 | stri2a 418 | utri2a 419 | archi1a. 420 | .tarchi2a. 421 | fagi1a. 422 | -------------------------------------------------------------------------------- /tests/etaf-css-face-tests.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-css-face-tests.el --- Tests for CSS to face mapping -*- lexical-binding: t; -*- 2 | 3 | ;;; Commentary: 4 | ;; Tests for CSS to Emacs face property mapping 5 | 6 | ;;; Code: 7 | 8 | (require 'ert) 9 | (require 'etaf-css-face) 10 | 11 | ;;; Tests for color conversion 12 | 13 | (ert-deftest etaf-css-face-test-color-hex () 14 | "Test hex color conversion." 15 | (should (equal (etaf-css-color-to-emacs "#ff0000") "#ff0000")) 16 | (should (equal (etaf-css-color-to-emacs "#fff") "#fff")) 17 | (should (equal (etaf-css-color-to-emacs "#aabbcc") "#aabbcc"))) 18 | 19 | (ert-deftest etaf-css-face-test-color-rgb () 20 | "Test rgb() color conversion." 21 | (should (equal (etaf-css-color-to-emacs "rgb(255, 0, 0)") "#ff0000")) 22 | (should (equal (etaf-css-color-to-emacs "rgb(0, 255, 0)") "#00ff00")) 23 | (should (equal (etaf-css-color-to-emacs "rgb(0, 0, 255)") "#0000ff"))) 24 | 25 | (ert-deftest etaf-css-face-test-color-named () 26 | "Test named color conversion." 27 | (should (equal (etaf-css-color-to-emacs "red") "red")) 28 | (should (equal (etaf-css-color-to-emacs "blue") "blue")) 29 | (should (equal (etaf-css-color-to-emacs "green") "green"))) 30 | 31 | ;;; Tests for font-weight conversion 32 | 33 | (ert-deftest etaf-css-face-test-font-weight () 34 | "Test font-weight conversion." 35 | (should (eq (etaf-css-font-weight-to-emacs "bold") 'bold)) 36 | (should (eq (etaf-css-font-weight-to-emacs "700") 'bold)) 37 | (should (eq (etaf-css-font-weight-to-emacs "normal") 'normal)) 38 | (should (eq (etaf-css-font-weight-to-emacs "lighter") 'light))) 39 | 40 | ;;; Tests for font-style conversion 41 | 42 | (ert-deftest etaf-css-face-test-font-style () 43 | "Test font-style conversion." 44 | (should (eq (etaf-css-font-style-to-emacs "italic") 'italic)) 45 | (should (eq (etaf-css-font-style-to-emacs "oblique") 'oblique)) 46 | (should (eq (etaf-css-font-style-to-emacs "normal") 'normal))) 47 | 48 | ;;; Tests for font-size conversion 49 | 50 | (ert-deftest etaf-css-face-test-font-size () 51 | "Test font-size conversion to :height." 52 | ;; Numeric values 53 | (should (= (etaf-css-font-size-to-emacs 1.4) 1.4)) 54 | (should (= (etaf-css-font-size-to-emacs 1.0) 1.0)) 55 | ;; Numeric strings (unitless) - important for etaf-etml-tag.el compatibility 56 | (should (= (etaf-css-font-size-to-emacs "1.4") 1.4)) 57 | (should (= (etaf-css-font-size-to-emacs "1.6") 1.6)) 58 | (should (= (etaf-css-font-size-to-emacs "1") 1.0)) 59 | (should (= (etaf-css-font-size-to-emacs "2.0") 2.0)) 60 | ;; px values 61 | (should (= (etaf-css-font-size-to-emacs "16px") 1.0)) 62 | (should (= (etaf-css-font-size-to-emacs "32px") 2.0)) 63 | ;; em values 64 | (should (= (etaf-css-font-size-to-emacs "1.5em") 1.5)) 65 | ;; CSS keywords 66 | (should (= (etaf-css-font-size-to-emacs "medium") 1.0)) 67 | (should (= (etaf-css-font-size-to-emacs "larger") 1.2))) 68 | 69 | (ert-deftest etaf-css-face-test-font-size-in-style-to-face () 70 | "Test font-size is correctly converted to :height in style-to-face." 71 | ;; Numeric font-size 72 | (let ((face (etaf-css-style-to-face '((font-size . 1.4))))) 73 | (should (= (plist-get face :height) 1.4))) 74 | ;; String numeric font-size (unitless) 75 | (let ((face (etaf-css-style-to-face '((font-size . "1.6"))))) 76 | (should (= (plist-get face :height) 1.6))) 77 | ;; px font-size (20px / 16px baseline = 1.25) 78 | (let ((face (etaf-css-style-to-face '((font-size . "20px"))))) 79 | (should (= (plist-get face :height) 1.25)))) 80 | 81 | ;;; Tests for text-decoration conversion 82 | 83 | (ert-deftest etaf-css-face-test-text-decoration () 84 | "Test text-decoration conversion." 85 | (should (plist-get (etaf-css-text-decoration-to-emacs "underline") :underline)) 86 | (should (plist-get (etaf-css-text-decoration-to-emacs "line-through") :strike-through)) 87 | (should (plist-get (etaf-css-text-decoration-to-emacs "overline") :overline))) 88 | 89 | ;;; Tests for style-to-face conversion 90 | 91 | (ert-deftest etaf-css-face-test-style-to-face () 92 | "Test complete style-to-face conversion." 93 | (let ((face (etaf-css-style-to-face '((color . "red") (font-weight . "bold"))))) 94 | (should (equal (plist-get face :foreground) "red")) 95 | (should (eq (plist-get face :weight) 'bold)))) 96 | 97 | (ert-deftest etaf-css-face-test-apply-face () 98 | "Test applying face to string." 99 | (let ((result (etaf-css-apply-face-to-string "hello" '((color . "red"))))) 100 | (should (stringp result)) 101 | (should (equal (length result) 5)) 102 | ;; Check that face property is set 103 | (should (get-text-property 0 'face result)))) 104 | 105 | (provide 'etaf-css-face-tests) 106 | ;;; etaf-css-face-tests.el ends here 107 | -------------------------------------------------------------------------------- /tests/etaf-css-media-tests.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-css-media-tests.el --- Tests for etaf-css-media -*- lexical-binding: t; -*- 2 | 3 | (require 'etaf-css) 4 | (require 'etaf-css-parser) 5 | (require 'etaf-etml) 6 | (require 'etaf-dom) 7 | (require 'etaf-ert) 8 | 9 | ;;; 测试媒体类型匹配 10 | 11 | (should-equal 12 | (etaf-css-media-match-type-p "all" '((type . screen))) 13 | t) 14 | 15 | (should-equal 16 | (etaf-css-media-match-type-p "screen" '((type . screen))) 17 | t) 18 | 19 | (should-equal 20 | (etaf-css-media-match-type-p "print" '((type . screen))) 21 | nil) 22 | 23 | (should-equal 24 | (etaf-css-media-match-type-p "screen" '((type . print))) 25 | nil) 26 | 27 | ;;; 测试媒体特性解析 28 | 29 | (should-equal 30 | (etaf-css-media-parse-feature "min-width: 768px") 31 | '(width min 768)) 32 | 33 | (should-equal 34 | (etaf-css-media-parse-feature "max-width: 1024px") 35 | '(width max 1024)) 36 | 37 | (should-equal 38 | (etaf-css-media-parse-feature "width: 800px") 39 | '(width equal 800)) 40 | 41 | ;;; 测试媒体特性评估 42 | 43 | (should-equal 44 | (etaf-css-media-evaluate-feature 'width 'min 768 '((width . 1024))) 45 | t) 46 | 47 | (should-equal 48 | (etaf-css-media-evaluate-feature 'width 'min 768 '((width . 500))) 49 | nil) 50 | 51 | (should-equal 52 | (etaf-css-media-evaluate-feature 'width 'max 1024 '((width . 800))) 53 | t) 54 | 55 | (should-equal 56 | (etaf-css-media-evaluate-feature 'width 'max 1024 '((width . 1200))) 57 | nil) 58 | 59 | (should-equal 60 | (etaf-css-media-evaluate-feature 'width 'equal 800 '((width . 800))) 61 | t) 62 | 63 | ;;; 测试完整媒体查询匹配 64 | 65 | (should-equal 66 | (etaf-css-media-match-p "screen" '((type . screen) (width . 1024))) 67 | t) 68 | 69 | (should-equal 70 | (etaf-css-media-match-p "print" '((type . screen) (width . 1024))) 71 | nil) 72 | 73 | (should-equal 74 | (etaf-css-media-match-p "screen and (min-width: 768px)" '((type . screen) (width . 1024))) 75 | t) 76 | 77 | (should-equal 78 | (etaf-css-media-match-p "screen and (min-width: 768px)" '((type . screen) (width . 500))) 79 | nil) 80 | 81 | (should-equal 82 | (etaf-css-media-match-p "screen and (max-width: 1024px)" '((type . screen) (width . 800))) 83 | t) 84 | 85 | (should-equal 86 | (etaf-css-media-match-p "screen and (min-width: 768px) and (max-width: 1024px)" 87 | '((type . screen) (width . 900))) 88 | t) 89 | 90 | (should-equal 91 | (etaf-css-media-match-p "screen and (min-width: 768px) and (max-width: 1024px)" 92 | '((type . screen) (width . 500))) 93 | nil) 94 | 95 | ;;; 测试 @media 块提取 96 | 97 | (should-equal 98 | (length (etaf-css-media-extract-at-media-blocks 99 | "@media screen { .test { color: red; } }")) 100 | 1) 101 | 102 | (should-equal 103 | (nth 0 (car (etaf-css-media-extract-at-media-blocks 104 | "@media screen { .test { color: red; } }"))) 105 | "screen") 106 | 107 | (should-equal 108 | (length (etaf-css-media-extract-at-media-blocks 109 | "@media screen { .a { color: red; } } 110 | @media print { .b { color: blue; } }")) 111 | 2) 112 | 113 | ;;; 测试带 @media 的 CSSOM 构建 114 | 115 | (setq test-dom 116 | (etaf-etml-to-dom 117 | '(html 118 | (head 119 | (style " 120 | .desktop { display: block; } 121 | @media screen and (min-width: 768px) { 122 | .mobile { display: none; } 123 | .desktop { font-size: 18px; } 124 | } 125 | @media screen and (max-width: 767px) { 126 | .mobile { display: block; } 127 | .desktop { display: none; } 128 | } 129 | ")) 130 | (body 131 | (div :class "mobile" "Mobile content") 132 | (div :class "desktop" "Desktop content"))))) 133 | 134 | ;; 测试桌面环境（宽度 >= 768px） 135 | (setq desktop-cssom (etaf-css-build-cssom test-dom '((type . screen) (width . 1024)))) 136 | (setq desktop-node (dom-by-class test-dom "desktop")) 137 | (setq desktop-style (etaf-css-get-computed-style desktop-cssom desktop-node test-dom)) 138 | 139 | ;; desktop 应该有 display: block 和 font-size: 18px 140 | (should 141 | (assq 'display desktop-style)) 142 | 143 | (should 144 | (assq 'font-size desktop-style)) 145 | 146 | ;; 测试移动环境（宽度 < 768px） 147 | (setq mobile-cssom (etaf-css-build-cssom test-dom '((type . screen) (width . 375)))) 148 | (setq mobile-node (dom-by-class test-dom "mobile")) 149 | (setq mobile-style (etaf-css-get-computed-style mobile-cssom mobile-node test-dom)) 150 | 151 | ;; mobile 应该有 display: block 152 | (should 153 | (assq 'display mobile-style)) 154 | 155 | ;;; 测试空媒体查询（匹配所有） 156 | 157 | (should-equal 158 | (etaf-css-media-match-p "" '((type . screen))) 159 | t) 160 | 161 | (should-equal 162 | (etaf-css-media-match-p nil '((type . screen))) 163 | t) 164 | 165 | (message "All etaf-css-media tests passed!") 166 | 167 | (provide 'etaf-css-media-tests) 168 | ;;; etaf-css-media-tests.el ends here 169 | -------------------------------------------------------------------------------- /examples/etaf-render-example.el: -------------------------------------------------------------------------------- 1 | ;;; etaf-render-example.el --- Render tree usage examples -*- lexical-binding: t; -*- 2 | 3 | ;;; Commentary: 4 | ;; Examples demonstrating render tree construction and usage 5 | 6 | ;;; Code: 7 | 8 | (require 'etaf-render) 9 | (require 'etaf-etml) 10 | (require 'etaf-css) 11 | (require 'etaf-ecss) 12 | 13 | ;;; Example 1: Basic render tree construction 14 | 15 | (message "=== Example 1: Basic Render Tree ===") 16 | 17 | (setq example-dom 18 | (etaf-etml-to-dom 19 | '(html 20 | (head 21 | (style "div { display: block; color: blue; } 22 | span { display: inline; color: green; }")) 23 | (body 24 | (div "Header") 25 | (div 26 | (span "Text 1") 27 | (span "Text 2")))))) 28 | 29 | (setq example-cssom (etaf-css-build-cssom example-dom)) 30 | (setq example-render-tree (etaf-render-build-tree example-dom example-cssom)) 31 | 32 | (message "\nRender tree structure:") 33 | (message "%s" (etaf-render-to-string example-render-tree)) 34 | 35 | ;;; Example 2: Filtering invisible elements 36 | 37 | (message "\n=== Example 2: Filtering Invisible Elements ===") 38 | 39 | (setq hidden-dom 40 | (etaf-etml-to-dom 41 | '(html 42 | (head 43 | (style ".hidden { display: none; } 44 | div { color: red; }")) 45 | (body 46 | (div "Visible 1") 47 | (div :class "hidden" "This is hidden") 48 | (div "Visible 2"))))) 49 | 50 | (setq hidden-cssom (etaf-css-build-cssom hidden-dom)) 51 | (setq hidden-render-tree (etaf-render-build-tree hidden-dom hidden-cssom)) 52 | 53 | (message "\nVisible nodes in render tree:") 54 | (etaf-render-walk hidden-render-tree 55 | (lambda (node) 56 | (when (eq (dom-tag node) 'div) 57 | (message "
display: %s" (etaf-render-get-display node))))) 58 | 59 | ;;; Example 3: Querying computed styles 60 | 61 | (message "\n=== Example 3: Querying Computed Styles ===") 62 | 63 | (setq styled-dom 64 | (etaf-etml-to-dom 65 | '(html 66 | (head 67 | (style "div { color: blue; font-size: 14px; } 68 | #special { color: red; background: yellow; }")) 69 | (body 70 | (div "Normal div") 71 | (div :id "special" "Special div"))))) 72 | 73 | (setq styled-cssom (etaf-css-build-cssom styled-dom)) 74 | (setq styled-render-tree (etaf-render-build-tree styled-dom styled-cssom)) 75 | 76 | (message "\nComputed styles for each div:") 77 | (dolist (div-node (etaf-render-find-by-tag styled-render-tree 'div)) 78 | (message "
:") 79 | (message " color: %s" (etaf-render-get-style div-node 'color)) 80 | (message " font-size: %s" (etaf-render-get-style div-node 'font-size)) 81 | (when-let ((bg (etaf-render-get-style div-node 'background))) 82 | (message " background: %s" bg))) 83 | 84 | ;;; Example 4: Render tree statistics 85 | 86 | (message "\n=== Example 4: Render Tree Statistics ===") 87 | 88 | (setq stats-dom 89 | (etaf-etml-to-dom 90 | '(html 91 | (head 92 | (style "div { display: block; } 93 | span { display: inline; } 94 | p { display: block; }")) 95 | (body 96 | (div 97 | (span "Text") 98 | (div 99 | (p "Paragraph") 100 | (span "More text"))))))) 101 | 102 | (setq stats-cssom (etaf-css-build-cssom stats-dom)) 103 | (setq stats-render-tree (etaf-render-build-tree stats-dom stats-cssom)) 104 | (setq stats (etaf-render-stats stats-render-tree)) 105 | 106 | (message "\nRender tree statistics:") 107 | (message " Total nodes: %d" (plist-get stats :node-count)) 108 | (message " Max depth: %d" (plist-get stats :max-depth)) 109 | (message " Display types:") 110 | (dolist (type-count (plist-get stats :display-types)) 111 | (message " %s: %d" (car type-count) (cdr type-count))) 112 | 113 | ;;; Example 5: Finding nodes by criteria 114 | 115 | (message "\n=== Example 5: Finding Nodes ===") 116 | 117 | (setq search-dom 118 | (etaf-etml-to-dom 119 | '(html 120 | (head 121 | (style "div { display: block; } 122 | .inline { display: inline; }")) 123 | (body 124 | (div "Block 1") 125 | (div :class "inline" "Inline div") 126 | (span "Span") 127 | (div "Block 2"))))) 128 | 129 | (setq search-cssom (etaf-css-build-cssom search-dom)) 130 | (setq search-render-tree (etaf-render-build-tree search-dom search-cssom)) 131 | 132 | (message "\nAll block-level elements:") 133 | (dolist (node (etaf-render-find-by-display search-render-tree "block")) 134 | (message " <%s>" (dom-tag node))) 135 | 136 | (message "\nAll inline elements:") 137 | (dolist (node (etaf-render-find-by-display search-render-tree "inline")) 138 | (message " <%s>" (dom-tag node))) 139 | 140 | (message "\n=== Examples Complete ===") 141 | 142 | (provide 'etaf-render-example) 143 | ;;; etaf-render-example.el ends here 144 | -------------------------------------------------------------------------------- /docs/RENDERER-FUTURE-WORK.md: -------------------------------------------------------------------------------- 1 | # Future Enhancements for ETAF Renderer 2 | 3 | This document lists potential optimizations and improvements for the renderer implementation. 4 | 5 | ## Performance Optimizations 6 | 7 | ### 1. In-place Prop Updates (etaf-vdom.el, lines 989-991) 8 | 9 | **Current:** Props changes trigger a full re-render 10 | **Future:** Implement in-place prop updates for better performance 11 | 12 | **Implementation Ideas:** 13 | - Add `etaf-vdom--patch-props-in-place` function 14 | - Update specific text properties without re-rendering 15 | - Only re-render when DOM structure changes 16 | 17 | **Priority:** Medium (functional but could be more efficient) 18 | 19 | ### 2. Keyed Children Diffing (etaf-vdom.el, lines 1051-1054) 20 | 21 | **Current:** Array length mismatch causes full re-render 22 | **Future:** Implement proper keyed diff algorithm 23 | 24 | **Implementation Ideas:** 25 | - Full Vue 3-style keyed diff with LIS (Longest Increasing Subsequence) 26 | - Support for insertions/deletions without full rebuild 27 | - Reuse existing VNodes when keys match 28 | 29 | **Priority:** Medium (important for lists with many items) 30 | 31 | ## Code Quality Improvements 32 | 33 | ### 3. Test Path Helper (test-renderer-simple.el, lines 7-8) 34 | 35 | **Current:** Path manipulation duplicated 36 | **Future:** Create helper function 37 | 38 | ```elisp 39 | (defun etaf-test-add-paths () 40 | "Add ETAF paths to load-path for testing." 41 | (let ((test-dir (file-name-directory (or load-file-name buffer-file-name)))) 42 | (add-to-list 'load-path test-dir) 43 | (add-to-list 'load-path (expand-file-name ".." test-dir)))) 44 | ``` 45 | 46 | **Priority:** Low (nitpick, doesn't affect functionality) 47 | 48 | ### 4. Programmatic Demo Functions (etaf-renderer-demo.el) 49 | 50 | **Current:** `read-string` makes functions less flexible 51 | **Future:** Add optional parameters 52 | 53 | ```elisp 54 | (defun etaf-renderer-demo-5-add-task (&optional task-text) 55 | "Add a new task. If TASK-TEXT is nil, prompt interactively." 56 | (interactive) 57 | (let ((text (or task-text 58 | (read-string "Task: " 59 | (format "Task %d" etaf-renderer-demo-5-next-id))))) 60 | ...)) 61 | ``` 62 | 63 | **Priority:** Low (nice to have for testing) 64 | 65 | ### 5. UUID Constants (etaf-event.el, lines 516-519) 66 | 67 | **Current:** Hardcoded UUID 'test-button-1' 68 | **Future:** Use constants 69 | 70 | ```elisp 71 | (defconst etaf-event-test-uuid "test-button-1" 72 | "UUID for test button in event setup.") 73 | ``` 74 | 75 | **Priority:** Low (test code only) 76 | 77 | ## New Features to Consider 78 | 79 | ### 6. Transition/Animation Support 80 | 81 | Add support for transitions when elements are added/removed: 82 | - `etaf-vdom-transition` wrapper 83 | - CSS transition hooks 84 | - JavaScript animation callbacks 85 | 86 | ### 7. Suspense Support 87 | 88 | Implement async component loading: 89 | - Loading states 90 | - Error boundaries 91 | - Fallback content 92 | 93 | ### 8. Keep-Alive Support 94 | 95 | Cache component instances: 96 | - `etaf-vdom-keep-alive` wrapper 97 | - Component caching 98 | - Lifecycle hooks (activated/deactivated) 99 | 100 | ### 9. Teleport Support 101 | 102 | Render content to different locations: 103 | - Portal-like functionality 104 | - Target selector 105 | - Content projection 106 | 107 | ### 10. Custom Renderer API 108 | 109 | Allow custom renderers for different targets: 110 | - String renderer (done) 111 | - Canvas renderer 112 | - SVG renderer 113 | - Custom backends 114 | 115 | ## Documentation Improvements 116 | 117 | ### 11. Performance Guide 118 | 119 | Document best practices for: 120 | - When to use keys 121 | - Optimizing large lists 122 | - Avoiding unnecessary re-renders 123 | - PatchFlags usage 124 | 125 | ### 12. Advanced Examples 126 | 127 | Add more complex examples: 128 | - Nested components 129 | - State management patterns 130 | - Custom hooks 131 | - Form handling 132 | 133 | ### 13. Migration Guide 134 | 135 | Document migration from old patterns: 136 | - From imperative to declarative 137 | - Component refactoring 138 | - Performance migration 139 | 140 | ## Testing Enhancements 141 | 142 | ### 14. Performance Benchmarks 143 | 144 | Add benchmarks for: 145 | - Mount time 146 | - Update time 147 | - Diff algorithm efficiency 148 | - Memory usage 149 | 150 | ### 15. Integration Tests 151 | 152 | Test full application scenarios: 153 | - Multi-component apps 154 | - Complex event flows 155 | - State management 156 | - Error handling 157 | 158 | ## Notes 159 | 160 | These enhancements are **not required** for the current implementation to be functional and complete. The current implementation: 161 | 162 | - ✅ Meets all problem statement requirements 163 | - ✅ Follows Vue 3 standards 164 | - ✅ Has comprehensive tests 165 | - ✅ Includes working examples 166 | - ✅ Is production-ready 167 | 168 | Future optimizations can be added incrementally based on real-world usage patterns and performance needs. 169 | -------------------------------------------------------------------------------- /docs/CSSOM-TREE-STRUCTURE-SUMMARY.md: -------------------------------------------------------------------------------- 1 | # CSSOM Tree Structure - Implementation Summary 2 | 3 | ## Problem Statement 4 | The requirement was to ensure that "CSSOM 使用类似 dom 和 布局树的 树结构表示，即在原本的dom结构的基础上加上样式等信息" (CSSOM uses a tree structure representation similar to DOM and layout tree, that is, adding style and other information on top of the original DOM structure). 5 | 6 | ## Findings 7 | 8 | ### Implementation Status: ✅ ALREADY IMPLEMENTED 9 | 10 | The CSSOM tree structure was **already correctly implemented** in the codebase. The implementation in `etaf-css.el` perfectly matches the design specification: 11 | 12 | 1. **Tree Structure**: CSSOM maintains the DOM tree structure (tags, attributes, children) 13 | 2. **Attribute Attachment**: CSSOM-specific attributes are attached to the root node 14 | 3. **DOM API Compatibility**: Can be operated with standard DOM functions 15 | 16 | ### Issue Discovered: Tests Using Old API 17 | 18 | The tests were using an **outdated plist-based API** that was apparently used in an earlier version: 19 | - Old: `(plist-get cssom :inline-rules)` 20 | - New: `(dom-attr cssom 'cssom-inline-rules)` 21 | 22 | This suggests the implementation was refactored from a plist structure to a tree structure at some point, but the tests weren't fully updated. 23 | 24 | ## Changes Made 25 | 26 | ### 1. Test Fixes (3 files) 27 | Updated tests to use the correct tree-based API: 28 | 29 | **tests/etaf-css-tests.el** 30 | - Changed `plist-get` calls to `dom-attr` calls 31 | - Added explicit tree structure validation test 32 | 33 | **tests/etaf-css-cache-tests.el** 34 | - Updated cache access from `plist-get cssom :cache` to `dom-attr cssom 'cssom-cache` 35 | 36 | **tests/etaf-css-index-tests.el** 37 | - Updated index access from `plist-get cssom :rule-index` to `dom-attr cssom 'cssom-rule-index` 38 | 39 | ### 2. New Comprehensive Test File 40 | **tests/etaf-css-tree-structure-tests.el** (199 lines, 11 tests) 41 | 42 | Validates all aspects of the CSSOM tree structure: 43 | 1. ✅ CSSOM preserves DOM tree structure 44 | 2. ✅ CSSOM maintains DOM tags (html, body, div, etc.) 45 | 3. ✅ CSSOM attaches required attributes to root node 46 | 4. ✅ CSSOM attribute types are correct (lists, hash-tables) 47 | 5. ✅ Child nodes preserve original DOM structure 48 | 6. ✅ Original node attributes are retained 49 | 7. ✅ DOM query functions work on CSSOM tree 50 | 8. ✅ CSSOM tree can be traversed with etaf-dom-map 51 | 9. ✅ CSSOM performs deep copy (doesn't modify original DOM) 52 | 10. ✅ CSSOM structure matches DOM structure exactly 53 | 11. ✅ CSSOM follows same pattern as Layout Tree and Render Tree 54 | 55 | ## Implementation Details 56 | 57 | ### CSSOM Structure 58 | ```elisp 59 | (html ((cssom-ua-rules . (...)) ; User Agent styles 60 | (cssom-style-rules . (...)) ;