问题[string](coding)

我提供了两种不同的计算字符串长度时切换段的实现。我不明白为什么我们要切换额外段和数据段，或者更准确地说，将数据段（寄存器 DS）的内容复制到额外段（寄存器 ES）。如果我删除这些行push ds，pop es结果不会改变，但是当我les di, [bp+4]用替换时mov di, [bp+4] ，屏幕上会显示消息，但带有一堆其他不同的字符。

为什么会发生这种情况？我是装配方面的新手。

org 0x0100
jmp start

message: db 'Hello world!', 0      ; First string to be concatenated


; Subroutine to calculate the length of a string
; Takes the segment and offset of a string as parameters
strlen:
    push bp
    mov bp, sp
    push es
    push cx
    push di
    les di, [bp+4]        ; Point es:di to string
    mov cx, 0xffff        ; Load maximum number in cx
    xor al, al            ; Load a zero in al
    repne scasb           ; Find zero in the string
    mov ax, 0xffff        ; Load maximum number in ax
    sub ax, cx            ; Find change in cx
    dec ax                ; Exclude null from length
    pop di
    pop cx
    pop es
    pop bp
    ret 4

; Subroutine to print a string
; Takes the x position, y position, attribute, and address of a null-terminated string as parameters
printstr:
    push bp
    mov bp, sp
    pusha
    push di
    push ds               ; Push segment of string
    mov ax, [bp+4]
    push ax               ; Push offset of string
    call strlen           ; Calculate string length

    cmp ax, 0             ; Is the string empty?
    jz exit               ; No printing if string is empty

    mov cx, ax            ; Save length in cx
    mov ax, 0xb800        ; Video memory base address
    mov es, ax            ; Point es to video base
    mov al, 80            ; Load al with columns per row
    mul byte [bp+8]       ; Multiply with y position
    add ax, [bp+10]       ; Add x position
    shl ax, 1             ; Turn into byte offset
    mov di, ax            ; Point di to required location
    mov si, [bp+4]        ; Point si to string
    mov ah, [bp+6]        ; Load attribute in ah
    cld                   ; Clear direction flag for auto-increment mode

 nextchar:
    lodsb                 ; Load next char in al
    stosw                 ; Print char/attribute pair
    loop nextchar         ; Repeat for the whole string

 exit:
    pop ds
    pop di
    popa
    pop bp
    ret 8

start:
    mov ax, 30
    push ax               ; Push x position
    mov ax, 20
    push ax               ; Push y position
    mov ax, 0x7           ; Blue on white attribute
    push ax               ; Push attribute
    mov ax, message
    push ax               ; Push address of message
    call printstr         ; Call the printstr subroutine

    mov ax, 0x4c00        ; Terminate program
    int 0x21

替代版本：

    push bp
    mov bp, sp
    pusha

    push ds
    pop es         ; load ds in es
    mov di, [bp+4] ; point di to string
    mov cx, 0xffff ; load maximum number in cx
    xor al, al 
    repne scasb 
    mov ax, 0xffff 
    sub ax, cx 
    dec ax 
    jz done 

    mov cx, ax
    ...

第一次在这里发帖，我发现 Sol 20 计算机的旧 1977 BASIC 程序中存在一些错误。

第一个错误是“第 4240 行的 DM 错误”：

4220 PRINT "     TYPE IN  -STOP-  TO QUIT ANYTIME"
4230 PRINT
4240 DIM A$(30),B$(30),C$(45),D$(30),E$(30),L$(10),Z$(12)
4250 LET A$="NO SUCH ELEVATION IN MY TAPES, UNDER 360, PLEASE."
4260 PRINT "  THE  TANK IS  ";E;" FEET AWAY."

如果我从第 4240 行删除“B$(30)”，程序将继续运行，但会出现下面的“第 4590 行的 BS 错误”：

4560 IF I<=0 THEN 5250
4570 IF S=0 OR Z=3 THEN 4590
4580 LET S=-S
4590 LET D=(2*X**3*SIN(2*W)*COS(.5*W)/G*4)
4600 LET D=INT(D/15-(3*S-7))
4610 PRINT
4620 PRINT "          ";D;" FEET"

如果我删除“X”后面的一个“*”，程序就可以运行，但范围太小了。熟悉 BASIC 的人可能都能发现错误或提出一些建议。

