Информация о версии:

  Клиент: вер. 5.2 сборка 1022 от 14.08.2012 13:38:55
    os: Linux; java: Java HotSpot(TM) Server VM, v.1.6.0_34
  Сервер: вер. 5.2 сборка 1279 от 14.08.2012 14:38:16
    os: Linux; java: Java HotSpot(TM) 64-Bit Server VM, v.1.6.0_34

  bill вер. 5.2 сборка 274 от 10.08.2012 16:31:30
  card вер. 5.2 сборка 182 от 06.08.2012 11:20:38
  dialup вер. 5.2 сборка 348 от 06.08.2012 11:20:46
  drweb вер. 5.2 сборка 70 от 06.08.2012 11:20:47
  email вер. 5.2 сборка 167 от 06.08.2012 11:20:49
  enaza вер. 5.2 сборка 45 от 06.08.2012 11:20:49
  ipn вер. 5.2 сборка 238 от 14.08.2012 13:39:01
  mps вер. 5.2 сборка 153 от 06.08.2012 11:21:08
  npay вер. 5.2 сборка 187 от 14.08.2012 13:39:16
  payonline вер. 5.2 сборка 38 от 06.08.2012 11:21:10
  rentsoft вер. 5.2 сборка 42 от 06.08.2012 11:21:19
  reports вер. 5.2 сборка 179 от 06.08.2012 11:21:20
  rscm вер. 5.2 сборка 162 от 06.08.2012 11:21:21
  ru.bitel.bgbilling.plugins.cashcheck вер. 5.2 сборка 102 от 06.08.2012 11:21:12
  ru.bitel.bgbilling.plugins.cladr вер. 5.2 сборка 106 от 06.08.2012 11:21:12
  ru.bitel.bgbilling.plugins.crm вер. 5.2 сборка 189 от 10.08.2012 16:31:53
  ru.bitel.bgbilling.plugins.dispatch вер. 5.2 сборка 42 от 16.08.2012 15:24:39
  ru.bitel.bgbilling.plugins.documents вер. 5.2 сборка 146 от 06.08.2012 11:21:15
  ru.bitel.bgbilling.plugins.helpdesk вер. 5.2 сборка 168 от 06.08.2012 11:21:16
  ru.bitel.bgbilling.plugins.organizer вер. 5.2 сборка 59 от 06.08.2012 11:21:17
  trayinfo вер. 5.2 сборка 159 от 06.08.2012 11:21:22
  vidimax.astra вер.  сборка  от
  wm вер. 5.2 сборка 170 от 06.08.2012 11:21:38


Третьи стороны:

  Fugue Icons. Copyright © 2011 Yusuke Kamiyamane. All rights reserved.
    http://p.yusukekamiyamane.com/
  Silk icon set. Copyright © Mark James. All rights reserved.
    http://www.famfamfam.com/lab/icons/silk/

<fo:external-graphic src="http://192.168.1.2:8443/bgbilling/logo.jpg" width="3.3cm" height="2.1cm" content-height="3.3cm" content-width="2.1cm"/>

#!/usr/bin/perl
# j4ck, 2012
use strict;
my $dir = $ARGV[0];

die("Укажите директорию для проверки") unless (($dir) || (-e $dir));

