Mercurial > vim
view runtime/syntax/bindzone.vim @ 33791:370543108ba1 v9.0.2114
patch 9.0.2114: overflow detection not accurate when adding digits
Commit: https://github.com/vim/vim/commit/22cbc8a4e17ce61aa460c451a26e1bff2c3d2af9
Author: Christian Brabandt <cb@256bit.org>
Date: Sun Nov 19 10:47:21 2023 +0100
patch 9.0.2114: overflow detection not accurate when adding digits
Problem: overflow detection not accurate when adding digits
Solution: Use a helper function
Use a helper function to better detect overflows before adding integer
digits to a long or an integer variable respectively. Signal the
overflow to the caller function.
closes: #13539
Signed-off-by: Christian Brabandt <cb@256bit.org>
Signed-off-by: Michael Henry <vim@drmikehenry.com>
Signed-off-by: Ernie Rael <errael@raelity.com>
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Sun, 19 Nov 2023 11:00:07 +0100 |
| parents | 966e77ea7626 |
| children |
line wrap: on
line source
" Vim syntax file " Language: BIND zone files (RFC 1035) " Maintainer: Julian Mehnle <julian@mehnle.net> " URL: http://www.mehnle.net/source/odds+ends/vim/syntax/ " Last Change: Thu 2011-07-16 20:42:00 UTC " " Based on an earlier version by Вячеслав Горбанев (Slava Gorbanev), with " heavy modifications. " " $Id: bindzone.vim 12 2011-07-16 21:09:57Z julian $ " quit when a syntax file was already loaded if exists("b:current_syntax") finish endif syn case match " Directives syn region zoneRRecord start=/^/ end=/$/ contains=zoneOwnerName,zoneSpecial,zoneTTL,zoneClass,zoneRRType,zoneComment,zoneUnknown syn match zoneDirective /^\$ORIGIN\s\+/ nextgroup=zoneOrigin,zoneUnknown syn match zoneDirective /^\$TTL\s\+/ nextgroup=zoneTTL,zoneUnknown syn match zoneDirective /^\$INCLUDE\s\+/ nextgroup=zoneText,zoneUnknown syn match zoneDirective /^\$GENERATE\s/ syn match zoneUnknown contained /\S\+/ syn match zoneOwnerName contained /^[^[:space:]!"#$%&'()*+,\/:;<=>?@[\]\^`{|}~]\+\(\s\|;\)\@=/ nextgroup=zoneTTL,zoneClass,zoneRRType skipwhite syn match zoneOrigin contained /[^[:space:]!"#$%&'()*+,\/:;<=>?@[\]\^`{|}~]\+\(\s\|;\|$\)\@=/ syn match zoneDomain contained /[^[:space:]!"#$%&'()*+,\/:;<=>?@[\]\^`{|}~]\+\(\s\|;\|$\)\@=/ syn match zoneSpecial contained /^[@*.]\s/ syn match zoneTTL contained /\s\@<=\d[0-9WwDdHhMmSs]*\(\s\|$\)\@=/ nextgroup=zoneClass,zoneRRType skipwhite syn keyword zoneClass contained IN CHAOS CH HS HESIOD nextgroup=zoneRRType,zoneTTL skipwhite syn keyword zoneRRType contained A AAAA APL CAA CERT CNAME DNAME DNSKEY DS HINFO LOC MX NAPTR NS NSEC NSEC3 NSEC3PARAM OPENPGPKEY PTR RP RRSIG SMIMEA SOA SPF SRV SSHFP TLSA TXT nextgroup=zoneRData skipwhite syn match zoneRData contained /[^;]*/ contains=zoneDomain,zoneIPAddr,zoneIP6Addr,zoneText,zoneNumber,zoneParen,zoneUnknown syn match zoneIPAddr contained /\<[0-9]\{1,3}\(\.[0-9]\{1,3}\)\{,3}\>/ " Plain IPv6 address IPv6-embedded-IPv4 address " 1111:2:3:4:5:6:7:8 1111:2:3:4:5:6:127.0.0.1 syn match zoneIP6Addr contained /\<\(\x\{1,4}:\)\{6}\(\x\{1,4}:\x\{1,4}\|\([0-2]\?\d\{1,2}\.\)\{3}[0-2]\?\d\{1,2}\)\>/ " ::[...:]8 ::[...:]127.0.0.1 syn match zoneIP6Addr contained /\s\@<=::\(\(\x\{1,4}:\)\{,6}\x\{1,4}\|\(\x\{1,4}:\)\{,5}\([0-2]\?\d\{1,2}\.\)\{3}[0-2]\?\d\{1,2}\)\>/ " 1111::[...:]8 1111::[...:]127.0.0.1 syn match zoneIP6Addr contained /\<\(\x\{1,4}:\)\{1}:\(\(\x\{1,4}:\)\{,5}\x\{1,4}\|\(\x\{1,4}:\)\{,4}\([0-2]\?\d\{1,2}\.\)\{3}[0-2]\?\d\{1,2}\)\>/ " 1111:2::[...:]8 1111:2::[...:]127.0.0.1 syn match zoneIP6Addr contained /\<\(\x\{1,4}:\)\{2}:\(\(\x\{1,4}:\)\{,4}\x\{1,4}\|\(\x\{1,4}:\)\{,3}\([0-2]\?\d\{1,2}\.\)\{3}[0-2]\?\d\{1,2}\)\>/ " 1111:2:3::[...:]8 1111:2:3::[...:]127.0.0.1 syn match zoneIP6Addr contained /\<\(\x\{1,4}:\)\{3}:\(\(\x\{1,4}:\)\{,3}\x\{1,4}\|\(\x\{1,4}:\)\{,2}\([0-2]\?\d\{1,2}\.\)\{3}[0-2]\?\d\{1,2}\)\>/ " 1111:2:3:4::[...:]8 1111:2:3:4::[...:]127.0.0.1 syn match zoneIP6Addr contained /\<\(\x\{1,4}:\)\{4}:\(\(\x\{1,4}:\)\{,2}\x\{1,4}\|\(\x\{1,4}:\)\{,1}\([0-2]\?\d\{1,2}\.\)\{3}[0-2]\?\d\{1,2}\)\>/ " 1111:2:3:4:5::[...:]8 1111:2:3:4:5::127.0.0.1 syn match zoneIP6Addr contained /\<\(\x\{1,4}:\)\{5}:\(\(\x\{1,4}:\)\{,1}\x\{1,4}\|\([0-2]\?\d\{1,2}\.\)\{3}[0-2]\?\d\{1,2}\)\>/ " 1111:2:3:4:5:6::8 - syn match zoneIP6Addr contained /\<\(\x\{1,4}:\)\{6}:\x\{1,4}\>/ " 1111[:...]:: - syn match zoneIP6Addr contained /\<\(\x\{1,4}:\)\{1,7}:\(\s\|;\|$\)\@=/ syn match zoneText contained /"\([^"\\]\|\\.\)*"\(\s\|;\|$\)\@=/ syn match zoneNumber contained /\<[0-9]\+\(\s\|;\|$\)\@=/ syn match zoneSerial contained /\<[0-9]\{1,10}\(\s\|;\|$\)\@=/ syn match zoneErrParen /)/ syn region zoneParen contained start="(" end=")" contains=zoneSerial,zoneTTL,zoneNumber,zoneComment syn match zoneComment /;.*/ " Define the default highlighting. " Only when an item doesn't have highlighting yet hi def link zoneDirective Macro hi def link zoneUnknown Error hi def link zoneOrigin Statement hi def link zoneOwnerName Statement hi def link zoneDomain Identifier hi def link zoneSpecial Special hi def link zoneTTL Constant hi def link zoneClass Include hi def link zoneRRType Type hi def link zoneIPAddr Number hi def link zoneIP6Addr Number hi def link zoneText String hi def link zoneNumber Number hi def link zoneSerial Special hi def link zoneErrParen Error hi def link zoneComment Comment let b:current_syntax = "bindzone" " vim:sts=2 sw=2