以前，当我使用 .NET 8 时，我可以在语句String.Join中使用，如以下代码所示：SelectIQueryable

var receiveTransactions = await repository.Context.Set<ReceiveTransaction>()
    .Select(x => new ThirdPartyTransactionReportModel
    {
        Date = x.Created,
        Customer = string.Join(" - ", x.CustomerIdentity.Customer.Name, x.CustomerIdentity.Customer.Type, x.CustomerIdentity.Customer.Nationality.Name),
    })
    .ToListAsync();

但是，升级到 .NET 9 后，我遇到一个错误：

表达式树不能包含 ref struct 或受限类型“ReadOnlySpan”的值。

请提供任何解决方案或替代方案来解决此问题。

正如我从这个问题中理解的那样，有很多种方法可以解释两个字符串的顺序。

OrdRust 为for提供了默认实现str，但我找不到这些问题的答案：

• 它是按字符排序，还是按原始字节值排序？
• 如果按字符排序，它使用哪种语言环境？

我有一个名为 BB_NP 的变量，我想将该内容（字符串）添加到带有日期/时间的输出文本文件中，所以只是一个基本的日志文件。

添加内容-路径“。\LogFile.txt”-值$(Get-Date) ($BB_NP)

每次我尝试时，无论采用何种组合（包装或不包装等），它都只能执行一项，而不能同时执行两项，我相信这是由于两种不同类型的数据造成的。

我怎样才能将其写入文本文件、日期/时间，然后连接 BB_NP 变量的内容？

谢谢！。

我正在尝试创建我期望从子程序 (GetAllPosition) 获得的内容。我不知道RsultOfPostionAndLength在代码中哪里使用才能获得预期的输出

我对（）的输出的期望RsultOfPostionAndLength ：

MultiSplit 的用法{"C", "B", "A"}为： 55-5 '}666[' 61-5']777(' 67-3')8[' 71-6']hhhy('

