summaryrefslogtreecommitdiffstats
path: root/util/scan/dvb-s/IA6-93w
blob: eb5d93a8b71ee01d4f649e3acd06530c00cb584c (plain) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61

# Intelsat Americas 6 @ 93W
# freq pol sr fec

S 11711000 V 14312000 AUTO
S 11721000 V 03979000 AUTO
S 11727000 V 03979000 AUTO
S 11732000 V 03979000 AUTO
S 11737000 V 03979000 AUTO
S 11737000 H 03979000 AUTO
S 11742000 V 03979000 AUTO
S 11748000 V 03979000 AUTO
S 11753000 V 03979000 AUTO
S 11767000 V 03979000 AUTO
S 11772000 V 03979000 AUTO
S 11772000 H 03979000 AUTO
S 11777000 V 03979000 AUTO
S 11782000 V 03979000 AUTO
S 11788000 V 03979000 AUTO
S 11793000 V 03979000 AUTO
S 11809000 V 03979000 AUTO
S 11814000 V 03979000 AUTO
S 11827000 V 08429000 AUTO
S 11836000 H 07179000 AUTO
S 11841000 H 04000000 AUTO
S 11865000 V 03516000 AUTO
S 11887000 V 03979000 AUTO
S 11893000 V 03979000 AUTO
S 11904000 V 05000000 AUTO
S 11919000 V 03979000 AUTO
S 11924000 V 03979000 AUTO
S 11926000 H 08848000 AUTO
S 11929000 V 03979000 AUTO
S 11935000 V 03979000 AUTO
S 11936000 H 08848000 AUTO
S 11944000 H 08848000 AUTO
S 11949000 V 03979000 AUTO
S 11954000 V 03979000 AUTO
S 11956000 H 03979000 AUTO
S 11960000 V 03979000 AUTO
S 11961000 H 03979000 AUTO
S 11965000 V 03979000 AUTO
S 11967000 H 03979000 AUTO
S 11970000 V 03979000 AUTO
S 11972000 H 03979000 AUTO
S 11977000 H 03979000 AUTO
S 12047000 V 03979000 AUTO
S 12048000 H 03979000 AUTO
S 12054000 H 03979000 AUTO
S 12058000 V 03979000 AUTO
S 12059000 H 03979000 AUTO
S 12063000 V 03979000 AUTO
S 12064000 H 03979000 AUTO
S 12069000 H 03979000 AUTO
S 12076000 V 08679000 AUTO
S 12089000 V 06511000 AUTO
S 12110000 H 04104000 AUTO
S 12116000 H 03979000 AUTO
S 12121000 H 03979000 AUTO
S 12126000 H 03979000 AUTO
S 12132000 H 03979000 AUTO
S 12175000 V 05147000 AUTO
generated by cgit v1.2.3 (git 2.39.1) at 2026-06-30 13:31:11 +0000
r $basename; our $debug = $ARGV[1]; ($basename) = $ARGV[0] =~ /([a-zA-Z0-9_\-_]+).pl/; local *H; local *C; h_header(); c_header(); foreach (sort keys %{$h}) { foreach my $item (@{$h->{$_}}) { if ($_ eq "descriptors") { printf H ("#define %s_ID 0x%02X\n",uc($item->{name}),$item->{id}); } do_it ($item->{name},$item->{elements}); } } h_footer(); c_footer(); sub type { if ($_[0] > 16) { return "u32"; } elsif ($_[0] > 8) { return "u16"; } else { return "u8 "; } } sub do_it { my ($name,$val) = @_; print H "struct $name {\n"; print C <<EOL; struct $name read_$name(const u8 *b) { struct $name v; EOL my $offs = 0; for (my $i = 0; $i < scalar @{$val}; $i+=2) { printf H ("\t\t%s %-25s :%2d;\n",type($val->[$i+1]),$val->[$i],$val->[$i+1]); printf C ("\tv.%-25s = getBits(b,%3d,%2d);\n",$val->[$i],$offs,$val->[$i+1]); printf C ("\tfprintf(stderr,\" %s = %%x %%d\\n\",v.%s,v.%s);\n",$val->[$i],$val->[$i],$val->[$i]) if $debug; $offs += $val->[$i+1]; } print H "} PACKED;\n"; print H "struct $name read_$name(const u8 *);\n\n"; print C "\treturn v;\n}\n\n" } sub h_header { open(H,">$basename.h"); print H "#ifndef __".uc($basename)."_H_\n"; print H "#define __".uc($basename)."_H_\n\n"; print H "#include \"section.h\"\n\n"; } sub c_header { open(C,">$basename.c"); print C "#include \"$basename.h\"\n\n"; } sub c_footer { close(C); } sub h_footer { print H "#endif\n"; close(H); }
generated by cgit v1.2.3 (git 2.39.1) at 2026-06-30 13:31:11 +0000