果てしなくぞんざいな日記

2023年6月1日木曜日

Debian 11.7 + MATEにてDropboxを使う

かんたんに設定できた。

「# apt-get install caja-dropbox」を実行してインストール。
「$ caja-dropbox」を実行してアカウント等の設定を実行。
「$ caja-dropbox autostart」を実行してMATEログイン時に自動開始するように設定。

2023年5月23日火曜日

Debian 11.7(bullseye)にKindle for PCをインストールする手順

Wineはバージョン8がKindle for PCに未対応のためあえて7系列をインストールする必要があるとのこと。

参考にしたサイト: https://qiita.com/nanbuwks/items/e075d939b00e341111d3

WineHQのパッケージ利用設定

i386アーキテクチャを追加する

# dpkg --add-architecture i386

キーリング設定

# mkdir -pm755 /etc/apt/keyrings 
# wget -O /etc/apt/keyrings/winehq-archive.key https://dl.winehq.org/wine-builds/winehq.key

パッケージ取得先追加

# wget -NP /etc/apt/sources.list.d/ https://dl.winehq.org/wine-builds/debian/dists/bullseye/winehq-bullseye.sources
# apt-get update

用意されているバージョン7系列を確認する

# apt policy winehq-stable
(2023/05/19時点では7.0.2が利用可能)

実際にWineをインストール

# export WINEVERSION=7.0.2~bullseye-1
# apt-get install winehq-stable=$WINEVERSION wine-stable=$WINEVERSION wine-stable-amd64=$WINEVERSION wine-stable-i386=$WINEVERSION
# apt-mark hold winehq-stable

フォント等の補助ソフトウェアのインストール

WineTricksで必要ソフトウェアの導入

# apt-get install winetricks
$ winetricks --self-update
$ winetricks -q cjkfonts vcrun2013

Kindleのインストール

$ wine KindleForPC-installer-1.40..65535.exe

2022年7月19日火曜日

VMware Workstatonで仮想マシンが動いていたらホストをシャットダウンしないshutdown.exeのラッパー

毎日3:00にVMwareホストを再起動するようにしているが、仮想マシンを起動しっぱなしにしている場合にホストをシャットダウンしたくないのでshutdown.exeのラッパーをVB.netで作った。

Module VMwareShutdownChecker

    Sub Main()
        Dim cmds As String() = System.Environment.GetCommandLineArgs
        Dim cmdargs As String = String.Empty

        If System.Environment.GetCommandLineArgs().Count = 1 Then
            End
        End If

        For i = 1 To System.Environment.GetCommandLineArgs().Count - 1
            cmdargs = cmdargs & " " & cmds(i).ToString
        Next


        Dim ps As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcesses()
        Dim shutdownflag As Boolean = True

        For Each p As System.Diagnostics.Process In ps
            Try
                If InStr(p.ProcessName.ToUpper, "VMWARE-VMX") > 0 Then
                    shutdownflag = False
                    Exit For
                End If
            Catch ex As Exception
                shutdownflag = False
            End Try
        Next


        If shutdownflag = True Then
            Dim psi As New System.Diagnostics.ProcessStartInfo()

            psi.FileName = "shutdown.exe"
            psi.Arguments = cmdargs

            System.Diagnostics.Process.Start(psi)
        End If

    End Sub

End Module

コマンドラインオプションはそのままshutdown.exeにわたすので同じものを設定する。

2022年4月10日日曜日

リモート(RDP・UltraVNC)ランチャー「RemoteStarter」

小物プログラムを作ってみました。

Windows付属のリモートデスクトップ(RDP)クライアントmstsc.exeと、
UltraVNCのクライアントvncviewer.exeを起動するだけのソフトです。

おまけでPingテストもつけてみました。

ダウンロードは右クリックして「名前を付けてリンク先のファイルを保存」を使用してください。
通信がHTTPなのでChromeでは警告が表示されます。
下段に表示されるダウンロード一覧から継続を選択することでダウンロードできます。

本来はUltraVNCのインストールが必要ですが、RemoteStarter.exeと同じフォルダにvncviewer.exeとvnchooks.dllを置くとそれを使えるようにしています。(多分うごく程度)

お約束ですがこのソフトウェアを使った結果に関しては無保証ということで。( ´∀｀)