Mercurial > vim
view runtime/syntax/gedcom.vim @ 34074:1629cc65d78d v9.1.0006
patch 9.1.0006: is*() and to*() function may be unsafe
Commit: https://github.com/vim/vim/commit/184f71cc6868a240dc872ed2852542bbc1d43e28
Author: Keith Thompson <Keith.S.Thompson@gmail.com>
Date: Thu Jan 4 21:19:04 2024 +0100
patch 9.1.0006: is*() and to*() function may be unsafe
Problem: is*() and to*() function may be unsafe
Solution: Add SAFE_* macros and start using those instead
(Keith Thompson)
Use SAFE_() macros for is*() and to*() functions
The standard is*() and to*() functions declared in <ctype.h> have
undefined behavior for negative arguments other than EOF. If plain char
is signed, passing an unchecked value from argv for from user input
to one of these functions has undefined behavior.
Solution: Add SAFE_*() macros that cast the argument to unsigned char.
Most implementations behave sanely for negative arguments, and most
character values in practice are non-negative, but it's still best
to avoid undefined behavior.
The change from #13347 has been omitted, as this has already been
separately fixed in commit ac709e2fc0db6d31abb7da96f743c40956b60c3a
(v9.0.2054)
fixes: #13332
closes: #13347
Signed-off-by: Keith Thompson <Keith.S.Thompson@gmail.com>
Signed-off-by: Christian Brabandt <cb@256bit.org>
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Thu, 04 Jan 2024 21:30:04 +0100 |
| parents | 46763b01cd9a |
| children |
line wrap: on
line source
" Vim syntax file " Language: Gedcom " Maintainer: Paul Johnson (pjcj@transeda.com) " Version 1.059 - 23rd December 1999 " quit when a syntax file was already loaded if exists("b:current_syntax") finish endif syntax case match syntax keyword gedcom_record ABBR ADDR ADOP ADR1 ADR2 AFN AGE AGNC ALIA ANCE syntax keyword gedcom_record ANCI ANUL ASSO AUTH BAPL BAPM BARM BASM BIRT BLES syntax keyword gedcom_record BLOB BURI CALN CAST CAUS CENS CHAN CHAR CHIL CHR syntax keyword gedcom_record CHRA CITY CONC CONF CONL CONT COPR CORP CREM CTRY syntax keyword gedcom_record DATA DEAT DESC DESI DEST DIV DIVF DSCR EDUC EMIG syntax keyword gedcom_record ENDL ENGA EVEN FAM FAMC FAMF FAMS FCOM FILE FORM syntax keyword gedcom_record GEDC GIVN GRAD HEAD HUSB IDNO IMMI INDI LANG MARB syntax keyword gedcom_record MARC MARL MARR MARS MEDI NATI NATU NCHI NICK NMR syntax keyword gedcom_record NOTE NPFX NSFX OBJE OCCU ORDI ORDN PAGE PEDI PHON syntax keyword gedcom_record PLAC POST PROB PROP PUBL QUAY REFN RELA RELI REPO syntax keyword gedcom_record RESI RESN RETI RFN RIN ROLE SEX SLGC SLGS SOUR syntax keyword gedcom_record SPFX SSN STAE STAT SUBM SUBN SURN TEMP TEXT TIME syntax keyword gedcom_record TITL TRLR TYPE VERS WIFE WILL syntax keyword gedcom_record DATE nextgroup=gedcom_date syntax keyword gedcom_record NAME nextgroup=gedcom_name syntax case ignore syntax region gedcom_id start="@" end="@" oneline contains=gedcom_ii, gedcom_in syntax match gedcom_ii "\I\+" contained nextgroup=gedcom_in syntax match gedcom_in "\d\+" contained syntax region gedcom_name start="" end="$" skipwhite oneline contains=gedcom_cname, gedcom_surname contained syntax match gedcom_cname "\i\+" contained syntax match gedcom_surname "/\(\i\|\s\)*/" contained syntax match gedcom_date "\d\{1,2}\s\+\(jan\|feb\|mar\|apr\|may\|jun\|jul\|aug\|sep\|oct\|nov\|dec\)\s\+\d\+" syntax match gedcom_date ".*" contained " Define the default highlighting. " Only when an item doesn't have highlighting yet hi def link gedcom_record Statement hi def link gedcom_id Comment hi def link gedcom_ii PreProc hi def link gedcom_in Type hi def link gedcom_name PreProc hi def link gedcom_cname Type hi def link gedcom_surname Identifier hi def link gedcom_date Constant let b:current_syntax = "gedcom"