Ticket #34: 0001-ld-tigcc-check-validity-of-the-names-passed-to-d-a.patch

File 0001-ld-tigcc-check-validity-of-the-names-passed-to-d-a.patch, 1.3 KB (added by debrouxl, 3 years ago)

Patch to reject "a
a
a"-type variable names

  • trunk/tigcc/ld-tigcc/main_opt.inc

    From 9b0b89a759f4616bd725707f9ba8b25832efc394 Mon Sep 17 00:00:00 2001
    From: Lionel Debroux <lionel_debroux@yahoo.fr>
    Date: Sun, 28 Dec 2008 18:02:32 +0100
    Subject: ld-tigcc: check validity of the names passed to -d and -n options.
     "a\a\a" name is invalid and should be rejected.
    
    ---
     trunk/tigcc/ld-tigcc/main_opt.inc |    8 ++++++++
     1 files changed, 8 insertions(+), 0 deletions(-)
    
    diff --git a/trunk/tigcc/ld-tigcc/main_opt.inc b/trunk/tigcc/ld-tigcc/main_opt.inc
    index 70eec5d..173ba9d 100644
    a b  
    242242                                                if (Name) 
    243243                                                { 
    244244                                                        Name++; 
     245                                                        if ((strchr (Name, '\\')) || (strchr (Name, '/'))) 
     246                                                        { 
     247                                                                Error (NULL, "`--varname' option must be followed by a name matching <[folder\\]name>."); 
     248                                                        } 
    245249                                                        // Extract folder name. 
    246250                                                        DecodeOnCalcName (ProgramFolder, Args [CurArg]); 
    247251                                                        { 
     
    282286                                                if (Name) 
    283287                                                { 
    284288                                                        Name++; 
     289                                                        if ((strchr (Name, '\\')) || (strchr (Name, '/'))) 
     290                                                        { 
     291                                                                Error (NULL, "`--data-var' option must be followed by a name matching <[folder\\]name>."); 
     292                                                        } 
    285293                                                        // Extract folder name. 
    286294                                                        DecodeOnCalcName (DataFolder, Args [CurArg]); 
    287295                                                        {