ptx-90-parser 0.4.2

Parse NVIDIA PTX 9.0 assembly into a structured AST and explore modules via a CLI.
Documentation 
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
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125

//! Original PTX specification:
//!
//! tcgen05.alloc.cta_group.sync.aligned{.shared::cta}.b32  [dst], nCols;
//! tcgen05.dealloc.cta_group.sync.aligned.b32              taddr, nCols;
//! tcgen05.relinquish_alloc_permit.cta_group.sync.aligned;
//! .cta_group = { .cta_group::1, .cta_group::2 };

#![allow(unused)]

use crate::parser::{
    PtxParseError, PtxParser, PtxTokenStream, Span,
    util::{
        between, comma_p, directive_p, exclamation_p, lbracket_p, lparen_p, map, minus_p, optional,
        pipe_p, rbracket_p, rparen_p, semicolon_p, sep_by, string_p, try_map,
    },
};
use crate::r#type::common::*;
use crate::{alt, ok, seq_n};

pub mod section_0 {
    use super::*;
    use crate::r#type::instruction::tcgen05_alloc::section_0::*;

    // ============================================================================
    // Generated enum parsers
    // ============================================================================

    impl PtxParser for CtaGroup {
        fn parse() -> impl Fn(&mut PtxTokenStream) -> Result<(Self, Span), PtxParseError> {
            alt!(
                map(string_p(".cta_group::1"), |_, _span| CtaGroup::CtaGroup1),
                map(string_p(".cta_group::2"), |_, _span| CtaGroup::CtaGroup2)
            )
        }
    }

    impl PtxParser for Tcgen05AllocCtaGroupSyncAlignedSharedCtaB32 {
        fn parse() -> impl Fn(&mut PtxTokenStream) -> Result<(Self, Span), PtxParseError> {
            try_map(
                seq_n!(
                    string_p("tcgen05"),
                    string_p(".alloc"),
                    CtaGroup::parse(),
                    string_p(".sync"),
                    string_p(".aligned"),
                    map(optional(string_p(".shared::cta")), |value, _| value
                        .is_some()),
                    string_p(".b32"),
                    AddressOperand::parse(),
                    comma_p(),
                    GeneralOperand::parse(),
                    semicolon_p()
                ),
                |(_, alloc, cta_group, sync, aligned, shared_cta, b32, dst, _, ncols, _), span| {
                    ok!(Tcgen05AllocCtaGroupSyncAlignedSharedCtaB32 {
                        alloc = alloc,
                        cta_group = cta_group,
                        sync = sync,
                        aligned = aligned,
                        shared_cta = shared_cta,
                        b32 = b32,
                        dst = dst,
                        ncols = ncols,

                    })
                },
            )
        }
    }

    impl PtxParser for Tcgen05DeallocCtaGroupSyncAlignedB32 {
        fn parse() -> impl Fn(&mut PtxTokenStream) -> Result<(Self, Span), PtxParseError> {
            try_map(
                seq_n!(
                    string_p("tcgen05"),
                    string_p(".dealloc"),
                    CtaGroup::parse(),
                    string_p(".sync"),
                    string_p(".aligned"),
                    string_p(".b32"),
                    GeneralOperand::parse(),
                    comma_p(),
                    GeneralOperand::parse(),
                    semicolon_p()
                ),
                |(_, dealloc, cta_group, sync, aligned, b32, taddr, _, ncols, _), span| {
                    ok!(Tcgen05DeallocCtaGroupSyncAlignedB32 {
                        dealloc = dealloc,
                        cta_group = cta_group,
                        sync = sync,
                        aligned = aligned,
                        b32 = b32,
                        taddr = taddr,
                        ncols = ncols,

                    })
                },
            )
        }
    }

    impl PtxParser for Tcgen05RelinquishAllocPermitCtaGroupSyncAligned {
        fn parse() -> impl Fn(&mut PtxTokenStream) -> Result<(Self, Span), PtxParseError> {
            try_map(
                seq_n!(
                    string_p("tcgen05"),
                    string_p(".relinquish_alloc_permit"),
                    CtaGroup::parse(),
                    string_p(".sync"),
                    string_p(".aligned"),
                    semicolon_p()
                ),
                |(_, relinquish_alloc_permit, cta_group, sync, aligned, _), span| {
                    ok!(Tcgen05RelinquishAllocPermitCtaGroupSyncAligned {
                        relinquish_alloc_permit = relinquish_alloc_permit,
                        cta_group = cta_group,
                        sync = sync,
                        aligned = aligned,

                    })
                },
            )
        }
    }
}