40 lines
1.1 KiB
Plaintext
40 lines
1.1 KiB
Plaintext
|
/*
|
||
|
|
*
|
||
|
|
* String utilities.
|
||
|
|
*
|
||
|
|
* Copyright 2007 - 2009 by John Johnson Software, LLC.
|
||
|
|
* All Rights Reserved.
|
||
|
|
*
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include "string.h"
|
||
|
|
|
||
|
|
if (leftstr("test string", 3) != "tes") exit(12);
|
||
|
|
if (rightstr("test string", 3) != "ing") exit(13);
|
||
|
|
if (ltrim(" test string") != "test string") exit(14);
|
||
|
|
if (rtrim("test string ") != "test string") exit(15);
|
||
|
|
if (trim(" test string ") != "test string") exit(16);
|
||
|
|
if (remove_last_dir("c:/dir/thet/ssot/") != "c:/dir/thet") exit(17);
|
||
|
|
|
||
|
|
string replacements;
|
||
|
|
string original_string;
|
||
|
|
string new_string;
|
||
|
|
string board_filepath;
|
||
|
|
int t = time();
|
||
|
|
|
||
|
|
board(b) board_filepath = b.name;
|
||
|
|
replacements =
|
||
|
|
key_value_record("%P", filedir(board_filepath)) +
|
||
|
|
key_value_record("%F", filename(board_filepath)) +
|
||
|
|
key_value_record("%B", filesetext(filename(board_filepath), "")) +
|
||
|
|
key_value_record("%D", t2string(t)) +
|
||
|
|
key_value_record("%S", "top") +
|
||
|
|
key_value_record("%T", "drill");
|
||
|
|
|
||
|
|
original_string = "Path = %P,\n Filename = %F,\n" +
|
||
|
|
"Board Name = %B, Now is %D\n" +
|
||
|
|
"Side is %S, and this is the %T file.";
|
||
|
|
|
||
|
|
new_string = substitute(original_string, replacements);
|
||
|
|
dlgMessageBox(new_string);
|