sub check_file() {
   
   my $cell_found = 0;
   my $block_found = 0;
   my $block_ok = 0;
   my @err = ();
   my $num = 1;
   my $file = $_[0];

   open MF, "<", $file or die($!);

   while(<MF>){

      if(/\<fo\:table\-cell/){
         $cell_found = 1;   
         print "[$num] <fo:table-cell>\n" if $ARGV[1];
         $num++;
         next;
      }   

      if(/\<\/fo\:table\-cell\>/){

         if( $block_found ==0 && $block_ok == 0) {
            print "[!]    Строка $num: внутри fo:table-cell нет fo:block\n" if ( $block_found ==0 && $block_ok == 0);
            push(@err,$num);
         }

         $cell_found = 0;   
         $block_found = 0;
         $block_ok = 0;
         print "[$num] </fo:table-cell>\n" if $ARGV[1];
      }   
   
      if($cell_found == 1){
      
         if(/\<fo\:table\-cell\/\>/) {
            $cell_found = 0;
            $num++;
            next;
         }   
      
         if((/\<fo\:block\>/) || (/\<fo\:block\/\>/)){
            print "[$num]    <fo:block>\n" if $ARGV[1];
            $block_found = 1;
            $num++;
            next;
         }
   
         if(/\<fo\:block.+(\/)?\>(.+)?\<\/fo\:block\>/){
            print "[$num]    <fo:block></fo:block>\n" if $ARGV[1];
            $block_found = 1;
            $num++;
            next;
         }
   
         if(/\<\/fo\:block\>/){
            print "[$num]    </fo:block>\n" if $ARGV[1];
            $block_found = 1;
            $block_ok = 1;
            $num++;
            next;
            
         }

         if($block_found) {
   
            if((/\<\/fo\:block\>/) || /\<fo\:block\/\>/) {
                  print "[$num]    </fo:block>\n" if $ARGV[1];
               $block_ok = 1;
               $block_found = 0;
                  $num++;
               next;
            }
         }

         if(/\<\/fo\:table\-cell\>/){
            $cell_found = 0;   
            $block_found = 0;
            $block_ok = 0;
            print "[$num] </fo:table-cell>\n" if $ARGV[1];
         }   
      }

      $num++;
   }

   if($#err > 0) {
      print "       Редактировать построчно? (yes/no): ";
   
      while(<STDIN>) {
         last if /^yes$/;   
         return if /^no$/;
      }
      for(@err) {
         my $str = $_;
         system("vi +$str $file");   
      }
   }
}

sub list_dir() {

   opendir my($dh), $dir or die "Couldn't open dir '$dir': $!";
   my @files = readdir $dh;

   for(@files){
      next unless /\.xsl/;
      my $curr = $_;
      print "[~] Проверка файла $curr\n";
      &check_file($curr);
   }
}

sub main {
   &list_dir;
}

main;

#!/bin/bash
# j4ck, 2012

DIR="/usr/local/BGBillingServer/webroot/"

if [ -z $DIR ] || [ ! -d $DIR ] ; then

   while (true)
   do
      echo -n "Укажите директорию XSL: "
      read DIR

      if [ -s $DIR ] || [ -d $DIR ] ; then
         break
      fi
   done
fi

LIST=`ls $DIR/xsl/*.xsl | awk -F"/" '{ print $8" "}' | tr -d "\n"`

test -d $DIR/xsl-utf8 || mkdir $DIR/xsl-utf8
test -d $DIR/xsl-fail || mkdir $DIR/xsl-fail

for FILE in $LIST
do
   COUNT=`grep -i "encoding=\"UTF-8\"" $DIR/xsl/$FILE | wc -l`

   if [ $COUNT -gt "0" ] ; then
      echo "[+]    $FILE уже в UTF-8"
      continue
   fi

   echo "[~] Конвертирование $FILE.."
   cat $DIR/xsl/$FILE | iconv -f cp1251 -t utf-8 > $DIR/xsl-utf8/$FILE 2>/dev/null
   
   if [ $? -ne "0" ] ; then
      rm $DIR/xsl-utf8/$FILE
      echo "[!] Ошибка конвертирования $FILE, копирую исходный файл в директорию xsl-fail.."
      cp $DIR/xsl/$FILE $DIR/xsl-fail/
   fi   
done

LIST2=`ls $DIR/xsl-utf8/*.xsl | awk -F"/" '{ print $8" "}' | tr -d "\n"`

for FILE2 in $LIST2
do
   cd $DIR/xsl-utf8/
   mv $FILE2 $FILE2.cp1251
   cat $FILE2.cp1251 | sed -e 's/encoding=\"windows-1251\"/encoding=\"utf-8\"/ig' > $FILE2
   rm $FILE2.cp1251
done