MultiSplit 的用法{"A", "B", "C"}为： 27-6 ']1111{' 34-4'}22(' 39-7')33333{' 47-3'}4{' 51-3 '}5{' 55-5'}666[' 78-4')99{' 83-5'}999['

    Dim RsultOfPostionAndLength As List(Of String) 'Pattern is Position of String And Length Of Find
    '  'MultiSplit' For {"C", "B", "A"} is:  55-5 '}666['  61-5']777('    67-3')8['  71-6']hhhy('
    '  'MultiSplit' For {"A", "B", "C"} is:  27-6 ']1111{'  34-4'}22('    39-7')33333{'  47-3'}4{' 51-3 '}5{' 55-5'}666[' 78-4')99{'  83-5'}999['
   

 Sub Setup()
        Dim inString As String = "}666[]777([}666[]777(]00[A]1111{C}22(B)33333{C}4{C}5{C}666[A]777(B)8[A]hhhy(B)99{C}999[A]101010}666[]777("
        Dim MultiSplit As String() = {"C", "B", "A"}
        GetAllPosition(1, inString.Length, inString, MultiSplit, 0)
    End Sub

 Sub GetAllPosition(LastIdx As Integer, LastLen As Integer, inString As String, MultiSplit As String(), Level As Integer)
        Dim spl As String() = Split(inString, ",")
        Dim body As String = Mid(inString, LastIdx, LastLen)
        'Dim LastIdx As Integer = spl(0)
        Dim results As New List(Of String)
        Dim Find As String = MultiSplit(Level)
        Dim last As Integer = LastIdx
        Dim index As Integer = -1
        Do Until body.Length <= index
            index = body.IndexOf(Find, index + 1)
            If index = -1 AndAlso body.Length > last Then
                index = body.Length
            End If
            Dim lenTexxt As Integer = Math.Abs(last - index) + 1
            Dim part1 As String = Mid(body, last, lenTexxt)
            Dim part As String = Mid(inString, last, lenTexxt)
            Dim b As Boolean = MultiSplit.Skip(Level + 1).All(Function(c) part.IndexOf(c, comparisonType:=StringComparison.OrdinalIgnoreCase) > -1)
            If b Then
                results.Add(last & "," & lenTexxt & "," & part)
            End If
            last = index + 2
        Loop
        Level += 1
        For Each g In results
            Dim spl2 As String() = Split(g, ",")
            GetAllPosition(spl2(0), spl2(1), inString, MultiSplit, Level)
        Next
    End Sub

我有时需要截断字符串以适应特定数量的字节。在 Go 中执行此操作的问题是，如果您这样做s[:1_000_000]，假设这s是一个有效的utf-8 字符串，您可能最终会在 utf-8 代码点的中间进行切割，该代码点可能为 1~4 个字节长，从而留下无效的符文。

有些人（以及接受过他们思想培训的法学硕士）会尝试使用utf8.ValidString或for i := range s来做到这一点，因为这两种方法都可以确保符文有效。但是，这些人将在线性时间内完成恒定时间任务。

我编写了一个恒定时间的安全截断函数：

import "unicode/utf8"

// UTF8SafeTruncateNBytes Truncates a **valid** utf-8 string `s` to `n` bytes (not n UTF-8 characters),
// ensuring that the string is not truncated in the middle of a UTF-8 character.
func UTF8SafeTruncateNBytes(s string, n int) string {
    if n >= len(s) {
        return s
    }
    for i := n; i >= n-3 && i >= 0; i-- {
        if utf8.RuneStart(s[i]) {
            return s[:i]
            // Edit: This was:
            //if r, size := utf8.DecodeRuneInString(s[i:]); r != utf8.RuneError {
            //  return s[:i+size]
            //}
            // but got fixed because of the picked solution. This implementation is now correct,
            // and, in fact, equivalent, except that it only checks one byte instead of backing up forever.
        }
    }

    // Fallback in the case that the user lied, and passed a string that is not a valid utf-8 string.
    // It would be wise to return an error or "" here if this is a standard-library
    // function to allow the user to check for it.
    return s[:n]
}

问题如下：

1. 这会起作用吗？或者我是否遗漏了一个极端情况？
2. 有没有我错过的更好的、更有说服力的方法来做到这一点，或者已经有一个标准库函数可以做到这一点？
3. 为什么这不是 下的标准库函数"unicode/utf8"？似乎它的使用频率和复杂性恰好足以保证拥有标准库函数。我应该在他们的问题页面中提出它吗？

我正在尝试将 ASCII 字节向量转换为 rust 字符串。我找到了一个std::str::from_utf8()函数，它应该能够处理所有 ASCII 字符串。由于某种原因，它无法读取版权符号，如以下代码示例所示：

let buf = vec![0xA9, 0x41, 0x52, 0x54]; //©ART
println!(
    "{}",
    match std::str::from_utf8(&buf) {
        Ok(x) => x,
        Err(x) => {
            println!("ERROR: {}", x);
            "failed"
        }
    }
);
// > ERROR: invalid utf-8 sequence of 1 bytes from index 0

根据https://www.ascii-code.com/CP1252/169 0xA9是一个有效的 ASCII 字符，根据https://www.compart.com/en/unicode/U+00A9也是一个有效的 UTF-8 字符。

我也尝试过String::from_utf8_lossy()，但是�ART结果却不是字符串应该有的样子。

是我遗漏了什么吗，或者这是 rust 处理 ASCII 方式的一个错误？

对于 strjoin 函数，如果相同的代码可以在 Matlab 和 Octave 上运行就好了。strjoin 的参数几乎相同。不同之处在于，在 Matlab 中它需要一个向量 []，而在 Octave 中它需要一个单元格 {}。除了检查“OCTAVE_VERSION”进行切换之外，还有什么更好的方法吗？

strjoin(["mat" "lab"]);

https://www.mathworks.com/help/matlab/ref/strjoin.html

strjoin({"oc" "tave"});

https://octave.sourceforge.io/octave/function/strjoin.html

OCTAVE_VERSION

https://docs.octave.org/v4.0.3/How-to-distinguish- Between-Octave-and-Matlab_003f.html

我无法找到 ffi::CString 连接的方法，因此我执行以下操作：

// c_str1: CString
// c_str2: CString
...
let str1 = c_str1.to_str().unwrap();
let str2 = c_str2.to_str().unwrap();
let concatenated = str1.to_owned() + str2;
...

但我的解决方案看起来不太符合惯用方式。您能否建议是否有更好的连接解决方​​案？