[packages/adapter: 66/631] - rewritten group translation - now it works in all packages separately, adds all translations fro

[glen]

commit 8e5358f861542d8f643a155b3743e893ea97e0b7
Author: Sebastian Zagrodzki <se...@zagrodzki.net>
Date:   Sun Jul 30 13:39:35 2000 +0000

    - rewritten group translation - now it works in all packages separately,
      adds all translations from groups file and checks if group name is valid
    
    Changed files:
        adapter.awk -> 1.66

 adapter.awk | 86 ++++++++++++++++++++++++++++++++-----------------------------
 1 file changed, 45 insertions(+), 41 deletions(-)
---
diff --git a/adapter.awk b/adapter.awk
index 2aec935..41c7afd 100644
--- a/adapter.awk
+++ b/adapter.awk
@@ -256,24 +256,61 @@ preamble == 1 {
        sub(/[ \t]*:/, ":")
        
        field = tolower($1)
+       
+       if (Byla_grupa == 1 && field !~ /group(\(..\))?:/) {
+               Byla_grupa = 0
+               print "Group:\t\t" Grupa["en"]
+               if (Grupa["en"] ~ /^X11/ && x11 == 0)   # Is it X11 application?
+                      x11 = 1
+
+               byl_plik_z_grupami = 0
+               byl_opis_grupy = 0
+               while ((getline linia_grup < groups_file) > 0) {
+                       byl_plik_z_grupami = 1
+                       if (linia_grup == Grupa["en"]) {
+                               byl_opis_grupy = 1
+                               break
+                       }
+               }
 
+               if (!byl_plik_z_grupami)
+                       print "######\t\t" groups_file ": no such file"
+               else if (!byl_opis_grupy)
+                       print "######\t\t" "Unknown group!"
+               else
+                       while (getline linia_grup < groups_file) {
+                               if (linia_grup == "")
+                                       break
+                               split(linia_grup, g, /[\[\]:]/)
+                               sub(/^[ \t]*/,"",g[4])
+                               Grupa[g[2]]=g[4]
+                       }
+               
+               close(groups_file)
+
+               delete Grupa["en"]
+               for (jezyk in Grupa) {
+                       print "Group(" jezyk "):\t" Grupa[jezyk]
+                       delete Grupa[jezyk]
+               }
+       }
+       
        if (field ~ /packager:|distribution:|docdir:|prefix:/)
                next
        
        if (field ~ /buildroot:/)
                $0 = $1 "%{tmpdir}/%{name}-%{version}-root-%(id -u -n)"
 
-       if (field ~ /group:/) {
+       if (field ~ /group(\(..\))?:/) {
                format_preamble()
-               print $0
                
-               sub($1 "[ \t]*","")
-               translate_group($0)
-               close(groups_file)
+               if (!match(field,/\(..\):/))
+                       glang="en"
+               else
+                       glang=substr(field,RSTART+1,2)
+               Grupa[glang] = $2
+               Byla_grupa = 1
                
-               if ($0 ~ /^X11/ && x11 == 0)    # Is it X11 application?
-                      x11 = 1
-
                next    # Line is already formatted and printed
        }
                
@@ -388,39 +425,6 @@ function is_there_line(line, l)
                return 0
 }
 
-# This function prints translated names of groups.
-function translate_group(group)
-{
-       for(;;) {
-               result = getline line < groups_file
-               
-               if (result == -1) {
-                       print "######\t\t" groups_file ": no such file"
-                       return
-               }
-
-               if (result == 0) {
-                       print "######\t\t" "Unknown group!"
-                       return
-               }
-               
-               if (line == group) {
-                       found = 1
-                       continue
-               }
-
-               if (found == 1)
-                       if (line ~ /\[[a-z][a-z]\]:/) {
-                               split(line, g, /\[|\]|\:/)
-                               if (!is_there_line("^Group(" g[2] "):"))
-                                               printf("Group(%s):%s\n", g[2], 
g[4])
-                       } else {
-                               found = 0
-                               return
-                       }
-       }
-}
-
 # There should be one or two tabs after the colon.
 function format_preamble()
 {
================================================================

---- gitweb:

http://git.pld-linux.org/gitweb.cgi/packages/adapter.git/commitdiff/6ca0126d4d0c8c79feb7db10b0a0fade0f3b8885

_______________________________________________
pld-cvs-commit mailing list
pld-cvs-commit@lists.pld-linux.org
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit