Ticket #1998: engine.patch

File engine.patch, 14.3 KB (added by JCD <frasch@…>, 3 years ago)

Patch for subdomain engine files

  • engine/ispcp-alssub-mngr

     
    9090               alias_id, 
    9191               subdomain_alias_name, 
    9292               subdomain_alias_mount, 
    93                subdomain_alias_status 
     93               subdomain_alias_status, 
     94               subdomain_alias_url_forward 
    9495       FROM 
    9596               subdomain_alias 
    9697    "; 
    … …  
    147148 
    148149    my $sub_pref = @$sub_data[2]; 
    149150 
    150     my $dmn_name = @$sub_data[7]; 
     151    my $dmn_name = @$sub_data[8]; 
    151152 
    152153    my $sub_name = "$sub_pref.$dmn_name"; 
    153154 
    154     my $dmn_ip = @$sub_data[33]; 
     155    my $dmn_ip = @$sub_data[34]; 
    155156 
    156157 
    157158    my $timestamp = time; 
    … …  
    355356 
    356357    my $sub_pref = @$sub_data[2]; 
    357358 
    358     my $dmn_name = @$sub_data[7]; 
     359    my $dmn_name = @$sub_data[8]; 
    359360 
    360361    my $sub_name = "$sub_pref.$dmn_name"; 
    361362 
    362     my $dmn_ip = @$sub_data[33]; 
     363    my $dmn_ip = @$sub_data[34]; 
    363364 
    364365 
    365366    my $timestamp = time; 
    … …  
    645646 
    646647    my $sub_mount = @$sub_data[3]; 
    647648 
    648     my $dmn_id = @$sub_data[6]; 
     649    my $url_forward = decode_entities(@$sub_data[4]); 
    649650 
    650     my $dmn_name = @$sub_data[7]; 
    651     my $dmn_grp_name = @$sub_data[13]; 
     651    my $dmn_id = @$sub_data[7]; 
     652 
     653    my $dmn_name = @$sub_data[8]; 
     654    my $dmn_grp_name = @$sub_data[14]; 
    652655 
    653656    my $sub_name = "$sub_pref.$dmn_name"; 
    654657 
    655     my $sub_ip = @$sub_data[33]; 
     658    my $sub_ip = @$sub_data[34]; 
    656659 
    657     my ($sub_php, $sub_cgi) = (@$sub_data[31], @$sub_data[32]); 
     660    my ($sub_php, $sub_cgi) = (@$sub_data[32], @$sub_data[33]); 
    658661 
    659662    my $conf_dir = $main::cfg{'CONF_DIR'}; 
    660663 
    … …  
    668671        $sub_b, 
    669672        $sub_entry, 
    670673        $sub_e, 
     674        $sub_rdr_b, 
     675        $sub_rdr_entry, 
     676        $sub_rdr_e, 
    671677        $sub_cgi_b, 
    672678        $sub_cgi_entry, 
    673679        $sub_cgi_e, 
    … …  
    678684        $sub_php2_entry, 
    679685        $sub_php2_e, 
    680686        $sub_custom 
    681        ) = ('', '', '', '', '', '', '', '', '', '', '', '', ''); 
     687       ) = ('', '', '', '', '', '', '', '', '', '', '', '', '', '', '', ''); 
    682688 
    683689    ( 
    684690     $rs, 
    685691     $sub_b, 
    686692     $sub_entry, 
    687693     $sub_e, 
     694     $sub_rdr_b, 
     695     $sub_rdr_entry, 
     696     $sub_rdr_e, 
    688697     $sub_cgi_b, 
    689698     $sub_cgi_entry, 
    690699     $sub_cgi_e, 
    … …  
    700709                 'sub_b.tpl', 
    701710                 'sub_entry.tpl', 
    702711                 'sub_e.tpl', 
     712                 'sub_rdr_b.tpl', 
     713                 'sub_rdr_entry.tpl', 
     714                 'sub_rdr_e.tpl', 
    703715                 'sub_cgi_b.tpl', 
    704716                 'sub_cgi_entry.tpl', 
    705717                 'sub_cgi_e.tpl', 
    … …  
    729741        ( 
    730742         '{DMN_NAME}' => $dmn_grp_name, 
    731743         '{DMN_GRP}' => $dmn_grp_name, 
     744         '{URI}' => $url_forward, 
    732745         '{STARTER_DIR}' => $main::cfg{'PHP_STARTER_DIR'}, 
    733746         '{PHP_VERSION}' => $main::cfg{'PHP_VERSION'}, 
    734747         '{WWW_DIR}' => $main::cfg{'APACHE_WWW_DIR'}, 
    … …  
    752765     $sub_b, 
    753766     $sub_entry, 
    754767     $sub_e, 
     768     $sub_rdr_entry, 
    755769     $sub_cgi_entry, 
    756770     $sub_php2_entry, 
    757771     $sub_custom 
    … …  
    760774                 $sub_b, 
    761775                 $sub_entry, 
    762776                 $sub_e, 
     777                 $sub_rdr_entry, 
    763778                 $sub_cgi_entry, 
    764779                 $sub_php2_entry, 
    765780                 $sub_custom 
    … …  
    831846 
    832847    return ($rs, '') if ($rs != 0); 
    833848 
     849    # 
     850    # Any REDIRECT entry? 
     851    # 
     852    if ($url_forward ne 'no') { 
     853        my $rdr_entry = "$sub_rdr_b$sub_rdr_entry$sub_rdr_e"; 
     854        ($rs, $sub_entry) = repl_tag( 
     855            $sub_rdr_b, 
     856            $sub_rdr_e, 
     857            $sub_entry, 
     858            $rdr_entry, 
     859            "gen_httpd_alssub_group_entry" 
     860        ); 
     861        return ($rs, '') if ($rs != 0); 
     862    } 
     863 
    834864    my $sub_entry_val = "$sub_b$sub_entry$sub_e"; 
    835865 
    836866    # 
    … …  
    872902 
    873903    my $sub_pref = @$sub_data[2]; 
    874904 
    875     my $dmn_name = @$sub_data[7]; 
    876     my $dmn_grp_name = @$sub_data[13]; 
     905    my $dmn_name = @$sub_data[8]; 
     906    my $dmn_grp_name = @$sub_data[14]; 
    877907 
    878908    my $sub_name = "$sub_pref.$dmn_name"; 
    879909 
    880910    my $sub_mount = @$sub_data[3]; 
    881911 
    882     my $sub_ip = @$sub_data[33]; 
     912    my $sub_ip = @$sub_data[34]; 
    883913 
    884914 
    885915    my $conf_dir = $main::cfg{'CONF_DIR'}; 
    … …  
    11641194 
    11651195    my $sub_pref = @$sub_data[2]; 
    11661196 
    1167     my $dmn_name = @$sub_data[7]; 
    1168     my $dmn_grp_name = @$sub_data[13]; 
     1197    my $dmn_name = @$sub_data[8]; 
     1198    my $dmn_grp_name = @$sub_data[14]; 
    11691199 
    11701200    my $sub_name = "$sub_pref.$dmn_name"; 
    11711201 
    11721202    my $sub_mount = @$sub_data[3]; 
    11731203 
    1174     my $sub_ip = @$sub_data[33]; 
     1204    my $sub_ip = @$sub_data[34]; 
    11751205 
    11761206 
    11771207    my $conf_dir = $main::cfg{'CONF_DIR'}; 
    … …  
    14151445 
    14161446    my $sub_mount = @$sub_data[3]; 
    14171447 
    1418     my $dmn_id = @$sub_data[6]; 
     1448    my $dmn_id = @$sub_data[7]; 
    14191449 
    1420     my $dmn_name = @$sub_data[7]; 
    1421     my $dmn_grp_name = @$sub_data[13]; 
     1450    my $dmn_name = @$sub_data[8]; 
     1451    my $dmn_grp_name = @$sub_data[14]; 
    14221452 
    14231453    my $sub_name = "$sub_pref.$dmn_name"; 
    14241454 
    … …  
    15481578 
    15491579    my $sub_mount = @$sub_data[3]; 
    15501580 
    1551     my $dmn_id = @$sub_data[6]; 
     1581    my $dmn_id = @$sub_data[7]; 
    15521582 
    1553     my $dmn_name = @$sub_data[7]; 
    1554     my $dmn_grp_name = @$sub_data[13]; 
     1583    my $dmn_name = @$sub_data[8]; 
     1584    my $dmn_grp_name = @$sub_data[14]; 
    15551585 
    15561586    my $sub_name = "$sub_pref.$dmn_name"; 
    15571587 
    … …  
    16121642 
    16131643    my $sub_mount = @$sub_data[3]; 
    16141644 
    1615     my $dmn_name = @$sub_data[7]; 
    1616     my $dmn_id = @$sub_data[12]; 
    1617     my $dmn_grp_name = @$sub_data[13]; 
     1645    my $dmn_name = @$sub_data[8]; 
     1646    my $dmn_id = @$sub_data[13]; 
     1647    my $dmn_grp_name = @$sub_data[14]; 
    16181648 
    16191649    my $sub_name = "$sub_pref.$dmn_name"; 
    16201650 
    … …  
    17801810 
    17811811    my $sub_pref = @$sub_data[2]; 
    17821812 
    1783     my $dmn_name = @$sub_data[7]; 
     1813    my $dmn_name = @$sub_data[8]; 
    17841814 
    17851815    my $sub_name = "$sub_pref.$dmn_name"; 
    17861816 
    … …  
    18751905 
    18761906    my $sub_pref = @$sub_data[2]; 
    18771907 
    1878     my $dmn_name = @$sub_data[7]; 
     1908    my $dmn_name = @$sub_data[8]; 
    18791909 
    18801910    my $sub_name = "$sub_pref.$dmn_name"; 
    18811911 
    … …  
    19691999 
    19702000    my $sub_pref = @$sub_data[2]; 
    19712001 
    1972     my $dmn_name = @$sub_data[7]; 
     2002    my $dmn_name = @$sub_data[8]; 
    19732003 
    19742004    my $sub_name = "$sub_pref.$dmn_name"; 
    19752005 
    … …  
    20132043 
    20142044    my $sub_pref = @$sub_data[2]; 
    20152045 
    2016     my $dmn_name = @$sub_data[7]; 
     2046    my $dmn_name = @$sub_data[8]; 
    20172047 
    20182048    my $sub_name = "$sub_pref.$dmn_name"; 
    20192049 
    … …  
    21352165       my $subdomain_id     = @$sub_data[0]; 
    21362166       my $sub_name         = @$sub_data[2]; 
    21372167       my $sub_mount_point  = @$sub_data[3]; 
    2138        my $domain_id        = @$sub_data[6]; 
    2139        my $sub_to           = @$sub_data[7]; 
    2140        my $alias_to         = @$sub_data[13]; 
     2168       my $domain_id        = @$sub_data[7]; 
     2169       my $sub_to           = @$sub_data[8]; 
     2170       my $alias_to         = @$sub_data[14]; 
    21412171 
    21422172       my $conf_dir         = $main::cfg{'CONF_DIR'}; 
    21432173       my $proftpd_conf_dir = $main::cfg{'FTPD_CONF_DIR'}; 
    … …  
    22842314       # 
    22852315 
    22862316       my $sub_name         = @$sub_data[2]; 
    2287        my $sub_to           = @$sub_data[7]; 
     2317       my $sub_to           = @$sub_data[8]; 
    22882318       my $conf_dir         = $main::cfg{'CONF_DIR'}; 
    22892319       my $proftpd_conf_dir = $main::cfg{'FTPD_CONF_DIR'}; 
    22902320       my $sub_fname        = "$sub_name.$sub_to.conf"; 
    … …  
    24862516                       t1.alias_id, 
    24872517                       t1.subdomain_alias_name, 
    24882518                       t1.subdomain_alias_mount, 
     2519                       t1.subdomain_alias_url_forward, 
    24892520                       t1.subdomain_alias_status, 
    24902521                       t2.alias_id, 
    24912522                       t2.domain_id, 
    … …  
    25392570    my $entry = @$rows[0]; 
    25402571 
    25412572 
    2542     my ($sub_status, $sub_id) = (@$entry[4], @$entry[0]); 
     2573    my ($sub_status, $sub_id) = (@$entry[5], @$entry[0]); 
    25432574 
    25442575    my $timestamp = undef; 
    25452576 

  • engine/ispcp-sub-mngr

     
    9090               domain_id, 
    9191               subdomain_name, 
    9292               subdomain_mount, 
    93                subdomain_status 
     93               subdomain_status, 
     94               subdomain_url_forward 
    9495       FROM 
    9596               subdomain 
    9697    "; 
    … …  
    147148 
    148149    my $sub_pref = @$sub_data[2]; 
    149150 
    150     my $dmn_name = @$sub_data[6]; 
     151    my $dmn_name = @$sub_data[7]; 
    151152 
    152153    my $sub_name = "$sub_pref.$dmn_name"; 
    153154 
    154     my $dmn_ip = @$sub_data[26]; 
     155    my $dmn_ip = @$sub_data[27]; 
    155156 
    156157 
    157158    my $timestamp = time; 
    … …  
    361362 
    362363    my $sub_pref = @$sub_data[2]; 
    363364 
    364     my $dmn_name = @$sub_data[6]; 
     365    my $dmn_name = @$sub_data[7]; 
    365366 
    366367    my $sub_name = "$sub_pref.$dmn_name"; 
    367368 
    368     my $dmn_ip = @$sub_data[26]; 
     369    my $dmn_ip = @$sub_data[27]; 
    369370 
    370371 
    371372    my $timestamp = time; 
    … …  
    651652 
    652653    my $sub_mount = @$sub_data[3]; 
    653654 
    654     my $dmn_id = @$sub_data[5]; 
     655    my $url_forward = decode_entities(@$sub_data[4]); 
    655656 
    656     my $dmn_name = @$sub_data[6]; 
     657    my $dmn_id = @$sub_data[6]; 
     658 
     659    my $dmn_name = @$sub_data[7]; 
    657660 
    658661    my $sub_name = "$sub_pref.$dmn_name"; 
    659662 
    660     my $sub_ip = @$sub_data[26]; 
     663    my $sub_ip = @$sub_data[27]; 
    661664 
    662     my ($sub_php, $sub_cgi) = (@$sub_data[24], @$sub_data[25]); 
     665    my ($sub_php, $sub_cgi) = (@$sub_data[25], @$sub_data[26]); 
    663666 
    664667    my $conf_dir = $main::cfg{'CONF_DIR'}; 
    665668 
    … …  
    673676        $sub_b, 
    674677        $sub_entry, 
    675678        $sub_e, 
     679        $sub_rdr_b, 
     680        $sub_rdr_entry, 
     681        $sub_rdr_e, 
    676682        $sub_cgi_b, 
    677683        $sub_cgi_entry, 
    678684        $sub_cgi_e, 
    … …  
    683689        $sub_php2_entry, 
    684690        $sub_php2_e, 
    685691        $sub_custom 
    686        ) = ('', '', '', '', '', '', '', '', '', '', '', '', ''); 
     692       ) = ('', '', '', '', '', '', '', '', '', '', '', '', '', '', '', ''); 
    687693 
    688694    ( 
    689695     $rs, 
    690696     $sub_b, 
    691697     $sub_entry, 
    692698     $sub_e, 
     699     $sub_rdr_b, 
     700     $sub_rdr_entry, 
     701     $sub_rdr_e, 
    693702     $sub_cgi_b, 
    694703     $sub_cgi_entry, 
    695704     $sub_cgi_e, 
    … …  
    705714                 'sub_b.tpl', 
    706715                 'sub_entry.tpl', 
    707716                 'sub_e.tpl', 
     717                 'sub_rdr_b.tpl', 
     718                 'sub_rdr_entry.tpl', 
     719                 'sub_rdr_e.tpl', 
    708720                 'sub_cgi_b.tpl', 
    709721                 'sub_cgi_entry.tpl', 
    710722                 'sub_cgi_e.tpl', 
    … …  
    734746        ( 
    735747         '{DMN_NAME}' => $dmn_name, 
    736748         '{DMN_GRP}' => $dmn_name, 
     749         '{URI}' => $url_forward, 
    737750         '{STARTER_DIR}' => $main::cfg{'PHP_STARTER_DIR'}, 
    738751         '{PHP_VERSION}' => $main::cfg{'PHP_VERSION'}, 
    739752         '{WWW_DIR}' => $main::cfg{'APACHE_WWW_DIR'}, 
    … …  
    757770     $sub_b, 
    758771     $sub_entry, 
    759772     $sub_e, 
     773     $sub_rdr_entry, 
    760774     $sub_cgi_entry, 
    761775     $sub_php2_entry, 
    762776     $sub_custom 
    … …  
    765779                 $sub_b, 
    766780                 $sub_entry, 
    767781                 $sub_e, 
     782                 $sub_rdr_entry, 
    768783                 $sub_cgi_entry, 
    769784                 $sub_php2_entry, 
    770785                 $sub_custom 
    … …  
    836851 
    837852    return ($rs, '') if ($rs != 0); 
    838853 
     854    # 
     855    # Any REDIRECT entry? 
     856    # 
     857    if ($url_forward ne 'no') { 
     858        my $rdr_entry = "$sub_rdr_b$sub_rdr_entry$sub_rdr_e"; 
     859        ($rs, $sub_entry) = repl_tag( 
     860            $sub_rdr_b, 
     861            $sub_rdr_e, 
     862            $sub_entry, 
     863            $rdr_entry, 
     864            "gen_httpd_sub_group_entry" 
     865        ); 
     866        return ($rs, '') if ($rs != 0); 
     867    } 
     868 
    839869    my $sub_entry_val = "$sub_b$sub_entry$sub_e"; 
    840870 
    841871    # 
    … …  
    877907 
    878908    my $sub_pref = @$sub_data[2]; 
    879909 
    880     my $dmn_name = @$sub_data[6]; 
     910    my $dmn_name = @$sub_data[7]; 
    881911 
    882912    my $sub_name = "$sub_pref.$dmn_name"; 
    883913 
    884914    my $sub_mount = @$sub_data[3]; 
    885915 
    886     my $sub_ip = @$sub_data[26]; 
     916    my $sub_ip = @$sub_data[27]; 
    887917 
    888918 
    889919    my $conf_dir = $main::cfg{'CONF_DIR'}; 
    … …  
    10011031    # 
    10021032 
    10031033    # 
    1004     # Are $cfg_b, $cfg_e tags exist in the working confing ? 
     1034    # Are $cfg_b, $cfg_e tags exist in the working config ? 
    10051035    # 
    10061036 
    10071037    ($rs, $rdata) = get_tag($cfg_b, $cfg_e, $working); 
    … …  
    11681198 
    11691199    my $sub_pref = @$sub_data[2]; 
    11701200 
    1171     my $dmn_name = @$sub_data[6]; 
     1201    my $dmn_name = @$sub_data[7]; 
    11721202 
    11731203    my $sub_name = "$sub_pref.$dmn_name"; 
    11741204 
    11751205    my $sub_mount = @$sub_data[3]; 
    11761206 
    1177     my $sub_ip = @$sub_data[26]; 
     1207    my $sub_ip = @$sub_data[27]; 
    11781208 
    11791209 
    11801210    my $conf_dir = $main::cfg{'CONF_DIR'}; 
    … …  
    14181448 
    14191449    my $sub_mount = @$sub_data[3]; 
    14201450 
    1421     my $dmn_id = @$sub_data[5]; 
     1451    my $dmn_id = @$sub_data[6]; 
    14221452 
    1423     my $dmn_name = @$sub_data[6]; 
     1453    my $dmn_name = @$sub_data[7]; 
    14241454 
    14251455    my $sub_name = "$sub_pref.$dmn_name"; 
    14261456 
    … …  
    15501580 
    15511581    my $sub_mount = @$sub_data[3]; 
    15521582 
    1553     my $dmn_id = @$sub_data[5]; 
     1583    my $dmn_id = @$sub_data[6]; 
    15541584 
    1555     my $dmn_name = @$sub_data[6]; 
     1585    my $dmn_name = @$sub_data[7]; 
    15561586 
    15571587    my $sub_name = "$sub_pref.$dmn_name"; 
    15581588 
    … …  
    16131643 
    16141644    my $sub_mount = @$sub_data[3]; 
    16151645 
    1616     my $dmn_name = @$sub_data[6]; 
     1646    my $dmn_name = @$sub_data[7]; 
    16171647 
    16181648    my $dmn_id = @$sub_data[1]; 
    16191649 
    … …  
    17811811 
    17821812    my $sub_pref = @$sub_data[2]; 
    17831813 
    1784     my $dmn_name = @$sub_data[6]; 
     1814    my $dmn_name = @$sub_data[7]; 
    17851815 
    17861816    my $sub_name = "$sub_pref.$dmn_name"; 
    17871817 
    … …  
    18761906 
    18771907    my $sub_pref = @$sub_data[2]; 
    18781908 
    1879     my $dmn_name = @$sub_data[6]; 
     1909    my $dmn_name = @$sub_data[7]; 
    18801910 
    18811911    my $sub_name = "$sub_pref.$dmn_name"; 
    18821912 
    … …  
    19702000 
    19712001    my $sub_pref = @$sub_data[2]; 
    19722002 
    1973     my $dmn_name = @$sub_data[6]; 
     2003    my $dmn_name = @$sub_data[7]; 
    19742004 
    19752005    my $sub_name = "$sub_pref.$dmn_name"; 
    19762006 
    … …  
    20142044 
    20152045    my $sub_pref = @$sub_data[2]; 
    20162046 
    2017     my $dmn_name = @$sub_data[6]; 
     2047    my $dmn_name = @$sub_data[7]; 
    20182048 
    20192049    my $sub_name = "$sub_pref.$dmn_name"; 
    20202050 
    … …  
    21372167       my $domain_id        = @$sub_data[1]; 
    21382168       my $sub_name         = @$sub_data[2]; 
    21392169       my $sub_mount_point  = @$sub_data[3]; 
    2140        my $sub_to           = @$sub_data[6]; 
     2170       my $sub_to           = @$sub_data[7]; 
    21412171 
    21422172       my $conf_dir         = $main::cfg{'CONF_DIR'}; 
    21432173       my $proftpd_conf_dir = $main::cfg{'FTPD_CONF_DIR'}; 
    … …  
    22772307       # 
    22782308 
    22792309       my $sub_name         = @$sub_data[2]; 
    2280        my $sub_to           = @$sub_data[6]; 
     2310       my $sub_to           = @$sub_data[7]; 
    22812311       my $conf_dir         = $main::cfg{'CONF_DIR'}; 
    22822312       my $proftpd_conf_dir = $main::cfg{'FTPD_CONF_DIR'}; 
    22832313       my $sub_fname        = "$sub_name.$sub_to.conf"; 
    … …  
    24782508        t1.domain_id, 
    24792509        t1.subdomain_name, 
    24802510        t1.subdomain_mount, 
     2511        t1.subdomain_url_forward, 
    24812512        t1.subdomain_status, 
    24822513        t2.domain_id, 
    24832514        t2.domain_name, 
    … …  
    25192550    my $entry = @$rows[0]; 
    25202551 
    25212552 
    2522     my ($sub_status, $sub_id) = (@$entry[4], @$entry[0]); 
     2553    my ($sub_status, $sub_id) = (@$entry[5], @$entry[0]); 
    25232554 
    25242555    my $timestamp = undef;